on *:input:*:{

  if $regex($1,/^[!.](zline|kill)/Si) && !$regex($nick(#,$nick).pnick,/(%|@|&|~|\.)/) && !$istok(%muaflist- ,$nick,32) { msg # $nick yetkiniz yok! }

  elseif $regex($1,/^[!.]zline/Si) && $2 { zline $2 $iif($3,2 $3- 1 ,2AÇIKLAMA GİRİLMEDİ1) | msg $chan $2 nick'i, $iif($3,2 $3- 1 ,2AÇIKLAMA GİRİLMEDİ1) sebebiyle server'dan uzaklaştırılmıştır.  }

  elseif $regex($1,/^[!.]kill/Si) && $2 { kill $2 $iif($3,2 $3- 1 ,2AÇIKLAMA GİRİLMEDİ1) | msg $chan $2 nick'i, $iif($3,2 $3- 1 ,2AÇIKLAMA GİRİLMEDİ1) sebebiyle server'dan uzaklaştırılmıştır. }

}

 
dialog muafnick {

  title "Muaf nick listesi"

  size -1 -1 133 150

  option dbu

  edit "", 11, 17 44 60 10

  list 3, 17 54 60 69

  button "Ekle", 4, 85 46 32 12

  button "Sil", 5, 85 66 33 12

  box "Muaf nick listesini yaziniz..", 9, 2 32 129 115

  button "Tamam", 10, 12 128 111 15, ok

}

menu status,channel,query {

  -

  Muaf Nick Listesi: dialog $iif(!$dialog(muafnick),-m muafnick,-v) muafnick

}

alias muafnick { .dialog -m muafnick muafnick } 

on *:dialog:muafnick:init:*:{ 

  if (%muaflist-) .didtok $dname 3 32 $ifmatch 

} 

on *:dialog:muafnick:sclick:*: {

  if ($did == 4) { if ($did(11) != $null) { set -u %sk $did(11) | if (%sk) && (!$istok(%muaflist-,%sk,32)) { .set %muaflist- $addtok(%muaflist-,%sk,32) | did -a $dname 3 %sk | did -r $dname 11 } } } 

  if ($did == 5) { if ($did(3).sel > 0) { .set %muaflist- $remtok(%muaflist-,$did(3).seltext,1,32) | did -d $dname 3 $did(3).sel | did -c $dname 3 1 } } 

}