Confused IRC Search — File Browser
ConfusedIRCSearchv0.0.1 / ConfusedIRCSearchv0.0.1 / confusedsearch.ini
confusedsearch.ini — 21.73 KB — Download this file
[script]
n0=********************************************************************************************
n1=** This script was created by EvilJason **
n2=** Confused IRC Search was made for my script "Çöñfü§ëÐ" but it was also ** **
n3=** made for the people who hate to have a million different programs running. **
n4=** So far i have created a few clients for internet protocols such as: **
n5=** IRC, FTP,SMTP, POP3, and Telnet **
n6=********************************************************************************************
n7=
n8=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=Picture Window=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
n9=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
n10=
n11=Alias Search {
n12= if (%ConSearchWindowPosition) window -pd +n @Search %ConSearchWindowPosition
n13= else window -pd +n @Search 74 110 437 237
n14= set %ConSearchProgress 0
n15= .remove $scriptdirResults.txt
n16= write $scriptdirResults.txt -
n17= drawfill @Search 15 0 0 0 0
n18= titlebar @Search Confused IRC Search by EvilJason
n19= drawline @Search 14 1 241 29 241 60
n20= drawline @Search 14 1 165 29 165 60
n21= drawline @search 14 1 89 29 89 60
n22= drawline @Search 14 1 4 17 423 17
n23= drawline @Search 0 1 4 18 423 18
n24= drawline @Search 0 1 14 29 14 195
n25= drawline @Search 1 1 14 195 410 195
n26= drawline @Search 14 1 14 194 410 194
n27= drawline @Search 14 1 409 195 409 60
n28= drawline @Search 1 1 410 195 410 60
n29= drawtext -co @Search 1 Arial 14 30 33 120 100 Search
n30= drawline @Search 0 1 14 29 90 29
n31= drawline @Search 1 1 90 29 90 60
n32= drawline @Search 0 1 410 60 90 60
n33= drawtext -co @Search 1 Arial 14 106 33 120 100 Website
n34= drawline @Search 0 1 90 29 166 29
n35= drawline @Search 1 1 166 29 166 60
n36= drawtext -co @Search 1 Arial 14 182 33 120 100 About
n37= drawline @Search 0 1 166 29 242 29
n38= drawline @Search 1 1 242 29 242 60
n39= drawtext -o @Search 1 Arial 14 30 92 Name:
n40= drawrect -f @search 0 1 70 92 130 18
n41= drawline @Search 14 1 200 93 70 93
n42= drawline @Search 1 1 200 92 70 92
n43= drawline @Search 14 1 71 92 71 110
n44= drawline @Search 1 1 70 92 70 110
n45= drawline @Search 0 1 70 110 200 110
n46= drawline @search 15 1 72 109 199 109
n47= drawline @Search 0 1 200 110 200 92
n48= drawline @search 15 1 199 109 199 93
n49= drawline @Search 0 1 320 171 388 171
n50= drawline @Search 0 1 320 171 320 189
n51= drawline @Search 1 1 320 189 388 189
n52= drawline @Search 14 1 320 188 388 188
n53= drawline @Search 1 1 388 189 388 171
n54= drawline @Search 14 1 387 189 387 171
n55= drawtext -co @Search 1 Arial 14 340 173 120 100 Close
n56= drawline @Search 0 1 20 171 88 171
n57= drawline @Search 0 1 20 171 20 189
n58= drawline @Search 1 1 20 189 88 189
n59= drawline @Search 14 1 20 188 88 188
n60= drawline @Search 14 1 87 189 87 171
n61= drawline @Search 1 1 88 189 88 171
n62= drawtext -co @Search 1 Arial 14 30 173 120 100 Search!
n63= drawline @Search 0 1 98 171 166 171
n64= drawline @Search 0 1 98 171 98 189
n65= drawline @Search 1 1 98 189 166 189
n66= drawline @Search 14 1 98 188 166 188
n67= drawline @Search 1 1 166 189 166 171
n68= drawline @Search 14 1 165 189 165 171
n69= drawtext -co @Search 1 Arial 14 110 173 120 100 Results
n70= drawline @Search 1 1 200 130 70 130
n71= drawline @Search 1 1 70 130 70 148
n72= drawline @Search 0 1 70 148 200 148
n73= drawline @Search 0 1 200 148 200 130
n74=}
n75=
n76=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=Mouse Events=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
n77=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
n78=
n79=menu @Search {
n80= sclick:{
n81= if (($mouse.x isnum 14-90) && ($mouse.y isnum 29-60)) {
n82= if (%ConsearchTab = 1) { halt }
n83= set %ConSearchTab 1
n84= drawrect -f @Search 15 1 19 65 370 100
n85= drawline @Search 1 1 90 29 90 60
n86= drawline @Search 15 1 90 60 14 60
n87= drawline @Search 0 1 410 60 90 60
n88= drawline @Search 1 1 166 29 166 60
n89= drawtext -o @Search 1 Arial 14 30 92 Name:
n90= drawrect -f @search 0 1 70 92 130 18
n91= drawline @Search 14 1 200 93 70 93
n92= drawline @Search 1 1 200 92 70 92
n93= drawline @Search 14 1 71 92 71 110
n94= drawline @Search 1 1 70 92 70 110
n95= drawline @Search 0 1 70 110 200 110
n96= drawline @search 15 1 72 109 199 109
n97= drawline @Search 0 1 200 110 200 92
n98= drawline @search 15 1 199 109 199 93
n99= if (%ConSearchNick) drawtext -co @Search 1 Arial 14 75 92 120 100 %ConSearchNick
n100= drawline @Search 1 1 200 130 70 130
n101= drawline @Search 1 1 70 130 70 148
n102= drawline @Search 0 1 70 148 200 148
n103= drawline @Search 0 1 200 148 200 130
n104= if (%ConSearchProgress == 0) { halt }
n105= if (%ConSearchProgress == 31.5) { drawrect -f @Search 12 1 72 132 31.5 13 | halt }
n106= if (%ConSearchProgress == 63) { drawrect -f @Search 12 1 72 132 63 13 | halt }
n107= if (%ConSearchProgress == 94.5) { drawrect -f @Search 12 1 72 132 94.5 13 | halt }
n108= if (%ConSearchProgress == 126) { drawrect -f @Search 4 1 72 132 126 13 | halt }
n109= }
n110= if (($mouse.x isnum 90-166) && ($mouse.y isnum 29-60)) {
n111= if (%ConsearchTab = 2) { halt }
n112= set %ConSearchTab 2
n113= drawrect -f @Search 15 1 19 65 370 100
n114= drawline @Search 15 1 90 60 166 60
n115= drawline @Search 0 1 90 60 14 60
n116= drawline @Search 0 1 166 60 410 60
n117= drawline @Search 0 1 90 29 90 60
n118= drawline @Search 1 1 166 29 166 60
n119= drawpic -cs @Search 19 65 350 100 $scriptdircyberclan.bmp
n120= drawline @Search 12 1 19 65 368 65
n121= drawline @Search 12 1 368 65 368 165
n122= drawline @Search 12 1 368 165 19 165
n123= drawline @Search 12 1 19 165 19 65
n124= }
n125= if (($mouse.x isnum 166-242) && ($mouse.y isnum 29-60)) {
n126= if (%ConsearchTab = 3) { halt }
n127= set %ConSearchTab 3
n128= drawrect -f @Search 15 1 19 65 370 100
n129= drawpic -cs @Search 23 72 170 90 $scriptdirjas.bmp
n130= drawline @Search 0 1 14 60 166 60
n131= drawline @Search 15 1 242 60 166 60
n132= drawline @Search 1 1 90 29 90 60
n133= drawline @Search 0 1 166 29 166 60
n134= drawline @Search 1 1 23 70 194 70
n135= drawline @Search 1 1 194 70 194 163
n136= drawline @Search 1 1 194 163 23 163
n137= drawline @Search 1 1 23 163 23 70
n138= drawline @Search 0 1 22 69 195 69
n139= drawline @Search 0 1 195 69 195 164
n140= drawline @Search 0 1 195 164 22 164
n141= drawline @Search 0 1 22 164 22 69
n142= drawline @Search 0 1 24 72 193 72
n143= drawline @Search 0 1 193 72 193 161
n144= drawline @Search 0 1 193 161 24 161
n145= drawline @Search 0 1 24 161 24 72
n146= drawtext -co @Search 1 Arial 14 198 70 200 100 Confused IRC Search by EvilJason
n147= drawtext -co @Search 1 Arial 14 198 90 200 100 E-Mail: CoNfUsEd@CyberClan.com
n148= drawtext -co @Search 1 Arial 14 198 110 200 100 WebSite: www.CyberClan.com
n149= drawtext -co @Search 1 Arial 14 198 130 200 100 Build 0.0.1
n150= }
n151= if ((($mouse.x isnum 70-200) && ($mouse.y isnum 92-110) && (%ConSearchTab = 1))) {
n152= drawrect -f @Search 0 1 73 94 124 14
n153= unset %ConSearchNick
n154= Set %ConSearchNick $$?="Please type in Nickname with wildcards"
n155= drawtext -co @Search 1 Arial 14 75 92 120 100 $!
n156= }
n157= if (($mouse.x isnum 320-388) && ($mouse.y isnum 171-189)) {
n158= drawline @Search 1 1 320 171 388 171
n159= drawline @Search 1 1 320 171 320 189
n160= drawline @Search 0 1 320 189 388 189
n161= drawline @Search 0 1 388 189 388 171
n162= drawline @Search 0 1 320 171 388 171
n163= drawline @Search 0 1 320 171 320 189
n164= drawline @Search 1 1 320 189 388 189
n165= drawline @Search 1 1 388 189 388 171
n166= sockclose Efnet
n167= sockclose Dalnet
n168= sockclose Undernet
n169= sockclose Newnet
n170= window -c @Search
n171= }
n172= if (($mouse.x isnum 20-88) && ($mouse.y isnum 171-189)) {
n173= unset %ConSearchDalnet %ConSearchEfnet %ConSearchUndernet %ConSearchNewnet
n174= .remove $scriptdirResults.txt
n175= write $scriptdirResults.txt -
n176= sockclose Dalnet
n177= sockclose Efnet
n178= sockclose Undernet
n179= sockclose Newnet
n180= drawline @Search 1 1 20 171 88 171
n181= drawline @Search 1 1 20 171 20 189
n182= drawline @Search 0 1 20 189 88 189
n183= drawline @Search 0 1 88 189 88 171
n184= drawline @Search 0 1 20 171 88 171
n185= drawline @Search 0 1 20 171 20 189
n186= drawline @Search 1 1 20 189 88 189
n187= drawline @Search 1 1 88 189 88 171
n188= set %ConSearchProgress 0
n189= if (%ConSearchTab = 1) { drawrect -f @Search 15 1 72 132 126 13 }
n190= if (%ConSearchNick) sockopen Efnet irc.ais.net 6667 | sockopen Dalnet irc.Dal.net 7000 | sockopen Undernet us.undernet.org 6667 | sockopen Newnet irc.newnet.net 6667
n191= }
n192= if (($mouse.x isnum 98-166) && ($mouse.y isnum 171-189)) {
n193= drawline @Search 1 1 98 171 166 171
n194= drawline @Search 1 1 98 171 98 189
n195= drawline @Search 0 1 98 189 166 189
n196= drawline @Search 0 1 166 189 166 171
n197= drawline @Search 0 1 98 171 166 171
n198= drawline @Search 0 1 98 171 98 189
n199= drawline @Search 1 1 98 189 166 189
n200= drawline @Search 1 1 166 189 166 171
n201= results
n202= }
n203= }
n204=}
n205=
n206=on 1:close:@Search:{
n207= set %ConSearchWindowPosition $window(@Search).x $window(@Search).y $window(@Search).w $window(@Search).h
n208= sockclose Dalnet
n209= sockclose Efnet
n210= sockclose Undernet
n211= sockclose Newnet
n212=}
n213=
n214=on 1:load:{
n215= echo -a *** You have loaded Confused IRC Search
n216= echo -a *** Please type: /search to begin
n217=}
n218=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-Raw Sockets=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
n219=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
n220=
n221=on 1:sockopen:Efnet:{
n222= if ($sockerr > 1) {
n223= set %ConSearchEfnet Done
n224= sockclose Efnet
n225= write $scriptdirResults.txt *** ERROR: there was an error connecting to Efnet
n226= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n227= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n228= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n229= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n230= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n231= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n232= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n233= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n234= }
n235= sockwrite -tn $sockname NICK $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100)
n236= sockwrite -tn $sockname USER consearch m m: :Confused IRC Search!
n237=}
n238=
n239=on 1:sockopen:Undernet:{
n240= if ($sockerr > 1) {
n241= set %ConSearchUndernet Done
n242= sockclose Undernet
n243= write $scriptdirResults.txt *** ERROR: there was an error connecting to Undernet
n244= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n245= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n246= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n247= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n248= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n249= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n250= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n251= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n252= }
n253= sockwrite -tn $sockname NICK $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100)
n254= sockwrite -tn $sockname USER consearch m m: :Confused IRC Search!
n255=}
n256=
n257=on 1:sockopen:Dalnet:{
n258= if ($sockerr > 1) {
n259= set %ConSearchDalnet Done
n260= sockclose Dalnet
n261= write $scriptdirResults.txt *** ERROR: there was an error connecting to Dalnet
n262= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n263= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n264= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n265= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n266= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n267= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n268= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n269= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n270= }
n271= sockwrite -tn $sockname NICK $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100)
n272= sockwrite -tn $sockname USER consearch m m: :Confused IRC Search!
n273=}
n274=
n275=on 1:sockopen:Newnet:{
n276= if ($sockerr > 1) {
n277= set %ConSearchNewnet Done
n278= sockclose Newnet
n279= write $scriptdirResults.txt *** ERROR: there was an error connecting to Newnet
n280= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n281= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n282= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n283= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n284= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n285= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n286= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n287= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n288= }
n289= sockwrite -tn $sockname NICK $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100)
n290= sockwrite -tn $sockname USER consearch m m: :Confused IRC Search!
n291=}
n292=
n293=on 1:sockread:Efnet:if ($sockerr > 0) return | :nextread | sockread %temp | if ($sockbr == 0) return | if (%temp == $null) %temp = - | ConSearchFilter Efnet %temp | goto nextread
n294=on 1:sockread:Undernet:if ($sockerr > 0) return | :nextread | sockread %temp | if ($sockbr == 0) return | if (%temp == $null) %temp = - | ConSearchFilter undernet %temp | goto nextread
n295=on 1:sockread:Dalnet:if ($sockerr > 0) return | :nextread | sockread %temp | if ($sockbr == 0) return | if (%temp == $null) %temp = - | ConSearchFilter Dalnet %temp | goto nextread
n296=on 1:sockread:Newnet:if ($sockerr > 0) return | :nextread | sockread %temp | if ($sockbr == 0) return | if (%temp == $null) %temp = - | ConSearchFilter Newnet %temp | goto nextread
n297=
n298=on 1:sockclose:Dalnet:{
n299= %ConSearchDalnet = done
n300= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n301= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n302= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n303= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n304= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n305= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n306= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n307= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n308=}
n309=on 1:sockclose:Undernet:{
n310= %ConSearchUndernet = done
n311= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n312= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n313= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n314= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n315= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n316= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n317= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n318= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n319=}
n320=on 1:sockclose:Efnet:{
n321= %ConSearchEfnet = done
n322= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n323= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n324= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n325= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n326= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n327= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n328= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n329= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n330=}
n331=on 1:sockclose:Newnet:{
n332= %ConSearchNewnet = done
n333= if ((%ConSearchProgress == 0) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 31.5 13 | set %ConSearchProgress 31.5 | halt }
n334= if (%ConSearchProgress == 0) { set %ConSearchProgress 31.5 | halt }
n335= if ((%ConSearchProgress == 31.5) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 63 13 | set %ConSearchProgress 63 | halt }
n336= if (%ConSearchProgress == 31.5) { set %ConSearchProgress 63 | halt }
n337= if ((%ConSearchProgress == 63) && (%ConSearchTab = 1)) { drawrect -f @Search 12 1 72 132 94.5 13 | set %ConSearchProgress 94.5 | halt }
n338= if (%ConSearchProgress == 63) { set %ConSearchProgress 94.5 | halt }
n339= if ((%ConSearchProgress == 94.5) && (%ConSearchTab = 1)) { drawrect -f @Search 4 1 72 132 126 13 | set %ConSearchProgress 126 | halt }
n340= if (%ConSearchProgress == 94.5) { set %ConSearchProgress 126 | halt }
n341=}
n342=
n343=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-Aliases=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
n344=;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
n345=
n346=alias Results {
n347= set %ConSearchResults 1
n348= window -d @Results
n349= :Start
n350= if (%ConSearchResults = $lines($scriptdirResults.txt)) { aline @Results $read -l $+ %ConSearchResults $scriptdirResults.txt | unset %ConsearchResults | halt }
n351= aline @Results $read -l $+ %ConSearchResults $scriptdirResults.txt
n352= inc %ConSearchResults
n353= goto start
n354=}
n355=
n356=Alias ConSearchFilter {
n357= if ($3 == 376) { sockwrite -tn $1 who %ConSearchNick }
n358= if ($3 == 422) { sockwrite -tn $1 who %ConSearchNick }
n359= if ($3 == 315) {
n360= set %ConSearch $+ $1 Done
n361= sockwrite -tn $1 quit Buh-bye
n362= }
n363= if ($2 == PING) { sockwrite -tn $1 PONG $remove($remove($3,:),M) | halt }
n364= if ($3 == 433) { sockwrite -tn $1 NICK $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) $+ $rand(a,z) $+ $rand(1,100) | halt }
n365= if ($3 == 352) {
n366= write $scriptdirResults.txt -
n367= write $scriptdirResults.txt Nick: $9 ( $+ $6 $+ @ $+ $7 $+ )
n368= write $scriptdirResults.txt Name: $12-
n369= write $scriptdirResults.txt Server: $8
n370= if ($5 = *) { halt }
n371= write $scriptdirResults.txt Channel: $5
n372= halt
n373= }
n374=}