ClonesScript — File Browser
ClonesScriptv1.7 / ClonesScriptv1.7 / clonesremotev1-7.ini
clonesremotev1-7.ini — 27.43 KB — Download this file
[script]
n0=; ClonesScript for mIRC copyright Ben 'Motig' Bowen.
n1=; Please respect my credit. :)
n2=;
n3=; This part should be in the 'remote' section.
n4=
n5=menu @clones {
n6= Lookup a user:/set %temp.c $?="Username?" | /info.c %temp.c
n7= -
n8= Search
n9= .For users:/set %temp.c $?="Search users:" | if (%temp.c != $null) /search.c %temp.c
n10= .For hostmasks:/set %temp.c $?="Search hostmasks:" | if (%temp.c != $null) /search.c H %temp.c
n11= .For quotes:/set %temp.c $?="Search quotes:" | if (%temp.c != $null) /search.c Q %temp.c
n12= .For channels:/set %temp.c $?="Search channels:" | if (%temp.c != $null) /search.c C %temp.c
n13= Manage Database
n14= .Save:/save.c
n15= .Backup:/backup.c
n16= .Restore:/restore.c
n17= .Import:/import.c
n18= .Export:/export.c
n19= -
n20= Random quote:/set %temp.c $?="Username? Add a number after the username to see a specific quote." | if (%temp.c != $null) /quote.c %temp.c
n21= Popup options menu:/options.c
n22= Database stats:/stats.c
n23= Clear screen:/clear @clones
n24= -
n25= ClonesScript website:/url http://www.moscripts.co.uk
n26= ClonesScript version %vers.c:/set %temp.c $?!="Check to see if this is the most current version? Requires CTCP'ing Motig." | if (%temp.c == $true) /ctcp Motig CURRENTCS %vers.c
n27=}
n28=
n29=menu nicklist {
n30= $iif(%ready.c == $false,$style(2)) See ClonesScript info on ' $+ $1 $+ ':/info.c $1 | /window -a @clones
n31=}
n32=menu query {
n33= $iif(%ready.c == $false,$style(2)) See ClonesScript info on ' $+ $1 $+ ':/info.c $1 | /window -a @clones
n34=}
n35=
n36=
n37=on *:UNLOAD:/unset %*.c
n38=on *:TEXT:*:#:/set %quote.c $1- | /event.c $nick $chan text in $chan
n39=on *:ACTION:*:#:/set %quote.c $1- | /event.c $nick $chan text in $chan
n40=on *:JOIN:*:/.timer 1 3 /event.c $nick $chan joined channel $chan
n41=on *:PART:*:/event.c $nick $chan parted channel $chan
n42=on *:NICK:/event.c $newnick $nick nick change from $nick
n43=on *:MODE:#:/event.c $nick $chan mode change in $chan
n44=on *:EXIT:{
n45= /backup.c
n46= /save.c
n47=}
n48=on *:DISCONNECT:{
n49= /backup.c
n50= /save.c
n51=}
n52=on *:START:{
n53= /set %ready.c $false
n54= /options.c SILENT
n55= /.remote on
n56= if (%asoc.c == $true) { /echo -a %c.script_info.c >>>ClonesScript will initialise 3 seconds after server connection (use /start.c to start the script manually if it fails). }
n57= else { /echo -a %c.script_info.c >>>ClonesScript is inactive. /start.c to initialise. }
n58=}
n59=on *:CONNECT:if (%asoc.c == $true) { /.timer 1 3 /start.c }
n60=on ^*:HOTLINK:CONFIRM:@clones:return
n61=on ^*:HOTLINK:INFO:@clones:return
n62=on ^*:HOTLINK:LOCK:@clones:return
n63=on ^*:HOTLINK:UNLOCK:@clones:return
n64=on ^*:HOTLINK:RESTORE:@clones:return
n65=on ^*:HOTLINK:IMPORT:@clones:return
n66=on ^*:HOTLINK:OVERRIDE:@clones:return
n67=on ^*:HOTLINK:ADD-CHANNEL:@clones:return
n68=on ^*:HOTLINK:ADD-QUOTE:@clones:return
n69=on ^*:HOTLINK:ADD-ALIAS:@clones:return
n70=on ^*:HOTLINK:#*:@clones:return
n71=on ^*:HOTLINK:CLONESINFO:*:return
n72=on ^*:HOTLINK:CLICKHERE:*:return
n73=
n74=on *:HOTLINK:CONFIRM:@clones:{
n75= if ($gettok($hotline,12,32) == hostmask) /search.c H *.* C
n76= if ($gettok($hotline,12,32) == quote) /search.c Q * C
n77= if ($gettok($hotline,12,32) == username) /search.c * * C
n78=}
n79=on *:HOTLINK:#*:@clones:{
n80= /set %temp.c $1
n81= if ($right($1,1) == $chr(58)) /set %temp.c $left($1,$calc($len($1) - 2))
n82= /join %temp.c
n83= /window -a %temp.c
n84=}
n85=on *:HOTLINK:INFO:@clones:{
n86= if ($strip($gettok($hotline,4,32)) == INFO) {
n87= /info.c $strip($gettok($hotline,3,32))
n88= }
n89= elseif ($strip($gettok($hotline,3,32)) == ") {
n90= /noop $regsub($gettok($hotline,$calc($gettok($hotline,0,32) - 1),32),\[,,%temp.c)
n91= /noop $regsub(%temp.c,],,%temp.c)
n92= /info.c $strip(%temp.c)
n93= }
n94= elseif ($strip($gettok($hotline,3,32)) == last) {
n95= /info.c $strip($gettok($hotline,8,32))
n96= }
n97= elseif ($strip($gettok($hotline,3,32)) == quote) {
n98= /info.c $strip($gettok($hotline,5,32))
n99= }
n100= elseif ($strip($gettok($hotline,3,32)) == hostmask) {
n101= /info.c $strip($gettok($hotline,6,32))
n102= }
n103=}
n104=on *:HOTLINK:LOCK:@clones:{
n105= /set %temp.c $gettok($hotline,5,32)
n106= /noop $regsub(%temp.c,\/.*,,%temp.c)
n107= /hadd -m quo.c $gettok($hotline,3,32) %temp.c $gettok($hget(quo.c,$gettok($hotline,3,32)),2-,32)
n108= /echo @clones %c.misc.c Quote locked!
n109=}
n110=on *:HOTLINK:UNLOCK:@clones:{
n111= /hadd -m quo.c $gettok($hotline,3,32) 0 $gettok($hget(quo.c,$gettok($hotline,3,32)),2-,32)
n112= /echo @clones %c.misc.c Quote unlocked!
n113=}
n114=on *:HOTLINK:RESTORE:@clones:{
n115= /restore.c C
n116=}
n117=on *:HOTLINK:IMPORT:@clones:{
n118= /import.c C
n119=}
n120=on *:HOTLINK:OVERRIDE:@clones:{
n121= /set %temp.c $strip($gettok($hotline,5,32))
n122= /noop $regsub(%temp.c,\[,,%temp.c)
n123= /noop $regsub(%temp.c,]:,,%temp.c)
n124= if ($strip($gettok($hotline,2,32)) == Username) /search.c %temp.c C C O
n125= if ($strip($gettok($hotline,2,32)) == Quote) /search.c Q %temp.c C O
n126= if ($strip($gettok($hotline,2,32)) == Hostmask) /search.c H %temp.c C O
n127= if ($strip($gettok($hotline,2,32)) == Channel) /search.c C %temp.c C O
n128=}
n129=on *:HOTLINK:ADD-CHANNEL:@clones:{
n130= /set %temp.c $strip($gettok($hotline,7,32))
n131= /noop $regsub(%temp.c,',,%temp.c)
n132= /noop $regsub(%temp.c,':,,%temp.c)
n133= /set %temp2.c $?="Add channel to %temp.c $+ 's channel list... Channel name?"
n134= /set %temp3.c ^ $+ $chr(35)
n135= if (%temp2.c == $null) {
n136= return
n137= }
n138= elseif ($regex(%temp2.c,%temp3.c) < 1) {
n139= /echo @clones %c.user_error.c Invalid channel name! You must have the '#' at the start!
n140= return
n141= }
n142= else {
n143= /addchan.c %temp.c %temp2.c M
n144= }
n145=}
n146=on *:HOTLINK:ADD-QUOTE:@clones:{
n147= /set %temp.c $strip($gettok($hotline,7,32))
n148= /noop $regsub(%temp.c,',,%temp.c)
n149= /noop $regsub(%temp.c,':,,%temp.c)
n150= /set %temp2.c $?="Add quote for %temp.c $+ :"
n151= if (%temp2.c == $null) {
n152= return
n153= }
n154= else {
n155= /addquote.c %temp.c %temp2.c
n156= }
n157=}
n158=on *:HOTLINK:ADD-ALIAS:@clones:{
n159= /set %temp.c $strip($gettok($hotline,7,32))
n160= /noop $regsub(%temp.c,',,%temp.c)
n161= /noop $regsub(%temp.c,':,,%temp.c)
n162= /set %temp2.c $?="Add alias for %temp.c $+ :"
n163= if (%temp2.c == $null) {
n164= return
n165= }
n166= else {
n167= if ($hget(ial.c,%temp2.c) != $null) /set %temp3.c $?!="Add all usernames with the same hostmask as %temp2.c $+ ?"
n168= /addalias.c %temp.c %temp2.c %temp3.c
n169= }
n170=}
n171=on *:HOTLINK:CLONESINFO:*:{
n172= /info.c $strip($gettok($hotline,1,32))
n173= /window -a @clones
n174=}
n175=on *:HOTLINK:CLICKHERE:*:{
n176= /info.c $strip($gettok($hotline,1,32))
n177= /window -a @clones
n178=}
n179=
n180=raw 311:*:/echo %aos.c %c.swc.c $+ $2 is $3 $+ @ $+ $4 ¦ $6- | /event.c $2 Empty grabbed from whois | /halt
n181=raw 312:*:/echo %aos.c %c.swc.c $+ $2 is/was connected to $3- | /halt
n182=raw 313:*:/echo %aos.c %c.swc.c $+ $2- | /halt
n183=raw 317:*:/echo %aos.c %c.swc.c $+ $2 has been idle $duration($3) $+ , and logged on to the server at $asctime($4) | /halt
n184=raw 319:*:{
n185= /echo %aos.c %c.swc.c $+ $2 is on $3-
n186= /set %i.c 1
n187= while ($gettok($3-,%i.c,32) != $null) {
n188= /unset %temp2.c
n189= /set %temp.c $gettok($3-,%i.c,32)
n190= if ($regex(%temp.c,^\+) > 0) {
n191= /set %temp.c $right(%temp.c,$calc($len(%temp.c) - 1))
n192= /set %temp2.c +
n193= }
n194= /addchan.c $2 %temp.c A %temp2.c
n195= /inc %i.c
n196= }
n197= /halt
n198=}
n199=raw 307:*:/echo %aos.c %c.swc.c $+ $2 $+ $3- | /halt
n200=raw 301:*:/echo %aos.c %c.swc.c $+ $2 is away: ' $+ $3- $+ ' | /halt
n201=raw 671:*:/echo %aos.c %c.swc.c $+ $2 $+ $3- | /halt
n202=raw 330:*:/echo %aos.c %c.swc.c $+ $2 is authed as $3- | /halt
n203=raw 310:*:/echo %aos.c %c.swc.c $+ $2- is ' $+ $3- $+ ' | /halt
n204=raw 338:*:/echo %aos.c %c.swc.c $+ $2 is actually $3 ( $+ $4 $+ ) | /halt
n205=raw 378:*:/echo %aos.c %c.swc.c $+ $2 $+ 's unhidden hostmask is $6 $+ ... (IP = $7 $+ ) | /halt
n206=raw 401:*:/echo %aos.c %c.swc.c $+ $2 is apparently offline. | /halt
n207=raw 314:*:/echo %aos.c %c.swc.c $+ $2 was $3 $+ @ $+ $4 ¦ $6- | /halt
n208=raw 603:*:/echo %aos.c You are currently on $8 notify lists of other people. | /halt
n209=raw 406:*:/echo %aos.c The server has no history of %c.swc.c $+ $2 $+ . | /halt
n210=raw 482:*:/echo %aos.c You are not an operator in %c.swc.c $+ $2 $+ ! | /halt
n211=raw 318:*:{
n212= if ($hfind(ial.c,$hget(ial.c,$2),0).data < 10) {
n213= /unset %temp.c
n214= /set %i.c 1
n215= while (%i.c <= $hfind(ial.c,$hget(ial.c,$2),0).data) {
n216= /set %temp.c %temp.c %c.swc.c $+ $hfind(ial.c,$hget(ial.c,$2),%i.c).data $+ ¦
n217= /inc %i.c
n218= }
n219= /noop $regsub(%temp.c,¦$,,%temp.c)
n220= /echo %aos.c All known aliases for $+ $2 $+ : %temp.c
n221= }
n222= else {
n223= /echo %aos.c %c.swc.c $+ $2 has more than 10 aliases, %c.swc.c $+ CLICKHERE to view all.
n224= }
n225= if (%ssb.c == $true) /echo %aos.c %c.swc.c $+ $2 %c.button.c $+ CLONESINFO
n226= /halt
n227=}
n228=
n229=dialog options.c {
n230= title "ClonesScript Options"
n231= size 400 125 200 200
n232= option dbu
n233=
n234= box "Search", 101, 5 5 90 95
n235= edit "search query", 102, 10 15 80 10
n236= check "Override search protection:", 103, 10 27 80 10, left
n237= button "Search nicks", 104, 10 40 80 10, default
n238= button "Search hostmasks", 105, 10 55 80 10, default
n239= button "Search quotes", 106, 10 70 80 10, default
n240= button "Search channels", 107, 10 85 80 10, default
n241=
n242= box "Options", 201, 105 5 90 165
n243= check " - start on connect", 202, 110 15 65 10
n244= check " - verbose mode", 203, 110 25 65 10
n245= check " - whois search button", 204, 110 35 65 10
n246= text "Minimum quote length:", 205, 110 50 80 10
n247= edit "", 206, 110 57 65 10
n248= text "Auto-save time:", 207, 110 70 80 10
n249= edit "", 208, 110 77 65 10
n250= text "Search result protection limit:", 209, 110 90 80 10
n251= edit "", 210, 110 97 65 10
n252= text "Default command:", 211, 110 110 80 10
n253= edit "", 212, 110 117 65 10
n254= text "Default window font:", 213, 110 130 80 10
n255= edit "", 214, 110 137 65 10
n256= text "Whois command output:", 215, 110 150 80 10
n257= edit "", 216, 110 157 65 10
n258= button "?", 217, 180 15 10 10
n259= button "?", 218, 180 25 10 10
n260= button "?", 219, 180 35 10 10
n261= button "?", 220, 180 57 10 10
n262= button "?", 221, 180 77 10 10
n263= button "?", 222, 180 97 10 10
n264= button "?", 223, 180 117 10 10
n265= button "?", 224, 180 137 10 10
n266= button "?", 225, 180 157 10 10
n267=
n268= box "Colours", 301, 5 105 90 65
n269= list 302, 10 115 70 40
n270= edit "(:", 303, 10 145 30 10
n271= button "Save colour", 306, 45 145 45 10
n272= button "Show me in @clones", 305, 10 157 80 10
n273= button "?", 304, 83 114 10 10
n274=
n275= button "Save", 001, 10 175 80 20, default
n276= button "Cancel", 002, 110 175 80 20, default
n277=}
n278=
n279=on *:DIALOG:options.c:sclick:002: {
n280= /dialog -x options.c
n281= /set %c.swc.c %c.swc.temp.c
n282= /set %c.script_info.c %c.script_info.temp.c
n283= /set %c.script_success.c %c.script_success.temp.c
n284= /set %c.script_error.c %c.script_error.temp.c
n285= /set %c.user_error.c %c.user_error.temp.c
n286= /set %c.warning.c %c.warning.temp.c
n287= /set %c.event.c %c.event.temp.c
n288= /set %c.event2.c %c.event2.temp.c
n289= /set %c.buttons.c %c.buttons.temp.c
n290= /set %c.sr.c %c.sr.temp.c
n291= /set %c.sr2.c %c.sr2.temp.c
n292= /set %c.debug.c %c.debug.temp.c
n293= /set %c.misc.c %c.misc.temp.c
n294=}
n295=on *:DIALOG:options.c:sclick:001: {
n296= if ($did(options.c,202).state == 1) /set %asoc.c $true
n297= if ($did(options.c,202).state == 0) /set %asoc.c $false
n298= if ($did(options.c,203).state == 1) /set %verbose.c $true
n299= if ($did(options.c,203).state == 0) /set %verbose.c $false
n300= if ($did(options.c,204).state == 1) /set %ssb.c $true
n301= if ($did(options.c,204).state == 0) /set %ssb.c $false
n302= /set %mql.c $did(options.c,206).text
n303= /set %ast.c $did(options.c,208).text
n304= /set %srpl.c $did(options.c,210).text
n305= /set %default_command.c $did(options.c,212).text
n306= /set %dwf.c $did(options.c,214).text
n307= /set %aos.c $did(options.c,216).text
n308= /dialog -x options.c
n309=}
n310=on *:DIALOG:options.c:sclick:306: {
n311= if ($did(options.c,302).seltext == Second whois colour) {
n312= /set %c.swc.c $did(options.c,303).text
n313= }
n314= elseif ($did(options.c,302).seltext == Script info colour) {
n315= /set %c.script_info.c $did(options.c,303).text
n316= }
n317= elseif ($did(options.c,302).seltext == Script success colour) {
n318= /set %c.script_success.c $did(options.c,303).text
n319= }
n320= elseif ($did(options.c,302).seltext == Script error colour) {
n321= /set %c.script_error.c $did(options.c,303).text
n322= }
n323= elseif ($did(options.c,302).seltext == User error colour) {
n324= /set %c.user_error.c $did(options.c,303).text
n325= }
n326= elseif ($did(options.c,302).seltext == Warning colour) {
n327= /set %c.warning.c $did(options.c,303).text
n328= }
n329= elseif ($did(options.c,302).seltext == Event colour) {
n330= /set %c.event.c $did(options.c,303).text
n331= }
n332= elseif ($did(options.c,302).seltext == Event colour 2) {
n333= /set %c.event2.c $did(options.c,303).text
n334= }
n335= elseif ($did(options.c,302).seltext == Button colour) {
n336= /set %c.button.c $did(options.c,303).text
n337= }
n338= elseif ($did(options.c,302).seltext == Search results colour) {
n339= /set %c.sr.c $did(options.c,303).text
n340= }
n341= elseif ($did(options.c,302).seltext == Search results colour 2) {
n342= /set %c.sr2.c $did(options.c,303).text
n343= }
n344= elseif ($did(options.c,302).seltext == Debug colour) {
n345= /set %c.debug.c $did(options.c,303).text
n346= }
n347= elseif ($did(options.c,302).seltext == Misc colour) {
n348= /set %c.misc.c $did(options.c,303).text
n349= }
n350= /did -a options.c 306 Saved
n351= /.timer 1 1 /did -a options.c 306 Save colour
n352=}
n353=on *:DIALOG:options.c:sclick:217: {
n354= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n355= /did -a helppop.c 101 Start on connect
n356= /did -a helppop.c 102 Change this depending on whether or not you want ClonesScript to start automatically when you connect to a server.
n357=}
n358=on *:DIALOG:options.c:sclick:218: {
n359= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n360= /did -a helppop.c 101 Verbose mode
n361= /did -a helppop.c 102 If this is checked, the script will constantly tell you what it's doing... Whereas if you uncheck it, it will only tell you about crucial information. Uncheck this if you find it's delivering too much information.
n362=}
n363=on *:DIALOG:options.c:sclick:219: {
n364= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n365= /did -a helppop.c 101 Whois search button
n366= /did -a helppop.c 102 If you check this, there will be a button after the end of every /whois command, that you can click to see information about the person you just /whois'd. It can look rather annoying though, so by default it's unchecked.
n367=}
n368=on *:DIALOG:options.c:sclick:220: {
n369= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n370= /did -a helppop.c 101 Minimum quote length
n371= /did -a helppop.c 102 Use this to set the minimum number of characters a message has to be before the script will save it as a quote. For example, if the limit is set to 10, and I write a message 123456789, my message won't be saved as a quote. The reason for this is to stop messages like 'hi' and 'lol' getting saved. :)
n372=}
n373=on *:DIALOG:options.c:sclick:221: {
n374= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n375= /did -a helppop.c 101 Auto-save time
n376= /did -a helppop.c 102 This determines, in seconds, how often the script auto-saves the database of usernames, hostmasks, quotes, channels and everything else.
n377=}
n378=on *:DIALOG:options.c:sclick:222: {
n379= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n380= /did -a helppop.c 101 Search result protection limit
n381= /did -a helppop.c 102 If you search for something like 'e' in the database, you'll get every username you've ever seen with the letter 'e' in it. The protection limit is the maximum number of results that will be shown to you before the script pauses and asks you if you want to see the rest... It means you won't get flooded with 10,000 usernames. :)
n382=}
n383=on *:DIALOG:options.c:sclick:223: {
n384= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n385= /did -a helppop.c 101 Default command
n386= /did -a helppop.c 102 This is the command you'll always have written out for you at the bottom of the @clones window. Some people might prefer /info.c as their default command. :)
n387=}
n388=on *:DIALOG:options.c:sclick:224: {
n389= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n390= /did -a helppop.c 101 Default window font
n391= /did -a helppop.c 102 This is the font that is used by defualt in the @clones window.
n392=}
n393=on *:DIALOG:options.c:sclick:225: {
n394= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n395= /did -a helppop.c 101 Whois command output
n396= /did -a helppop.c 102 By default, mIRC shows /whois information in the status (connection) window... However, ClonesScript shows it in the window you're currently on, instead. If you prefer it in the status window, change this option to -s. $crlf $crlf If you wanted to display all your whois information in a window, e.g. @whois, you could create the window, and set this option to @whois.
n397=}
n398=on *:DIALOG:options.c:sclick:304: {
n399= if ($dialog(helppop.c).x == $null) /dialog -m helppop.c helppop.c
n400= if ($did(options.c,302).seltext == Second whois colour) {
n401= /did -a helppop.c 101 Second whois colour
n402= /did -a helppop.c 102 The colour used primarily for names in /whois information.
n403= }
n404= elseif ($did(options.c,302).seltext == Script info colour) {
n405= /did -a helppop.c 101 Sript info colour
n406= /did -a helppop.c 102 The colour used by the script to tell you what it's doing.
n407= }
n408= elseif ($did(options.c,302).seltext == Script success colour) {
n409= /did -a helppop.c 101 Sript success colour
n410= /did -a helppop.c 102 The colour used by the script to tell you that it finished what it was doing without any hiccups.
n411= }
n412= elseif ($did(options.c,302).seltext == Script error colour) {
n413= /did -a helppop.c 101 Sript error colour
n414= /did -a helppop.c 102 The colour used by the script to tell you that it has hit a problem.
n415= }
n416= elseif ($did(options.c,302).seltext == User error colour) {
n417= /did -a helppop.c 101 User error colour
n418= /did -a helppop.c 102 The colour used by the script to tell you that you made a mistake.
n419= }
n420= elseif ($did(options.c,302).seltext == Warning colour) {
n421= /did -a helppop.c 101 Warning colour
n422= /did -a helppop.c 102 The colour used by the script to warn you that something has the potential to go wrong.
n423= }
n424= elseif ($did(options.c,302).seltext == Event colour) {
n425= /did -a helppop.c 101 Event colour
n426= /did -a helppop.c 102 The colour used by the script when something happens (such as someone talking in a channel).
n427= }
n428= elseif ($did(options.c,302).seltext == Event colour 2) {
n429= /did -a helppop.c 101 Event colour 2
n430= /did -a helppop.c 102 The second colour used by the script when something happens.
n431= }
n432= elseif ($did(options.c,302).seltext == Button colour) {
n433= /did -a helppop.c 101 Button colour
n434= /did -a helppop.c 102 The colour used for all double-clickable buttons.
n435= }
n436= elseif ($did(options.c,302).seltext == Search results colour) {
n437= /did -a helppop.c 101 Search results colour
n438= /did -a helppop.c 102 The colour used by the script to display search results.
n439= }
n440= elseif ($did(options.c,302).seltext == Search results colour 2) {
n441= /did -a helppop.c 101 Search results colour 2
n442= /did -a helppop.c 102 The second colour used by the script to display search results.
n443= }
n444= elseif ($did(options.c,302).seltext == Debug colour) {
n445= /did -a helppop.c 101 Debug colour
n446= /did -a helppop.c 102 A rarely used colour that is only used by the script to try and tell you what it's doing when something goes wrong.
n447= }
n448= elseif ($did(options.c,302).seltext == Misc colour) {
n449= /did -a helppop.c 101 Misc colour
n450= /did -a helppop.c 102 The colour used for all other text that doesn't fall into a different category.
n451= }
n452=}
n453=on *:DIALOG:options.c:sclick:302: {
n454= if ($did(options.c,302).seltext == Second whois colour) {
n455= /did -o options.c 303 1 %c.swc.c
n456= if ($dialog(helppop.c).x != $null) {
n457= /did -a helppop.c 101 Second whois colour
n458= /did -a helppop.c 102 The colour used primarily for names in /whois information.
n459= }
n460= }
n461= elseif ($did(options.c,302).seltext == Script info colour) {
n462= /did -o options.c 303 1 %c.script_info.c
n463= if ($dialog(helppop.c).x != $null) {
n464= /did -a helppop.c 101 Sript info colour
n465= /did -a helppop.c 102 The colour used by the script to tell you what it's doing.
n466= }
n467= }
n468= elseif ($did(options.c,302).seltext == Script success colour) {
n469= /did -o options.c 303 1 %c.script_success.c
n470= if ($dialog(helppop.c).x != $null) {
n471= /did -a helppop.c 101 Sript success colour
n472= /did -a helppop.c 102 The colour used by the script to tell you that it finished what it was doing without any hiccups.
n473= }
n474= }
n475= elseif ($did(options.c,302).seltext == Script error colour) {
n476= /did -o options.c 303 1 %c.script_error.c
n477= if ($dialog(helppop.c).x != $null) {
n478= /did -a helppop.c 101 Sript error colour
n479= /did -a helppop.c 102 The colour used by the script to tell you that it has hit a problem.
n480= }
n481= }
n482= elseif ($did(options.c,302).seltext == User error colour) {
n483= /did -o options.c 303 1 %c.user_error.c
n484= if ($dialog(helppop.c).x != $null) {
n485= /did -a helppop.c 101 User error colour
n486= /did -a helppop.c 102 The colour used by the script to tell you that you made a mistake.
n487= }
n488= }
n489= elseif ($did(options.c,302).seltext == Warning colour) {
n490= /did -o options.c 303 1 %c.warning.c
n491= if ($dialog(helppop.c).x != $null) {
n492= /did -a helppop.c 101 Warning colour
n493= /did -a helppop.c 102 The colour used by the script to warn you that something has the potential to go wrong.
n494= }
n495= }
n496= elseif ($did(options.c,302).seltext == Event colour) {
n497= /did -o options.c 303 1 %c.event.c
n498= if ($dialog(helppop.c).x != $null) {
n499= /did -a helppop.c 101 Event colour
n500= /did -a helppop.c 102 The colour used by the script when something happens (such as someone talking in a channel).
n501= }
n502= }
n503= elseif ($did(options.c,302).seltext == Event colour 2) {
n504= /did -o options.c 303 1 %c.event2.c
n505= if ($dialog(helppop.c).x != $null) {
n506= /did -a helppop.c 101 Event colour 2
n507= /did -a helppop.c 102 The second colour used by the script when something happens.
n508= }
n509= }
n510= elseif ($did(options.c,302).seltext == Button colour) {
n511= /did -o options.c 303 1 %c.button.c
n512= if ($dialog(helppop.c).x != $null) {
n513= /did -a helppop.c 101 Button colour
n514= /did -a helppop.c 102 The colour used for all double-clickable buttons.
n515= }
n516= }
n517= elseif ($did(options.c,302).seltext == Search results colour) {
n518= /did -o options.c 303 1 %c.sr.c
n519= if ($dialog(helppop.c).x != $null) {
n520= /did -a helppop.c 101 Search results colour
n521= /did -a helppop.c 102 The colour used by the script to display search results.
n522= }
n523= }
n524= elseif ($did(options.c,302).seltext == Search results colour 2) {
n525= /did -o options.c 303 1 %c.sr2.c
n526= if ($dialog(helppop.c).x != $null) {
n527= /did -a helppop.c 101 Search results colour 2
n528= /did -a helppop.c 102 The second colour used by the script to display search results.
n529= }
n530= }
n531= elseif ($did(options.c,302).seltext == Debug colour) {
n532= /did -o options.c 303 1 %c.debug.c
n533= if ($dialog(helppop.c).x != $null) {
n534= /did -a helppop.c 101 Debug colour
n535= /did -a helppop.c 102 A rarely used colour that is only used by the script to try and tell you what it's doing when something goes wrong.
n536= }
n537= }
n538= elseif ($did(options.c,302).seltext == Misc colour) {
n539= /did -o options.c 303 1 %c.misc.c
n540= if ($dialog(helppop.c).x != $null) {
n541= /did -a helppop.c 101 Misc colour
n542= /did -a helppop.c 102 The colour used for all other text that doesn't fall into a different category.
n543= }
n544= }
n545=}
n546=on *:DIALOG:options.c:sclick:305: {
n547= /echo @clones $did(options.c,303).text $did(options.c,302).seltext
n548=}
n549=on *:DIALOG:options.c:sclick:104: {
n550= if ($did(options.c,102).text == $null) { /did -a options.c 102 ENTER A QUERY HERE | return }
n551= if ($did(options.c,102).text == ENTER A QUERY HERE) { return }
n552= if ($did(options.c,103).state == 0) { /search.c $gettok($did(options.c,102).text,1,32) }
n553= else { /search.c $gettok($did(options.c,102).text,1,32) C C O }
n554=}
n555=on *:DIALOG:options.c:sclick:105: {
n556= if ($did(options.c,102).text == $null) { /did -a options.c 102 ENTER A QUERY HERE | return }
n557= if ($did(options.c,102).text == ENTER A QUERY HERE) { return }
n558= if ($did(options.c,103).state == 0) { /search.c H $gettok($did(options.c,102).text,1,32) }
n559= else { /search.c H $gettok($did(options.c,102).text,1,32) C O }
n560=}
n561=on *:DIALOG:options.c:sclick:106: {
n562= if ($did(options.c,102).text == $null) { /did -a options.c 102 ENTER A QUERY HERE | return }
n563= if ($did(options.c,102).text == ENTER A QUERY HERE) { return }
n564= if ($did(options.c,103).state == 0) { /search.c Q $gettok($did(options.c,102).text,1,32) }
n565= else { /search.c Q $gettok($did(options.c,102).text,1,32) C O }
n566=}
n567=on *:DIALOG:options.c:sclick:107: {
n568= if ($did(options.c,102).text == $null) { /did -a options.c 102 ENTER A QUERY HERE | return }
n569= if ($did(options.c,102).text == ENTER A QUERY HERE) { return }
n570= if ($did(options.c,103).state == 0) { /search.c C $gettok($did(options.c,102).text,1,32) }
n571= else { /search.c C $gettok($did(options.c,102).text,1,32) C O }
n572=}
n573=
n574=dialog helppop.c {
n575= title "Help popup"
n576= size 600 300 150 100
n577= option dbu
n578=
n579= box "", 101, 5 5 140 90
n580= text "", 102, 12 12 120 78
n581=}