/ScriptServ

;-------- -  -
; Popups
;-------- -  -

menu channel {
  &Services
  .&Chanserv
  ..&Register:/cs register # $$?="Enter Password"  $$?="Enter Description"
  ..&Identify:/cs identify # $$?="Password"
  ..&Info:/cs info #
  ..&Drop:/cs drop #
  ..-
  ..&Acc:/cs acc # $$?="Enter Nick"
  ..&Access:/cs access # $$?="Enter Nick"
  ..&Why:/cs why # $$?="Enter Nick"
  ..&Count:/cs count #
  ..-
  ..&Uop
  ...&Add:/cs uop # add $$?="Enter nickname of new Uop"
  ...&Del:/cs uop # del $$?="Enter nickname to be removed"
  ...&List:/cs uop # list
  ...&Wipe:/cs uop # wipe
  ...&Clean:/cs uop # clean
  ..&Vop
  ...&Add:/cs Vop # add $$?="Enter nickname of new Vop"
  ...&Del:/cs Vop # del $$?="Enter nickname to be removed"
  ...&List:/cs Vop # list
  ...&Wipe:/cs vop # wipe
  ...&Clean:/cs vop # clean
  ..&Aop
  ...&Add:/cs Aop # add $$?="Enter nickname of new Aop"
  ...&Del:/cs Aop # del $$?="Enter nickname to be removed"
  ...&List:/cs Aop # list
  ...&Wipe:/cs aop # wipe
  ...&Clean:/cs aop # clean
  ..&Sop
  ...&Add:/cs Sop # add $$?="Enter nickname of new Sop"
  ...&Del:/cs Sop # del $$?="Enter nickname to be removed"
  ...&List:/cs Sop # list
  ...&Wipe:/cs sop # wipe
  ...&Clean:/cs sop # clean
  ..-
  ..&Akick
  ...&Add:/cs akick # add $$?="nick/mask to akick"
  ...&Del:/cs akick # del $$?="Delete Who?"
  ...&List:/cs akick # list
  ...&Wipe:/cs akick # wipe
  ..-
  ..&Mass Deop:/cs mdeop #
  ..&Mass Kick:/cs mkick #
  ..-
  ..&Invite:/cs invite #
  ..&Unban Me:/cs unban # me
  ..&Unban All:/cs unban # all
  ..-
  ..&Set
  ...&Mlock:/cs set # $$?="enter modes"
  ...&Ident:/cs set # IDENT $$?="ON|OFF"
  ...&OPGUARD:/cs set # OPGUARD $$?="ON|OFF"
  ...&Topic Lock:/cs set # TOPICLOCK $$?="off|founder|aop|sop"
  ...&Keep Topic:/cs set # KEEPTOPIC $$?="ON|OFF"
  ...&Restrict:/cs set # RESTRICT $$?="ON|OFF"
  ...&Founder:/cs set # FOUNDER $$?="New Founder"
  ...&Memo Level:/cs set # MEMOLEVEL $$?="vop|aop|sop|none"
  ...&URL:/cs set # URL $$?="Enter url or type NONE"
  ...&Description:/cs set # DESC $$?="New Channel Description"
  ...&Email:/cs set # EMAIL $$?="Enter Email Address"
  ...&Password:/cs set # PASSWD $$?="Enter New Password"
  .&Nickserv
  ..&Register:/ns register $$?="Enter a password for your nickname" $$?="email"
  ..&Identify:/ns identify $$?="Enter your password here"
  ..&Drop:/ns drop  $$?="Enter nickname to drop"
  ..&Info:/ns info $$?="Enter nickname"
  ..&Ghost:/ns ghost $$?="Enter nickname" $$?="Enter password"
  ..&Recover:/ns recover $$?="Enter nickname" $$?="Enter password"
  ..&Release:/ns release $$?="Enter nickname" $$?="Enter password"
  ..&Acc:/ns acc $$?="Enter Nickname"
  ..&Access
  ...&Add:/ns access add $$?="Mask to add: user@hostmask"
  ...&Del:/ns access del $$?="Mask to delete: user@hostmask"
  ...&List:/ns access list
  ...&Wipe:/ns access wipe
  ..&Set
  ...&URL:/ns set url $$?="Enter URL"
  ...&Email:/ns set email $$?="Enter email"
  ...&No Op
  ....&On:/ns set noop on
  ....&Off:/ns set noop off
  ...&No Memo
  ....&On:/ns set nomemo on
  ....&Off:/ns set nomemo off
  ...&Kill
  ....&On:/ns set kill on
  ....&Off:/ns set kill off
  ...&Secure
  ....&On:/ns set secure on
  ....&Off:/ns set secure off
  ...&Password:/ns set passwd $$?="Enter new password"
  ...&Show Email:/ns set showemail $$?="ON|OFF"
  ...&Mode Lock:/ns set mlock $$?="ON|OFF"
  ...&Memo Receipts:/ns set mreceipts $$?="ON|OFF"
  ...&Memo Forward:/ns set mforward $$?="ON then NICKNAME or OFF"
  .&Memoserv
  ..&Send:/ms send $$?="Enter nickname/channel to send to" $$?="Memo Message"
  ..&Send To:/ms sendto # $$?="AOP|SOP|VOP|UOP" $$?="Memo Message"
  ..&Forward:/ms forward $$?="ON NICKNAME or OFF"
  ..&Read:/ms read $$?="MEMO NUMBER or NEW"
  ..&List:/ms list
  ..&Del:/ms del $$?="MEMO NUMBER"
  ..&Wipe:/ms del all
  &Help 
  .&Chanserv
  ..&Op/Voice
  ...&Op:/say type:  /cs op #channel nickname
  ...&Deop:/say  type:  /cs deop #channel nickname
  ...&Voice:/say  type:  /cs voice #channel nickname
  ...&Devoice:/say  type:  /cs devoice #channel nickname
  ..&Count:/say type:  /cs count #channel
  ..&Acc:/say type:  /cs acc #channel nickname
  ..&Info:/say type  /cs info #channel
  ..&Invite:/say type  /cs invite #channel
  ..&Identify:/say type:  /cs identify #channel channelpass
  ..&Mkick:/say type:  /cs mkick #channel
  ..&Mdeop:/say type:  /cs mdeop #channel
  ..&Why:/say type:  /cs why #channel nickname
  ..&Register:/say type:  /cs register #channel channelpassword description
  ..&Drop:/say type:  /cs drop #channel
  ..&Akick
  ...&Add:/say type:  /cs akick #channel add <nick or mask>
  ...&Del:/say type:  /cs akick #channel del <nick or mask>
  ...&List:/say type  /cs akick #channel list
  ...&Wipe:/say type  /cs akick #channel wipe
  ..&Aop
  ...&Add:/say type:  /cs aop #channel add <nick or mask>
  ...&Del:/say type:  /cs aop #channel del <nick or mask>
  ...&List:/say type  /cs aop #channel list
  ...&Wipe:/say type  /cs aop #channel wipe
  ..&Sop
  ...&Add:/say type:  /cs Sop #channel add <nick or mask>
  ...&Del:/say type:  /cs Sop #channel del <nick or mask>
  ...&List:/say type:  /cs Sop #channel list
  ...&Wipe:/say type:  /cs Sop #channel wipe
  ..&Set
  ...&Founder:/say type:  /cs set #channel <founder>
  ...&Opguard:/say type:  /cs set #channel opguard on/off
  ...&Topiclock:/say type:  /cs set #channel TOPICLOCK <NONE/AOP/SOP/FOUNDER>
  ...&Mlock:/say type:  /cs set #channel mlock <modes>
  .&Nickserv
  ..&Register:/say type:  /ns register <password> <e-mail>
  ..&Drop:/say type:  /ns drop nickname
  ..&Identify:/say type:  /ns identify mypassword
  ..&Ghost:/say type:  /ns ghost nickname mypassword
  ..&Set
  ...&Secure:/say type:  /ns set secure on/off
  ...&Email:/say type:  /ns set email <youremail@address>
  ...&ShowEmail:/say type:  /ns set showemail on
  ...&Password:/say type:  /ns set passwd newpassword
  ...&NoOp:/say type:  /ns set noop on/off
  ...&NoMemo:/say type:  /ns set nomemo on/off
  ...&Kill:/say type:  /ns set kill on/off
  ...&URL:/say type:  /ns set URL http://www.yoururl.com/
  ...&MLock:/say type:  /ns set mlock on
  .&Memoserv
  ..&Send:/say type:  /ms send nickname memo
  ..&List:/say type:  /ms list
  ..&Read:/say type:  /ms read <memo #>
  ..&Del:/say type:  /ms del <memo #>
  ..&Sendto:/say type:  /ms sendto #channel <AOP/SOP/VOP/UOP> message here | /say or for more information type /ms help sendto  
  -  
  $left($active,1) $+ & $+ $mid($active,2,$len($active))
  .&Channel Settings
  ..&Modes
  ...(+/-) &Invite: { if ( $me isop # ) { if (i isin $chan(#).mode) { mode # -i } | else { mode # +i } | halt } | /notop # }
  ...(+/-) &Secret: { if ( $me isop # ) { if (s isin $chan(#).mode) { mode # -s } | else { mode # +s } | halt } | /notop # }
  ...(+/-) &Private: { if ( $me isop # ) { if (p isin $chan(#).mode) { mode # -p } | else { mode # +p } | halt } | /notop # }
  ...(+/-) &Channel Moderated: { if ( $me isop # ) { if (m isin $chan(#).mode) { mode # -m } | else { mode # +m }  | halt } | /notop # }
  ...(+/-) &No External msg: { if ( $me isop # ) { if (n isin $chan(#).mode) { mode # -n } | else { mode # +n }  | halt } | /notop # }
  ...(+/-) &Ops Change Topic: { if ( $me isop # ) { if (t isin $chan(#).mode) { mode # -t } | else { mode # +t }  | halt } | /notop # }
  ...(+/-) &Limit Users: { if ( $me isop # ) { if (l isin $chan(#).mode) { mode # -l } | else { mode # +l $$?="How Many Users?" }  | halt } | /notop # }
  ...(+/-) &Key: { if ( $me isop # ) { if (k isin $chan(#).mode) { mode # -k $chan(#).key } | else { mode # +k $$?="Enter new channel Key" }  | halt } | /notop # }
  ...(+/-) &No CTCP: { if ( $me isop # ) { if (e isin $chan(#).mode) { mode # -e } | else { mode # +e }  | halt } | /notop # }
  ...(+/-) &No Nick Change: { if ( $me isop # ) { if (d isin $chan(#).mode) { mode # -d } | else { mode # +d }  | halt } | /notop # }
  ...(+/-) &No Color Codes: { if ( $me isop # ) { if (c isin $chan(#).mode) { mode # -c } | else { mode # +c }  | halt } | /notop # }
  ..&Topics:open.Topics
  .-
  .&Clone This Channel://join # $+ $chr(160)
  .&Clone Another Channel:/fakechan
  .-
  .&Channel Scanners
  ..&Full Channel Scan
  ...&Private:/set %Scan.Display echo # 12>>>3 | scan #
  ...&Channel:/set %Scan.Display msg # | scan #
  ..-
  ..&Peak User Scan
  ...&Private ( $+ %peakscanchan $+ ):/showpeakscan echo #
  ...&Channel ( $+ %peakscanchan $+ ):/showpeakscan channel #
  ...&Scan Settings
  ....&Reset Peak value to 0: set %peakreset $atime on $adate | set %peakval 0 | echo 12>>>3 Peak value for %peakscanchan set to 0
  ....-
  ....&Enter New Channel:/resetpeak $$?="Enter Channelname (including #)"
  ....&Use # for scan:/resetpeak #
  ..&Quick Scan
  ...&Show Private:/echo 12>>>2Quick Channel Stats for4 # $+  | echo 12>>>3 Ops:14(12 $+ $opnick(#,0) $+ 14)3 Voice:14(12 $+ $vnick(#,0) $+ 14)3 Standard:14(12 $+ $nvnick(#,0) $+ 14)3 Total:14(12 $+ $nick(#,0) $+ 14)3
  ...&Show Channel:/say 2Quick Channel Stats for4 # $+  | say 3Ops:14(12 $+ $opnick(#,0) $+ 14)3 Voice:14(12 $+ $vnick(#,0) $+ 14)3 Standard:14(12 $+ $nvnick(#,0) $+ 14)3 Total:14(12 $+ $nick(#,0) $+ 14)3
  ..&Clones Scan
  ...&Show Private:/set %Clones.Display echo # 12>>>3 | clones #
  ...&Show Channel:/set %Clones.Display msg # | clones #
  ..&IRCops Scan
  ...&Show Private:/set %ircops.Display echo # 12>>>3 | ircopscan #
  ...&Show Channel:/set %ircops.Display msg # | ircopscan #
  ..&Away Scanner
  ...&Show Private:/set %AwayScan.Display echo # 12>>>3 | awayscan #
  ...&Show Channel:/set %AwayScan.Display msg # | awayscan #
  ..-
  ..&List Ops on # :/listops
  .-
  .&Channel Warnings
  ..&Explain
  ...&Op Warning: /say   4,1Please DO Not:  Aggravate, Bother, Worry, Badger, Infuriate, Heckle, Harrass, Agitate, Hassel, Distress, Grate, Ruffle, Irk, Enrage, Pester, Humiliate, Plague, Offend, Persecute, Insult, Inflame, Irritate, Neddle, Disquite, Provoke, Nettle, Rile, Affront, Mock, Beset, Nag, Tease, Torment, Disturb, Annoy, Taunt, OR Vex  4,1THE OPERATORS
  ...&Rules:/me 4says the rules for # are as follows: No offensive language, Repeating, Flooding the channel with text/nick/join or part, Advertising, Sexual Attitudes, Harassing Users, Excessive Caps, Offensive Nicks, Clones, Auto Greets, or Op Begging! 
  ...-
  ...&Caps:/me 4warns everyone that caps are rude/annoying and can be considered YELLING and/or shouting, so please don't use excessive caps or you risk being kicked/banned
  ...&Swear:/me 4warns everyone that swearing is NOT allowed in this channel and can result in a kick/ban
  ...&English:/me 4warns everyone that this is an english ONLY channel, please speak english, or you risk being kicked/banned
  ...&Repeat:/me 4warns everyone that repeating is annoying, and can result in a kick/ban
  ...&Sex Chan:/me 4warns everyone that this is NOT a sex channel nor is it a pick-up joint, please don't use it as one or you risk being kicked/banned
  ...&Ops Begging:/me 4warns everyone that Op Beggers are annoying! Ops are earned, they are not given to beggers, so please don't beg for ops or you risk being kicked/banned
  ...&Advertising:/me 4warns everyone that advertising in # will not be tolerated. Users who advertise other channels or unauthorised websites will be kicked/banned
  ...&AutoGreets:/me 4warns everyone that although Auto-Greets seem cool, only channel ops will be allowed them in here. If yours is on you risk being kicked/banned
  ..-
  ..&Caps:/say 12»»» 4Warning:10 Drop the CAPS 12«««
  ..&Swear:/say 12»»» 4Warning:10 NO Swearing 12«««
  ..&English:/say 12»»» 4Warning:10  $+ $chan is an English-only Channel 12«««
  ..&Repeat:/say 12»»» 4Warning:10 Do NOT repeat. We heard you the first time! 12«««
  ..&Sex Chan:/say 12»»» 4Warning:10 This is NOT a sex channel 12«««
  ..&Op Begging:/say 12»»» 4Warning:10 Please do NOT beg for Ops 12«««
  ..&Advertising:/say 12»»» 4Warning:10 Do NOT advertise in $chan $+  12«««
  ..&AutoGreets:/say 12»»» 4Warning:10 Only Ops may use auto-greets 12«««
  ..&Custom:/say 12»»» 4Warning:10  $+ $$?"Enter warning" $+  12«««
  .-
  .&Cycle:/raw part # $moontxt2(Channel Cycle - BRB) | raw join # 
  .-
  .&Mass Stuff
  ..&Ban:{ set %ban.sure $?!="are you sure?" | if ( %ban.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Ban Halted) | halt } | :next | massb | unset %*.sure }
  ..&Kick/Ban:{ set %ban.sure $?!="are you sure?" | if ( %ban.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Kick/) $+ $moontxt2(Ban Halted) | halt } | :next | masskb | unset %*.sure }
  ..-
  ..&Takeover:{ set %take.sure $?!="are you sure?" | if ( %take.sure == $true ) { goto next } | else { echo -a $moontxt2(Take) $+ $moontxt2(Over Halted) | halt } | :next | takeover | unset %*.sure }
  ..-
  ..-  
  ..&kick (OPs):{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Kick Of Ops Halted) | halt } | :next | mkops | unset %*.sure }
  ..&kick (Non OPs):{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Kick of Non Ops Halted) | halt } | :next | mknops | unset %*.sure } 
  ..&Kick (All):{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Kick Halted) | halt } | :next | mkall | unset %*.sure } 
  ..-
  ..&Mass OP:{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Op Halted) | halt } | :next | mop | unset %*.sure } 
  ..&Mass Deop:{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Deop Halted) | halt } | :next | mdop | unset %*.sure }
  ..-
  ..&Mass Voice:{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Voice Halted) | halt } | :next | mvoice | unset %*.sure }
  ..&Mass DeVoice:{ set %mk.sure $?!="are you sure?" | if ( %mk.sure == $true ) { goto next } | else { echo -a $moontxt2(Mass Devoice Halted) | halt } | :next | mdvoice | unset %*.sure }
  ..-
  ..&Invite:.minvite $$?="channel name" 
  .-
  .&Filter Kick:fkick $$?="nick/mask to kick"
  .&Filter Kick/Ban:fkb $$?="nick/mask to kick/ban"
}