;############################################################################
; برمجه جيده يطرد اي واحد على الايبيه باند
;############################################################################

on @1:ban:#:{ 
  set %flterban 1 
  goto kick
  :kick
  set %flterbankick $ialchan($banmask,#,%flterban).nick
  if (%flterbankick == $null ) { goto end }  
  if (%flterbankick isop #) { goto end }
  kick # %flterbankick 12This Ip4 $banmask 12Was Banned By4 $Nick
  inc %flterban 1
  goto kick
  :end
  unset %banflte*
}

alias thank dialog -mo thank thank
dialog thank {
  title "Add-ons By CoteDor"
  size -1 -1 200 180
  box "",1,5 0 190 70
  text "Thank you for loading this Add-on written by CoteDor. Please visit my website for more add-ons and other IRC tools. Have fun.",2,10 12 180 50,left
  box "",3,5 68 190 86
  text "Banned@LoveMaiL.Com",4,10 80 180 15,center
  edit "http://Chan-Scripts.Cjb.Net",5,33 100 130 22,center,read
  button "Visit",6,70 127 50 20
  button "Close",7,5 158 190 20,ok
}
on *:dialog:thank:init:0:/did -f thank 6
on *:dialog:thank:sclick:6:/run http://chan-scripts.cjb.net 
on *:load:{ thank } }