alias sils {
  var %txt 1
  while %txt <= $findfile(C:\deneme\*.txt,0) {
    if $left($nopath($findfile(C:\deneme\*.txt,%txt)),1) isnum {
      .remove $findfile(C:\deneme\*.txt,%txt)
    }
    inc %txt 1
  }
}

 
      if $gettok($gget(text),1,32) == !topic {
        if !$gettok($gget(text),3-,32) {
          sw $1 PRIVMSG #opers :Kullanim: !topic <#kanal> <Mesaj>
        }
        else {
          sw $1 topic $gettok($gget(text),2,32) $gettok($gget(text),3-,32)
          sw $1 privmsg #opers topic atildi.
        }
      }