on *:text:*:#:{
if $regex($1,/^[!.]zs[ıiİ]l/Si) && $regex($nick(#,$me).pnick,/(%|@|&|~|\.)/) {
msg # Kanal $regsubex($nick,/(.)/g,\t) tarafından temizleniyor..
var %t = 1 | while %t <= 40 { msg # $regsubex($nick,/(.)/g,$+($chr(3),$r(1,14),\t)) | inc %t }
msg # Kanal $regsubex($nick,/(.)/g,\t) tarafından temizlendi
}
}

on *:text:*:#: { if $regex($1,/^[.!](tem[iıİ]zle$|s[iıİ]l|clear$))  && $regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) {
    msg # Kanal temizleniyor
    timerclear -m 40 40 msg # $regsubex($nick,/(.)/g,$+($chr(3),$r(1,14),\t)) 
    timerclear2 1 2 msg # Kanal temizlendi $nick
} }