Kod

Kod:
on *:text:*:#code: {
tokenize 32 $strip($1-)
if ($1 == !ident) {
var %the = ekle / sil / list / toplam / başlat / durdur Seçenekler bunlardır .
if (!$2) { .msg $chan ( $+ $nick $+ ): Hatalı Kullanım , Lütfen doğru seçenek kullanın $qt(%the) $+ . | return }
if (!$istok(%the,$2,32)) { .msg $chan ( $+ $nick $+ ): Hatalı Kullanım , Lütfen doğru seçenek kullanın $qt(%the) $+ . | return }
if ($2 == başlat) || ($2 == açık) {
if (%theident) { .msg $chan ( $+ $nick $+ ): İdent Ban Modülü Başlatıldı . | return }
set %theident 1
.msg $chan ( $+ $nick $+ ): İdent Ban Modülü Başlatıldı .
}
if ($2 == durdur) || ($2 == kapalı) {
if (!%theident) { .msg $chan ( $+ $nick $+ ): İdent Ban Modülü Kapatıldı . | return }
set %theident 0
.msg $chan ( $+ $nick $+ ): İdent Ban Modülü Kapatıldı .
}
if ($2 == ekle) {
if (!$3) { .msg $chan ( $+ $nick $+ ): Hatalı Kullanım : İdent Bulunamadı . | return }
if ($ulist($3,ident,1)) { .msg $chan ( $+ $nick $+ ): Hatalı Kullanım , Bu $qt($3) İdent listede mevcut durumda | return }
.auser ident $3
.msg $chan ( $+ $nick $+ ): The $qt($3) İdent Listeye Başarıyla Eklendi .
}
if ($2 == sil) {
if (!$3) { .msg $chan ( $+ $nick $+ ): Hatalı Kullanım : İdent Bulunamadı . | return }
if (!$ulist($3,ident,1)) { .msg $chan ( $+ $nick $+ ): Hata: $qt($3) İdent listede mevcut değil . | return }
.ruser ident $3
.msg $chan ( $+ $nick $+ ): The $qt($3) İdent listeden başarıyla kaldırıldı .
}
if ($2 == list) {
var %t = $ulist(*,ident,0)
if (!%t) { .msg $chan ( $+ $nick $+ ): İdent listesi boş durumda . | return }
var %i = 1
while (%i <= %t) { .msg $chan ( $+ $nick $+ ): $chr(35) $+ %i -> $ulist(*,ident,%i) | inc %i }
}
if ($2 == toplam) {
var %t = $ulist(*,ident,0)
if (!%t) { .msg $chan ( $+ $nick $+ ): İdent Listesi Boş . }
else { .msg $chan ( $+ $nick $+ ): Listede bulunan ident sayısı : %t . }
 }
}