OPERPOPUP v0.2
by bizkut of Malaynet IRC Team

Written based on UnrealIRCD Oper popup by Gizmo967
This popup is almost complete of all
UnrealIRCD and Auspice Services commands
..for IRCop only..

*/
on *:load: {
  echo OperPOPUP v0.2
  echo 14Loading....DONE!
  echo Now you can start OPing by right clicking! :)
}
menu menubar,status,channel,query {
  -
  OperPOPUP
  .$iif(o !isin $usermode,Login Oper):.raw OPER $$?="Oper nick:" $$?*="Oper Password:"
  .$iif(o isin $usermode,IRCd)
  ..Connect Server:.raw connect $input(Server to connect _TO_:,e) $input(Port to connect _TO_:,e) $input(Server to connect,e,Connect Server,$server)
  ..Disconnect Server:.raw squit $$?="Server to disconnect from network:"
  ..Restart Server:.raw restart $input(Which Server to restart?,e,Restart Server,$server) $$?*="Restart Password:"
  ..Kill Server:.raw die $$?*="Kill IRCd Password:"
  ..Rehash
  ...All:.raw rehash $input(Which Server to rehash?,e,Rehash Server,$server) | .raw rehash -motd | .raw rehash -garbage
  ...MOTDs only:.raw rehash -motd
  ...OperMOTD only:.raw rehash -opermotd
  ...BotMOTD Only:.raw rehash -botmotd
  ...Garbage Only:.raw rehash -garbage
  ..DCC
  ...Deny File:.raw dccdeny $$?="File mask:" $$?="Reason (required):"
  ...Undeny File:.raw undccdeny $$?="File mask:"
  ...Deny list:.raw stats F
  ..MISC
  ...List module:.raw module
  ...Check Lag:.raw lag $$?="Enter nick/server:" | set %lagserv $!
  ...SA Chan mode:.raw samode $$?="Channel" $$?="Mode"
  ...RPing:.raw rping $$?="Server mask to ping"
  ...Trace:.raw trace $$?="Server mask or nickname"
  ...Oper MOTD:.raw opermotd
  ...Add MOTD:.raw addmotd $$?="A line to MOTD file"
  ...Add Oper MOTD:.raw addomotd $$?="A line to Oper MOTD file"
  ...Add unrealircd.conf:.raw addline $$?="Add a line to Unrealircd.conf"
  ...DC unknown connection:.raw close
  ...Stats
  ....Traffic:.raw stats T
  ....Uptime:.raw stats u
  ....Memory usage:.raw stats Z
  ....Link Info:.raw stats L
  ....Commands used:.raw stats M
  ....Ban Ver:.raw stats B
  ....Deny Ver:.raw stats v
  ....Badwords:.raw stats b
  ....Official Channel:.raw stats j
  ....Allow link:.raw stats I
  ....Link list:.raw stats C
  ....Server delink:.raw stats X
  ....Server list:.raw stats U
  ....Oper list:.raw stats O
  ....Set list:.raw stats S
  ....Port list:.raw stats P
  ....Reserve nick:.raw stats q
  ....Ban nick:.raw stats Q
  ....Ban chan:.raw stats r
  ....Usage stat:.raw stats R
  ....TLD list:.raw stats t
  ....Vhost list:.raw stats V
  ....Class list:.raw stats Y
  ....Zip linked:.raw stats z
  .$iif(o isin $usermode,Global)
  ..Msg all users:.raw wallops $$?="Please enter the message (All users in network):"
  ..Msg all Opers:.raw globops $$?="Please enter the message (All Opers in network):"
  ..Msg +c Opers:.raw chatops $$?="Please enter the message (+c Opers in network):"
  ..Msg Local Opers:.raw locops $$?="Please enter the message (All local Opers):"
  ..Msg Admins:.raw adchat $$?="Please enter the message (All Admins):"
  ..Msg NetAdmins:.raw nachat $$?="Please enter the message (All NetAdmins):"
  ..Serv notice mask
  ...Local Connects:.raw mode $me +s +c
  ...Far Connects:.raw mode $me +s +F
  ...Flood Notices:.raw mode $me +s +f
  ...Kill Notices:.raw mode $me +s +k
  ...Eyes Notices:.raw mode $me +s +e
  ...Junk Notices:.raw mode $me +s +j
  ...Vhost Notices:.raw mode $me +s +v
  ...GLine Notices:.raw mode $me +s +G
  ...Local Nick Changes:.raw mode $me +s +n
  ...Remote Nick Changes:.raw mode $me +s +N
  ...QLine Notices:.raw mode $me +s +q
  ...Server Notices:.raw mode $me +s +s
  ...Spamfilter Notices:.raw mode $me +s +S
  .$iif(o isin $usermode,User)
  ..Host
  ...Change Own Vhost:.raw sethost $$?="Enter any Vhost you like to be (ex: malaynet.org)"
  ...Change Own Ident:.raw setident $$?="Enter any Ident you like to be:"
  ...Change User Vhost:.raw chghost $$?="User nick:" $$?="Vhost user like to be (ex: malaynet.org)"
  ...Change User Ident:.raw chgident $$?="User nick:" $$?="Ident user like to be:"
  ...Change User Realname:.raw chgname $$?="User nick:" $$?="Realname user like to be:"
  ..Lines
  ...Kill User:.raw kill $$?="Nick to kill:" $?="Reason (optional):"
  ...K-Line
  ....Add:.raw kline + $+ $$?="Enter nick/host, time to ban (optional), reason (optional):"
  ....Remove:.raw kline - $+ $$?="Enter nick/host to remove Kline:"
  ....List:.raw stats K
  ...Global K-Line
  ....Add:.raw gline + $+ $$?="Enter nick/host, time to ban (optional), reason (optional):"
  ....Remove:.raw gline - $+ $$?="Enter nick/host to remove Gline:"
  ....List:.raw gline
  ...Z-line
  ....Add:.raw zline + $+ $$?="Enter IP, time to ban (optional), reason (optional):"
  ....Remove:.raw zline - $+ $$?="Enter IP to remove Zline:"
  ....List:.raw zline
  ...Global Z-line
  ....Add:.raw gzline + $+ $$?="Enter IP, time to ban (optional), reason (optional):"
  ....Remove:.raw gzline - $+ $$?="Enter IP to remove GZline:"
  ....List:.raw gzline
  ...Shun
  ....Add:.raw shun + $+ $$?="Enter nick/host, time to ban (optional), reason (optional):"
  ....Remove:.raw shun - $+ $$?="Enter nick/host to remove Shun:"
  ....List:.raw stats s
  .$iif(o isin $usermode,OperServ)
  ..AKILL
  ...Add:.msg OperServ AKILL ADD $?="Expiry (+)" $$?="Mask" $$?="Reason"
  ...Del:.msg OperServ AKILL DEL $$?="Mask or order number"
  ...List:.msg OperServ AKILL LIST $?="Mask (optional)"
  ...Change Reason:.msg OperServ INFO $$?="Mask or order number to change reason (SRA ONLY!)"
  ..Q-Line
  ...Add:.msg OperServ ADD $$?="Nick to QLINE" $$?="Reason of QLINE"
  ...Del:.msg OperServ DEL $$?="Nick to remove from QLINE list"
  ...List:.msg OperServ LIST
  ..Z-Line
  ...Add:.msg OperServ ZLINE ADD $$?="IP to ZLINE" $$?=Reason"
  ...Del:.msg OperServ ZLINE DEL $$?="IP to remove from ZLINE list"
  ..Jupiter
  ...Add:.msg OperServ JUPE ADD $$?="Server to Jupiter" $$?="Reason"
  ...Del:.msg OperServ JUPE DEL $$?="Server to remove from Jupiter list"
  ...List:.msg OperServ JUPE LIST
  ..Ignore
  ...Add:.msg OperServ IGNORE ADD $$?="Mask to add to IGNORE list"
  ...Time:.msg OperServ IGNORE TIME $$?="Expire time" $$?=Mask"
  ...Del:.msg OperServ IGNORE DEL $$?="Mask or order number to remove IGNORE"
  ...List:.msg OperServ IGNORE LIST $?="Mask to list (Optional)"
  ..Force
  ...FJoin:.msg OperServ FJOIN $$?="Nick to FJOIN" $$?="Channel to FJOIN (#)"
  ...FPart:.msg OperServ FPART $$?="Nick to FPART" $$?="Channel to FPART (#)"
  ...Kick:.msg OperServ KICK $$?="Nick to force kick" $$?="Channel" $$?="Reason (required)"
  ...Unidentify:.msg OperServ UNIDENTIFY $$?="Nick to clear identify status"
  ...GNick:.msg OperServ GNICK $$?="Nick to change nick to guest"
  ...Kill:.msg OperServ KILL $$?="Nick to kill from server" $$?="Reason"
  ..Clear Mode
  ...Bans:.msg OperServ CLEAR $$?="Channel to clear BAN list" BANS
  ...Modes:.msg OperServ CLEAR $$?="Channel to clear Chan MODES" MODES
  ...Ops:.msg OperServ CLEAR $$?="Channel to clear OP list" OPS
  ...Hop:.msg OperServ CLEAR $$?="Channel to clear HOP list" HOPS
  ...Voice:.msg OperServ CLEAR $$?="Channel to clear VOICE list" VOICES
  ...Users:.msg OperServ CLEAR $$?="Channel to clear USER modes" USERS
  ..Info
  ...Own Power:.msg OperServ SPECS
  ...SOper:.msg OperServ LISTADM
  ...User Info:.msg OperServ UINFO $$?="User Nick"
  ...Status:.msg OperServ STATS
  ...Setting:.msg OperServ SETTINGS
  ...Version:.msg OperServ VERSION
  ...Trace
  ....Host:.msg OperServ TRACE HOST $$?="Host mask to trace"
  ....Server:.msg OperServ TRACE SERVER $$?="Server mask to trace"
  ..Abuse Team
  ...Warn User:.msg OperServ WARN $$?="User nick to warn about abusing their privledges (abusing)"
  ...Unset UMODE:.msg OperServ UNMODE $$?="User nick to Unset Usermode" $$?="Reason (required)"
  ...No Oper:.msg OperServ NOOPER $$?="User nick to prevent Opering" $$?="Seconds to prevent"
  ...Deny Servicing:.msg OperServ DENY $$?="Nick to deny from/to services/opering" $$?="Second to deny from/to services/opering"
  ...Undeny Servicing:.msg OperServ UNDENY $$?="Nick to grant from/to services/opering"
  ..Global Msg:.msg OperServ GLOBAL $$?="Message to send to all users on the Network"
  ..Trigger Clone:.msg OperServ TRIGGER $$?="Mask <[user@]host>" $$?="Value"
  ..Update Database:.msg OperServ UPDATE
  .$iif(o isin $usermode,AdminServ)
  ..Add Oper
  ...SRA:.msg AdminServ OPER ADD $$?="Nick to add SRA" SRA
  ...SA:.msg AdminServ OPER ADD $$?="Nick to add SA" SA
  ...SOP:.msg AdminServ OPER ADD $$?="Nick to add SOP" SOP
  ...HOP:.msg AdminServ OPER ADD $$?="Nick to add HOP" HOP
  ..List Oper
  ...SRA:.msg AdminServ OPER LIST SRA
  ...SA:.msg AdminServ OPER LIST SA
  ...SOP:.msg AdminServ OPER LIST SOP
  ...HOP:.msg AdminServ OPER LIST HOP
  ..Move Oper
  ...SRA:.msg AdminServ OPERSET $$?="Oper nick to move to SRA" SRA
  ...SAL:.msg AdminServ OPERSET $$?="Oper nick to move to SA" SA
  ...SOP:.msg AdminServ OPERSET $$?="Oper nick to move to SOP" SOP
  ...HOP:.msg AdminServ OPERSET $$?="Oper nick to move to HOP" HOP
  ..Oper Flags
  ...Add Oper Flag:.msg AdminServ FLAGS ADD $$?="Oper nick to add Flag" $$?="Flag to add"
  ...Del Oper FLag:.msg AdminServ FLAGS DEL $$?="Oper nick to delete Flag" $$?="Flag to delete"
  ..Delete Oper:.msg AdminServ OPER DEL $$?="Nick to remove Oper status!"
  ..Whois Oper:.msg AdminServ WHOIS $$?="Oper nick to whois"
  ..Set Oper Desc:.msg AdminServ SETODESC $$?="Oper nick to set description" $$?="Description"
  .$iif(o isin $usermode,RootServ)
  ..Raw Server:.msg RootServ RAW $$?="Command to send to IRCd"
  ..Mass Kick:.msg RootServ MKICK $$?="Channel to Mass Kick !Notice: All commands sent to RootServ are logged!" $$?="Mass Kick reason"
  ..Mass Invite:.msg RootServ MINVITE $$?="Channel _FROM_ to Mass Invite" $$?="Channel _TO_ to Mass Invite"
  ..Reset Flood:.msg RootServ FLOODRESET $$?="Nick to reset his/her flev"
  ..Services
  ...Inject Service:.msg RootServ INJECT $$?="User nick" $$?="Service nick to send command" $$?="Service Command"
  ...Search Log:.msg RootServ LOG $$?="String to search (wildcard accepted) !WARNING! Service may flood you!"
  ...Backup Log:.msg RootServ BACKUPLOG
  ...Restart Services:.msg RootServ RESTART
  ...Shutdown Services:.msg RootServ SHUTDOWN
  ...Force Terminate:.msg RootServ QUIT
  ..Snoop Chan
  ...On:.msg RootServ CHANSNOOP ON $$?="Channel to Spy (Snoop)(#)" $?="This sends the global noticer into the given channel that copies any channel text into the SRA channel"
  ...Off:.msg RootServ CHANSNOOP ON $$?="Channel to turn OFF Spy (Snoop)(#)"
  ..Snoop Symbols
  ...CS:.msg RootServ REFERENCE CS
  ...NS:.msg RootServ REFERENCE NS
  ...MS:.msg RootServ REFERENCE MS
  .$iif(o isin $usermode,BotServ)
  ..List:.msg BotServ botlist
  ..Assign:.msg BotServ assign $$?="Channel (#)" $$?="Bot nick"
  ..Unasign:.msg BotServ unassign $$?="Channel (#)"
  ..Info:.msg BotServ info $$?="Assigned Channel (#)"
  ..Bot Stuff
  ...New Bot:.msg BotServ bot add $$?="New Bot Nick" $$?="Bot username" $$?="Bot hostname" $$?="Bot realname"
  ...Del Bot:.msg BotServ bot del $$?=Bot nick to delete"
  ...Change Bot:.msg BotServ bot change $$?="Old Botnick" $$?="New Botnick" $?="Username (optional)" $?="Hostname (optional)" $?="Realname (optional)"
  ...Transfer:.msg BotServ bot transfer $$?="Botnick" $$?="New master nick"
  ...Spy Chan:.msg BotServ snoop $$?="Source Channel (#)" $$?="Destination Channel (#)"
  ...Act Chan:.msg $$?="Botnick" act $$?="Channel to act (#)" $$?="Message"
  ...Say Chan:.msg $$?="Botnick" say $$?="Channel to say (#)" $$?="Message"
  ...Join Chan:.msg $$?="Botnick" join $$?="Channel to join (#)"
  ...Part Chan:.msg $$?="Botnick" part $$?="Channel to part (#)"
  .$iif(o isin $usermode,HostServ)
  ..Change own Vhost:.msg HostServ sethost $$?="Any Vhost you like to be (ex: malaynet.org)"
  ..Add auto Vhost:.msg HostServ add $$?="Nick to get auto Vhost" $$?="Any Vhost nick like to be (ex: malaynet.org)"
  ..Del auto Vhost:.msg HostServ del $$?="Nick to remove auto Vhost"
  ..List auto Vhost:.msg HostServ list
  ..Change user Vhost:.msg HostServ change $$?="Nick to change Vhost" $$?="New Vhost user like to be (ex: malaynet.org)"
  .$iif(o isin $usermode,MassServ)
  ..Services
  ...Mass Join:.msg MassServ SERVJOIN $$?="Channel to Mass FJOIN all services"
  ...Mass Part:.msg MassServ SERVPART $$?="Channel to Mass FPART all services"
  ..Bots
  ...Mass Join:.msg MassServ ALLBOTJOIN $$?="Channel to Mass FJOIN all bots"
  ...Mass Part:.msg MassServ ALLBOTPART $$?="Channel to Mass FPART all bots"
  ..Users
  ...Mass Join:.msg MassServ ALLJOIN $$?="Channel to Mass FJOIN all users"
  ...Mass Oper Join:.msg MassServ ALLOPERJOIN $$?="Channel to Mass FJOIN all OPERS"
  .$iif(o isin $usermode,Logoff):.mode $me -o | echo -a You are no longer an IRCop
  -
}
on ^1:SNOTICE:Lag reply*: {
  if (%lagserv) {
    haltdef
    echo 4OPERPOPUP: Server Lag Reply from %lagserv = $duration($calc($ctime - $6))
    unset %lagserv
  }
}