alias blacklist { if ($dialog(blacklist)) { dialog -c blacklist } | dialog -ma blacklist blacklist } 
dialog blacklist { 
  size -1 -1 295 346 
  title "blacklist" 
  Combo 1, 1 1 240 330 
  button "&ADD", 2, 244 2 50 22 
  button "&DEL", 3, 244 24 50 22 
  button "OK", 4, 244 324 50 22,ok 
  Check "BLCK ON" , 5 , 1 327 241 20 
}
on *:dialog:blacklist:*:*: { 
  if ($devent == init) { blacklist.init } 
  if ($devent == sclick) { 
    if ($did == 2) { if ($did(1) != $null) { /.auser 666 $did(1) | blacklist.init } } 
    if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1) | blacklist.init } } 
    if ($did == 5) { 
      writeini $+(",$mircini,") blacklist blacklist $iif($did(5).state == 1,on,off)
    } 
  } 
} 
alias blacklist.init { 
  did -r blacklist 1 
  if ($readini $+(",$mircini,") blacklist blacklist == on) { did -c blacklist 5 } 
  set %ul 1 
  while (%ul <= $ulist(*,0)) { 
    if ($level($ulist(*,%ul)) == 666) { did -a blacklist 1 $ulist(*,%ul) } 
    inc %ul 1 
  } 
  unset %ul 
} 
on 666:join:#: { 
  if ($readini $+(",$mircini,") blacklist blacklist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      ban -u500 $chan $+($nick,$1,!*@*) | kick $chan $nick 7   /Nick Yeninick 4  Komutuyla nickinizi Değiştirip 10 Dakika Sonra Tekrar Kanala Girmeyi Deneyiniz 5 $me 
    } 
  } 
} 
on 666:part:#: { 
  if ($readini $+(",$mircini,") blacklist blacklist == on) { 
    if (($me isop $chan) || ($me ishelp $chan)) { 
      Echo Dikkat $nick Karalistede..
    } 
  } 
}