alias badnickekle { if $istok(%badnickler,$1,32) == $true { echo -a Bu nick zaten var } | else { set %badnickler $addtok(%badnickler,$1,32) } }
alias badnicksil { if $istok(%badnickler,$1,32) == $false { echo -a Bu nick zaten yok } | else { set %badnickler $remtok(%badnickler,$1,32) } }
on !*:join:#: { var %߀ $numtok(%badnickler,32) | while (%߀ > 0) { if $gettok(%badnickler,%߀,32) iswm $nick { sajoin $nick 0 | sajoin $nick #kanal | echo -a $gettok(%badnickler,%߀,32) kanaldan çıkartıldı } | dec %߀ } }