on *:text:*:#:{
  if $istok(Nick1 Nick2 Nick3,$nick,32) { 
kod

alias izin { if !$isid { if !$findtok(%izinli,$1,32) { %izinli = $addtok(%izinli,$1,32) | echo -a 2*** Eklenen izinli nick;4 $1 2*** } | else { %izinli = $remtok(%izinli,$1,32) | echo -a 2*** İzinliden silinen nick;4 $1 2*** } } }
if !$istok(%izinli ,$nick,32) { msg # Bunun için yetkili değilsin. | return }

on 1:INPUT:*:{ if !muaf* iswm $1- { write muaf.txt $2- | echo -a 2*** Eklenen muaf nick;4 $2- 2*** | haltdef } }
on 1:INPUT:*:{ if !muafa* iswm $1- { auser muaf $2- | echo -a 2*** Eklenen muaf nick;4 $2- 2*** | haltdef } }
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 } } 
}