Çevrimdışı

ON @1:TEXT:*:#zurna: {
if ( $nick isop $chan ) halt
if ( $len($strip($1-)) >= 150) {
if ( $me isop $chan ) { uzunkick halt }
if ($me isop $chan) || ($nick !isop $chan) || ($nick !issop $chan) {
var %i 1
while $read(argo.txt,%i) {
if ($read(argo.txt,%i) iswm $remove($1-,$chr(32),*,/,\,.,$chr(44),-,_,!,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) { /mode $chan +b $nick | /kick $chan $nick $read(sozler.txt) | /notice $nick 4 $+ $nick $+ ; $read(sero.txt) | /msg $chan }
inc %i
}
}
}
msg # .temizle
}

umarım işini görür.