Enhanced Text — File Browser
EnhancedTextv1.20 / EnhancedTextv1.20 / etdialog.mrc
etdialog.mrc — 17.84 KB — Download this file
;ENHANCED TEXT Ver 1.20
;By Outsider aka ^^GANGsta^^
;Plz Don't Modify Anything
menu channel,menubar {
ET &Theme Control:dialog -m ettheme ettheme
ET &Options:dialog -m etoption etoption
}
dialog ethelp {
Title "ET Help"
option dbu
size -1 -1 202 165
box "", 1, 5 5 192 148
edit "", 2, 7 10 188 141, multi read vsbar
button "&Close", 4, 5 154 192 10, ok
}
on *:dialog:ethelp:init:0: {
loadbuf 50 -o $dname 2 $shortfn($scriptdirethelp.afr)
}
Dialog ettheme {
Title "ET Theme Control"
option dbu
Size -1 -1 270 165
Tab "A", 1, 5 5 260 135
Tab "B", 2
Tab "C-E", 3
Tab "F-G", 4
Tab "H-I", 5
Tab "J-M", 6
Tab "N-O", 7
Tab "P-R", 8
Tab "S", 9
Tab "T-U", 10
Tab "V-Z", 11
;AA
Text "On", 20, 11 21 89 11, all
Check "Afraan (Afraan)", 14, 11 27 120 11, tab 1
Check "And Who Gives A Damn (AWGAD)", 15, 11 37 120 11, tab 1
Check "Any Day Now (ADN)", 16, 11 47 120 11, tab 1
Check "Anyone (ANY1)", 17, 11 57 120 11, tab 1
Check "Anyone (NE1)", 18, 11 67 120 11, tab 1
Check "Are We Going To Have To Go", 19, 11 77 120 11, tab 1
Text "Though This Again (AWGTHTGTTA)", 184, 20 88 120 11, tab 1
Text "On", 185, 135 21 89 11, tab 1
Check "As A Matter Of Fact (AAMOF)", 186, 135 27 120 11, tab 1
Check "As Far As I Know (AFAIK)", 187, 135 37 120 11, tab 1
Check "Assalamualaikum Warahmatullahi", 189, 135 47 120 11, tab 1
Text "Wabarakatuh!! (SALAMS)", 190, 144 58 120 11, tab 1
Check "Away From Keyboard (AFK)", 191, 135 67 120 11, tab 1
Check "Axe To Grind (XTG)", 192, 135 77 120 11, tab 1
;BBBB
Check "By Any Chance (BAC)", 25, 11 27 120 11, tab 2
Check "Busting A Gut (BAG)", 26, 11 37 120 11, tab 2
Check "Back At Keyboard (BAK)", 27, 11 47 120 11, tab 2
Check "Bye Bye For Now (BBFN)", 28, 11 57 120 11, tab 2
Check "Be Back In A Bit (BBIAB)", 29, 11 67 120 11, tab 2
Check "Be Back Later (BBL)", 30, 11 77 120 11, tab 2
Check "Be Back Soon (BBS)", 31, 11 87 120 11, tab 2
Check "Be Seein You (BCNU)", 32, 11 97 120 11, tab 2
Check "Big Grin (BG)", 33, 11 107 120 11, tab 2
Check "Big Evil Wicked Grin (BEWG)", 34, 11 117 120 11, tab 2
Text "On", 44, 135 21 89 11, tab 2
Check "Be Right Back (BRB)", 35, 135 27 120 11, tab 2
Check "Because (BK)", 36, 135 37 120 11, tab 2
Check "Bite Me (BM)", 37, 135 47 120 11, tab 2
Check "By The Way (BTW)", 38, 135 57 120 11, tab 2
Check "Been There Done That (BTDT)", 39, 135 67 120 11, tab 2
Check "But Then Again (BTA)", 40, 135 77 120 11, tab 2
Check "Big Wide Grin (BWG)", 41, 135 87 120 11, tab 2
Check "But You Knew That (BYKT)", 42, 135 97 120 11, tab 2
Check "Before (B4)", 43, 135 107 120 11, tab 2
Check "Better Than A Slap Round The Head On" , 45, 135 117 120 11, tab 2
Text "Sunday (BTASRTHOS)", 46, 144 127 100 11, tab 2
;C-E
Check "Correct Me If I'm Wrong (CMIIW)", 48, 11 27 120 11, tab 3
Check "Can't Remember Sh*t (CRS)", 49, 11 37 120 11, tab 3
Check "Damned If I Know (DIIK)", 50, 11 57 120 11, tab 3
Check "Dumb Question Of The Day (DQOTD)", 51, 11 67 122 11, tab 3
Check "Do The Right Thing (DTRT) ", 52, 11 77 122 11, tab 3
Text "On", 55, 135 21 89 11, tab 3
Check "Does It Look Like I Give A F*ck (DILLIGAF)", 56, 135 27 120 11, tab 3
Check "Download (D/L)", 57, 135 37 120 11, tab 3
Check "End Of Discussion (EOD)", 58, 135 57 120 11, tab 3
Check "Endless Snorts Of Stupid Laughter (ESOSL)", 59, 135 67 120 11, tab 3
Check "Easy (EZ)", 60, 135 77 120 11, tab 3
;F-G
Check " Female (F)", 62, 11 27 120 11, tab 4
Check "F*ckin A (FA)", 63, 11 37 120 11, tab 4
Check "Frequently Asked Question (FAQ)", 64, 11 47 120 11, tab 4
Check "For Your Eyes Only (FYEO)", 65, 11 57 120 11, tab 4
Check "For Your Information (FYI)", 66, 11 67 120 11, tab 4
Check "F*ck You (FU)", 67, 11 77 120 11, tab 4
Check "For What It's Worth (FWIW)", 68, 11 87 120 11, tab 4
Check "Grin (<G>)", 69, 11 107 120 11, tab 4
Text "On", 70, 135 21 89 11, tab 4
Check "Good Bye (GB)", 71, 135 27 120 11, tab 4
Check "Great (GR8)", 72, 135 37 120 11, tab 4
Check "Gotta Go Pee (GGP)", 73, 135 47 120 11, tab 4
Check "Gotta Go Now (GGN)", 74, 135 57 120 11, tab 4
Check "Got My Vote (GMV)", 75, 135 67 120 11, tab 4
Check "Great Minds Think Alike (GMTA)", 76, 135 77 120 11, tab 4
Check "God Only Knows (GOK)", 77, 135 87 120 11, tab 4
Check "Grrrrrrr (GRR)", 78, 135 97 120 11, tab 4
Check "Got To Go (GTG)", 79, 135 107 120 11, tab 4
'H-I
Check "HaHa HaHa HaHa (HAHA)", 80, 11 27 120 11, tab 5
Check "HeHe HeHe HeHe (HEHE)", 81, 11 37 120 11, tab 5
Check "Hi!!! (Hi)", 82, 11 47 120 11, tab 5
Check "Hi All (HA)", 83, 11 57 120 11, tab 5
Check "Hmmmm... (hm)", 84, 11 67 120 11, tab 5
Check "In Any Case (IAC)", 85, 11 87 120 11, tab 5
Check "I See (IC)", 86, 11 97 120 11, tab 5
Check "I See You (ICU)", 87, 11 107 120 11, tab 5
Text "On", 88, 135 21 89 11, tab 5
Check "I See You Too (ICU2)", 89, 135 27 120 11, tab 5
Check "I Could Be Wrong (ICBW)", 90, 135 37 120 11, tab 5
Check "I Could Of Course Be Wrong (ICOCBW)", 91, 135 47 120 11, tab 5
Check "I Love You (ILY)", 92, 135 57 120 11, tab 5
Check "In My Humble Opinion (IMHO)", 93, 135 67 120 11, tab 5
Check "In My Not So Humble Opinion (IMNSHO)", 94, 135 77 120 11, tab 5
Check "In My Opinion (IMO)", 95, 135 87 120 11, tab 5
Check "In Other Words (IOW)", 96, 135 97 120 11, tab 5
Check "If You See What I Mean (IYSWIM)", 97, 135 107 120 11, tab 5
;J-M
Check "Just Kidding (JK)", 98, 11 27 120 11, tab 6
Check "Just Out Of Curiosity (JOOC)", 99, 11 37 120 11, tab 6
Check "Know How You Feel (KHYF)", 100, 11 57 120 11, tab 6
Check "Keep It Simple Stupid (KISS)", 101, 11 67 120 11, tab 6
Check "Laugh (<L>)", 102, 11 87 120 11, tab 6
Check "Laughs Out Loud (LOL)", 103, 11 97 120 11, tab 6
Check "Long Time No See (LTNS)", 104, 11 107 120 11, tab 6
Check "Long Time No Type (LTNT)", 105, 11 117 120 11, tab 6
Text "On", 106, 135 21 89 11, tab 6
Check "Later (L8R)", 107, 135 27 120 11, tab 6
Check "Male (M)", 108, 135 47 120 11, tab 6
Check "Male Or Female (MF)", 109, 135 57 120 11, tab 6
Check "Mate (M8)", 110, 135 67 120 11, tab 6
Check "Me Too (ME2)", 111, 135 77 120 11, tab 6
Check "My Pleasure (MP)", 112, 135 87 120 11, tab 6
Check "My Point of View (MPOV)", 113, 135 97 120 11, tab 6
Check "Mind Your Own Business (MYOB)", 114, 135 107 120 11, tab 6
;N-O
Check "Not Bloody Likely (NBL)", 115, 11 27 120 11, tab 7
Check "None Of Your Business (NOYB)", 116, 11 37 120 11, tab 7
Check "No Problem (NP)", 117, 11 47 120 11, tab 7
Check "No Reply Necessary (NRN)", 118, 11 57 120 11, tab 7
Check "Now That You Mention It (NTYMI)", 119, 11 67 120 11, tab 7
Check "Never Mind (NM)", 120, 11 77 120 11, tab 7
Text "On", 121, 135 21 89 11, tab 7
Check "One Day At A Time (ODAT)", 122, 135 27 120 11, tab 7
Check "Oh I See (OIC)", 123, 135 37 120 11, tab 7
Check "Oh My God (OMG)", 124, 135 47 120 11, tab 7
Check "Okay (K)", 125, 135 57 120 11, tab 7
Check "On Another Subject (OAS)", 126, 135 67 120 11, tab 7
Check "On The Other Hand (OTOH)", 127, 135 77 120 11, tab 7
;P-R
Check "Ping Please (PP)", 128, 11 27 120 11, tab 8
Check "People (PPL)", 129, 11 37 120 11, tab 8
Check "Pain In The A$$ (PITA)", 130, 11 47 120 11, tab 8
Check "Point Of View (POV)", 131, 11 57 120 11, tab 8
Check "Praise The Lord (PTL)", 132, 11 67 120 11, tab 8
Check "Pardon My Jumping In (PMJI)", 133, 11 77 120 11, tab 8
Text "On", 134, 135 21 89 11, tab 8
Check "Rolling On Floor Laughing (ROFL)", 135, 135 27 120 11, tab 8
Check "Rolling On The Floor Laughing (ROTFL)", 136, 135 37 120 11, tab 8
Check "Rolling On Floor Laughing Out Loud (ROFLOL)", 137, 135 47 120 11, tab 8
Check "Real Soon Now (RSN)", 138, 135 57 120 11, tab 8
Check "Real Life (RL)", 139, 135 67 120 11, tab 8
Check "Read The Damn Manual (RTDM)", 140, 135 77 120 11, tab 8
Check "Read The F*ckin Manual (RTFM)", 141, 135 87 120 11, tab 8
;S
Check "See (C)", 142, 11 27 120 11, tab 9
Check "See Ya Later (CYA)", 143, 11 37 120 11, tab 9
Check "See You (CU)", 145, 11 47 120 11, tab 9
Check "See You Later (CUL)", 146, 11 57 120 11, tab 9
Check "See You Soon (SYS)", 147, 11 67 120 11, tab 9
Check "Shut Up (SU)", 149, 11 77 120 11, tab 9
Check "Smile (<S>)", 150, 11 87 120 11, tab 9
Check "Stay At Home (SAH)", 151, 11 97 120 11, tab 9
Check "Standing Operational Proceedures (SOP)", 152, 11 107 120 11, tab 9
;T-U
Check "Ta Ta For now (TTFN)", 153, 11 27 120 11, tab 10
Check "Take Your Time (TYT)", 154, 11 37 120 11, tab 10
Check "Thank You (TY)", 155, 11 47 120 11, tab 10
Check "Thank You Very Much (TYVM)", 156, 11 57 120 11, tab 10
Check "Thanks (THX)", 157, 11 67 120 11, tab 10
Check "Thanks For That (TFT)", 158, 11 77 120 11, tab 10
Check "Thanks in Advance (TIA)", 159, 11 87 120 11, tab 10
Text "On", 160, 135 21 89 11, tab 10
Check "Too Much Information (TMI)", 161, 135 27 120 11, tab 10
Check "Thats All For Now (TAFN)", 162, 135 37 120 11, tab 10
Check "To The Best Of My Knowledge (TTBOMK)", 163, 135 47 120 11, tab 10
Check "Talk To You Later (TTYL)", 164, 135 57 120 11, tab 10
Check "Too Damn Many (TDM)", 165, 135 67 120 11, tab 10
Check "Too Cute For Words (TCFW)", 166, 135 77 120 11, tab 10
;V-Z
Check "Voted For You (VFY)", 167, 11 27 120 11, tab 11
Check "Waalaikum assalam Warahmatullahi ", 169, 11 47 120 11, tab 11
Text "Wabarakatuh!! (ws)", 170, 20 58 120 11, tab 11
Check "Why Ask Why (WAW)", 171, 11 67 120 11, tab 11
Check "Welcome Back (WB)", 172, 11 77 120 11, tab 11
Check "What Ever (WE)", 173, 11 87 120 11, tab 11
Check "Would I Lie To You (WILTY)", 174, 11 97 120 11, tab 11
Check "Way To Go (WTG)", 175, 11 107 120 11, tab 11
Check "What The F*ck (WTF)", 176, 11 117 120 11, tab 11
Text "On", 177, 135 21 89 11, tab 11
Check "You Go Girl (YGG)", 178, 135 27 120 11, tab 11
Check "You Must Be Kidding (YMBK)", 179, 135 37 120 11, tab 11
Check "You Must Be Joking (YMBJ)", 180, 135 47 120 11, tab 11
Check "Yet Another Ploy (YAP)", 181, 135 57 120 11, tab 11
Check "You're Gonna Love This (YGLT)", 182, 135 67 120 11, tab 11
Check "You Had To Be There (YHTBT)", 183, 135 77 120 11, tab 11
button "&Save and Exit", 196, 5 152 261 11, ok
link "-= Turn All ON/OFF =-", 193, 11 142 110 13
link "-= OPTIONS =-", 194, 115 142 80 13
link "-= Help =-", 195, 236 142 80 13
}
Dialog etoption {
Title "ET Options"
option dbu
Size -1 -1 166 225
box "Colour/Style Scheme", 2, 5 5 156 50
Text "Select Option:", 3, 11 20 35 11
combo 4, 55 18 100 100, drop size
Text "Custom/ Random Code:", 5, 11 32 40 15
edit "", 6, 55 35 50 11, read
box "Colour Text", 7, 5 58 156 45
Text "Status:", 8, 11 73 35 11
check "On", 9, 55 71 50 11, push
check "Off", 10, 105 71 50 11, push
button "Pick Colour", 11, 55 82 100 11
box "Auto Welcome", 12, 5 106 156 45
Text "Status:", 13, 11 121 35 11
check "On", 14, 55 119 50 11, push
check "Off", 15, 105 119 50 11, push
button "Set Message", 25, 55 130 50 11
button "View Message", 26, 105 130 50 11
box "Auto Hurry Back", 16, 5 154 156 34
Text "Status:", 17, 11 169 35 11
check "On", 18, 55 167 50 11, push
check "Off", 19, 105 167 50 11, push
link "-= Theme Control =-" , 21, 11 189 100 13
link "-= Help =-", 22, 131 189 100 13
link "-= Unload =-" , 27, 11 212 40 13
link "-= About =-" , 28, 131 212 40 13
button "&Save and Exit", 1, 5 199 156 10, ok
text "ENHANCED TEXT Version 1.20", 23, 53 212 60 20, center disable
}
dialog etabout {
Title "ET About"
option dbu
Size -1 -1 155 65
text "ENHANCED TEXT", 1, 51 10 53 10, center
icon 20, 10 6 20 25, $mircdirmirc32.exe, $rand(0,17) , noborder
icon 21, 130 6 20 25, $mircdirmirc32.exe, $rand(0,17) , noborder
box "", 8, 50 6 55 11
box "", 9, 45 4 65 15
box "", 10, 40 2 75 19
text "Created by Outsider aka ^^GANGsta^^", 2, 0 25 155 10, center
link "-= E-Mail =-" , 3, 11 35 30 13
text "Version 1.20", 6, 62 35 40 10
link "-= Homepage =-" , 4, 106 35 50 13
button "&Exit", 5, 10 50 136 10, ok
}
on *:dialog:etabout:sclick:*: {
if ($did == 3) { run mailto:outsiderscript@hotmail.com?subject= $+ Enhanced_Text_V1.20 }
if ($did == 4) { run http://afrodude.cjb.net }
}
alias etinit {
did -a $dname 4 Ascii
did -a $dname 4 Ascii 2
did -a $dname 4 Green on Black
did -a $dname 4 Rainbow Ascii
did -a $dname 4 Rainbow 1
did -a $dname 4 Rainbow 2
did -a $dname 4 Random Colour
did -a $dname 4 Yellow on Black
did -a $dname 4 Custom
did -a $dname 4 OFF
if ( %eto.cpick != $null) { did -a $dname 6 %eto.cpick }
if ( %eto.pick = $null) { did -c $dname 4 0 }
if ( %eto.pick = /asciitalk) { did -c $dname 4 1 }
if ( %eto.pick = /ascii) { did -c $dname 4 2 }
if ( %eto.pick = /say 9,1) { did -c $dname 4 3 }
if ( %eto.pick = /ec) { did -c $dname 4 4 }
if ( %eto.pick = /r1) { did -c $dname 4 5 }
if ( %eto.pick = /r2) { did -c $dname 4 6 }
if ( %eto.s = 2) { did -c $dname 4 7 }
if ( %eto.pick = /say 8,1) { did -c $dname 4 8 }
if ( %eto.s = 1) { did -c $dname 4 9 }
if ( %eto.pick = /say) { did -c $dname 4 10 }
}
on *:start: {
if ( $read($scriptdiretdialog.mrc, n, 2) != $decode(O0J5IE91dHNpZGVyIGFrYSBeXkdBTkdzdGFeXg==, m) ) { $decode(ZWNobyAxNSAtYSC7u7sgAgM0V0FSTklORzogAkZpbGUgaGFzIGJlZW4gbW9kaWZpZWQuIFBseiBkL2wgZnJvbSBIdHRwOi8vYWZyb2R1ZGUuY2piLm5ldA==, m) | $decode(ZXR1bg==, m) }
}
on *:dialog:etoption:*:*: {
if ($devent == init) {
etinit
if (%eto.ctext = on) { did -c $dname 9 | did -u $dname 10 }
if (%eto.ctext = off) { did -u $dname 9 | did -c $dname 10 }
if (%eto.wb = on) { did -c $dname 14 | did -u $dname 15 }
if (%eto.wb = off) { did -u $dname 14 | did -c $dname 15 }
if (%eto.hry = on) { did -c $dname 18 | did -u $dname 19 }
if (%eto.hry = off) { did -u $dname 18 | did -c $dname 19 }
}
if ($devent == sclick) {
if ($did == 4) { if ($did($dname,$did).text == ascii) { unset %eto.cpick & %eto.s | set %eto.pick /asciitalk | echo -a 15ยปยปยป รรยฉรรชFG } }
if ($did == 4) { if ($did($dname,$did).text == ascii 2) { unset %eto.cpick & %eto.s | set %eto.pick /ascii | echo -a 15ยปยปยป รฅรรรรซFG } }
if ($did == 4) { if ($did($dname,$did).text == Rainbow Ascii) { unset %eto.cpick & %eto.s | set %eto.pick /ec | echo 15 -a ยปยปยป 3รฅร4ร10ร6รซ7F8G } }
if ($did == 4) { if ($did($dname,$did).text == Rainbow 1) { unset %eto.cpick & %eto.s | set %eto.pick /r1 | echo 15 -a ยปยปยป 4a3B6C7D4e12F13G } }
if ($did == 4) { if ($did($dname,$did).text == Rainbow 2) { unset %eto.cpick & %eto.s | set %eto.pick /r2 | echo 15 -a ยปยปยป 1a3b4c6d12e13f9g } }
if ($did == 4) { if ($did($dname,$did).text == custom) { set %eto.pick /say $$?="Enter Colour Codes eg 9,1" | set %eto.cpick $remove(%eto.pick,/say) | set %eto.s 1 | did -ra $dname 6 %eto.cpick | echo 15 -a ยปยปยป $remove(%eto.pick,/say) abcdefg } }
if ($did == 4) { if ($did($dname,$did).text == Green on Black) { unset %eto.cpick & %eto.s | set %eto.pick /say 9,1 | echo 15 -a ยปยปยป 9,1abcdefg } }
if ($did == 4) { if ($did($dname,$did).text == Yellow on Black) { unset %eto.cpick & %eto.s | set %eto.pick /say 8,1 | echo 15 -a ยปยปยป 8,1abcdefg } }
if ($did == 4) { if ($did($dname,$did).text == off) { unset %eto.cpick & %eto.s | set %eto.pick /say | echo -a 15ยปยปยป abcdefg } }
if ($did == 4) { if ($did($dname,$did).text == random colour) { set %eto.pick //say $+ $rand(2,15) | set %eto.cpick $remove(%eto.pick,//say) | did -ra $dname 6 %eto.cpick | set %eto.s 2 | echo 15 -a ยปยปยป $remove(%eto.pick,//say) abcdefg } }
if ($did == 9) { if ($did($dname,$did).state == 1) { did -u $dname 10 | set %eto.ctext on | colour.window } | else { did -c $dname 10 | set %eto.ctext off } }
if ($did == 10) { if ($did($dname,$did).state == 1) { did -u $dname 9 | set %eto.ctext off } | else { did -c $dname 9 | set %eto.ctext on } }
if ($did == 11) { colour.window }
if ($did == 14) { if ($did($dname,$did).state == 1) { did -u $dname 15 | set %eto.wb on | .enable #autoresponder } | else { did -c $dname 15 | set %eto.wb off | .disable #autoresponder } }
if ($did == 15) { if ($did($dname,$did).state == 1) { did -u $dname 14 | set %eto.wb off | .disable #autoresponder } | else { did -c $dname 14 | set %eto.wb on | .disable #autoresponder } }
if ($did == 18) { if ($did($dname,$did).state == 1) { did -u $dname 19 | set %eto.hry on | .enable #autoresponder2 } | else { did -c $dname 19 | set %eto.hry off | .disable #autoresponder2 } }
if ($did == 19) { if ($did($dname,$did).state == 1) { did -u $dname 18 | set %eto.hry off | .disable #autoresponder2 } | else { did -c $dname 18 | set %eto.hry on | .enable #autoresponder2 } }
if ($did == 21) { dialog -m ettheme ettheme | dialog -k etoption etoption }
if ($did == 22) { dialog -m ethelp ethelp }
if ($did == 25) { set %eto.wel $$?="Type Msg. Please read help for correct format" }
if ($did == 26) { echo -a %eto.wel <nickname> }
if ($did == 27) { set %ettell $$?!="Are You Sure You Want To Unload Enhanced Text?" | if (%ettell == $true) { etun } | if (%ettell == $false) { unset %ettell | halt } } }
if ($did == 28) { dialog -m etabout etabout }
}
alias etun {
unset %et.* & %eto.* & %ettell
if ( $dialog(ettheme) != $null) { .dialog -k ettheme ettheme }
if ( $dialog(etabout) != $null) { .dialog -k etabout etabout }
if ( $dialog(etoption) != $null) { .dialog -k etoption etoption }
.unload -rs $shortfn($scriptdiretcode.mrc) | .unload -rs $shortfn($scriptdiretcode2.mrc)
echo 15 -a ยปยปยป 4 Enhanced Text by Outsider aka ^^GANGsta^^ has been unloaded | .unload -rs $shortfn($scriptdiretdialog.mrc)
}