Forums Scripts & Popups DeOp Kick Ban Protection v3 Beta

alias dkbp { dialog -m dkbp dkbp } 
dialog dkbp { 
  title "DeOp Kick Ban Protection" 
  size -1 -1 120 120 
  option dbu 
  button "On", 1, 15 100 28 12 
  button "Off", 2, 78 100 28 12 
  text "DeOp Message", 3, 42 7 37 8 
  edit "", 4, 15 21 90 10, autohs 
  text "Kick Message", 5, 44 37 32 8 
  edit "", 6, 15 52 90 10, autohs 
  text "Ban Message", 7, 44 67 32 8 
  edit "", 8, 15 81 90 10, autohs 
  button "Ok", 9, 43 100 35 12, ok 
} 
alias dkbpa { dialog -m dkbpa dkbpa } 
dialog dkbpa { 
  title "About" 
  size -1 -1 120 135 
  option dbu 
  box "About Addon", 1, 5 4 109 39 
  text "Addon : DeOp Kick Ban Protection", 2, 11 15 97 8 
  text "Version : v3 Beta", 3, 11 28 97 8 
  box "About Author", 4, 5 44 109 84 
  text "Author : br0nx", 5, 11 54 97 8 
  text "Author Chan : #scr1pt1ng", 6, 11 70 97 8 
  text "Author Serv : irc.krstarica.com", 7, 11 85 97 8 
  text "Author Email : br0nx.20@inbox.com", 8, 11 100 97 8 
  text "Addon Address : br0nx.20.forumer.com", 9, 11 115 97 8 
} 
on *:dialog:dkbp:init:*: { 
  did -a dkbp 4 %msg.deop 
  did -a dkbp 6 %msg.kick 
  did -a dkbp 8 %msg.ban 
} 
alias msg.deop { 
  set %msg.deop $did(4) 
} 
alias msg.kick { 
  set %msg.kick $did(6) 
} 
alias msg.ban { 
  set %msg.ban $did(8) 
} 
on *:dialog:dkbp:sclick:1: { 
  set %msg.deop $did(4) 
  set %msg.kick $did(6) 
  set %msg.ban $did(8) 
} 
on *:dialog:dkbp:sclick:2: { 
  unset %msg.deop $did(4) 
  unset %msg.kick $did(6) 
  unset %msg.ban $did(8) 
} 
on *:dialog:dkbp:sclick:9: { 
} 
on *:DeOp:#: { 
  if ($opnick == $me) { chanserv op $chan $me } { 
    if ($nick == $me) { halt } { 
      set %deop.nick $nick 
      set %deop.chan $chan 
    } 
  } 
} 
on *:Op:%deop.chan: { 
  if ($opnick == $me) { 
    mode %deop.chan -o %deop.nick 
    mode %deop.chan +b $address(%deop.nick,2) 
    kick %deop.chan %deop.nick %msg.deop 
    unset %deop.* 
  } 
} 
on *:Kick:#: { 
  if ($knick == $me) { join $chan } { 
    if ($nick == $me) { halt } { 
      set %kick.nick $nick 
      set %kick.chan $chan 
    } 
  } 
} 
on *:Op:%kick.chan: { 
  if ($opnick == $me) { 
    mode %kick.chan -o %kick.nick 
    mode %kick.chan +b $address(%kick.nick,2) 
    kick %kick.chan %kick.nick %msg.kick 
    unset %kick.* 
  } 
} 
on *:Ban:#: { 
  if ($banmask iswm $address($me,5)) { chanserv unban $chan $me } { 
    if ($nick == $me) { halt } { 
      set %ban.nick $nick 
      set %ban.chan $chan 
      mode %ban.chan -o %ban.nick 
      mode %ban.chan +b $address(%ban.nick,2) 
      kick %ban.chan %ban.nick %msg.ban 
      unset %ban.* 
    } 
  } 
} 
menu * { 
  - 
  .DeOp Kick Ban Protection:dkbp 
  .DeOp Kick Ban Protection About:dkbpa 
  - 
}