if %::text == .blackadd { 
         hadd -m blacknick $r(1000,666799) $gettok(%::text,2-,32)
          hsave blacknick blacknick.txt
          sw $sockname #opers :Kara listeye eklenen ; $gettok(%::text,2-,32) Server'a baglaninca otomatik olarak atilacaktir.
        }
        if $gettok(%::text,1,32) == .blackdel {
          if $hfind(blacknick,$gettok(%::text,2-,32),1,W).data {
            hdel blacknick $ifmatch
            hsave blacknick blacknick.txt
            sw $sockname PRIVMSG #opers :Kara listenen silinen ( $+ $ifmatch $+ ) $gettok(%::text,2-,32)
          }
          else {
            sw $sockname PRIVMSG #opers :Blacknick bulunamadi.
          }
        } 

if $2 == NOTICE && $3 == NoMercy && *.*.* iswm $botfnick($1) {
    if *client connecting* iswm $strip($1-) {
      if $read(blacknick.txt,w,$9) { gzline $+(*@,$remove($gettok($10,2,64),$chr(41))) Akilled. } 

if $2 == NOTICE && $3 == NoMercy && *.*.* iswm $botfnick($1) {
if *client connecting* iswm $strip($1-) {
if $hfind(blacknick,$9,1,n).data { gzline $+(*@,$remove($gettok($10,2,64),$chr(41))) Akilled. }
}
}