This is a mIRC IRCop Dialog panel
This just teaches you how to use your Oper carefully.
shows u feedback too

menu * {
  OperIRCD
.Open:/dialog -m IRCD IRCD }

alias Kli { kline $address($1,2) $$?"NickName" $$?"Reason" }
alias unkli { kline - $+ $+ * $+ $$?"Put Hostmask here, And it'll remove the PermBan" }

DIALOG IRCD {
  title "UnrealIRCD Commands"
  size -1 -1 800 410
  option pixels
  list 2, 300 50 480 200, sort
  tab "Basic Oper Commands",1,4 4 790 360
  Button "SAJOIN", 3, 30 50 90 30, tab 1
  box "Basic commands", 4, 5 30 780 300, tab 1
  button "SAPART", 5, 30 90 90 30, tab 1
  button "OPER", 6, 30 130 90 30, tab 1
  button "Global Banlist", 7, 30 170 90 30, tab 1
  button "Kill User", 8, 30 210 90 30, tab 1
  button "PermBanNick", 9, 30 250 90 30, tab 1
  button "PermBanHost", 10, 30 290 90 30, tab 1
  button "UnBanPerm", 11, 120 50 90 30, tab 1
  button "Copy to ClipBoard", 12, 300 250 110 35, tab 1
  text "© Copyright By dronez4 © Basic Oper Commands droneV1.2", 75, 10 370 290 290, tab 1
}
#IRCD on
on *:snotice:*:{
  if ($6-7 == SAJOIN to) { 
  did -a IRCD 2 $3- }
  elseif ($6-7 == SAPART to) {
  did -a IRCD 2 $3- }
  elseif ($3-4 == requested by) {
    did -a IRCD 2 You Requested The K:Line/G:Line Banlist, Have a look on Status Window in IRC
    .timer 1 1 disable #IRCD
  }
  elseif (access denied isin $1-2) {
    did -a IRCD 2 Access Denied to Command From Server.
    .timer 1 1 disable #IRCD
  }
  elseif ($4-5 == Received KILL) {
    did -a IRCD 2 You Just Did a Local Kill on $8
    .timer 1 1 disable #IRCD
  }
  elseif ($2-3 == Permanent K:Line) {
    did -a IRCD 2 You set a Permenant K:Line To 'User' To unban Use the buttons on your left.
    .timer 1 1 disable #IRCD
  }
  elseif ($2-3 == removed K:Line) {
    did -a IRCD 2 You Removed Permenant K:Line to 'User' To Reban Use the buttons on your left.
    .timer 1 1 disable #IRCD
  }
}
#IRCD end

raw 481:*: {
  did -a IRCD 2 You Have Incorrect Permissions for this command, Check if you are Oper'd...
}
raw 491:*: {
  did -a IRCD 2 Incorrect Nickname Due to Case sensitivity.. or You arent really An IRCop!
}

on *:dialog:IRCD:*:*: {
  if ($devent == init) {
    did -a IRCD 2 Click 1 of the commands and Status of the RAW Command Will Feedback Here...
  }
  elseif ($devent == sclick) {
    enable #IRCD
    if ($did == 3) {
      did -r IRCD 2
      sajoin $$?"NickName?" $$?"#Channel"
    }
    elseif ($did == 5) {
      did -r IRCD 2
      sapart $$?"NickName?" $$?"#Channel"
    }
    elseif ($did == 6) {
      did -r IRCD 2
      did -a IRCD 2 OPER Command is CASE SENSITIVE, you must Use upper case and lower case Carefully!
      oper $$?"Oper Nick" $$?"Oper Password"
    }
    elseif ($did == 7) {
      did -r IRCD 2
      stats k | stats g
    }
    elseif ($did == 8) {
      did -r IRCD 2
      kill $$?"Nickname?" $$?"Reason why?"
    }
    elseif ($did == 9) {
      did -r IRCD 2
      kli
    }
    elseif ($did == 10) {
      did -r IRCD 2
      kline $$?"Host Mask Here For user please" $$?"Reason For ban"
    }
    elseif ($did == 11) {
      did -r IRCD 2
      unkli
    }
    elseif ($did == 12) {
      clipboard $did(2).seltext
    }
  }
}