Kod: Kodu kopyalamak için üzerine çift tıklayın!
if -sident sil* iswm $right($strip($4-),-1) {
if !$qmasterkontrol($botfnick($1)) { sercan $sockname privmsg #opers : $+ $qlogo $+(,%Nick,) Bu komutu kullanmaya yetkili degilsiniz, Siz $duzey(%Nick) | halt }
if $6 == $null {
sercan $sockname privmsg #opers : $+ $qlogo Lutfen kelimeyi yaziniz.
halt
}
sercan $sockname $fullnamespam2 $+((?-i).+!,$6,@.+)
sercan $sockname privmsg #opers : $+ $qlogo Silinen ident : $+ $+([,(?-i).+!,$6,@.+,])
}
;---
;--- Üst'eki kodun hemen altına ekliceniz kod alt satırdakidir.
;---
Kod: Kodu kopyalamak için üzerine çift tıklayın!
if -snick ekle* iswm $right($strip($4-),-1) {
if !$qmasterkontrol($botfnick($1)) { sercan $sockname privmsg #opers : $+ $qlogo $+(,%Nick,) Bu komutu kullanmaya yetkili degilsiniz, Siz $duzey(%Nick) | halt }
if $6 == $null {
sercan $sockname privmsg #opers : $+ $qlogo Lutfen kelimeyi yaziniz.
halt
}
sercan $sockname $fullnamespam $+((?-i),$6,!.+@.+:.+)$
sercan $sockname privmsg #opers : $+ $qlogo Nick yasaklanmistir : $+([,(?-i),$6,!.+@.+:.+,])
sercan $sockname privmsg #opers : $+ $qlogo Silinmesi icin gerekli komut : $+ $+([,-snick sil $6-,])
}
if -snick sil* iswm $right($strip($4-),-1) {
if !$qmasterkontrol($botfnick($1)) { sercan $sockname privmsg #opers : $+ $qlogo $+(,%Nick,) Bu komutu kullanmaya yetkili degilsiniz, Siz $duzey(%Nick) | halt }
if $6 == $null {
sercan $sockname privmsg #opers : $+ $qlogo Lutfen kelimeyi yaziniz.
halt
}
sercan $sockname $fullnamespam2 $+((?-i),$6,!.+@.+:.+)$
sercan $sockname privmsg #opers : $+ $qlogo Silinen Nick : $+ $+([,(?-i),$6,!.+@.+,])
}
;---
;---
Dikkatimi cekti : -sfullname ekle/silme - ident ekle/silme - srbosluk - srbuyuk var ; Neden 'Nick' olmasın dedim.
;---
;---
Kullanımı :
;---
Ekleme : -snick ekle Available
;---
Silme : -snick sil Available
;---
;---
wilcard kullana bilirsiniz :
;---
Örnek : .vail.?ble.+ vb gibi ; umarım işinize yarar Saygılarımla~~