dialog Blacklist {
  Title "§hádów §ç®ìþt Blacklist"
  size -1 -1 100 40
  option dbu
  button "Add",1, 5 7 25 15
  button "Delete",2, 35 7 25 15
  button "View List",3, 65 7 29 15
  button "Clear List",4, 28 25 40 10
}
on *:DIALOG:Blacklist:sclick:1:{
  /auser Blacklist $?="Enter a Nickname to be Added to Your BlackList"
  if ($address($!,2) != $null) { /write blacklist.txt $! - $address($!,2) | echo 4 -a $! with the address of $address($!,2) added to your Blacklist! }
  else { /write blacklist.txt $! | echo 4 -a $! was added to your Blacklist (With NO Address) }
}
on *:DIALOG:blacklist:sclick:2:{
  /ruser Blacklist $?="Enter a Nickname to be Deleted from Your BlackList"
  /write -ds $+ $! blacklist.txt | echo 4 -a $! Deleted from Your BlackList 
}
on *:DIALOG:blacklist:sclick:3:{
  /run blacklist.txt
}
on *:DIALOG:blacklist:sclick:4:{
  /remove blacklist.txt
  /echo 2 -a The Blacklist.txt File has been Removed! Note that the "View List" button won't work unless you "Add" another user!!
}
alias bl {
  dialog -m Blacklist Blacklist
}
on blacklist:JOIN:#:{ if ($me isop #) { ban -u1200 # $address($nick,2) | kick $chan $nick 4,1¤14,1Y15ou 14,1H15ave 14,1B15een 14,1B15lacklisted 14,1B15y14 $me $+ ! 4,1¤ } 
}
menu status,channel {
  BlackList:/bl
}
 

Commenting Options