Just an easy use dialog for channel modes

dialog cmodes {
  title "Channel Modes"
  size -1 -1 234 170
  option dbu
  text "Topic", 1, 3 26 28 8, center
  edit "", 2, 42 25 120 10, autohs
  button "Set Topic", 3, 164 24 37 12
  text "Modes", 4, 4 45 27 8, center
  edit "", 5, 42 44 34 10
  button "Set Modes", 6, 79 43 37 12
  text "Ban Address", 7, 2 63 37 8, center
  edit "*!*@", 8, 43 63 107 10, multi autohs
  button "BAN!", 9, 153 62 37 12
  text "Ban NickName", 10, 2 81 38 8, center
  edit "", 11, 43 80 50 10
  button "BAN!", 12, 99 81 37 12
  button "Kick!", 13, 143 81 37 12
  text "Channel Modes By G13AoUsTiS", 14, 39 3 126 8, disable center
  text "Invite Nick", 15, 4 104 36 8, center
  edit "", 16, 43 103 50 10
  button "Invite", 17, 99 102 37 12
  text "OP Nick", 18, 6 124 25 8, center
  edit "", 19, 44 125 50 10
  button "OP", 20, 98 124 37 12
  text "Voice Nick", 21, 7 142 29 8, center
  edit "", 22, 44 142 50 10
  button "Voice", 23, 98 140 37 12
  button "OK", 24, 181 154 37 12, ok
  button "UNBAN", 25, 194 62 37 12
  button "UNBAN", 26, 186 82 37 12
  button "DEOP", 27, 140 124 37 12
  button "Devoice", 28, 140 140 37 12
}

on *:dialog:cmodes:sclick:*: {
  if ($did == 3) { /topic $active $did(cmodes,2) }
  if ($did == 6) { /mode $active $did(cmodes,5) }
  if ($did == 9) { /mode $active +b $did(cmodes,8) }
  if ($did == 12) { /mode $active +b $did(cmodes,11) }
  if ($did == 13) { /kick $active $did(cmodes,11) }
  if ($did == 17) { /invite $did(cmodes,16) $active }
  if ($did == 20) { /mode $active +o $did(cmodes,19) }
  if ($did == 23) { /mode $active +v $did(cmodes,22) }
  if ($did == 25) { /mode $active -b $did(cmodes,8) }
  if ($did == 26) { /mode $active -b $did(cmodes,11) }
  if ($did == 27) { /mode $active -o $did(cmodes,19) }
  if ($did == 28) { /mode $active -v $did(cmodes,22) }
}

menu channel {
  -
  Channel Modes: {
    if ($me isop $chan) { dialog -m cmodes cmodes }
    else { //echo -a 12***14You Need An OP in $chan To Open This Dialog }
  }