Moderators Dialog VERY SIMPLE and EASILY Coded Just Type /Mod
I Got The Ideas From FURBY But I Added More To It And Made It Work Out For Users Much Better.

alias Mod {
  if ( $dialog(Moderators) ) { dialog -v Moderators Moderators  }
  else { dialog -md Moderators Moderators }
}

dialog Moderators {
  title "Moderator Commands"
  size -1 -1 200 200
  option dbu
  box "            Members List", 2, 2 2 1 1
  list 1, 23 10 150 100, size vsbar
  box "Modes Below", 3, 50 200 200 200
  button "Ban", 4, 95 150 30 12,
  button "Unban", 5, 95 166 30 12,
  button "Quiet", 6, 130 150 30 12,
  button "Unquiet", 7, 130 166 30 12,
  button "Op", 8, 12 150 30 12,
  button "Deop", 9, 12 166 30 12,
  button "Voice", 10, 45 150 30 12, 
  button "Devoice", 11, 45 166 30 12, 
  button "Leave", 12, 175 145 19 40, 
  button "Kick User From Channel", 13, 1 130 198 12
  edit "", 14, 11 200 112 14
  text "Made By:", 15, 135 191 25 8
  link "Chevyzdaman", 16, 160 191 36 8
}

on *:dialog:Moderators:*:*: {
  if ( $devent == init ) {
    set %lm.chan $active
    var %total = $nick($active,0), %x = 1
    while ( %x <= %total ) {
      did -i Moderators 1 %x $nick($active,%x)
      inc %x
    }
  }
  elseif ( $devent == sclick ) {
    if ($did == 4) { .mode %lm.chan +b $did(1).seltext }
    elseif ($did == 5) { .mode %lm.chan -b $did(1).seltext }
    elseif ($did == 6) { .mode %lm.chan +Q $did(1).seltext }
    elseif ($did == 7) { .mode %lm.chan -q $did(1).seltext }
    elseif ($did == 8) { .mode %lm.chan +o $did(1).seltext }
    elseif ($did == 9) { .mode %lm.chan -o $did(1).seltext }
    elseif ($did == 10) { .mode %lm.chan +v $did(1).seltext }
    elseif ($did == 11) { .mode %lm.chan -v $did(1).seltext }
    elseif ($did == 12) { .leave %lm.chan $did(1).seltext $did()
      elseif ($did == 15) { .kick %lm.chan $did(1).seltext $did() 
      }
    }
    on *:dialog:moderators:init:0: {
      dialog -t moderators Moderator Commands - %lm.chan 
    }