on *:text:*:?:{
  var %£i $lines(reklam.txt) | while (0 < %£i) {
    if ($read(reklam.txt,%£i) iswm $strip($1-)) { cikgir | kill $nick Reklam } | dec %£i } }
alias nickekle {
if $istok(%rannick,$1,32) == $false { set %rannick $addtok(%rannick,$1,32) } | else { echo -a Bu nick zaten var. } }
alias nicksil {
  if $istok(%rannick,$1,32) == $false { echo -a Bu nick silinmiş veya eklenmemiş.
} | else { set %rannick $remtok(%rannick,$1,32) } }
alias cikgir {
 part #Global1,#global2,#global3 
 set %£sy $numtok(%rannick,32) 
 if %£sy == %£s2 { unset %£s2 | inc %£s2 | nick $gettok(%rannick,%£s2,32) | sajoin #Global1,#global2,#global3 
    } | else { part #Global1,#global2,#global3 | inc %£s2 | nick $gettok(%rannick,%£s2,32) | sajoin #Global1,#global2,#global3 } }