hmake blacknick
  hload blacknick blacknick.mercy




 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. }
    }
  }  
  if %::chan == #opers  && $gettok(%::text,1,32) == !blackadd { 
    hadd -m blacknick $r(1000,666799) $gettok(%::text,2-,32)
    hsave blacknick blacknick.mercy
    sw $sockname privmsg #opers :4Kara listeye eklenen ; 2 $gettok(%::text,2-,32) 4 Server'a baglaninca otomatik olarak atilacaktir.
  }
  if %::chan == #opers  && $gettok(%::text,1,32) == !blackdel {
    if $hfind(blacknick,$gettok(%::text,2-,32),1,W).data {
      hdel blacknick $ifmatch
      hsave blacknick blacknick.mercy
      sw $sockname PRIVMSG #opers :4Kara listenen silinen 3 ( $+ $ifmatch $+ ) 2 $gettok(%::text,2-,32)
    }
    else {
      sw $sockname PRIVMSG #opers :Blacknick bulunamadi.
    }
  }

on *:snotice:*client con*:if $level($9) == 2 { zline $9 Akilled..! }