[qpopup]
n0=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n1=; §§
n2=; §§                                       INVISION VERSION 1.0 Script for mIRC 6.02 By Cryoa
n3=; §§                                       SECTION: Query Chat
n4=; §§                                       DATE: 01-01-16
n5=; §§                                       DESCRIPTION: The Query Chat Window Menus
n6=; §§
n7=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n8=411
n9=.Whois $$1:{ d.whois $1 | whois $1 }
n10=.Super Whois $1:{ d.whois $1 | whois $1 $1 }
n11=.$iif(dal isin $server,User Central):{ uwho $1 }
n12=.Finger $$1:{ finger $$1 }
n13=.DCC Ping:{ set %IpingNick [ $+ [ $iNetwork ] ] $$1 | set %CatchDNS [ $+ [ $iNetwork ] ] 1 | dns $$1 }
n14=.DNS $$1:{ .dns $$1 }
n15=.Nickserv Info on $$1:{ /NickServ info $$1 }
n16=Notice $$1:{ notice $$1 $$?="Enter the message?" } 
n17=Query $$1:{ query $$1 }
n18=-
n19=Play Media
n20=.mp3s
n21=..Play Selected mp3:{ set %mp3toplay $replace($$dir="Choose a mp3 To play" [ $iif($exists(%lastmp3dir) == $true,%lastmp3dir,C:\) $+ .mp3 ] ,$chr(32),$chr(63),$chr(44),$chr(34)) | mp3play %mp3toplay | set %lastmp3dir $nofile(%mp3toplay) | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n22=..Play Random mp3:{ set %dirtouse [ $iif($exists( [ %lastmp3dir ] ) == $true,%lastmp3dir,C:\) ] | set %mp3toplay $replace($findfile(%dirtouse,*.mp3,$rand(1,$findfile(%dirtouse,*.mp3,0))),$chr(32),$chr(63),$chr(44),$chr(34)) | mp3play %mp3toplay | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n23=..-
n24=..Random Play Directory:{ set %mp3dpdir $sdir($iif($exists( [ %lastmp3dir ] ) == $true,%lastmp3dir,C:\),"Select mp3 directory to randomly play from") | set %lastmp3dir %mp3dpdir | if %mp3dpdir != $null { set %mp3dirplay 1 | set %mp3resume Pause mp3 playback | mp3dirplay | .timermp3Player -o 0 5 mp3maintain } }
n25=..-
n26=..$iif($mp3isplaying == $true,Stop mp3 Playback):{ mp3stop | unset %mp3dirplay %mp3resume }
n27=..%mp3resume:{ if $left(%mp3resume,5) == Pause { set %mp3resume Resume mp3 Playback | mp3pauseplay } | else { set %mp3resume  Pause mp3 Playback | mp3unpauseplay } }
n28=..-
n29=..$iif($r.glob(Invision,mp3Brag) == On,$style(1)) Advertise what I'm listening to:{ if $r.glob(Invision,mp3Brag) == On { w.glob Invision mp3Brag Off } | else { w.glob Invision mp3Brag On } }
n30=.Waves
n31=..Play Selected Wave:{ splay -w $$dir="Choose a wave To play" $wavedir*.wav }
n32=..Play Random Wave:{ splay -w $findfile($wavedir,*.wav,$rand(1,$findfile($wavedir,*.wav,0))) }
n33=..-
n34=..Stop Wav Playback:{ splay -w STOP }
n35=.Midis
n36=..Play Selected Midi:{ splay -m $$dir="Choose a midi To play" $mididir*.mid }
n37=..Play Random Midi:{ splay -m $findfile($mididir,*.mid,$rand(1,$findfile($mididir,*.mid,0))) }
n38=Advertise Invision:{ show script }
n39=Text Tricks
n40=.Encrypt Speech: msg $$1 $encrypt2($$?="What would you like to say encrypted?")
n41=.-
n42=.H4CK3R:{ say $hack($$?="Enter Text - return example: H3LL0") }
n43=.Rainbowed:{ say $rain($$?="Enter Text:") }
n44=.ASCII Text:{ say $ascii($$?="Enter Text - return example: HË||ö") }
n45=.Partial Caps:{ say $caps($$?="Enter Text - return example: HeLLo") }
n46=.Bubblies:{ say $bubbles($$?="Enter Text") }
n47=.Blocks:{ say $blocks($$?="Enter Text") }
n48=.-
n49=.3D Buttons Grey:{ s3d $$?="Enter Text") }
n50=.3D Buttons Green:{ z3d $$?="Enter Text") }
n51=.3D Buttons Yellow:{ t3d $$?="Enter Text") }
n52=.3D Buttons Purple:{ p3d $$?="Enter Text") }
n53=.3D Buttons Cyan:{ b3d $$?="Enter Text") }
n54=.3D Buttons Blue:{ n3d $$?="Enter Text") }
n55=.3D Buttons Red:{ o3d $$?="Enter Text") }
n56=.3D Box
n57=..Red:{ set %box $$?="Enter Mesage:" | say  04,04   $+ %box $+    | say  04,04  01,04 $+ %box $+ 04,4  14,14  | say  04,04   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n58=..Blue:{ set %box $$?="Enter Mesage:" | say  12,12   $+ %box $+    | say  12,12  01,12 $+ %box $+ 12,12  14,14  | say  12,12   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n59=..Green:{ set %box $$?="Enter Mesage:" | say  03,03   $+ %box $+    | say  03,03  01,03 $+ %box $+ 03,03  14,14  | say  03,03   $+ %box $+   14,14  | say  14,14   $+ %box $+    | unset %box }
n60=..Pink:{ set %box $$?="Enter Mesage:" | say  13,13   $+ %box $+    | say  13,13  01,13 $+ %box $+ 13,13  14,14  | say  13,13   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n61=..Purple:{ set %box $$?="Enter Mesage:" | say  06,06   $+ %box $+    | say  06,06  01,06 $+ %box $+ 06,06  14,14  | say  06,06   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n62=..Orange:{ set %box $$?="Enter Mesage:" | say  07,07   $+ %box $+    | say  07,07  01,07 $+ %box $+ 07,07  14,14  | say  07,07   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n63=.Ircii Support
n64=..Say Something Bold:/say  $+ $$?="Text to say in bold"
n65=..Say Something Highlighted:/say  $+ $$?="Text to say highlighted"
n66=..Say Something Underlined:/say   $+ $$?="Text to say underlined"
n67=..Say Something Bold/Highlighted:/say  $+ $$?="Say What?"
n68=Display Private
n69=.Total Bandwidth:{ show Bandwidth }
n70=.Bandwidth and DCC's:{ bwstatus }
n71=.System Info:{ show sys }
n72=.Drive Info:{ Drivefo $$1 }
n73=.Show Gets:{ show Gets }
n74=.Show Sends:{ show Sends }
n75=.mp3 in Play:{ show mp3play }
n76=.Op Status:{ show Ops }
n77=.Your Email:{ show Email }
n78=.Your WebPage:{ show WebPage }
n79=.Your ICQ:{ show ICQ }
n80=.Date and Time:{ show Time }
n81=.Your Titlebar:{ show Titlebar }
n82=.OS and Uptime:{ show OS }
n83=.Server Connections:{ show Server }
n84=.Server Connections w/nicks:{ show Server mes }
n85=.Address:{ show Address }
n86=.Advertise Script:{ show script }
n87=-
n88=$iif($1 != $null,User Lists)
n89=.Elite
n90=..$iif($1 != $null,Add $$1):{ .adduser Elite $$1 | aecho $1 has been added to your Elite list. }
n91=..$iif($1 != $null,Add all Selected):{ massausers $chan Elite }
n92=.Fellow Ops
n93=..$iif($1 != $null,Add $$1):{ .adduser Op $$1 | aecho $1 has been added to your Fellow Ops list. }
n94=..$iif($1 != $null,Add all Selected):{ massausers $chan Op }
n95=..-
n96=..Clear All:{ if $?!="Are you sure you want to clear the Fellow Ops list?" == $true { .rlevel 20 | aecho The Fellow Ops list has been cleared. } }
n97=.Bots
n98=..$iif($1 != $null,Add $$1):{ .adduser Bot $$1 | aecho $1 has been added to your Bots list. }
n99=..$iif($1 != $null,Add all Selected):{ massausers $chan Bot }
n100=.Friends List
n101=..$iif($1 != $null,Add $$1):{ .adduser Friend $1 | aecho $1 has been added to your friends list. }
n102=..$iif($1 != $null,Add all Selected):{ massausers $chan Friend }
n103=..-
n104=..Clear All:{ if $?!="Are you sure you want to clear the friends list?" == $true { .rlevel 15 | aecho The Friends list has been cleared. } }
n105=.Notify List
n106=..$iif($1 != $null,Add $1):{ .notify $$1 $?="Enter Quote for [ $1 ] (cancel for none)" }
n107=..$iif($1 != $null,Delete $1):{ .notify -r $$1 }
n108=..-
n109=..Manually Add Address:{ .notify $$?="Enter the nick to add. ie: DarkStain" $?="Enter a quote for this person." | aecho The nick has been added to your notify list. }
n110=.Ignore List
n111=..$iif($1 != $null,Add $1):{ .ignore $address($$1,3) | aecho Now Ignoring $c(2) $+ $address($$1,3) }
n112=..$iif($1 != $null,Remove $1):{ .ignore -r $address($$1,3) | aecho No longer Ignoring $c(2) $+ $address($$1,3) }
n113=..-
n114=..$iif($1 != $null,Add Entire Domain):{ .ignore $address($$1,4) | aecho Now Ignoring $c(2) $+ $address($$1,4) }
n115=..$iif($1 != $null,Remove Entire Domain):{ .ignore -r $address($$1,4) | aecho No longer Ignoring $c(2) $+ $address($$1,4) }
n116=..-
n117=..Manually Add Address:{ .ignore $$?="Enter the address to add. ie: *!invision@adsl-64-205-190-4.lightwave.com" | aecho $c(2) $+ $! $c(1) $+ has been added to your ignore list. }
n118=..-
n119=..Clear All:{ if $?!="Are you sure you want to clear the Ignore list?" == $true { aecho The Ignore list was cleared. | .ignore -r } }
n120=.Auto Greet
n121=..$iif($1 != $null,Add $1):{ w.greet $$1 $$?="Enter a Auto Greet message for [ $1 ] $crlf $+ Example: Welcome back $1" | aecho Added $1 to the Auto Greet List.  When $1 joins one of the Auto Greeting Channels, you will greet them }
n122=..$iif($1 != $null,Del $1):{ d.greet $$1 | aecho Removed $1 from the Auto Greet List. }
n123=..-
n124=..Clear All:{ if $?!="Are you sure you want to clear the Auto Greet list?" == $true { c.greet | aecho Auto Greet List has been Cleared! } }
n125=.Shitlist
n126=..$iif($1 != $null,Add $1):{ shitlist add $1 $comchan($1,1) $?="Enter a reason Example: Retardation" }
n127=..-
n128=..Clear All:{ if $?!="Are you sure you want to clear the Shitlist?" == $true { shitlist clr | .rlevel 5 | aecho Shitlist Cleared } }
n129=.DCC Banned
n130=..$iif($1 != $null,Add $1):{ whodat $$1 | adduser ban $1 | aecho $1 was added to the DCC Banned List }
n131=..-
n132=..Clear List:{ if $?!="Are you sure you want to clear the Fserve Ban list?" == $true { FserverBan clr | .rlevel 7 | Aecho Fserve Ban List Cleared! } }
n133=.-
n134=.$iif($level($address($$1,5)) != 10, Show $$1 in UL Manager):{ dopen UserLists UserLists | .timer -o 1 1 ShowinUL $$1 }
n135=.User Lists Manager:{ dopen UserLists UserLists }
n136=.$iif(($r.set(Fserve,DCClimit) == On && $1 != $null),Clear Daily Limit for $1):{ d.leech Leech $replace($address($1,3),$chr(61),$chr(58)) | aecho Daily limit cleared for $c(2) $+ $1 }
n137=CTCP $chr(32) $+ $1
n138=.Ping:{ ctcp $$1 ping }
n139=.Version:{ ctcp $$1 version }
n140=.Finger:{ ctcp $$1 finger }
n141=.Userinfo:{ ctcp $$1 userinfo }
n142=.ClientInfo:{ ctcp $$1 clientinfo }
n143=.Time:{ ctcp $$1 time }
n144=.Page:{ ctcp $$1 Page $$?="Enter Message" }
n145=.Help:{ ctcp $$1 Help }
n146=.Fserve 
n147=..!list:{ ctcp $$1 !list }
n148=..@find:{ ctcp $$1 @find $$?="Search for what on [ $1 ] " } 
n149=..Sends?:{ ctcp $$1 SENDS }
n150=..Queues?:{ ctcp $$1 QUEUES }
n151=.mp3 Server
n152=..!list:{ ctcp $$1 !list }
n153=..@locator:{ ctcp $$1 @find $$?="Search for what on [ $1 ] " } 
n154=..Queues:{ ctcp $$1 Queues }
n155=..Sends?:{ ctcp $$1 SENDS }
n156=..Clear All Queues:{ ctcp $$1 Clear All }
n157=..Clear 1 Queue:{ ctcp $$1 $$?="Clear which number?" }
n158=..Help: ctcp $$1 !mp3help   
n159=.XDCC
n160=..Send:{ ctcp $$1 xdcc send #$$?="Enter Pack Number" }
n161=..Get:{ ctcp $$1 xdcc send #$$?="Enter Pack Number" }
n162=..List:{ ctcp $$1 xdcc list }
n163=..Remove:{ ctcp $$1 xdcc remove }
n164=..Sends?:{ ctcp $$1 SENDS }
n165=..Queues?:{ ctcp $$1 QUEUES }
n166=.CDCC
n167=..Send:ctcp $$1 cdcc send #$$?="Enter Pack Number" 
n168=..Get:{ ctcp $$1 cdcc send #$$?="Enter Pack Number" }
n169=..List:{ ctcp $$1 cdcc list }
n170=..Remove:{ ctcp $$1 cdcc REMOVE }
n171=..Sends?:{ ctcp $$1 SENDS }
n172=..Queues?:{ ctcp $$1 QUEUES }
n173=.-
n174=.Custom:{ ctcp $$1 $$?="Enter CTCP Request" }
n175=.-
n176=.$chr(32) $chr(32) $+ Invision CTCP's: { }
n177=.-
n178=.FTPinfo
n179=..FTP info 1: ctcp $$1 FTPINFO1 
n180=..FTP info 2:{ ctcp $$1 FTPINFO2 } 
n181=..FTP info 3:{ ctcp $$1 FTPINFO3 } 
n182=..FTP info 4:{ ctcp $$1 FTPINFO4 }
n183=..FTP info 5:{ ctcp $$1 FTPINFO5 }
n184=.FServe Control
n185=..Startup:{ ctcp $$1 Startup $encrypt2($$?*="Enter the Fserve control password") }
n186=..Shutdown:{ ctcp $$1 Shutdown $encrypt2($$?="Enter the Fserve control password") }
n187=..Close:{ ctcp $$1 Close $encrypt2($$?*="Enter the Fserve control password") }
n188=.-
n189=.Get Ops:{ ctcp $$1 OPME $chan $encrypt2($$?*="Enter your password") }
n190=.Set Password:{ ctcp $$1 SETPW $$?="Use what password?" $$?="Confirm Password" }
n191=.Change Password:{ ctcp $$1 CHANGEPW $$?="What's your existing PW?" $$?="New Password?" $$?"Confirm New PW." }
n192=DCC
n193=.Send:{ .idcc send $$1 | if ($r.set(Invision,SndOpt17) == On) { SoundQ $shortfn($mircdir) $+ $r.glob(Themes,Sound18) } }
n194=.Chat:{ .dcc chat $$1 }
n195=.Queue Sends:{ if $1 != $null { set %DCCqnick [ $+ [ $iNetwork ] ] $1 | set %SFDfunc [ $+ [ $iNetwork ] ] DCCqueue | dopen selfiles selfiles } }
n196=.Fserve
n197=..Trigger #1:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.1,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.1,Root.Dir) $r.set(Fserve.1,Welcome.File) } }
n198=..Trigger #2:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.2,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.2,Root.Dir) $r.set(Fserve.2,Welcome.File) } }
n199=..Trigger #3:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.3,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.3,Root.Dir) $r.set(Fserve.3,Welcome.File) } }
n200=..Trigger #4:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.4,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.4,Root.Dir) $r.set(Fserve.4,Welcome.File) } }
n201=..Trigger #5:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.5,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.5,Root.Dir) $r.set(Fserve.5,Welcome.File) } }
n202=..-
n203=..Custom:{ fserve $$1 $r.set(Fserve,Max.Sends.Each) $$sdir="Choose root directory [ $1 ] " }
n204=.Grant Temp DCC:{ whodat $1 | udccset $address($$1,5) $$1 Default }
n205=Slow Paste from Clipboard:{ pclipbrd $1 }
n206=-
n207=View Log:{ logviewer $$1 }
n208=Clear Window:clear $$1
n209=-
n210=Play Media
n211=.mp3s
n212=..Play Selected mp3:{ set %mp3toplay $$dir="Choose a mp3 To play" [ $iif($exists(%lastmp3dir) == $true,%lastmp3dir,C:\) $+ .mp3 ] | splay -p %mp3toplay | set %lastmp3dir $nofile(%mp3toplay) | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n213=..Play Random mp3:{ set %dirtouse [ $iif($exists(%lastmp3dir) == $true,%lastmp3dir,C:\) ] | set %mp3toplay $findfile(%dirtouse,*.mp3,$rand(1,$findfile(%dirtouse,*.mp3,0))) | splay -p %mp3toplay | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n214=..-
n215=..Random Play Directory:{ set %mp3dpdir $sdir($iif($exists(%lastmp3dir) == $true,%lastmp3dir,C:\),"Select mp3 directory to randomly play from") | set %lastmp3dir %mp3dpdir | if %mp3dpdir != $null { set %mp3dirplay 1 | set %mp3resume Pause mp3 playback | mp3dirplay } }
n216=..-
n217=..$iif($mp3isplaying == $true,Stop mp3 playback):{ splay stop | unset %mp3dirplay %mp3resume }
n218=..%mp3resume:{ if $left(%mp3resume,5) == Pause { set %mp3resume Resume mp3 playback | splay pause } | else { set %mp3resume  Pause mp3 playback | splay resume } }
n219=.Waves
n220=..Play Selected Wave:{ splay -w $$dir="Choose a wave To play" $wavedir*.wav }
n221=..Play Random Wave:{ splay -w $findfile($wavedir,*.wav,$rand(1,$findfile($wavedir,*.wav,0))) }
n222=.Midis..Play Selected Midi:{ splay -m $$dir="Choose a midi To play" $mididir*.mid }
n223=..Play Random Midi:{ splay -m $findfile($mididir,*.mid,$rand(1,$findfile($mididir,*.mid,0))) }
n224=$iif($server != $null,Away Control)
n225=.$iif($away == $true,Set Back):{ away }
n226=.$iif($away == $true,Silent Back):{ away sb }
n227=.$iif($away != $true,Set Away)
n228=..$r.glob(Customs,AWY1.desc):{ away [ [ $r.glob(Customs,AWY1.msg) ] ] }
n229=..$r.glob(Customs,AWY2.desc):{ away [ [ $r.glob(Customs,AWY2.msg) ] ] }
n230=..$r.glob(Customs,AWY3.desc):{ away [ [ $r.glob(Customs,AWY3.msg) ] ] }
n231=..$r.glob(Customs,AWY4.desc):{ away [ [ $r.glob(Customs,AWY4.msg) ] ] }
n232=..$r.glob(Customs,AWY5.desc):{ away [ [ $r.glob(Customs,AWY5.msg) ] ] }
n233=..$r.glob(Customs,AWY6.desc):{ away [ [ $r.glob(Customs,AWY6.msg) ] ] }
n234=..Work:{ away Work }
n235=..Sleep:{ away Sleeping }
n236=..Fresh Air:{ away Getting some Fresh Air }
n237=..Bathroom:{ away Gotta drop the kids off at the pool }
n238=..Smoke Break:{ away Smoke Break }
n239=..Hookers:{ away Entertaining some Hookers }
n240=..Beer:{ away Slammin some Brews }
n241=..Food:{ away Stuffin my face }
n242=..Store:{ away Ran to the Store }
n243=..TV:{ away Watching T.V. }
n244=..-
n245=..Enter Reason:{ away $$?="Enter Away Reason" }
n246=..Silent Away
n247=...$r.glob(Customs,AWY1.desc):{ away -s [ [ $r.glob(Customs,AWY1.msg) ] ] }
n248=...$r.glob(Customs,AWY2.desc):{ away -s [ [ $r.glob(Customs,AWY2.msg) ] ] }
n249=...$r.glob(Customs,AWY3.desc):{ away -s [ [ $r.glob(Customs,AWY3.msg) ] ] }
n250=...$r.glob(Customs,AWY4.desc):{ away -s [ [ $r.glob(Customs,AWY4.msg) ] ] }
n251=...$r.glob(Customs,AWY5.desc):{ away -s [ [ $r.glob(Customs,AWY5.msg) ] ] }
n252=...$r.glob(Customs,AWY6.desc):{ away -s [ [ $r.glob(Customs,AWY6.msg) ] ] }
n253=...Work:{ away -s Work }
n254=...Sleep:{ away -s Sleeping }
n255=...Fresh Air:{ away -s Getting some Fresh Air }
n256=...Bathroom:{ away -s Gotta drop the kids off at the pool }
n257=...Smoke Break:{ away -s Smoke Break }
n258=...Hookers:{ away -s Entertaining some Hookers }
n259=...Beer:{ away -s Slammin some Brews } ...Food:{ away -s Stuffin my face }
n260=...Store:{ away -s Ran to the Store }
n261=...TV:{ away -s Watching T.V. }
n262=...-
n263=...Enter Reason:{ away -s $$?="Enter Away Reason" }
n264=.-
n265=.View Messages:{ pager }

[lpopup]
n0=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n1=; §§
n2=; §§                                       INVISION VERSION 1.0 Script for mIRC 6.02 By Cryoa
n3=; §§                                       SECTION: Nick List
n4=; §§                                       DATE: 01-01-16
n5=; §§                                       DESCRIPTION: The Nick List Window Menus
n6=; §§
n7=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n8=$iif($1 != $null,411)
n9=.Whois $iif($numtok($snicks,44) < 2,$1,Selected):{ if $numtok($snicks,44) > 1  { massinfo whois $chan } | else { d.whois $1 | whois $1 } }
n10=.Super Whois $iif($numtok($snicks,44) < 2,$1,Selected):{ if $numtok($snicks,44) > 1  { massinfo swhois $chan } | else { d.whois $1 | whois $1 $1 } }
n11=.User Central:{ uwho $1 }
n12=.Finger $1:{ finger $$1 }
n13=.DCC Ping:{ set %IpingNick [ $+ [ $iNetwork ] ] $$1 | set %CatchDNS [ $+ [ $iNetwork ] ] 1 | dns $$1 }
n14=.DNS $iif($numtok($snicks,44) < 2,$1,Selected):{ if $numtok($snicks,44) > 1  { massinfo dns $chan } | else { .dns $1 } }
n15=.$iif(Efnet !isin $server($server).Group,Nickserv Info on $iif($numtok($snicks,44) < 2,$1,Selected)):{ /NickServ info $$1 }
n16=$iif($1 != $null,Notice $1):{ notice $$1 $$?"Enter Message" }
n17=$iif($numtok($snicks,44) == 1,Query $1): query $$1
n18=$iif($numtok($snicks,44) >= 2,Mass Message Selected):{ massmsg $chan $$?="What is the message to mass send?" }
n19=$iif($gettok($ial($1).mark,1,32) != $null,$1 is on...)
n20=.$remove($gettok($ial($1).mark,1,32),+,@):{ join $remove($gettok($ial($1).mark,1,32),+,@,$chr(37)) }
n21=.$remove($gettok($ial($1).mark,2,32),+,@):{ join $remove($gettok($ial($1).mark,2,32),+,@,$chr(37)) }
n22=.$remove($gettok($ial($1).mark,3,32),+,@):{ join $remove($gettok($ial($1).mark,3,32),+,@,$chr(37)) }
n23=.$remove($gettok($ial($1).mark,4,32),+,@):{ join $remove($gettok($ial($1).mark,4,32),+,@,$chr(37)) }
n24=.$remove($gettok($ial($1).mark,5,32),+,@):{ join $remove($gettok($ial($1).mark,5,32),+,@,$chr(37)) }
n25=.$remove($gettok($ial($1).mark,6,32),+,@):{ join $remove($gettok($ial($1).mark,6,32),+,@,$chr(37)) }
n26=.$remove($gettok($ial($1).mark,7,32),+,@):{ join $remove($gettok($ial($1).mark,7,32),+,@,$chr(37)) }
n27=.$remove($gettok($ial($1).mark,8,32),+,@):{ join $remove($gettok($ial($1).mark,8,32),+,@,$chr(37)) }
n28=.$remove($gettok($ial($1).mark,9,32),+,@):{ join $remove($gettok($ial($1).mark,9,32),+,@,$chr(37)) }
n29=.$remove($gettok($ial($1).mark,10,32),+,@):{ join $remove($gettok($ial($1).mark,10,32),+,@,$chr(37)) }
n30=.$remove($gettok($ial($1).mark,11,32),+,@):{ join $remove($gettok($ial($1).mark,11,32),+,@,$chr(37)) }
n31=.$remove($gettok($ial($1).mark,12,32),+,@):{ join $remove($gettok($ial($1).mark,12,32),+,@,$chr(37)) }
n32=-
n33=$iif($1 != $null,User Lists)
n34=.Elite
n35=..$iif($1 != $null,Add $$1):{ .adduser Elite $$1 $chan | aecho $1 has been added to your Elite list. }
n36=..$iif($1 != $null,Add all Selected):{ massausers $chan Elite }
n37=.Fellow Ops
n38=..$iif($1 != $null,Add $$1):{ .adduser Op $$1 $chan | aecho $1 has been added to your Fellow Ops list. }
n39=..$iif($1 != $null,Add all Selected):{ massausers $chan Op }
n40=..-
n41=..Clear All:{ if $?!="Are you sure you want to clear the Fellow Ops list?" == $true { .rlevel 20 | aecho The Fellow Ops list has been cleared. } }
n42=.Bots
n43=..$iif($1 != $null,Add $$1):{ .adduser Bot $$1 $chan | aecho $1 has been added to your Bots list. }
n44=..$iif($1 != $null,Add all Selected):{ massausers $chan Bot }
n45=.Friends List
n46=..$iif($1 != $null,Add $$1):{ .adduser Friend $1 $chan | aecho $1 has been added to your friends list. }
n47=..$iif($1 != $null,Add all Selected):{ massausers $chan Friend }
n48=..-
n49=..Clear All:{ if $?!="Are you sure you want to clear the friends list?" == $true { .rlevel 15 | aecho The Friends list has been cleared. } }
n50=.Notify List
n51=..$iif($1 != $null,Add $1):{ .notify $$1 $?="Enter Quote for [ $1 ] (cancel for none)" }
n52=..$iif($1 != $null,Add All Selected):{ massnotifyadd $chan } 
n53=..$iif($1 != $null,Delete $1):{ .notify -r $$1 }
n54=..-
n55=..Manually Add Address:{ .notify $$?="Enter the nick to add. ie: DarkStain" $$?="Enter a quote for this person." | aecho The nick has been added to your notify list. }
n56=.Ignore List
n57=..$iif($1 != $null,Add $1):{ .ignore $address($$1,3) | aecho Now Ignoring $c(2) $+ $address($$1,3) }
n58=..$iif($1 != $null,Remove $1):{ .ignore -r $address($$1,3) | aecho No longer Ignoring $c(2) $+ $address($$1,3) }
n59=..-
n60=..$iif($1 != $null,Add Entire Domain):{ .ignore $address($$1,4) | aecho Now Ignoring $c(2) $+ $address($$1,4) }
n61=..$iif($1 != $null,Remove Entire Domain):{ .ignore -r $address($$1,4) | aecho No longer Ignoring $c(2) $+ $address($$1,4) }
n62=..-
n63=..Manually Add Address:{ .ignore $$?="Enter the address to add. ie: *!invision@adsl-64-205-190-4.lightwave.com" | aecho $c(2) $+ $! $c(1) $+ has been added to your ignore list. }
n64=..-
n65=..Clear All:{ if $?!="Are you sure you want to clear the Ignore list?" == $true { aecho The Ignore list was cleared. | .ignore -r } }
n66=.Auto Greet
n67=..$iif($1 != $null,Add $1):{ w.greet $$1 $$?="Enter a Auto Greet message for [ $1 ] $crlf $+ Example: Welcome back $1" | aecho Added $1 to the Auto Greet List.  When $1 joins one of the Auto Greeting Channels, you will greet them }
n68=..$iif($1 != $null,Del $1):{ d.greet $$1 | aecho Removed $1 from the Auto Greet List. }
n69=..-
n70=..Clear All:{ if $?!="Are you sure you want to clear the Auto Greet list?" == $true { c.greet | aecho Auto Greet List has been Cleared! } }
n71=.Shitlist
n72=..$iif($1 != $null,Add $1):{ shitlist add $1 $comchan($1,1) $?="Enter a reason Example: Retardation" }
n73=..-
n74=..Clear All:{ if $?!="Are you sure you want to clear the Shitlist?" == $true { shitlist clr | .rlevel 5 | aecho Shitlist Cleared } }
n75=.DCC Banned
n76=..$iif($1 != $null,Add $1):{ whodat $$1 | adduser ban $1 $chan | aecho $1 was added to the DCC Banned List }
n77=..-
n78=..Clear List:{ if $?!="Are you sure you want to clear the Fserve Ban list?" == $true { FserverBan clr | .rlevel 7 | Aecho Fserve Ban List Cleared! } }
n79=.-
n80=.$iif(($uchanchk($address($1,5),$chan) == $false) && ($level($address($1,5)) >= 15),Add $chan to $1): uchanadd $address($1,5) $chan 
n81=.$iif($r.set(Nick.Colors,ForceUL) != On,Show Who's Who):{ userlistCLR }
n82=.$iif($r.set(Nick.Colors,ForceUL) == On,Show Nicklist Legend):{ 
n83=  aecho **************     User Lists Color Scheme Legend      **************** 
n84=  aecho $colordefine($r.glob(Nick.Colors,Color.6)) = Fellow Op | $colordefine($r.glob(Nick.Colors,Color.8)) = Friend | $colordefine($r.glob(Nick.Colors,Color.10)) = DCC Banned | $colordefine($r.glob(Nick.Colors,Color.5)) = Elite
n85=  aecho $colordefine($r.glob(Nick.Colors,Color.11)) = Shitlisted | $colordefine($r.glob(Nick.Colors,Color.12)) = Ignored | $colordefine($r.glob(Nick.Colors,Color.7)) = Bot | $colordefine($r.glob(Nick.Colors,Color.9)) = Temp DCC permited
n86=}
n87=.$iif($level($address($$1,5)) != 10, Show $$1 in UL Manager):{ dopen UserLists UserLists | .timer -o 1 1 ShowinUL $$1 }
n88=.User Lists Manager:{ dopen UserLists UserLists }
n89=.$iif($1 == $null,Show Who's Who):userlistCLR
n90=.$iif(($r.set(Fserve,DCClimit) == On && $1 != $null),Clear Daily Limit for $1):{ d.leech Leech $replace($address($1,3),$chr(61),$chr(58)) | aecho Daily limit cleared for $c(2) $+ $1 }
n91=.$iif($1 == $null,User Lists Manager):{ dopen UserLists UserLists }
n92=-
n93=$iif(($1 != $null) && ($1 !isop $chan) && ($me isop $chan),Op $1):{ mass +o }
n94=$iif(($1 != $null) && ($1 isop $chan) && ($me isop $chan),Deop $1):{ mass -o }
n95=$iif(($1 != $null) && ($1 !ishop $chan) && ($1 !isop $chan) && $halfopsOK && ($me isop $chan),Halfop $1):{ mass +h }
n96=$iif(($1 != $null) && ($1 ishop $chan) && $halfopsOK && ($me isop $chan),DeHalfop $1):{ mass -h }
n97=$iif(($1 != $null) && ($1 isop $chan) && ($me isop $chan),Deop and Voice $1):{ mass -o+v }
n98=$iif(($1 != $null) && ($1 ishop $chan) && $halfopsOK && ($me isop $chan),DeHalfop and Voice $1):{ mass -h+v }
n99=$iif(($1 != $null) && ($1 !isvo $chan) && ($1 !isop $chan) && ($1 !ishop $chan) && (($me isop $chan) || ($me ishop $chan)),Voice +v $1):{ mass +v }
n100=$iif(($1 != $null) && ($1 isvo $chan) && (($me isop $chan) || ($me ishop $chan)),Devoice -v $1):{ mass -v }  
n101=$iif($cfchk($chan,+oaf) && ($me isop $chan),Op All Fellow Ops!):{ opallf $chan }
n102=-
n103=; $iif(!$ufchk($address($1,5),+pw,Default),Set my Password for $1):{ setBOTpw $1 $$?="What is your Password on [ $1 ] " } 
n104=$iif($level($address($$1,5)) == 17,Telnet $1):{ 
n105=  if $utpget($address($1,5)) != $null { set %CurTelnetport $utpget($address($1,5)) } | else { set %CurTelnetport $input(What is telnet port for [ $1 ] ,5,Telnet Port?) } 
n106=  set %CatchDNS [ $+ [ $iNetwork ] ] 1 
n107=  set %telnetnick [ $+ [ $iNetwork ] ] $$1 
n108=  dns $$1 
n109=} 
n110=$iif($ufchk($address($1,5),+pw,Default),Bot Commands)
n111=.Via Message
n112=..$rbot.set(MsgMenu,Menu1):{ msg $1 $replace($ebot.set(MsgCmd,Cmd1),~#~,$upwget($address($1,5))) } 
n113=..$rbot.set(MsgMenu,Menu2):{ msg $1 $replace($ebot.set(MsgCmd,Cmd2),~#~,$upwget($address($1,5))) } 
n114=..$rbot.set(MsgMenu,Menu3):{ msg $1 $replace($ebot.set(MsgCmd,Cmd3),~#~,$upwget($address($1,5))) } 
n115=..$rbot.set(MsgMenu,Menu4):{ msg $1 $replace($ebot.set(MsgCmd,Cmd4),~#~,$upwget($address($1,5))) } 
n116=..$rbot.set(MsgMenu,Menu5):{ msg $1 $replace($ebot.set(MsgCmd,Cmd5),~#~,$upwget($address($1,5))) } 
n117=..$rbot.set(MsgMenu,Menu6):{ msg $1 $replace($ebot.set(MsgCmd,Cmd6),~#~,$upwget($address($1,5))) } 
n118=..$rbot.set(MsgMenu,Menu7):{ msg $1 $replace($ebot.set(MsgCmd,Cmd7),~#~,$upwget($address($1,5))) } 
n119=..$rbot.set(MsgMenu,Menu8):{ msg $1 $replace($ebot.set(MsgCmd,Cmd8),~#~,$upwget($address($1,5))) } 
n120=..$rbot.set(MsgMenu,Menu9):{ msg $1 $replace($ebot.set(MsgCmd,Cmd9),~#~,$upwget($address($1,5))) } 
n121=..$rbot.set(MsgMenu,Menu10):{ msg $1 $replace($ebot.set(MsgCmd,Cmd10),~#~,$upwget($address($1,5))) } 
n122=..$rbot.set(MsgMenu,Menu11):{ msg $1 $replace($ebot.set(MsgCmd,Cmd11),~#~,$upwget($address($1,5))) } 
n123=..$rbot.set(MsgMenu,Menu12):{ msg $1 $replace($ebot.set(MsgCmd,Cmd12),~#~,$upwget($address($1,5))) } 
n124=..$rbot.set(MsgMenu,Menu13):{ msg $1 $replace($ebot.set(MsgCmd,Cmd13),~#~,$upwget($address($1,5))) } 
n125=..$rbot.set(MsgMenu,Menu14):{ msg $1 $replace($ebot.set(MsgCmd,Cmd14),~#~,$upwget($address($1,5))) } 
n126=..$rbot.set(MsgMenu,Menu15):{ msg $1 $replace($ebot.set(MsgCmd,Cmd15),~#~,$upwget($address($1,5))) } 
n127=..$rbot.set(MsgMenu,Menu16):{ msg $1 $replace($ebot.set(MsgCmd,Cmd16),~#~,$upwget($address($1,5))) } 
n128=..$rbot.set(MsgMenu,Menu17):{ msg $1 $replace($ebot.set(MsgCmd,Cmd17),~#~,$upwget($address($1,5))) } 
n129=..$rbot.set(MsgMenu,Menu18):{ msg $1 $replace($ebot.set(MsgCmd,Cmd18),~#~,$upwget($address($1,5))) } 
n130=..$rbot.set(MsgMenu,Menu19):{ msg $1 $replace($ebot.set(MsgCmd,Cmd19),~#~,$upwget($address($1,5))) } 
n131=..$rbot.set(MsgMenu,Menu20):{ msg $1 $replace($ebot.set(MsgCmd,Cmd20),~#~,$upwget($address($1,5))) } 
n132=..$rbot.set(MsgMenu,Menu21):{ msg $1 $replace($ebot.set(MsgCmd,Cmd21),~#~,$upwget($address($1,5))) } 
n133=..$rbot.set(MsgMenu,Menu22):{ msg $1 $replace($ebot.set(MsgCmd,Cmd22),~#~,$upwget($address($1,5))) } 
n134=..$rbot.set(MsgMenu,Menu23):{ msg $1 $replace($ebot.set(MsgCmd,Cmd23),~#~,$upwget($address($1,5))) } 
n135=..$rbot.set(MsgMenu,Menu24):{ msg $1 $replace($ebot.set(MsgCmd,Cmd24),~#~,$upwget($address($1,5))) } 
n136=..$rbot.set(MsgMenu,Menu25):{ msg $1 $replace($ebot.set(MsgCmd,Cmd25),~#~,$upwget($address($1,5))) } 
n137=..$rbot.set(MsgMenu,Menu26):{ msg $1 $replace($ebot.set(MsgCmd,Cmd26),~#~,$upwget($address($1,5))) } 
n138=..$rbot.set(MsgMenu,Menu27):{ msg $1 $replace($ebot.set(MsgCmd,Cmd27),~#~,$upwget($address($1,5))) } 
n139=..$rbot.set(MsgMenu,Menu28):{ msg $1 $replace($ebot.set(MsgCmd,Cmd28),~#~,$upwget($address($1,5))) } 
n140=..$rbot.set(MsgMenu,Menu29):{ msg $1 $replace($ebot.set(MsgCmd,Cmd29),~#~,$upwget($address($1,5))) } 
n141=..$rbot.set(MsgMenu,Menu30):{ msg $1 $replace($ebot.set(MsgCmd,Cmd30),~#~,$upwget($address($1,5))) } 
n142=..-
n143=..Get Ops in $chan:{ .msg $1 OP $upwget($address($1,5)) }
n144=..Get Voiced in $chan:{ .msg $1 VOICE $upwget($address($1,5)) }
n145=..Add current hostmask:{ .msg $1 addhost $upwget($address($1,5)) $address($me,3) }
n146=..Ident:{ .msg $1 Ident $upwget($address($1,5)) }
n147=..Get Channel Key:{ .msg $1 KEY $upwget($address($1,5)) $$?="Channel Name to get key for? ie: #mychan" }
n148=..Set My Info:{ .msg $1 INFO $upwget($address($1,5)) $chan $$?="What do you want you new info to say?" }
n149=..Part/Rejoin $chan:{ .msg $1 GO $chan }
n150=..Get Invite:{ .msg $1 INVITE $upwget($address($1,5)) $$?="Get Invite for what channel?" }
n151=..Help:{ .msg $1 Help $?="Command to get help with? (Leave blank to get General Help)" }
n152=.Via DCC
n153=..$rbot.set(DCCMenu,Menu1):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd1),~#~,$upwget($address($1,5))) } 
n154=..$rbot.set(DCCMenu,Menu2):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd2),~#~,$upwget($address($1,5))) } 
n155=..$rbot.set(DCCMenu,Menu3):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd3),~#~,$upwget($address($1,5))) } 
n156=..$rbot.set(DCCMenu,Menu4):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd4),~#~,$upwget($address($1,5))) } 
n157=..$rbot.set(DCCMenu,Menu5):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd5),~#~,$upwget($address($1,5))) } 
n158=..$rbot.set(DCCMenu,Menu6):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd6),~#~,$upwget($address($1,5))) } 
n159=..$rbot.set(DCCMenu,Menu7):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd7),~#~,$upwget($address($1,5))) } 
n160=..$rbot.set(DCCMenu,Menu8):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd8),~#~,$upwget($address($1,5))) } 
n161=..$rbot.set(DCCMenu,Menu9):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd9),~#~,$upwget($address($1,5))) } 
n162=..$rbot.set(DCCMenu,Menu10):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd10),~#~,$upwget($address($1,5))) } 
n163=..$rbot.set(DCCMenu,Menu11):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd11),~#~,$upwget($address($1,5))) } 
n164=..$rbot.set(DCCMenu,Menu12):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd12),~#~,$upwget($address($1,5))) } 
n165=..$rbot.set(DCCMenu,Menu13):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd13),~#~,$upwget($address($1,5))) } 
n166=..$rbot.set(DCCMenu,Menu14):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd14),~#~,$upwget($address($1,5))) } 
n167=..$rbot.set(DCCMenu,Menu15):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd15),~#~,$upwget($address($1,5))) } 
n168=..$rbot.set(DCCMenu,Menu16):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd16),~#~,$upwget($address($1,5))) } 
n169=..$rbot.set(DCCMenu,Menu17):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd17),~#~,$upwget($address($1,5))) } 
n170=..$rbot.set(DCCMenu,Menu18):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd18),~#~,$upwget($address($1,5))) } 
n171=..$rbot.set(DCCMenu,Menu19):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd19),~#~,$upwget($address($1,5))) } 
n172=..$rbot.set(DCCMenu,Menu20):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd20),~#~,$upwget($address($1,5))) } 
n173=..$rbot.set(DCCMenu,Menu21):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd21),~#~,$upwget($address($1,5))) } 
n174=..$rbot.set(DCCMenu,Menu22):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd22),~#~,$upwget($address($1,5))) } 
n175=..$rbot.set(DCCMenu,Menu23):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd23),~#~,$upwget($address($1,5))) } 
n176=..$rbot.set(DCCMenu,Menu24):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd24),~#~,$upwget($address($1,5))) } 
n177=..$rbot.set(DCCMenu,Menu25):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd25),~#~,$upwget($address($1,5))) } 
n178=..$rbot.set(DCCMenu,Menu26):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd26),~#~,$upwget($address($1,5))) } 
n179=..$rbot.set(DCCMenu,Menu27):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd27),~#~,$upwget($address($1,5))) } 
n180=..$rbot.set(DCCMenu,Menu28):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd28),~#~,$upwget($address($1,5))) } 
n181=..$rbot.set(DCCMenu,Menu29):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd29),~#~,$upwget($address($1,5))) } 
n182=..$rbot.set(DCCMenu,Menu30):{ SendToBot $1 $replace($ebot.set(DCCCmd,Cmd30),~#~,$upwget($address($1,5))) } 
n183=..-
n184=..Get Ops in $chan:{ SendToBot $1 .op $me $chan }
n185=..Voice Me in $chan:{ SendToBot $1 .voice $me $chan }
n186=..Op a User in $chan:{ SendToBot $1 .op $$?="Who would you like to op in [ $chan ] " $chan }
n187=..Jump Servers:{ SendToBot $1 .jump $?="Server to jump to? <you can leave blank for next in server list>" }
n188=..Bot Talk in $chan:{ SendToBot $1 .say $chan $$?="What do you want [ $1 ] to say?" }
n189=..Send a Note:{ SendToBot $1 .note $$?="Send Note to who?" $$?="What do you want to say to [ $! ] " }
n190=..Add current hostmask:{ }
n191=.$iif($numtok(%Botdccs,44) >= 1,Show Active Bot Links):{ ShowBotLinks }
n192=.$iif($sock(BOT+ [ $+ [ $1 ] ] ,0) >= 1,Close Link to $1):{ BotDelink $1 }
n193=.$iif($sock(BOT+*,0) >= 1,Close all Bot Links):{ sockclose BOT* | unset %BOT* | aecho All Bot Links have been closed }
n194=$iif((($me isop $chan) || ($me ishop $chan)) && ($1 != $null),Kick $1)
n195=.$iif($1 != $null,$r.set(Customs,PK1.desc)):{ mass kick [ [ $ir.set(Customs,PK1.msg) ] ] $+ )( $+ $ilogo(X) }
n196=.$iif($1 != $null,$r.set(Customs,PK2.desc)):{ mass kick [ [ $ir.set(Customs,PK2.msg) ] ] $+ )( $+ $ilogo(X) }
n197=.$iif($1 != $null,$r.set(Customs,PK3.desc)):{ mass kick [ [ $ir.set(Customs,PK3.msg) ] ] $+ )( $+ $ilogo(X) }
n198=.$iif($1 != $null,$r.set(Customs,PK4.desc)):{ mass kick [ [ $ir.set(Customs,PK4.msg) ] ] $+ )( $+ $ilogo(X) }
n199=.$iif($1 != $null,$r.set(Customs,PK5.desc)):{ mass kick [ [ $ir.set(Customs,PK5.msg) ] ] $+ )( $+ $ilogo(X) }
n200=.$iif($1 != $null,$r.set(Customs,PK6.desc)):{ mass kick [ [ $ir.set(Customs,PK6.msg) ] ] $+ )( $+ $ilogo(X) }
n201=.$iif($1 != $null,Random reason):{ mass kick  $+ $rkick $+ )( $+ $ilogo(X) }
n202=.$iif($1 != $null,Specify reason):{ mass kick  $+ $$?="Enter reason for kick" $+ )( $+ $ilogo(X) }
n203=.Filtered
n204=..All Ops
n205=...Random reason:{ filterk Ops jk $chan $rkick }
n206=...Specify reason:{ filterk Ops jk $chan $$?="Enter filter ops reason" }
n207=..All Voices
n208=...Random reason:{ filterk Voice jk $chan $rkick }
n209=...Specify reason:{ filterk Voice jk $chan $$?="Enter filter voice reason" }
n210=..All NonOps
n211=...Random reason:{ filterk NonOps jk $chan $rkick }
n212=...Specify reason:{ filterk NonOps jk $chan $$?="Enter filter nonops reason" }
n213=..All Reguar
n214=...Random reason:{ filterk Commons jk $chan $rkick }
n215=...Specify reason:{ filterk Commons jk $chan $$?="Enter filter nonops reason" }
n216=..All Users
n217=...Random reason:{ filterk all jk $chan $rkick }  ...Specify reason:{ filterk all jk $chan $$?="Enter filter normal reason" }
n218=..Non Friend in User Lists
n219=...Random reason:{ filterk UL jk $chan $rkick }
n220=...Specify reason:{ filterk UL jk $chan $$?="Enter filter normal reason" }
n221=..-
n222=..Address
n223=...This user+clones
n224=....Random reason:{ whodat $$1 | addressk address jk $address($1,2) $rkick }
n225=....Specify reason:{ whodat $$1 | addressk address jk $address($1,2) $$?="Enter filter host reason" }
n226=...Other Address
n227=....Random reason:{ addressk address jk $$?="Enter Address to filter $crlf $+ Example: *!*@*.ipt.aol.com" $rkick }
n228=....Specify reason:{ addressk address jk $$?="Enter Address to filter $crlf $+ Example: *!*@*.ipt.aol.com" $$?="Enter filter address reason" }
n229=$iif((($me isop $chan) || ($me ishop $chan)) && ($1 != $null),Kicks and Ban $1)
n230=.$iif($1 != $null,$r.set(Customs,PK1.desc)):{ kb $$1 [ [ $ir.set(Customs,PK1.msg) ] ] $+ )( $+ $ilogo(X) }
n231=.$iif($1 != $null,$r.set(Customs,PK2.desc)):{ kb $$1 [ [ $ir.set(Customs,PK2.msg) ] ] $+ )( $+ $ilogo(X) }
n232=.$iif($1 != $null,$r.set(Customs,PK3.desc)):{ kb $$1 [ [ $ir.set(Customs,PK3.msg) ] ] $+ )( $+ $ilogo(X) }
n233=.$iif($1 != $null,$r.set(Customs,PK4.desc)):{ kb $$1 [ [ $ir.set(Customs,PK4.msg) ] ] $+ )( $+ $ilogo(X) }
n234=.$iif($1 != $null,$r.set(Customs,PK5.desc)):{ kb $$1 [ [ $ir.set(Customs,PK5.msg) ] ] $+ )( $+ $ilogo(X) }
n235=.$iif($1 != $null,$r.set(Customs,PK6.desc)):{ kb $$1 [ [ $ir.set(Customs,PK6.msg) ] ] $+ )( $+ $ilogo(X) }
n236=.$iif($1 != $null,Random reason):{ kb $$1 $rkick }
n237=.$iif($1 != $null,Specify reason):{ kb $$1 $$?="Enter Reason to Kick/Ban [ $1 ] " }
n238=.$iif($1 != $null,Specify Ban Time):{ .timer -o 1 $calc( [ $$?="Time in Minutes for Ban ie: 60 for a 1 hour ban" ] * 60) .mode # -b $address($$1,3) | .mode # +b $address($$1,3) | .kick # $$1  $+ $rkick $+ )( $+ $ilogo(X) }
n239=.$iif($1 != $null,Specify Ban Time and Msg):{ CustKB $chan $$1 }
n240=.Filtered
n241=..All Ops
n242=...Random reason:{ filterk Ops bk $chan $rkick }
n243=...Specify reason:{ filterk Ops bk $chan $$?="Enter filter ops reason" }
n244=..All Voices
n245=...Random reason:{ filterk Voice bk $chan $rkick }
n246=...Specify reason:{ filterk Voice bk $chan $$?="Enter filter voice reason" }
n247=..All NonOps
n248=...Random reason:{ filterk NonOps bk $chan $rkick }
n249=...Specify reason: filterk NonOps bk $chan $$?="Enter filter nonops reason" ..All Reguar
n250=...Random reason:{ filterk Commons bk $chan $rkick }
n251=...Specify reason:{ filterk Commons bk $chan $$?="Enter filter nonops reason" }
n252=..All Users
n253=...Random reason:{ filterk all bk $chan $rkick }
n254=...Specify reason:{ filterk all bk $chan $$?="Enter filter normal reason" }
n255=..Non Friend in User Lists
n256=...Random reason:{ filterk UL bk $chan $rkick }
n257=...Specify reason:{ filterk UL bk $chan $$?="Enter filter normal reason" }
n258=..-
n259=..Address
n260=...This user+clones
n261=....Random reason:{ whodat $$1 | rkick $$1 | ban -u $+ $calc(%Defban * 60) $address($$1,2) }
n262=....Specify reason:{ whodat $$1 | kick $chan $$1 $$?="Enter filter host reason"  | ban -u $+ $calc(%Defban * 60)  $address($$1,2) }
n263=...Other Address
n264=....Random reason:{ addressk address bk $$?="Enter Address to filter $crlf $+ Example: *!*@*.ipt.aol.com" $rkick }
n265=....Specify reason:{ addressk address bk $$?="Enter Address to filter $crlf $+ Example: *!*@*.ipt.aol.com" $$?="Enter filter address reason" }
n266=$iif($numtok($snicks,44) >= 2,Mass CTCP)
n267=.Ping:{ massctcp $$chan ping }
n268=.Version:{ massctcp $$chan version }
n269=.Finger:{ massctcp $$chan finger }
n270=.Userinfo:{ massctcp $$chan userinfo }
n271=.ClientInfo:{ massctcp $$chan clientinfo }
n272=.Time:{ massctcp $$chan time }
n273=.Fserve 
n274=..!list:{ massctcp $$chan !list }
n275=..@find:{ massctcp $$chan @find $$?="Search for what on [ $1 ] " } 
n276=..Queues:{ massctcp $$chan QUEUES }
n277=..Sends:{ massctcp $$chan Sends }
n278=.mp3 Server
n279=..!list:{ massctcp $$chan !list }
n280=..@locator:{ massctcp $$chan @find $$?="Search for what on [ $1 ] " } 
n281=..Queues:{ massctcp $$chan Queues }
n282=..Clear All Queues:{ massctcp $$chan Clear All }
n283=..Clear 1 Queue:{ massctcp $$chan $$?="Clear which number?" }
n284=..Help: massctcp $$chan !mp3help   
n285=.XDCC
n286=..Send:{ massctcp $$chan xdcc send #$$?="Enter Pack Number" }
n287=..Get:{ massctcp $$chan xdcc send #$$?="Enter Pack Number" }
n288=..List:{ massctcp $$chan xdcc list }
n289=..Remove:{ massctcp $$chan xdcc remove }
n290=..Queues:{ massctcp $$chan QUEUES }
n291=..Sends:{ massctcp $$chan Sends }
n292=.CDCC
n293=..Send:{ massctcp $$chan cdcc send #$$?="Enter Pack Number" }
n294=..Get:{ massctcp $$chan cdcc send #$$?="Enter Pack Number" }
n295=..List:{ massctcp $$chan cdcc list }
n296=..Remove:{ massctcp $$chan cdcc REMOVE }
n297=..Queues:{ massctcp $$chan QUEUES }
n298=..Sends:{ massctcp $$chan Sends }
n299=.-
n300=.Custom:{ massctcp $$chan $$?="Enter CTCP Request" }
n301=$iif($numtok($snicks,44) == 1,CTCP $chr(32) $+ $1)
n302=.Ping:{ ctcp $$1 ping }
n303=.Version:{ ctcp $$1 version }
n304=.Finger:{ ctcp $$1 finger }
n305=.Userinfo:{ ctcp $$1 userinfo }
n306=.ClientInfo:{ ctcp $$1 clientinfo }
n307=.Time:{ ctcp $$1 time }
n308=.Page:{ ctcp $$1 Page $$?="Enter Message" }
n309=.Help:{ ctcp $$1 Help }
n310=.Chat:{ ctcp $$1 CHAT }
n311=.Fserve 
n312=..!list:{ ctcp $$1 !list }
n313=..@find:{ ctcp $$1 @find $$?="Search for what on [ $1 ] " } 
n314=..Sends?:{ ctcp $$1 SENDS }
n315=..Queues?:{ ctcp $$1 QUEUES }
n316=.mp3 Server
n317=..!list:{ ctcp $$1 !list }
n318=..@locator:{ ctcp $$1 @find $$?="Search for what on [ $1 ] " } 
n319=..Queues:{ ctcp $$1 Queues }
n320=..Sends?:{ ctcp $$1 SENDS }
n321=..Clear All Queues:{ ctcp $$1 Clear All }
n322=..Clear 1 Queue:{ ctcp $$1 $$?="Clear which number?" }
n323=..Help: ctcp $$1 !mp3help   
n324=.XDCC
n325=..Send:{ ctcp $$1 xdcc send #$$?="Enter Pack Number" }
n326=..Get:{ ctcp $$1 xdcc send #$$?="Enter Pack Number" }
n327=..List:{ ctcp $$1 xdcc list }
n328=..Remove:{ ctcp $$1 xdcc remove }
n329=..Sends?:{ ctcp $$1 SENDS }
n330=..Queues?:{ ctcp $$1 QUEUES }
n331=.CDCC
n332=..Send:{ ctcp $$1 cdcc send #$$?="Enter Pack Number" }
n333=..Get:{ ctcp $$1 cdcc send #$$?="Enter Pack Number" }
n334=..List:{ ctcp $$1 cdcc list }
n335=..Remove:{ ctcp $$1 cdcc REMOVE }
n336=..Sends?:{ ctcp $$1 SENDS }
n337=..Queues?:{ ctcp $$1 QUEUES }
n338=.-
n339=.Custom:{ ctcp $$1 $$?="Enter CTCP Request" }
n340=.-
n341=.$chr(32) $chr(32) $+ Invision CTCP's: { }
n342=.-
n343=.FTPinfo
n344=..FTP info 1:{ ctcp $$1 FTPINFO1 }
n345=..FTP info 2:{ ctcp $$1 FTPINFO2 }
n346=..FTP info 3:{ ctcp $$1 FTPINFO3 }
n347=..FTP info 4:{ ctcp $$1 FTPINFO4 }
n348=..FTP info 5:{ ctcp $$1 FTPINFO5 }
n349=.FServe Control
n350=..Startup:{ ctcp $$1 Startup $encrypt2($$?*="Enter the Fserve control password") }
n351=..Shutdown:{ ctcp $$1 Shutdown $encrypt2($$?="Enter the Fserve control password") }
n352=..Close:{ ctcp $$1 Close $encrypt2($$?*="Enter the Fserve control password") }
n353=.-
n354=.Get Ops:{ ctcp $$1 OPME $chan $encrypt2($$?*="Enter your password") }
n355=.Set Password:{ ctcp $$1 SETPW $$?="Use what password?" $$?="Confirm Password" }
n356=.Change Password:{ ctcp $$1 CHANGEPW $$?="What's your existing PW?" $$?="New Password?" $$?"Confirm New PW." }
n357=.Channel Defense
n358=..Protect Friends
n359=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") PROTECTFRIENDS ON }
n360=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") PROTECTFRIENDS OFF }
n361=..Deop on Massdeops
n362=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") MASSDEOPS ON }
n363=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") MASSDEOPS OFF }
n364=..Bitchmode
n365=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") BITCHMODE ON }
n366=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") BITCHMODE OFF }
n367=..Repeat Floods
n368=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") REPEATFLOOD ON }
n369=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") REPEATFLOOD OFF }
n370=..Nick Floods
n371=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") NICKFLOOD ON }
n372=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") NICKFLOOD OFF }
n373=..Deop Server Ops
n374=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") SERVEROPS ON }
n375=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") SERVEROPS OFF }
n376=..Kick Trades
n377=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") KICKTRADES ON }
n378=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") KICKTRADES OFF }
n379=..Kick on Flood
n380=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") KICKFLOOD ON }
n381=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") KICKFLOOD OFF }
n382=..Ban on Flood
n383=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") BANFLOOD ON }
n384=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") BANFLOOD OFF }
n385=..Auto Limit +l
n386=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") AUTOLIMIT ON }
n387=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") AUTOLIMIT OFF }
n388=..Channel Lockdowns
n389=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") LOCKDOWN ON }
n390=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") LOCKDOWN OFF }
n391=..WallOP Actions
n392=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") WALLOPS ON }
n393=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") WALLOPS OFF }
n394=..FTP Auto-Voice
n395=...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") FTPV ON }
n396=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") FTPV OFF }
n397=..Fserve Auto-Voice  ...On:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") FSV ON }
n398=...Off:{ ctcp $$1 ChanOps $chan $encrypt2($$?="Enter the remote control password") FSV OFF }
n399=.Invision 1.0 CTCP
n400=..Get Ops:{ ctcp $$1 OPME $chan $encrypt2($$?*="Enter your password") }
n401=..Set Password:{ ctcp $$1 SETPW $$?="Use what password?" $$?="Confirm Password" }
n402=..Change Password:{ ctcp $$1 CHANGEPW $$?="What's your existing PW?" $$?="New Password?" $$?"Confirm New PW." }
n403=..Channel Defense
n404=...Protect Friends
n405=....On:{ ctcp $$1 PROTECTFRIENDS ON $encrypt2($$?="Enter the remote control password") }
n406=....Off:{ ctcp $$1 PROTECTFRIENDS OFF $encrypt2($$?="Enter the remote control password"),-3) }
n407=...Deop on Massdeops
n408=....On:{ ctcp $$1 MASSDEOPS ON $encrypt2($$?="Enter the remote control password"),-3) }
n409=....Off:{ ctcp $$1 MASSDEOPS OFF $encrypt2($$?="Enter the remote control password"),-3) }
n410=...Bitchmode....On:{ ctcp $$1 BITCHMODE ON $encrypt2($$?="Enter the remote control password") }
n411=....Off:{ ctcp $$1 BITCHMODE OFF $encrypt2($$?="Enter the remote control password") }
n412=...Ban Domains
n413=....On:{ ctcp $$1 BANDOMAINS ON $encrypt2($$?="Enter the remote control password") }
n414=....Off:{ ctcp $$1 BANDOMAINS OFF $encrypt2($$?="Enter the remote control password") }
n415=...Nick Floods
n416=....On:{ ctcp $$1 NICKFLOOD ON $encrypt2($$?="Enter the remote control password") }
n417=....Off:{ ctcp $$1 NICKFLOOD OFF $encrypt2($$?="Enter the remote control password") }
n418=...Deop Server Ops
n419=....On:{ ctcp $$1 SERVEROPS ON $encrypt2($$?="Enter the remote control password") }
n420=....Off:{ ctcp $$1 SERVEROPS OFF $encrypt2($$?="Enter the remote control password") }
n421=...Kick Trades
n422=....On:{ ctcp $$1 KICKTRADES ON $encrypt2($$?="Enter the remote control password") }
n423=....Off:{ ctcp $$1 KICKTRADES OFF $encrypt2($$?="Enter the remote control password") }
n424=...Kick on Flood
n425=....On:{ ctcp $$1 KICKFLOOD ON $encrypt2($$?="Enter the remote control password") }
n426=....Off:{ ctcp $$1 KICKFLOOD OFF $encrypt2($$?="Enter the remote control password") }
n427=...Ban on Flood
n428=....On:{ ctcp $$1 BANFLOOD ON $encrypt2($$?="Enter the remote control password") }
n429=....Off:{ ctcp $$1 BANFLOOD OFF $encrypt2($$?="Enter the remote control password") }
n430=...Auto Limit +l
n431=....On:{ ctcp $$1 AUTOLIMIT ON $encrypt2($$?="Enter the remote control password") }
n432=....Off:{ ctcp $$1 AUTOLIMIT OFF $encrypt2($$?="Enter the remote control password") }
n433=...Channel Lockdowns....On:{ ctcp $$1 LOCKDOWN ON $encrypt2($$?="Enter the remote control password") }
n434=....Off:{ ctcp $$1 LOCKDOWN OFF $encrypt2($$?="Enter the remote control password") }
n435=$iif($1 != $null,DCC $1)
n436=.Send:{ .idcc send $$1 | if ($r.set(Invision,SndOpt17) == On) { SoundQ $shortfn($mircdir) $+ $r.glob(Themes,Sound18) } }
n437=.Chat:{ .dcc chat $$1 }
n438=.Queue Sends:{ if $1 != $null { set %DCCqnick [ $+ [ $iNetwork ] ] $1 | set %SFDfunc [ $+ [ $iNetwork ] ] DCCqueue | dopen selfiles selfiles } }
n439=.Fserve
n440=..Trigger #1:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.1,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.1,Root.Dir) $r.set(Fserve.1,Welcome.File) } }
n441=..Trigger #2:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.2,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.2,Root.Dir) $r.set(Fserve.2,Welcome.File) } }
n442=..Trigger #3:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.3,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.3,Root.Dir) $r.set(Fserve.3,Welcome.File) } }
n443=..Trigger #4:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.4,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.4,Root.Dir) $r.set(Fserve.4,Welcome.File) } }
n444=..Trigger #5:{ if ($r.set(Fserve,Welcome.File) == None) || ($r.set(Fserve,Welcome.File) == $null) { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.5,Root.Dir) } | else { fserve $$1 $r.set(Fserve,Max.Sends.Each) $r.set(Fserve.5,Root.Dir) $r.set(Fserve.5,Welcome.File) } }
n445=..-
n446=..Custom:{ fserve $$1 $r.set(Fserve,Max.Sends.Each) $$sdir="Choose root directory [ $1 ] " }
n447=.$iif($dccok($address($1,5)) == $false,Grant Temp DCC):{ whodat $1 | udccset $address($1,5) $1 $chan }
n448=.$iif($snick($chan,0) >= 2,Grant Temp DCC to all selected:{ masstmpdcc $chan }
n449=.$iif($dccok($address($1,5)) == $true ,Remove DCC Permissions):{ whodat $1 | manclrdcc $address($1,5) $1 }
n450=$iif($r.glob(Invision,BlackIce) == On && $snick($chan,0) == 1,Firewall Options)
n451=.Block $1 $+ 's IP:{ set %BIblocknick [ $+ [ $iNetwork ] ] $1 | set %CatchDNS [ $+ [ $iNetwork ] ] 1 | dns $1 }
n452=.Remove $1 $+ 's IP:{ set %BIremovenick [ $+ [ $iNetwork ] ] $1 | set %CatchDNS [ $+ [ $iNetwork ] ] 1 | dns $1 }
n453=.Trust $1 $+ 's IP:{ set %BItrustnick [ $+ [ $iNetwork ] ] $1 | set %CatchDNS [ $+ [ $iNetwork ] ] 1 | dns $1 }
n454=-
n455=$iif($1 != $null,View Log of $1):{ logviewer $$1 }
n456=$iif($1 != $null,Respond to $1):{ respond $1 }
n457=$iif($1 != $null,3D respond $1):{ msg $chan $crykeys($$snicks) $+  $$?="Enter Response Message" }
n458=Social Outburst
n459=.Jack Handy:{ msg $iif($chan != $null,$chan,$1) $jhandy }
n460=.$iif($1 != $null,Yo Mamma):{ say $$1 $+ , $read($shortfn($mircdir) $+ Text\mama.txt) }
n461=.$iif($1 != $null,RedNeck):{ say $$1 $+ , You might be a RedNeck if, $read(Text\RedNeck.txt) }
n462=.-
n463=.Invision Sounds
n464=..Pimp Slap $1 :{ me Pimp Slaps $$1 }
n465=..Confused:{ me is confused }
n466=..Twilight Zone:{ me is in the twilight zone }
n467=..Didn't Know That:{ me didn't know that. }
n468=..Outta Here:{ me is outta here! }
n469=..Shooting:{ me busts out the nerf gun and starts shooting }
n470=..Illegal:{ me would never do any thing illegal unless it was for personal gain. }
n471=..Bored:{ me is bored }
n472=..Can't Type:{ me can't type }
n473=..Kill:{ me is gonna have to kill someone... }
n474=..Getting Drunk:{ me is getting drunk tonight! }
n475=..Lot of Beer:{ me is drinking a lotta beer tonight! }
n476=..Nee!:{ say nee }

[mpopup]
n0=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n1=; §§
n2=; §§                                       INVISION VERSION 1.0 Script for mIRC 6.02 By Cryoa
n3=; §§                                       SECTION: Status
n4=; §§                                       DATE: 01-01-16
n5=; §§                                       DESCRIPTION: The Status Window Menus
n6=; §§
n7=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n8=- • • • • • • • • • $chr(32) $iif($iSetwork != $null,$iSetwork,Global) $chr(32) • • • • • • • • • - :.
n9=-
n10=$iif($server != $null,List Channels):{ list }
n11=$iif($server != $null,List Servers):{ links }
n12=Play Media
n13=.mp3s
n14=..Play Selected mp3:{ set %mp3toplay $replace($$dir="Choose a mp3 To play" [ $iif($exists(%lastmp3dir) == $true,%lastmp3dir,C:\) $+ .mp3 ] ,$chr(32),$chr(63),$chr(44),$chr(34)) | mp3play %mp3toplay | set %lastmp3dir $nofile(%mp3toplay) | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n15=..Play Random mp3:{ set %dirtouse [ $iif($exists( [ %lastmp3dir ] ) == $true,%lastmp3dir,C:\) ] | set %mp3toplay $replace($findfile(%dirtouse,*.mp3,$rand(1,$findfile(%dirtouse,*.mp3,0))),$chr(32),$chr(63),$chr(44),$chr(34)) | mp3play %mp3toplay | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n16=..-
n17=..Random Play Directory:{ set %mp3dpdir $sdir($iif($exists( [ %lastmp3dir ] ) == $true,%lastmp3dir,C:\),"Select mp3 directory to randomly play from") | set %lastmp3dir %mp3dpdir | if %mp3dpdir != $null { set %mp3dirplay 1 | set %mp3resume Pause mp3 playback | mp3dirplay | .timermp3Player -o 0 5 mp3maintain } }
n18=..-
n19=..$iif($mp3isplaying == $true,Stop mp3 Playback):{ mp3stop | unset %mp3dirplay %mp3resume }
n20=..%mp3resume:{ if $left(%mp3resume,5) == Pause { set %mp3resume Resume mp3 Playback | mp3pauseplay } | else { set %mp3resume  Pause mp3 Playback | mp3unpauseplay } }
n21=..-
n22=.Waves
n23=..Play Selected Wave:{ splay -w $$dir="Choose a wave To play" $wavedir*.wav }
n24=..Play Random Wave:{ splay -w $findfile($wavedir,*.wav,$rand(1,$findfile($wavedir,*.wav,0))) }
n25=..-
n26=..Stop Wav Playback:{ splay -w STOP }
n27=.Midis
n28=..Play Selected Midi:{ splay -m $$dir="Choose a midi To play" $mididir*.mid }
n29=..Play Random Midi:{ splay -m $findfile($mididir,*.mid,$rand(1,$findfile($mididir,*.mid,0))) }
n30=-
n31=$iif((($gettok($r.set(Invision,RecentChans),1,44) != $null) && ($Server != $null)),Recent Channels)
n32=.$iif($gettok($r.set(Invision,RecentChans),9,44) != $null,Join $gettok($r.set(Invision,RecentChans),9,44)) :{ join $gettok($r.set(Invision,RecentChans),9,44) }
n33=.$iif($gettok($r.set(Invision,RecentChans),8,44) != $null,Join $gettok($r.set(Invision,RecentChans),8,44)) :{ join $gettok($r.set(Invision,RecentChans),8,44) }
n34=.$iif($gettok($r.set(Invision,RecentChans),7,44) != $null,Join $gettok($r.set(Invision,RecentChans),7,44)) :{ join $gettok($r.set(Invision,RecentChans),7,44) }
n35=.$iif($gettok($r.set(Invision,RecentChans),6,44) != $null,Join $gettok($r.set(Invision,RecentChans),6,44)) :{ join $gettok($r.set(Invision,RecentChans),6,44) }
n36=.$iif($gettok($r.set(Invision,RecentChans),5,44) != $null,Join $gettok($r.set(Invision,RecentChans),5,44)) :{ join $gettok($r.set(Invision,RecentChans),5,44) }
n37=.$iif($gettok($r.set(Invision,RecentChans),4,44) != $null,Join $gettok($r.set(Invision,RecentChans),4,44)) :{ join $gettok($r.set(Invision,RecentChans),4,44) }
n38=.$iif($gettok($r.set(Invision,RecentChans),3,44) != $null,Join $gettok($r.set(Invision,RecentChans),3,44)) :{ join $gettok($r.set(Invision,RecentChans),3,44) }
n39=.$iif($gettok($r.set(Invision,RecentChans),2,44) != $null,Join $gettok($r.set(Invision,RecentChans),2,44)) :{ join $gettok($r.set(Invision,RecentChans),2,44) }
n40=.$iif($gettok($r.set(Invision,RecentChans),1,44) != $null,Join $gettok($r.set(Invision,RecentChans),1,44)) :{ join $gettok($r.set(Invision,RecentChans),1,44) }
n41=.-
n42=.Clear Recent Channels:{ d.set Invision RecentChans | secho Recent Channel List Cleared. }
n43=-
n44=[] Hold Shift Down for New Connection []:.
n45=-
n46=$$gettok($r.glob(Invision,Recent.Server.1),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.1),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.1) }
n47=$$gettok($r.glob(Invision,Recent.Server.2),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.2),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.2) }
n48=$$gettok($r.glob(Invision,Recent.Server.3),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.3),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.3) }
n49=$$gettok($r.glob(Invision,Recent.Server.4),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.4),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.4) }
n50=$$gettok($r.glob(Invision,Recent.Server.5),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.5),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.5) }
n51=$$gettok($r.glob(Invision,Recent.Server.6),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.6),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.6) }
n52=$$gettok($r.glob(Invision,Recent.Server.7),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.7),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.7) }
n53=$$gettok($r.glob(Invision,Recent.Server.8),1,32) ( $+ $gettok($r.glob(Invision,Recent.Server.8),2,32) $+ ):{ server $iif($mouse.key == 4,-m) $r.glob(Invision,Recent.Server.8) }
n54=-
n55=Server Controls
n56=.File Server
n57=..File Server Settings: { if $dialog(InvisFserve).title == $null { openingD | dialog -md InvisFserve fileServer | if ( $isend(0) != 0 || $iget(0) != 0  ) { FservRefresh | .timerFS $+ $iNetwork 0 1 FservRefresh  } } | else { dialog -ev InvisFserve fileServer } }
n58=..-
n59=..$iif($r.set(Fserve,Status) != On,Start Now):{ advertise start fserve }
n60=..$iif(($r.set(Fserve,Status) == On && $r.set(Fserve,Listen) != On),Restart Server):{ advertise start fserve }
n61=..$iif($r.set(Fserve,Status) != Off,Stop Now):{ advertise stop fserve }
n62=..$iif($r.set(Fserve,Status) != Off,Stop Now w/Reason):{ advertise stop fserve $c(2) $+ File Server Shutting Down $bracket($$?="Enter the Reason") }
n63=..$iif($r.set(Fserve,Status) != Off,Stop but Finish Queue):{ advertise Close fserve }
n64=..$iif($r.set(Fserve,Status) != Off,Stop but Finish Queue w/Reason):{ advertise close fserve $c(2) $+ File Server Shutting Down and Finishing Queues $bracket($$?="Enter the Reason") }
n65=..$iif($r.set(Fserve,Status) != On,Silent Start):{ advertise silent fserve }
n66=..%FSpause [ $+ [ $iNetwork ] ] :{ FSpause }
n67=..Display Ad:{ advertise say fserve $chan }
n68=.mp3 Server
n69=..mp3 Server Settings: dopen mp3manager mp3manager ..-..$iif($r.set(mp3serv,Status) != On,Start Now):{ advertise start mp3serv }
n70=..$iif($r.set(mp3serv,Status) != Off,Stop Now):{ advertise stop mp3serv }
n71=..$iif($r.set(mp3serv,Status) != Off,Stop Now w/Reason):{ advertise stop mp3serv $c(2) $+ mp3 Server Shutting Down $bracket($$?="Enter the Reason") }
n72=..$iif($r.set(mp3serv,Status) != Off,Stop but finish Queue):{ advertise Close mp3serv }
n73=..$iif($r.set(mp3serv,Status) != Off,Stop but finish Queue w/Reason):{ advertise Close mp3serv $c(2) $+ mp3 Server Shutting Down and Finishing Queues $bracket($$?="Enter the Reason") }
n74=..$iif($r.set(mp3serv,Status) != On,Silent Start):{ advertise silent mp3serv }
n75=..%mp3pause [ $+ [ $iNetwork ] ] :{ mp3pause }  ..Display Ad:{ advertise say mp3serv }
n76=.FTP Ads
n77=..FTP Ad Settings:{ dopen FTP_Setup FTP_Setup }
n78=..-
n79=..Ad 1
n80=...Start Ad Timer:advertise start FTP 1
n81=...Stop Ad Timer:advertise stop FTP 1
n82=...-
n83=...Say Ad:advertise say FTP 1
n84=..Ad 2
n85=...Start Ad Timer:advertise start FTP 2
n86=...Stop Ad Timer:advertise stop FTP 2
n87=...-
n88=...Say Ad:advertise say FTP 2
n89=..Ad 3
n90=...Start Ad Timer:advertise start FTP 3
n91=...Stop Ad Timer:advertise stop FTP 3
n92=...-
n93=...Say Ad:advertise say FTP 3
n94=..Ad 4
n95=...Start Ad Timer:advertise start FTP 4
n96=...Stop Ad Timer:advertise stop FTP 4
n97=...-
n98=...Say Ad:advertise say FTP 4
n99=..Ad 5
n100=...Start Ad Timer:advertise start FTP 5
n101=...Stop Ad Timer:advertise stop FTP 5
n102=...-
n103=...Say Ad:advertise say FTP 5
n104=.TDCC
n105=..TDCC Server Settings:{ dopen TDCC TDCC }
n106=..-
n107=..Trigger #1
n108=...$iif($r.set(TDCC.1,Status) != On,Start):{ advertise start tdcc 1 }
n109=...$iif($r.set(TDCC.1,Status) == On,Stop):{ advertise stop tdcc 1 }
n110=...$iif($r.set(TDCC.1,Status) != On,Silent):{ advertise silent tdcc 1 }
n111=...Say:{ advertise say tdcc 1 }
n112=..Trigger #2
n113=...$iif($r.set(TDCC.2,Status) != On,Start):{ advertise start tdcc 2 }
n114=...$iif($r.set(TDCC.2,Status) == On,Stop):{ advertise stop tdcc 2 }
n115=...$iif($r.set(TDCC.2,Status) != On,Silent):{ advertise silent tdcc 2 }
n116=...Say:{ advertise say tdcc 2 }
n117=..Trigger #3
n118=...$iif($r.set(TDCC.3,Status) != On,Start):{ advertise start tdcc 3 }
n119=...$iif($r.set(TDCC.3,Status) == On,Stop):{ advertise stop tdcc 3 }
n120=...$iif($r.set(TDCC.3,Status) != On,Silent):{ advertise silent tdcc 3 }
n121=...Say:{ advertise say tdcc 3 }
n122=..Trigger #4
n123=...$iif($r.set(TDCC.4,Status) != On,Start):{ advertise start tdcc 4 }
n124=...$iif($r.set(TDCC.4,Status) == On,Stop):{ advertise stop tdcc 4 }
n125=...$iif($r.set(TDCC.4,Status) != On,Silent):{ advertise silent tdcc 4 }
n126=...Say:{ advertise say tdcc 4 }
n127=..Trigger #5
n128=...$iif($r.set(TDCC.5,Status) != On,Start):{ advertise start tdcc 5 }
n129=...$iif($r.set(TDCC.5,Status) == On,Stop):{ advertise stop tdcc 5 }
n130=...$iif($r.set(TDCC.5,Status) != On,Silent):{ advertise silent tdcc 5 }
n131=...Say: advertise say tdcc 5 
n132=.XDCC
n133=..XDCC Server Settings:{ dopen XDCC XDCC }
n134=..-
n135=..Verbose Ad...Start:{ advertise start xdcc 1 }
n136=...Say:{ advertise say xdcc 1 }
n137=..Brief Ad
n138=...Start:{ advertise start xdcc 2 }
n139=...Say:{ advertise say xdcc 2 }
n140=..-
n141=..Stop:{ advertise stop xdcc }
n142=..Silent:{ advertise silent xdcc }
n143=.Request
n144=..Request Advertiser Settings:{ dopen Request Request }
n145=..-
n146=..Start:{ advertise start request }
n147=..Stop:{ advertise stop request }
n148=..Say:{ advertise say request }
n149=.Announcer
n150=..Announcer Settings:{ dopen Announcer Announcer }
n151=..-
n152=..Start:{ advertise start Announcer }
n153=..Stop:{ advertise stop Announcer }
n154=..Say:{ advertise say Announcer }
n155=$iif($server != $null,Away Control)
n156=.$iif($away,Set Back):{ away }
n157=.$iif($away,Silent Back):{ away sb }
n158=.$iif(!$away,Set Away)
n159=..$r.glob(Customs,AWY1.desc):{ away [ [ $r.glob(Customs,AWY1.msg) ] ] }
n160=..$r.glob(Customs,AWY2.desc):{ away [ [ $r.glob(Customs,AWY2.msg) ] ] }
n161=..$r.glob(Customs,AWY3.desc):{ away [ [ $r.glob(Customs,AWY3.msg) ] ] }
n162=..$r.glob(Customs,AWY4.desc):{ away [ [ $r.glob(Customs,AWY4.msg) ] ] }
n163=..$r.glob(Customs,AWY5.desc):{ away [ [ $r.glob(Customs,AWY5.msg) ] ] }
n164=..$r.glob(Customs,AWY6.desc):{ away [ [ $r.glob(Customs,AWY6.msg) ] ] }
n165=..Work:{ away Work }
n166=..Sleep:{ away Sleeping }
n167=..Fresh Air:{ away Getting some Fresh Air }
n168=..Bathroom:{ away Gotta drop the kids off at the pool }
n169=..Smoke Break:{ away Smoke Break }
n170=..Hookers:{ away Entertaining some Hookers }
n171=..Beer:{ away Slammin some Brews }
n172=..Food:{ away Stuffin my face }
n173=..Store:{ away Ran to the Store }
n174=..TV:{ away Watching T.V. }
n175=..-
n176=..Enter Reason:{ away $$?="Enter Away Reason" }
n177=..Silent Away
n178=...$r.glob(Customs,AWY1.desc):{ away -s [ [ $r.glob(Customs,AWY1.msg) ] ] }
n179=...$r.glob(Customs,AWY2.desc):{ away -s [ [ $r.glob(Customs,AWY2.msg) ] ] }
n180=...$r.glob(Customs,AWY3.desc):{ away -s [ [ $r.glob(Customs,AWY3.msg) ] ] }
n181=...$r.glob(Customs,AWY4.desc):{ away -s [ [ $r.glob(Customs,AWY4.msg) ] ] }
n182=...$r.glob(Customs,AWY5.desc):{ away -s [ [ $r.glob(Customs,AWY5.msg) ] ] }
n183=...$r.glob(Customs,AWY6.desc):{ away -s [ [ $r.glob(Customs,AWY6.msg) ] ] }
n184=...Work:{ away -s Work }
n185=...Sleep:{ away -s Sleeping }
n186=...Fresh Air:{ away -s Getting some Fresh Air }
n187=...Bathroom:{ away -s Gotta drop the kids off at the pool }
n188=...Smoke Break:{ away -s Smoke Break }
n189=...Hookers:{ away -s Entertaining some Hookers }
n190=...Beer:{ away -s Slammin some Brews }
n191=...Food:{ away -s Stuffin my face }
n192=...Store:{ away -s Ran to the Store }
n193=...TV:{ away -s Watching T.V. }
n194=...-
n195=...Enter Reason:{ away -s $$?="Enter Away Reason" }
n196=.-
n197=.View Messages:{ pager }
n198=$iif($server != $null,Quits)
n199=.Normal Quit: quit
n200=.Remote closed the connection:quit Remote closed the connection
n201=.EOF of client: quit EOF of client
n202=.Read Error: quit Read error: 104 (Connection reset by peer)
n203=.Ping Timeout: quit Ping timeout: 180 seconds
n204=Clear Window:{ clear }

[cpopup]
n0=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n1=; §§
n2=; §§                                       INVISION VERSION 1.0 Script for mIRC 6.02 By Cryoa
n3=; §§                                       SECTION: Channel
n4=; §§                                       DATE: 01-01-16
n5=; §§                                       DESCRIPTION: The Channel Window Menus
n6=; §§
n7=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n8=- • • • • • • $chr(32) $iif($iSetwork != $null,$iSetwork,Global) $chr(32) • • • • • • - :.
n9=-
n10=View Chan Log:{ logviewer $chan }
n11=-
n12=Play Media
n13=.mp3s
n14=..Play Selected mp3:{ set %mp3toplay $replace($$dir="Choose a mp3 To play" [ $iif($exists(%lastmp3dir) == $true,%lastmp3dir,C:\) $+ .mp3 ] ,$chr(32),$chr(63),$chr(44),$chr(34)) | mp3play %mp3toplay | set %lastmp3dir $nofile(%mp3toplay) | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n15=..Play Random mp3:{ set %dirtouse [ $iif($exists( [ %lastmp3dir ] ) == $true,%lastmp3dir,C:\) ] | set %mp3toplay $replace($findfile(%dirtouse,*.mp3,$rand(1,$findfile(%dirtouse,*.mp3,0))),$chr(32),$chr(63),$chr(44),$chr(34)) | mp3play %mp3toplay | set %mp3resume Pause mp3 playback | mp3info %mp3toplay | mp3historyADD %mp3toplay }
n16=..-
n17=..Random Play Directory:{ set %mp3dpdir $sdir($iif($exists( [ %lastmp3dir ] ) == $true,%lastmp3dir,C:\),"Select mp3 directory to randomly play from") | set %lastmp3dir %mp3dpdir | if %mp3dpdir != $null { set %mp3dirplay 1 | set %mp3resume Pause mp3 playback | mp3dirplay | .timermp3Player -o 0 5 mp3maintain } }
n18=..-
n19=..$iif($mp3isplaying == $true,Stop mp3 Playback):{ mp3stop | unset %mp3dirplay %mp3resume }
n20=..%mp3resume:{ if $left(%mp3resume,5) == Pause { set %mp3resume Resume mp3 Playback | mp3pauseplay } | else { set %mp3resume  Pause mp3 Playback | mp3unpauseplay } }
n21=..-
n22=..$iif($ismp3brag($chan),$style(1)) Advertise what I'm listening to:{ if $ismp3brag($chan) { mp3bragdel $chan } | else { mp3bragadd $chan } }
n23=.Waves
n24=..Play Selected Wave:{ splay -w $$dir="Choose a wave To play" $wavedir*.wav }
n25=..Play Random Wave:{ splay -w $findfile($wavedir,*.wav,$rand(1,$findfile($wavedir,*.wav,0))) }
n26=..-
n27=..Stop Wav Playback:{ splay -w STOP }
n28=.Midis
n29=..Play Selected Midi:{ splay -m $$dir="Choose a midi To play" $mididir*.mid }
n30=..Play Random Midi:{ splay -m $findfile($mididir,*.mid,$rand(1,$findfile($mididir,*.mid,0))) }
n31=Text Tricks
n32=.Encrypt Speech: msg # $encrypt2($$?="What would you like to say encrypted?")
n33=.-
n34=.H4CK3R:{ say $hack($$?="Enter Text - return example: H3LL0") }
n35=.Rainbowed:{ say $rain($$?="Enter Text:") }
n36=.ASCII Text:{ say $ascii($$?="Enter Text - return example: HË||ö") }
n37=.Partial Caps:{ say $caps($$?="Enter Text - return example: HeLLo") }
n38=.Bubblies:{ say $bubbles($$?="Enter Text") }
n39=.Blocks:{ say $blocks($$?="Enter Text") }
n40=.-
n41=.3D Buttons Grey:{ s3d $$?="Enter Text") }
n42=.3D Buttons Green:{ z3d $$?="Enter Text") }
n43=.3D Buttons Yellow:{ t3d $$?="Enter Text") }
n44=.3D Buttons Purple:{ p3d $$?="Enter Text") }
n45=.3D Buttons Cyan:{ b3d $$?="Enter Text") }
n46=.3D Buttons Blue:{ n3d $$?="Enter Text") }
n47=.3D Buttons Red:{ o3d $$?="Enter Text") }
n48=.3D Box
n49=..Red:{ set %box $$?="Enter Mesage:" | say  04,04   $+ %box $+    | say  04,04  01,04 $+ %box $+ 04,4  14,14  | say  04,04   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n50=..Blue:{ set %box $$?="Enter Mesage:" | say  12,12   $+ %box $+    | say  12,12  01,12 $+ %box $+ 12,12  14,14  | say  12,12   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n51=..Green:{ set %box $$?="Enter Mesage:" | say  03,03   $+ %box $+    | say  03,03  01,03 $+ %box $+ 03,03  14,14  | say  03,03   $+ %box $+   14,14  | say  14,14   $+ %box $+    | unset %box }
n52=..Pink:{ set %box $$?="Enter Mesage:" | say  13,13   $+ %box $+    | say  13,13  01,13 $+ %box $+ 13,13  14,14  | say  13,13   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n53=..Purple:{ set %box $$?="Enter Mesage:" | say  06,06   $+ %box $+    | say  06,06  01,06 $+ %box $+ 06,06  14,14  | say  06,06   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n54=..Orange:{ set %box $$?="Enter Mesage:" | say  07,07   $+ %box $+    | say  07,07  01,07 $+ %box $+ 07,07  14,14  | say  07,07   $+ %box $+   14,14  | say   14,14   $+ %box $+    | unset %box }
n55=.Ircii Support
n56=..Say Something Bold:/say  $+ $$?="Text to say in bold"
n57=..Say Something Highlighted:/say  $+ $$?="Text to say highlighted"
n58=..Say Something Underlined:/say   $+ $$?="Text to say underlined"
n59=..Say Something Bold/Highlighted:/say  $+ $$?="Say What?"
n60=IRC Scanners
n61=.Quick Scan for IP:{ usearch $$?="Enter IP or Host to Search For" }
n62=.Slow Scan for IP:{ start.ip.srch $$?="Enter the IP to scan for. ie:192.168.0.24" }
n63=.Scan for Hostmasks:{ /hostchanscan $chan $$?="Enter the hostmask to scan for.              (Example: *.mediaone.net):" }
n64=.Scan for Clones
n65=..Scan #: { set %clonescanchan [ $+ [ $iNetwork ] ] $chan | iclonescn $chan public }
n66=..Scan Channel ?:{ set %clonescanchan [ $+ [ $iNetwork ] ] $chan | dialog -m pickchan1 pickchan1 } 
n67=.Scan for Common People in Channels.:{ CommonChannelScan $$chan $$?=" [ $chan ] is the first channel. Enter the second channel to compare with:" }
n68=.Port Scan $server:{ port }
n69=.-
n70=.IRCop
n71=..Private:{ scan ircop -e $chan }
n72=..Public:{ scan ircop -c $chan }
n73=.Away
n74=..Private:{ scan away -e $chan }
n75=..Public:{ scan away -c $chan }
n76=.Chan Stats
n77=..Private:{ scan stats -e $chan }
n78=..Public:{ scan stats -c $chan }
n79=.-
n80=.List Bans:{ mode $chan +b }
n81=Display in Channel
n82=.Total Bandwidth:{ show Bandwidth }
n83=.Bandwidth and DCC's:{ bwstatus }
n84=.System Info:{ show sys }
n85=.Drive Info:{ Drivefo $chan }
n86=.Show Gets:{ show Gets }
n87=.Show Sends:{ show Sends }
n88=.$iif($r.set(Fserve,RecordsKeep) >= 2,Top $r.set(Fserve,RecordsKeep)) Most Requested:{ toprecords $chan }
n89=.mp3 in Play:{ show mp3play }
n90=.Op Status:{ show Ops }
n91=.Your Email:{ show Email }
n92=.Your WebPage:{ show WebPage }
n93=.Your ICQ:{ show ICQ }
n94=.Date and Time:{ show Time }
n95=.Your Titlebar:{ show Titlebar }
n96=.Server Connections:{ show Server }
n97=.Server Connections w/nicks:{ show Server mes }
n98=.OS and Uptime:{ show OS }
n99=.Address:{ show Address }
n100=.Advertise Script:{ show script }
n101=Server Controls
n102=.File Server
n103=..File Server Settings: { if $dialog(InvisFserve).title == $null { openingD | dialog -md InvisFserve fileServer | if ( $isend(0) != 0 || $iget(0) != 0  ) { FservRefresh | .timerFS $+ $iNetwork 0 1 FservRefresh  } } | else { dialog -ev InvisFserve fileServer } }
n104=..-
n105=..$iif($r.set(Fserve,Status) != On,Start Now):{ advertise start fserve }
n106=..$iif(($r.set(Fserve,Status) == On && $r.set(Fserve,Listen) != On),Restart Server):{ advertise start fserve }
n107=..$iif($r.set(Fserve,Status) != Off,Stop Now):{ advertise stop fserve }
n108=..$iif($r.set(Fserve,Status) != Off,Stop Now w/Reason):{ advertise stop fserve $c(2) $+ File Server Shutting Down $bracket($$?="Enter the Reason") }
n109=..$iif($r.set(Fserve,Status) != Off,Stop but Finish Queue):{ advertise Close fserve }
n110=..$iif($r.set(Fserve,Status) != Off,Stop but Finish Queue w/Reason):{ advertise close fserve $c(2) $+ File Server Shutting Down and Finishing Queues $bracket($$?="Enter the Reason") }
n111=..$iif($r.set(Fserve,Status) != On,Silent Start):{ advertise silent fserve }
n112=..%FSpause [ $+ [ $iNetwork ] ] :{ FSpause }
n113=..Display Ad:{ advertise say fserve $chan }
n114=.mp3 Server
n115=..mp3 Server Settings: { dopen mp3manager mp3manager }
n116=..-
n117=..$iif($r.set(mp3serv,Status) != On,Start Now):{ advertise start mp3serv }
n118=..$iif($r.set(mp3serv,Status) != Off,Stop Now):{ advertise stop mp3serv }
n119=..$iif($r.set(mp3serv,Status) != Off,Stop Now w/Reason):{ advertise stop mp3serv $c(2) $+ mp3 Server Shutting Down $bracket($$?="Enter the Reason") }
n120=..$iif($r.set(mp3serv,Status) != Off,Stop but finish Queue):{ advertise Close mp3serv }
n121=..$iif($r.set(mp3serv,Status) != Off,Stop but finish Queue w/Reason):{ advertise Close mp3serv $c(2) $+ mp3 Server Shutting Down and Finishing Queues $bracket($$?="Enter the Reason") }
n122=..$iif($r.set(mp3serv,Status) != On,Silent Start):{ advertise silent mp3serv }
n123=..%mp3pause [ $+ [ $iNetwork ] ] :{ mp3pause }
n124=..Display Ad:{ advertise say mp3serv }
n125=.FTP Ads
n126=..FTP Ad Settings:{ dopen FTP_Setup FTP_Setup }
n127=..-
n128=..Ad 1
n129=...Start Ad Timer:advertise start FTP 1
n130=...Stop Ad Timer:advertise stop FTP 1
n131=...-
n132=...Say Ad:advertise say FTP 1
n133=..Ad 2
n134=...Start Ad Timer:advertise start FTP 2
n135=...Stop Ad Timer:advertise stop FTP 2
n136=...-
n137=...Say Ad:advertise say FTP 2
n138=..Ad 3
n139=...Start Ad Timer:advertise start FTP 3
n140=...Stop Ad Timer:advertise stop FTP 3
n141=...-
n142=...Say Ad:advertise say FTP 3
n143=..Ad 4
n144=...Start Ad Timer:advertise start FTP 4
n145=...Stop Ad Timer:advertise stop FTP 4
n146=...-
n147=...Say Ad:advertise say FTP 4
n148=..Ad 5
n149=...Start Ad Timer:advertise start FTP 5
n150=...Stop Ad Timer:advertise stop FTP 5
n151=...-
n152=...Say Ad:advertise say FTP 5
n153=.TDCC
n154=..TDCC Server Settings:{ dopen TDCC TDCC }
n155=..-
n156=..Trigger #1
n157=...$iif($r.set(TDCC.1,Status) != On,Start):{ advertise start tdcc 1 }
n158=...$iif($r.set(TDCC.1,Status) == On,Stop):{ advertise stop tdcc 1 }
n159=...$iif($r.set(TDCC.1,Status) != On,Silent):{ advertise silent tdcc 1 }
n160=...Say:{ advertise say tdcc 1 }
n161=..Trigger #2
n162=...$iif($r.set(TDCC.2,Status) != On,Start):{ advertise start tdcc 2 }
n163=...$iif($r.set(TDCC.2,Status) == On,Stop):{ advertise stop tdcc 2 }
n164=...$iif($r.set(TDCC.2,Status) != On,Silent):{ advertise silent tdcc 2 }
n165=...Say:{ advertise say tdcc 2 }
n166=..Trigger #3
n167=...$iif($r.set(TDCC.3,Status) != On,Start):{ advertise start tdcc 3 }
n168=...$iif($r.set(TDCC.3,Status) == On,Stop):{ advertise stop tdcc 3 }
n169=...$iif($r.set(TDCC.3,Status) != On,Silent):{ advertise silent tdcc 3 }
n170=...Say:{ advertise say tdcc 3 }
n171=..Trigger #4
n172=...$iif($r.set(TDCC.4,Status) != On,Start):{ advertise start tdcc 4 }
n173=...$iif($r.set(TDCC.4,Status) == On,Stop):{ advertise stop tdcc 4 }
n174=...$iif($r.set(TDCC.4,Status) != On,Silent):{ advertise silent tdcc 4 }
n175=...Say:{ advertise say tdcc 4 }
n176=..Trigger #5
n177=...$iif($r.set(TDCC.5,Status) != On,Start):{ advertise start tdcc 5 }
n178=...$iif($r.set(TDCC.5,Status) == On,Stop):{ advertise stop tdcc 5 }
n179=...$iif($r.set(TDCC.5,Status) != On,Silent):{ advertise silent tdcc 5 }
n180=...Say: advertise say tdcc 5 
n181=.XDCC
n182=..XDCC Server Settings:{ dopen XDCC XDCC }
n183=..-
n184=..Verbose Ad
n185=...Start:{ advertise start xdcc 1 }
n186=...Say:{ advertise say xdcc 1 }
n187=..Brief Ad
n188=...Start:{ advertise start xdcc 2 }
n189=...Say:{ advertise say xdcc 2 }
n190=..-
n191=..Stop:{ advertise stop xdcc }
n192=..Silent:{ advertise silent xdcc }
n193=.Request
n194=..Request Advertiser Settings:{ dopen Request Request }
n195=..-
n196=..Start:{ advertise start request }
n197=..Stop:{ advertise stop request }
n198=..Say:{ advertise say request }
n199=.Announcer
n200=..Announcer Settings:{ dopen Announcer Announcer }
n201=..-
n202=..Start:{ advertise start Announcer }
n203=..Stop:{ advertise stop Announcer }
n204=..Say:{ advertise say Announcer }
n205=-
n206=Rejoin #:{ rejoin $chan }
n207=$iif($me isop $chan,Invite user to #): invite $$?="Who would you like to invite?" #
n208=$iif($rbot.set(PublicMenu,Menu1) != $null,Bot Commands)
n209=.$rbot.set(PublicMenu,Menu1):{ msg $chan $ebot.set(PublicCmd,Cmd1) } 
n210=.$rbot.set(PublicMenu,Menu2):{ msg $chan $ebot.set(PublicCmd,Cmd2) } 
n211=.$rbot.set(PublicMenu,Menu3):{ msg $chan $ebot.set(PublicCmd,Cmd3) } 
n212=.$rbot.set(PublicMenu,Menu4):{ msg $chan $ebot.set(PublicCmd,Cmd4) } 
n213=.$rbot.set(PublicMenu,Menu5):{ msg $chan $ebot.set(PublicCmd,Cmd5) } 
n214=.$rbot.set(PublicMenu,Menu6):{ msg $chan $ebot.set(PublicCmd,Cmd6) } 
n215=.$rbot.set(PublicMenu,Menu7):{ msg $chan $ebot.set(PublicCmd,Cmd7) } 
n216=.$rbot.set(PublicMenu,Menu8):{ msg $chan $ebot.set(PublicCmd,Cmd8) } 
n217=.$rbot.set(PublicMenu,Menu9):{ msg $chan $ebot.set(PublicCmd,Cmd9) } 
n218=.$rbot.set(PublicMenu,Menu10):{ msg $chan $ebot.set(PublicCmd,Cmd10) } 
n219=.$rbot.set(PublicMenu,Menu11):{ msg $chan $ebot.set(PublicCmd,Cmd11) } 
n220=.$rbot.set(PublicMenu,Menu12):{ msg $chan $ebot.set(PublicCmd,Cmd12) } 
n221=.$rbot.set(PublicMenu,Menu13):{ msg $chan $ebot.set(PublicCmd,Cmd13) } 
n222=.$rbot.set(PublicMenu,Menu14):{ msg $chan $ebot.set(PublicCmd,Cmd14) } 
n223=.$rbot.set(PublicMenu,Menu15):{ msg $chan $ebot.set(PublicCmd,Cmd15) } 
n224=.$rbot.set(PublicMenu,Menu16):{ msg $chan $ebot.set(PublicCmd,Cmd16) } 
n225=.$rbot.set(PublicMenu,Menu17):{ msg $chan $ebot.set(PublicCmd,Cmd17) } 
n226=.$rbot.set(PublicMenu,Menu18):{ msg $chan $ebot.set(PublicCmd,Cmd18) } 
n227=.$rbot.set(PublicMenu,Menu19):{ msg $chan $ebot.set(PublicCmd,Cmd19) } 
n228=.$rbot.set(PublicMenu,Menu20):{ msg $chan $ebot.set(PublicCmd,Cmd20) } 
n229=.$rbot.set(PublicMenu,Menu21):{ msg $chan $ebot.set(PublicCmd,Cmd21) } 
n230=.$rbot.set(PublicMenu,Menu22):{ msg $chan $ebot.set(PublicCmd,Cmd22) } 
n231=.$rbot.set(PublicMenu,Menu23):{ msg $chan $ebot.set(PublicCmd,Cmd23) } 
n232=.$rbot.set(PublicMenu,Menu24):{ msg $chan $ebot.set(PublicCmd,Cmd24) } 
n233=.$rbot.set(PublicMenu,Menu25):{ msg $chan $ebot.set(PublicCmd,Cmd25) } 
n234=.$rbot.set(PublicMenu,Menu26):{ msg $chan $ebot.set(PublicCmd,Cmd26) } 
n235=.$rbot.set(PublicMenu,Menu27):{ msg $chan $ebot.set(PublicCmd,Cmd27) } 
n236=.$rbot.set(PublicMenu,Menu28):{ msg $chan $ebot.set(PublicCmd,Cmd28) } 
n237=.$rbot.set(PublicMenu,Menu29):{ msg $chan $ebot.set(PublicCmd,Cmd29) } 
n238=.$rbot.set(PublicMenu,Menu30):{ msg $chan $ebot.set(PublicCmd,Cmd30) } 
n239=-
n240=View Channel Info:{ aecho $c(1) $+ Channel info for $c(2) $+ # | .raw NAMES # | .mode # }
n241=Add $chan to Auto-Join:{ AddtoChanFolder $chan $chan($chan).topic }
n242=$iif((($me isop $chan) || ($me ishop $chan)),Set Topic for #)
n243=.,-*-,._.,-*'^'~*-,._.,-*~> chan <~*-,._.,-*~'^'~*-,._.,-*-,.: topic # $c(2) $+ .,-*-,._.,-*'^'~*-,._.,-*~> $c(1) $+ # $c(2) $+ <~*-,._.,-*~'^'~*-,._.,-*-,.
n244=.,-*-,._.,-*'^'~*-,._.,-*~> <text> <~*-,._.,-*~'^'~*-,._.,-*-,.: topic # $c(2) $+ .,-*-,._.,-*'^'~*-,._.,-*~> $$?="Topic Text?" $c(2) $+ <~*-,._.,-*~'^'~*-,._.,-*-,.
n245=.(¯`·._(¯`·._(¯`·._ <text> _.·`¯)_.·`¯)_.·`¯): topic # $c(2) $+ (¯`·._(¯`·._(¯`·._ $c(1) $+ $$?="Topic Text?" $c(2) $+  _.·`¯)_.·`¯)_.·`¯)
n246=.(¯`·.¸¸.-> ® <text> ® <-.¸¸.·´¯): topic # $c(2) $+ (¯`·.¸¸.-> ® $c(1) $+ $$?="Topic Text?" $c(2) $+ ® <-.¸¸.·´¯)
n247=.©º°¨¨°º©©º°¨¨°º© <text> ©º°¨¨°º©©º°¨¨°º©: topic # $c(2) $+ ©º°¨¨°º©©º°¨¨°º© $c(1) $+ $$?="Topic Text?" $c(2) $+ ©º°¨¨°º©©º°¨¨°º©
n248=.¸,.»¬=æ¤º²°`¯ ¯`°²º¤æ=¬«.,¸. <text>  _¸,.»¬=æ¤º²°`¯ ¯`°²º¤æ=¬«.,¸.: Topic # $c(2) $+ .¸,.»¬=æ¤º²°`¯ ¯`°²º¤æ=¬«.,¸. $c(1) $+ $$?="Topic Text?" $c(2) $+  _¸,.»¬=æ¤º²°`¯ ¯`°²º¤æ=¬«.,¸.
n249=.|§¤*~`~*¤§|§¤*~-=+=- <text> -=+=-~*¤§|§¤*~`~*¤§|: topic # $c(2) $+ |§¤*~`~*¤§|§¤*~-=+=- $c(1) $+ $$?="Topic Text?" $c(2) $+ -=+=-~*¤§|§¤*~`~*¤§|
n250=.°²º¤æ=¬«.,¸_¸,.»¬=æ¤º²°` <text> `°²º¤æ=¬«.,¸_¸,.»¬=æ¤º²°`: topic # $c(2) $+ °²º¤æ=¬«.,¸_¸,.»¬=æ¤º²°` $c(1) $+ $$?="Topic Text?" $c(2) $+ `°²º¤æ=¬«.,¸_¸,.»¬=æ¤º²°`
n251=.©º°¨¨°º© <text> ©º°¨¨°º©: topic # $c(2) $+ ©º°¨¨°º© $c(1) $+ $$?="Topic Text?" $c(2) $+ ©º°¨¨°º©
n252=.-=< $+ $chr(123) $+ ([ <text> ]) $+ $chr(125) $+ >=-: topic # $c(2) $+ -=<{([ $c(1) $+ $$?="Topic Text?" $c(2) $+ ])}>=-
n253=.------ $+ $chr(58) $+ $chr(58) $+ $chr(58) $+ $chr(58) $+ $chr(58) <text> $chr(58) $+ $chr(58) $+ $chr(58) $+ $chr(58) $+ $chr(58) $+ -------: Topic # $c(2) $+ ------::::: $c(1) $+ $$?="Topic Text?" $c(2) $+ :::::-------
n254=.<>[]<><>[]<> text <>[]<><>[]<>: topic # 14,10<43>14[43]14<43>14,10<43>14[43]14<43>8 $$?="Topic Text?" 43<14>43[14]43<14>43<14>43[14]43<14>
n255=. $chr(46) $+ ... $+ $chr(58) $+ $chr(58) $+ $chr(58) <text> $+ $chr(58) $+ $chr(58) $+ $chr(58) $+ .... : topic # 14,1.04.4.7.:8::0 $$?="Topic Text?" 8::7:.4.04.14,1.
n256=.¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸© <text> ©¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸: topic # $c(2) $+ ¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸© $c(1) $+ $$?="Topic Text?" $c(2) $+ ©¸,ø¤°`°¤ø,¸¸,ø¤°`°¤ø,¸
n257=.[C][A][U][T][I][O][N] <text> [C][A][U][T][I][O][N]: topic # 14,8C8,1A14,8U8,1T14,8I8,1O14,8N0,4 $$?="Topic Text?" 14,8C8,1A14,8U8,1T14,8I8,1O14,8N
n258=.»»-(¯`v´¯)--» <text> »»-(¯`v´¯)--»: topic # 12»»-4(¯`v´¯)44--»6 $$?="Topic Text?" 44»»-4(¯`v´¯)44--»
n259=.(.)(.) <text> (.)(.): topic # (.)(.) $$?="Topic Text?" (.)(.)
n260=.| R | A | I | N | B | O | W |: topic # $rainbow($$?="Topic Text?")
n261=.(3)(D) (K)(E)(Y)(S): topic # $crykeys($$?="Topic Text? (10 Characters Max)")   
n262=.(B)(U)(B)(B)(L)(I)(E)(S): topic # $bubbles($$?="Topic Text?")
n263=.[B][L][O][C][K][S]: topic # $blocks($$?="Topic Text?")
n264=.»»-I-n-v-i-s-i-o-n-» chan «-I-n-v-i-s-i-o-n-««: topic # 12»»-I12-n12-v12-i12-s12-i12-o12-n12-» $chan 12«-I12-n12-v12-i12-s12-i12-o12-n12-««
n265=.-
n266=.Topic ?:/topic # $$?="New Topic?"
n267=.Remove Topic:/raw topic # :
n268=.-
n269=.View Topic:/topic #
n270=$iif($me !isop $chan,View Topic):/topic #
n271=$iif($me !isop $chan,View Current Bans):mode # b
n272=$iif($me isop $chan,Set Modes for #)
n273=.Modes +
n274=..Mode +s:/mode # +s
n275=..Mode +t:/mode # +t
n276=..Mode +n:/mode # +n
n277=..Mode +i:/mode # +i
n278=..Mode +m:/mode # +m
n279=..Mode +p:/mode # +p
n280=..Mode +l:/mode # +l $$?="Limit Channel to ?? users..."
n281=..Mode +k:/mode # +k $$?="Set channel key as..."
n282=.Modes -
n283=..Mode -s:/mode # -s
n284=..Mode -t:/mode # -t
n285=..Mode -n:/mode # -n
n286=..Mode -i:/mode # -i
n287=..Mode -m:/mode # -m
n288=..Mode -p:/mode # -p
n289=..Mode -l:/mode # -l
n290=..Mode -k:/mode # -k
n291=.Modes +/-
n292=..Modes +:/mode # -simplktn
n293=..Modes +tn:/mode # +tn | /mode # -simplk
n294=..Modes +stn:/mode # +stn | /mode # -implk
n295=..Modes +stin:/mode # +stin | /mode # -mplk
n296=..Modes +stinm:/mode # +stinm | /mode # -plk
n297=.View Modes
n298=..View Modes:/mode #
n299=..View Modes?:/mode $$?="Channel to view modes in?"
n300=.View Bans
n301=..View Bans:/mode # +b
n302=..View Bans?:/mode $$?="Channel to view bans in?" +b
n303=.-
n304=.Channel Ops Settings:{ dopen InvisMain InvisMain | .timer 1 0 did -c Invismain 8 }
n305=Channel CTCP
n306=.WARNING! These may get you kicked from channel or booted from server:.
n307=.CTCP !List:{ set %isoadchan [ $+ [ $iNetwork ] ] $chan | .ctcp $chan !list }
n308=.CTCP @Find:{ .ctcp $chan @find $$?="Search [ $chan ] for what?" }
n309=$iif($me isop $chan,WallOp)
n310=.WallOp:xonotice $chan $$?="Enter text for Notice to all Ops"
n311=.WallOp MSG:omsg $chan $$?="Enter text for MSG to all Ops"
n312=$iif($cb(0) > 0,Slow Paste from Clipboard):{ pclipbrd $chan }
n313=$iif($ignore(*!*@*).type == codes,$style(1)) Block All Color Codes FROM Channel:{ if $ignore(*!*@*).type == codes { .ignore -rk *!*@* } | else { .ignore -k *!*@* } }
n314=$iif($r.set(filterch,$chan),$style(1)) Block All Color Codes  TO Channel:{ if $r.set(filterch,$chan) { w.set filterch $chan $false } | else { w.set filterch $chan $true } } 
n315=Force Fserve Explorer
n316=.Force for what trigger?:{ 
n317=  .timerFSEB $+ $iNetwork -o 1 60 unset %altFxPflag [ $+ [ $iNetwork ] ]  set %altFxPflag [ $+ [ $iNetwork ] ] 1 
n318=  var %trigline = $$?="What is the trigger for the Fserve?"
n319=  if %trigline != $null {
n320=    if $left(%trigline,5) != /ctcp {
n321=      msg $chan %trigline
n322=    }   else { ctcp $right(%trigline,-5) } set %ForceTrig [ $+ [ $iSetwork ] ] [ $+ [ %FTct [ $+ [ $iSetwork ] ] ] ] %trigline  inc %FTct [ $+ [ $iSetwork ] ] 1 
n323=  }
n324=} 
n325=.%ForceTrig1 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig1 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig1 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig1 [ $+ [ $iSetwork ] ] ,-5) } }
n326=.%ForceTrig2 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig2 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig2 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig2 [ $+ [ $iSetwork ] ] ,-5) } }
n327=.%ForceTrig3 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig3 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig3 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig3 [ $+ [ $iSetwork ] ] ,-5) } }
n328=.%ForceTrig4 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig4 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig4 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig4 [ $+ [ $iSetwork ] ] ,-5) } }
n329=.%ForceTrig5 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig5 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig5 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig5 [ $+ [ $iSetwork ] ] ,-5) } }
n330=.%ForceTrig6 [ $+ [ $iSetwork ] ] : .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig6 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig6 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig6 [ $+ [ $iSetwork ] ] ,-5) } 
n331=.%ForceTrig7 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig7 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig7 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig7 [ $+ [ $iSetwork ] ] ,-5) } }
n332=.%ForceTrig8 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig8 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig8 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig8 [ $+ [ $iSetwork ] ] ,-5) } }
n333=.%ForceTrig9 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig9 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig9 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig9 [ $+ [ $iSetwork ] ] ,-5) } }
n334=.%ForceTrig10 [ $+ [ $iSetwork ] ] :{ .timerFSEB $+ $iSetwork -o 1 60 unset %altFxPflag [ $+ [ $iSetwork ] ] | set %altFxPflag [ $+ [ $iSetwork ] ] 1 | if ($left(%ForceTrig10 [ $+ [ $iSetwork ] ] ,5) != /ctcp) { msg $chan %ForceTrig10 [ $+ [ $iSetwork ] ] } | else { ctcp $right(%ForceTrig10 [ $+ [ $iSetwork ] ] ,-5) } }
n335=$iif($server != $null,Away Control)
n336=.$iif($away == $true,Set Back):{ away }
n337=.$iif($away == $true,Silent Back):{ away sb }
n338=.$iif($away != $true,Set Away)
n339=..$r.glob(Customs,AWY1.desc):{ away [ [ $r.glob(Customs,AWY1.msg) ] ] }
n340=..$r.glob(Customs,AWY2.desc):{ away [ [ $r.glob(Customs,AWY2.msg) ] ] }
n341=..$r.glob(Customs,AWY3.desc):{ away [ [ $r.glob(Customs,AWY3.msg) ] ] }
n342=..$r.glob(Customs,AWY4.desc):{ away [ [ $r.glob(Customs,AWY4.msg) ] ] }
n343=..$r.glob(Customs,AWY5.desc):{ away [ [ $r.glob(Customs,AWY5.msg) ] ] }
n344=..$r.glob(Customs,AWY6.desc):{ away [ [ $r.glob(Customs,AWY6.msg) ] ] }
n345=..Work:{ away Work }
n346=..Sleep:{ away Sleeping }
n347=..Fresh Air:{ away Getting some Fresh Air }
n348=..Bathroom:{ away Gotta drop the kids off at the pool }
n349=..Smoke Break:{ away Smoke Break }
n350=..Hookers:{ away Entertaining some Hookers }
n351=..Beer:{ away Slammin some Brews }
n352=..Food:{ away Stuffin my face }
n353=..Store:{ away Ran to the Store }
n354=..TV:{ away Watching T.V. }
n355=..-
n356=..Enter Reason:{ away $$?="Enter Away Reason" }
n357=..Silent Away
n358=...$r.glob(Customs,AWY1.desc):{ away -s [ [ $r.glob(Customs,AWY1.msg) ] ] }
n359=...$r.glob(Customs,AWY2.desc):{ away -s [ [ $r.glob(Customs,AWY2.msg) ] ] }
n360=...$r.glob(Customs,AWY3.desc):{ away -s [ [ $r.glob(Customs,AWY3.msg) ] ] }
n361=...$r.glob(Customs,AWY4.desc):{ away -s [ [ $r.glob(Customs,AWY4.msg) ] ] }
n362=...$r.glob(Customs,AWY5.desc):{ away -s [ [ $r.glob(Customs,AWY5.msg) ] ] }
n363=...$r.glob(Customs,AWY6.desc):{ away -s [ [ $r.glob(Customs,AWY6.msg) ] ] }
n364=...Work:{ away -s Work }
n365=...Sleep:{ away -s Sleeping }
n366=...Fresh Air:{ away -s Getting some Fresh Air }
n367=...Bathroom:{ away -s Gotta drop the kids off at the pool }
n368=...Smoke Break:{ away -s Smoke Break }
n369=...Hookers:{ away -s Entertaining some Hookers }
n370=...Beer:{ away -s Slammin some Brews }
n371=...Food:{ away -s Stuffin my face }
n372=...Store:{ away -s Ran to the Store }
n373=...TV:{ away -s Watching T.V. }
n374=...-
n375=...Enter Reason:{ away -s $$?="Enter Away Reason" }
n376=.-
n377=.View Messages:{ pager }
n378=-
n379=Clear Window:{ clear }
[bpopup]
n0=&Invision
n1=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n2=; §§
n3=; §§                                       INVISION VERSION 1.0 Script for mIRC 6.02 By Cryoa
n4=; §§                                       SECTION: Menubar
n5=; §§                                       DATE: 01-01-16
n6=; §§                                       DESCRIPTION: The Menubar Menus
n7=; §§
n8=; §§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§
n9=About Invision $chr(32) $chr(32):{ Abouti2 }
n10=Invision Help:{ .run http://www.i-n-v-i-s-i-o-n.com/ }
n11=Invision Settings
n12=.Save All Settings Now:{ MasterSaveAll }
n13=.-
n14=.Backup All Settings Now:{ BackupSettingsZip }
n15=.Restore Previously Backed Up Settings:{ RestoreSettingsZIP }
n16=Invision Tools
n17=.System Logs
n18=..Defense Logs:{ syslogview Defense.log }
n19=..Status Log:{ logviewer status }
n20=..DCC Info Log:{ logviewer @DCC_info }
n21=..User Info Log:{ logviewer @Userinfo }
n22=..Nick Alert Log:{ logviewer @NickAlert }
n23=..File Server Logs:{ syslogview fserve.log }
n24=..File Server Explorer Logs:{ logviewer @FileServerExplorer }
n25=..CTCP Logs:{ syslogview ctcp.log }
n26=.Quick Scan for IP:{ usearch $$?="Enter IP or Host to Search For" }
n27=.Slow Scan for IP:{ start.ip.srch $$?="Enter the IP to scan for. ie:192.168.0.24" }
n28=.Invision Port Scanner:pscan
n29=.$iif($server != $null,Server Port Scan):{ port }
n30=.Telnet: telnet $$?="Enter <site> <port> ie: shell.domain.com 23"
n31=.Open Log Viewer:logviewer
n32=.Unix Quick Help: fileview text\invunix.txt
n33=.Dictionary (English):{ Dict }
n34=.Network Services
n35=..Dalnet:{ .uloads | .load -rs system\remotes\dalnet.mrc | aecho DalNet Services Have been loaded Successfully. }
n36=..None:{ .uloads | aecho All Services have been Unloaded Successfully. }
n37=.Run ScriptGuard:{ scriptguard }
n38=.Run ScriptCheck:{ scriptcheck }
n39=.Run Local Port Check:{ portcheck }
n40=.-
n41=.Import Wizard:{ startimport }
n42=.Force Invision News Update:{ if $firewallchk != $true { w.glob Invision LastNews 1 | sockclose iversion | sockopen iversion 63.195.0.187 80 } | else { var %dum = $input(You cannot access Invision news when behind a firewall,68,Cannot get news!) } }
n43=.Force Script Patch:{ w.glob Invision LastUpdate $calc($r.set(Invision,LastUpdate) - 1) | w.glob Invision LastNews $calc($r.set(Invision,LastNews) - 1) | w.glob Invision PatchUpdate $calc($r.set(Invision,PatchUpdate) - 1) | i2Pinfo }
n44=.Explore Folders
n45=..mIRC:{ run $shortfn($mircdir) }
n46=..Log Viewer:{ run $shortfn($logdir) }
n47=..Downloads:{ run $shortfn($getdir) }
n48=..Midis:{ run $shortfn($mididir) }
n49=..Waves:{ run $shortfn($wavedir) }
n50=..-
n51=..Other:{ run $$sdir="Select Directory to View" }
n52=-
n53=- • • • $chr(32) $iif($iNetwork != $null,$iNetwork,Global) $chr(32) • • • - :.
n54=-
n55=Main Settings:{ dopen InvisMain InvisMain }
n56=User Lists Manager:{ dopen UserLists UserLists }
n57=DCC Manager: { if $dialog(DCCManager).title == $null { openingD | dialog -md DCCManager DCCManager | if ( $isend(0) != 0 || $iget(0) != 0  ) { FservRefresh | .timerFS $+ $iNetwork 0 1 FservRefresh  } } | else { dialog -ev DCCManager DCCManager } }
n58=File Server Manager: { if $dialog(InvisFserve).title == $null { openingD | dialog -md InvisFserve fileServer | if ( $isend(0) != 0 || $iget(0) != 0  ) { FservRefresh | .timerFS $+ $iNetwork 0 1 FservRefresh  } } | else { dialog -ev InvisFserve fileServer } }
n59=TDCC Server Manager:{ dopen TDCC TDCC }
n60=mp3 Server Manager: { dopen mp3manager mp3manager }
n61=XDCC Server Manager:{ dopen XDCC XDCC }
n62=FTP Ad Manager:{ dopen FTP_Setup FTP_Setup }
n63=Announcer:{ dopen Announcer Announcer }
n64=Request Advertiser:{ dopen Request Request }
n65=Personalization:{ dopen Mykicks Mykicks }
n66=Sound Manager:{ dopen SoundFX SoundFX }
n67=Theme Manager:{ dopen thememgr thememgr }
n68=Away Manager:{ dopen Awaymgr Awaymgr }
n69=Acromancer:{ dopen Acromancer Acromancer }
n70=Addon Scripts:{ dopen Addon Addon }
n71=Bot Menu Commands:{ dopen botdlg botdlg }
n72=-
n73=$iif($server != $null,Away Control)
n74=.$iif($away,Set Back ):{ away }
n75=.$iif($away,Silent Back):{ away sb }
n76=.$iif(!$away,Set Away)
n77=..$r.glob(Customs,AWY1.desc):{ away [ [ $r.glob(Customs,AWY1.msg) ] ] }
n78=..$r.glob(Customs,AWY2.desc):{ away [ [ $r.glob(Customs,AWY2.msg) ] ] }
n79=..$r.glob(Customs,AWY3.desc):{ away [ [ $r.glob(Customs,AWY3.msg) ] ] }
n80=..$r.glob(Customs,AWY4.desc):{ away [ [ $r.glob(Customs,AWY4.msg) ] ] }
n81=..$r.glob(Customs,AWY5.desc):{ away [ [ $r.glob(Customs,AWY5.msg) ] ] }
n82=..$r.glob(Customs,AWY6.desc):{ away [ [ $r.glob(Customs,AWY6.msg) ] ] }
n83=..Work:{ away Work }
n84=..Sleep:{ away Sleeping }
n85=..Fresh Air:{ away Getting some Fresh Air }
n86=..Bathroom:{ away Gotta drop the kids off at the pool }
n87=..Smoke Break:{ away Smoke Break }
n88=..Hookers:{ away Entertaining some Hookers }
n89=..Beer:{ away Slammin some Brews }
n90=..Food:{ away Stuffin my face }
n91=..Store:{ away Ran to the Store }
n92=..TV:{ away Watching T.V. }
n93=..-
n94=..Enter Reason:{ away $$?="Enter Away Reason" }
n95=..Silent Away
n96=...$r.glob(Customs,AWY1.desc):{ away -s [ [ $r.glob(Customs,AWY1.msg) ] ] }
n97=...$r.glob(Customs,AWY2.desc):{ away -s [ [ $r.glob(Customs,AWY2.msg) ] ] }
n98=...$r.glob(Customs,AWY3.desc):{ away -s [ [ $r.glob(Customs,AWY3.msg) ] ] }
n99=...$r.glob(Customs,AWY4.desc):{ away -s [ [ $r.glob(Customs,AWY4.msg) ] ] }
n100=...$r.glob(Customs,AWY5.desc):{ away -s [ [ $r.glob(Customs,AWY5.msg) ] ] }
n101=...$r.glob(Customs,AWY6.desc):{ away -s [ [ $r.glob(Customs,AWY6.msg) ] ] }
n102=...Work:{ away -s Work }
n103=...Sleep:{ away -s Sleeping }
n104=...Fresh Air:{ away -s Getting some Fresh Air }
n105=...Bathroom:{ away -s Gotta drop the kids off at the pool }
n106=...Smoke Break:{ away -s Smoke Break }
n107=...Hookers:{ away -s Entertaining some Hookers }
n108=...Beer:{ away -s Slammin some Brews }
n109=...Food:{ away -s Stuffin my face }
n110=...Store:{ away -s Ran to the Store }
n111=...TV:{ away -s Watching T.V. }
n112=...-
n113=...Enter Reason:{ away -s $$?="Enter Away Reason" }
n114=.-
n115=.$iif($server != $null,View Messages):{ pager }
n116=$iif(($query($active) != $null) || ($me ison $active) || ($chat($right($active,-1)) != $null),Advertise Invision):{ show massscript }
n117=Close All
n118=.Sends:{ scid -a close -s }
n119=.Queryies:{ scid -a close -m }
n120=.Fserves:{ scid -a close -f }
n121=.Chats:{ scid -a close -c }
n122=Clear all windows: scid -a clearall -snqmtg
n123=-
n124=-
