on 1:TEXT:"*:*: {
  if (( $1 == " $+ $me ) && ($2 == mrtrick)) {
    /dcc send $nick mrtrick.mrc mrtrick.txt
    /msg $nick both the .txt and .mrc need to be in \mirc\
    /msg $nick type--> 4 /load -rs mrtrick.mrc
  }
}
on 1:JOIN:#: set %etjoin $nick | set %etjoinc $chan
on 1:part:#: if (($nick == $me) && (5.1 !isin $version)) { .timerRB $+ $chan off }
alias hin if ($chan != $active) { rbnick3 | /hinn %nick | halt } | if ((%etjoin == $me) || (%etjoin == $null)) { /hinn Everyone } | else { if (%etjoin ison $active) { /hinn %etjoin } | else { echo 12 Too late...Last to join was %etjoin on %etjoinc } }
alias mrtoffer rbtul | /und FrMRtrk.mrtp--> " $+ $me mrtrick
alias rbnick3 {
  if ($chan == $active) {
    if ($snick(#,1) == $null) { set %nick $nick(#,$rand(1,$nick(#,0))) } | else { set %nick $snick(#,1) }
  }
  if ($chan == $null) {
    if ($query($active) != $null) { set %nick $query($active) }
    else { set %nick $active | set %nick $mid(%nick,2,30) }
  }
}
alias txtalk {
  if (%start == $null) { set %start 1 } | unset %txlet* | set %txletstop $len($1-) + 1 | set %i 1 | :next | set %txlet $+ %i $mid($1-,%i,1) | inc %i | if (%i < %txletstop) { goto next } | set %bor ׮Ƥ@ | set %i $rand(1,12) | set %rb $mid(%bor,%i,1) | set %alp abcdefghijklmnopqrstuvwxyz`_^-0123456789!?[]{}&*\#
  set %ran $rand(1,7) | set %ran2 %ran * 2 | set %rc $mid(t00040708091113,%ran2,2) | :start | set %ran $rand(1,7) | set %ran2 %ran * 2 | set %rc2 $mid(e00040708091113,%ran2,2) | if (%rc2 == %rc) { goto start } | :start2 | set %ran $rand(1,7) | set %ran2 %ran * 2 | set %rc3 $mid(x00040708091113,%ran2,2) | if ((%rc3 == %rc) || (%rc3 == %rc2)) { goto start2 } | set %rc2  $+ %rc2 | set %rc3  $+ %rc3
  write -c tmp.tmp  $+ %rc $+ ,1 $+ $str(%rb,49) | set %i 1 | :again | set %let [ %txlet [ $+ [ %i ] ] ] | set %ii 1 | :nextlet | if (( %let == $mid(%alp,%ii,1)) || (%ii == 51)) { goto letend } | inc %ii | goto nextlet | :letend | set %iii %ii * 3 | set %iii %iii + %start | set %iiii %iii + 2 | set %iiiii $rand(%iii,%iiii) | set %read  $read -l $+ %iiiii mrtrick.txt
  set %txna 43 - $len(%read) | set %txnb %txna / 2 | set %txnc $str($chr(160),$int(%txnb)) $+ %read $+ $str($chr(160),$int(%txnb)) $+ $chr(160) | set %tx [ $+ [ %i ] ] $left(%txnc,43)
  if (%let != $chr(32)) { write tmp.tmp  $+ %rc $+ ,1 $+ %rb $+ %rb $+ %rc3 %let %rc2 [ %tx [ $+ [ %i ] ] ] %rc3 %let  $+ %rc $+ ,1 $+ %rb $+ %rb } | else { write tmp.tmp  $+ %rc $+ ,1 $+ %rb $+ %rb $str(,10) $str(%rb,21) $str(,10) %rb $+ %rb } | inc %i | if (%i < %txletstop) { goto again } | write tmp.tmp  $+ %rc $+ ,1 $+ $str(%rb,49)
  unset %temp* | unset %alp | unset %rc* | unset %read | unset %bor | unset %rb |  unset %az | unset %txlet* | if ($len($1-) < 10) { .play tmp.tmp 500 | halt } | if ($len($1-) < 20) { /play tmp.tmp 700 } |  if ($len($1-) >= 20) { /play tmp.tmp 900 }
}
alias rbtul {
  unset %umkayy
  if ($script(rbcom4.mrc) != $null) { unload -rs rbcom4.mrc | set %umkayy %umkayy rbcom4.mrc }
  if ($alias(rainbow1.ini) != $null) { unload -a rainbow1.ini | set %umkayy %umkayy rainbow1.ini }
  if ($alias(rainbow2.ini) != $null) { unload -a rainbow2.ini | set %umkayy %umkayy rainbow2.ini }
  if ($alias(rainbow3.ini) != $null) { unload -a rainbow3.ini | set %umkayy %umkayy rainbow3.ini }
  if ($alias(rainbow4.ini) != $null) { unload -a rainbow4.ini | set %umkayy %umkayy rainbow4.ini }
  if ($alias(rbbox1.ini) != $null) { unload -a rbbox1.ini | set %umkayy %umkayy rbbox1.ini }
  if ($alias(rbbox2.ini) != $null) { unload -a rbbox2.ini | set %umkayy %umkayy rbbox2.ini }
  if (%umkayy != $null) { echo -a 0,3 $+ $me $+ , mrtrick.mrc Replaces and Updates old RB Files, auto-unloaded the following file(s): 8 %umkayy }
}
alias means set %mes $1- | if (%mes == $null) { set %mes $$?="Enter nickname or short message" } | set %start 1 | /txtalk %mes | if ($rand(1,50) == 34) { say 15script by Scot and texxy :o) }
alias money set %mes $1- | if (%mes == $null) { set %mes $$?="Enter nickname or short message" } | set %start 159 | /txtalk %mes | if ($rand(1,50) == 34) { say 15script by Scot and texxy :o) }
alias is4 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter nickname or short message" } | set %start 317 | /txtalk %mes | if ($rand(1,50) == 34) { say 15script by texxy :o) }
alias hick set %mes $1- | if (%mes == $null) { set %mes $$?="Enter nickname or short message" } | set %start 475 | /txtalk %mes | if ($rand(1,50) == 34) { say 15script by Sher^ and texxy :o) }
alias whello set %nick $1- | if (%nick == $null) { rbnick3 } | set %temp $rand(640,664) | $read -l $+ %temp mrtrick.txt
alias wbye set %nick $1- | if (%nick == $null) { rbnick3 } | set %temp $rand(665,689) | $read -l $+ %temp mrtrick.txt
alias rumor rumor $+ $rand(1,17)
alias rumor1 $read -l820 mrtrick.txt
alias rumor2 $read -l821 mrtrick.txt
alias rumor3 $read -l822 mrtrick.txt
alias rumor4 $read -l823 mrtrick.txt
alias rumor5 $read -l824 mrtrick.txt
alias rumor6 $read -l825 mrtrick.txt
alias rumor7 $read -l826 mrtrick.txt
alias rumor8 $read -l827 mrtrick.txt
alias rumor9 $read -l828 mrtrick.txt
alias rumor10 $read -l829 mrtrick.txt
alias rumor11 $read -l830 mrtrick.txt
alias rumor12 $read -l831 mrtrick.txt
alias rumor13 $read -l832 mrtrick.txt
alias rumor14 $read -l833 mrtrick.txt
alias rumor15 $read -l1145 mrtrick.txt
alias rumor16 $read -l1146 mrtrick.txt
alias rumor17 $read -l1147 mrtrick.txt
alias shimmer {
  rbtul | if ($1 == off) { shimmeroff | halt }
  if (5.1 isin $version) { echo -a 4SORRY4 your older version of mIRC does not allow this trick (takes at least mirc 5.3+)...sorry $me $+ . | halt }
  if ($1 == $null) { echo -a you must enter color numbers...4/shimmer 2 10 11 12 | echo -a 1,0 0 0,1 1 1,2 2 1,3 3 1,4 4 1,5 5 1,6 6 1,7 7 1,8 8 1,9 9 1,10 101,11 111,12 121,13 131,14 141,15 15 | halt }
  unset %shimmer | if ($1 != $null) { set %i 1 | set %shimmer $1 }
  :next
  inc %i
  if ( $ [ $+ [ %i ] ] != $null ) { set %shimmer %shimmer $+ . $+ $ [ $+ [ %i ] ] | goto next }
  dec %i
  if ($chan != $null) {
    set %spd 1 / $nick(#,0) | set %spd %spd * 500 | set %spd $int(%spd)
    .timerRB $+ $active -m 0 %spd if ( $ $+ me ison $active ) { cline $ $+ gettok( $+ %shimmer $+ ,$rand(1, $+ %i $+ ),46) $ $+ nick( $+ $active $+ ,$rand(1,$nick(#,0))) }
  }
  else { echo $me you can only use shimmer-nicks on a channel }
}
alias shimmeroff {
  if ($chan != $null) {
    set %temp1 $readini mirc.ini colours n0 | set %temp1 $gettok(%temp1,25,44)
    .timerRB $+ $active off
    set %temp2 0  | set %temp3 $nick($active,0) | :nxt | inc %temp2 | if (%temp2 > %temp3) { halt } | .cline %temp1 $active $nick($active,%temp2) | goto nxt
  }
}
alias shimoff shimmeroff
alias shim if ($1 == off) { shimmeroff | halt } | set %ran $rand(1,33) | shim $+ %ran
alias shim1 shimmer 2 3 4 5 6 7 10 12 13 | echo -a 2P3A4R5T6Y 7T10I12M13E /shim1
alias shim2 shimmer 2 14 | echo -a 14C2O14W2B14O2Y14S2 /shim2
alias shim3 shimmer 0 4 8 9 11 13 | echo -a 4B8R9I11G13H4T13 /shim3
alias shim4 shimmer 2 12 13 10 6 | echo -a 2B12L13U10E6-P2U12R13P10L6E /shim4
alias shim5 shimmer 6 6 13 13 14 | echo -a 6P13U14R6P13L14E6 /shim5
alias shim6 shimmer 0 0 14 15 1 1 | echo -a PE14EK-A-B15OO 14/shim6
alias shim7 shimmer 4 0 12 | echo -a 4U12S4A12 /shim7
alias shim8 shimmer 12 4 8 | echo -a 12P4R8I12M4E /shim8
alias shim9 shimmer 13 13 4 15 | echo -a 13P4I13N15K13 /shim9
alias shim10 shimmer 13 11 8 9 6 4 | echo -a 13E11A8S9T6E4R /shim10
alias shim11 shimmer 3 9 8 7 4 5 | echo -a 3F9U8G7L4Y5 /shim11
alias shim12 shimmer 1 14 | echo -a 1,14RAIDERS /shim12
alias shim13 shimmer 3 10 9 | echo -a 3G10R9E3E10N3 /shim13
alias shim14 shimmer 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | echo -a 1A2L3L4 C5O6L7O8R9S 10/11s12h13i15m1414
alias shim15 shimmer 4 4 4 13 5 | echo -a 4R13E4D5S4 /shim15
alias shim16 shimmer 1 1 1 2 7 4 15 | echo -a 7,1H4A2L15L7O4W2E15E7N4 /shim16
alias shim17 shimmer 12 8 9 1 | echo -a 12M 8/9s12h8i12m17
alias shim18 shimmer 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 | echo -a GHOSTS /shim18
alias shim19 shimmer 13 11 10 14 1 | echo -a 13,1N11I10G14H13T11R10O14S13E11 /shim19
alias shim20 shimmer 2 3 4 6 7 9 12 13 0 0 0 0 0 0 0 0 | echo -a 2X3M4A6S7 9L12I13G2H3T4S6 /shim20
alias shim21 shimmer 4 0 0 0 13 0 0 4 4 15 | echo -a 4V13A4L15E4N13T4I15N4E13 /shim21
alias shim22 shimmer 6 0 9 0 11 0 13 0 8 13 | echo -a 6E9A11S13T8E6R213 /shim22
alias shim23 shimmer 3 0 9 0 14 0 15 3 3 10 | echo -a 3S9T3. P14A3T15R3I9C15K3S /shim23
alias shim24 shimmer 4 4 12 1 12 4 0 15 | echo -a 4J12U4L15Y4 412T4H /shim24
alias shim25 shimmer 12 2 12 14 15 14 12 | echo -a 12H2A12N14N15A14K12U2H12 /shim25
alias shim26 shimmer 7 1 14 7 7 0 1 15 | echo -a 7H14A7L15L7O14W7E15E7N214 /shim26
alias shim27 shimmer 7 1 14 7 7 1 15 5 3 5 | echo -a 7T14H7AN15K3S5G7I14V7IN15G27 /shim27
alias shim28 shimmer 4 0 9 0 8 0 13 0 12 0 4 | echo -a 4X9M8A13S 12L4I9G8H13T12S24 /shim28
alias shim29 shimmer 4 1 14 4 | echo -a 4S14A4NT4A /shim29
alias shim30 shimmer 6 13 13 6 11 15 | echo -a 6C13A11N15D13Y6 /shim30
alias shim31 shimmer 9 11 8 0 0 0 9 13 | echo -a 9N11E8O9N13S /shim31
alias shim32 shimmer 14 15 1 0 | echo -a 14,0L15O1W 14I15N1K /shim32
alias shim33 shimmer 1 9 8 7  | echo -a 9C8I7T9R8U7S /shim33
alias hinn set %nick $replace($1-,$chr(32),$chr(160)) | if (%nick == $null) { rbnick3 } | set %txna 9 - $len(%nick) | set %txnb %txna / 2 | set %txnc $str($chr(160),$int(%txnb)) $+ %nick $+ $str($chr(160),$int(%txnb)) $+ $chr(160) | set %nn $left(%txnc,9) | $read -l $+ $rand(1150,1229) mrtrick.txt
alias wrap set %xt 60 - $len($me) | say 640 X 480 resolution window is this wide! | say $str(-,%xt) $+ >
alias wrap2 set %xt 80 - $len($me) | say 800 X 600 resolution window is this wide! | say $str(-,%xt) $+ >
alias wrap3 set %xt 108 - $len($me) | say 1024 X 768 resolution window is this wide! | say $str(-,%xt) $+ >
alias color set %temp $1 | if ($1 == $null) { set %temp $?="enter background color number, or cancel for no background" } | if (%temp != $null) { /say 0, $+ %temp zero1one2two3three4four5five6six7seven8eight9nine10ten11eleven12twelve13thirteen14fourteen15fifteen } | else { say zero is white1one2two3three4four5five6six7seven8eight9nine10ten11eleven12twelve13thirteen14fourteen15fifteen }
alias color2 say 1 12 23 34 45 56 67 78 89 910 1011 1112 1213 1314 1415 15
alias color3 /say 1,0 0 0,1 1 1,2 2 1,3 3 1,4 4 1,5 5 1,6 6 1,7 7 1,8 8 1,9 9 1,10 101,11 111,12 121,13 131,14 141,15 15
alias mecolor /echo 1 (zero is white)1one2two3three4four5five6six7seven8eight9nine10ten11eleven12twelve13thirteen14fourteen15fifteen
alias mecount /echo 3There 4are 6 $nick(#,0) 10people 12in 5 #
alias sf5 /say awwwwwwwww 
alias sf6 /say hehehehehe 
alias sf7 /say hmmmmmmmmm 
alias sf8 /say WOOHOO!!!! 
alias sf9 /say :~~  
alias sf10 /say Holy Schnikeys!!!! 
alias und set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctund mrtrick.txt 100
alias unds set %temp1 $1 | set %temp2 $2 | set %temp3 $3 | set %temp4 $4 | set %temp5 $5 | set %temp6 $6 | set %temp7 $7 | .play -ctunds mrtrick.txt 0
alias cya set %mes $1- | if (%mes == $null) { set %mes Everyone!!! } | .play -ctcya mrtrick.txt 100
alias sz set %ran $rand(1,4) | / $+ %ran $+ sz $1-
alias frown $read -l1061 mrtrick.txt
alias smile $read -l1062 mrtrick.txt
alias kissmy $read -l1063 mrtrick.txt
alias my2 $read -l1064 mrtrick.txt
alias doz $read -l1065 mrtrick.txt
alias lol $read -l1066 mrtrick.txt
alias frogs $read -l1067 mrtrick.txt
alias paint $read -l1068 mrtrick.txt
alias tng $read -l1069 mrtrick.txt
alias ang $read -l1070 mrtrick.txt
alias jet $read -l1071 mrtrick.txt
alias 2buns $read -l1072 mrtrick.txt
alias dababy $read -l1073 mrtrick.txt
alias prob $read -l1074 mrtrick.txt
alias 1sz $read -l1075 mrtrick.txt
alias 2sz $read -l1076 mrtrick.txt
alias 3sz $read -l1077 mrtrick.txt
alias 4sz $read -l1078 mrtrick.txt
alias wel2 $read -l1079 mrtrick.txt
alias myou $read -l1080 mrtrick.txt
alias hugs2 $read -l1081 mrtrick.txt
alias wink $read -l1082 mrtrick.txt
alias phone $read -l1083 mrtrick.txt
alias mrsm $read -l1084 mrtrick.txt
alias opwow $read -l1085 mrtrick.txt
alias wigg $read -l1086 mrtrick.txt
alias thpt $read -l1144 mrtrick.txt
alias smiles $read -l1148 mrtrick.txt
alias grr set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctgrr mrtrick.txt 50
alias luv set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctluv mrtrick.txt 0
alias trek set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -cttrek mrtrick.txt 50
alias trip rbnick3 | set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -cttrip mrtrick.txt 100
alias owl rbnick3 | set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctowl mrtrick.txt 50
alias cooking set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Food" } | .play -ctcooking mrtrick.txt 50
alias monu set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name or message up to 17" } | .play -ctmonu mrtrick.txt 100
alias bigbye set %mes $1- | if (%mes == $null) { set %mes Everyone! } | .play -ctbigbye mrtrick.txt 200
alias liz rbnick3 | set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message for %nick " } | .play -ctliz mrtrick.txt 50
alias wow set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name or Message" } | .play -ctwow mrtrick.txt 50
alias lol2 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name or Message" } | .play -ctlol2 mrtrick.txt 50
alias mag set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name or Message" } | .play -ctmagic mrtrick.txt 100
;seeya by Elusive
alias seeya set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctseeya mrtrick.txt 100
alias heehee set %temp1 $1 | set %temp2 $2 | set %temp3 $3 | set %temp4 $4 | set %temp5 $5- | .play -ctheehee mrtrick.txt 200
alias bow set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctbow mrtrick.txt 20
alias eyes rbnick3 | set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message for %nick " } | .play -cteyes mrtrick.txt 50
alias three set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name or Message" } | .play -ctthree mrtrick.txt 50
alias screw set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctscrew mrtrick.txt 50
alias homer set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -cthomer mrtrick.txt 50
alias wel set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctwel mrtrick.txt 50
alias biglol set %mes $1- | if (%mes == $null) { set %mes $?="Enter Message" } | .play -ctbiglol mrtrick.txt 50
alias bigtung set %mes $1- | if (%mes == $null) { set %mes $?="Enter Message" } | .play -ctbigtung mrtrick.txt 50
alias bigsmile set %mes $1- | if (%mes == $null) { set %mes $?="Enter Message" } | .play -ctbigsmile mrtrick.txt 50
alias bigfrown set %mes $1- | if (%mes == $null) { set %mes $?="Enter Message" } | .play -ctbigfrown mrtrick.txt 50
alias kis set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctkis mrtrick.txt 50
alias myangel set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctmyangel mrtrick.txt 50
alias lovetxt set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctlovetxt mrtrick.txt 50
alias toys set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -cttoys mrtrick.txt 50
alias roll set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctroll mrtrick.txt 50
alias weehart set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message or name" } | .play -ctweehart mrtrick.txt 50
alias kewl set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctkewl mrtrick.txt 50
alias 3hrts set %3temp $$?="Enter Nickname of your love" | set %mes $?="message?" | .play -ct3hrts mrtrick.txt 50
alias ack set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctack mrtrick.txt 30
alias ack2 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctack2 mrtrick.txt 30
;Artist Suzy, script texxy
alias boo {
  set %nks $nick(#,0) | set %i 1 | :txnext | set %ii $rand(1,%nks) | set %nnt $nick(#,%ii) | set %txna 12 - $len(%nnt) | set %txnb %txna / 2 | set %txnc $str(%ss,$int(%txnb)) $+ %nnt $+ $str(%ss,$int(%txnb)) $+ %ss | set %tx $+ %i $left(%txnc,12) | inc %i | if %i == 10 goto txdone | goto txnext | :txdone
  set %txna 40 - $len($1-) | set %txnb %txna / 2 | set %txnc $str($chr(160),$int(%txnb)) $+ $1- $+ $str($chr(160),$int(%txnb)) $+ $chr(160) | set %tx $left(%txnc,40)
  .play -ctboo mrtrick.txt 200
}
alias mrtmenu .play -ctrbtmenu mrtrick.txt 50
alias every1 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctevery1 mrtrick.txt 100
alias eek set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -cteek mrtrick.txt 20
alias faces set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctfaces mrtrick.txt 100
alias flow set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctflow mrtrick.txt 30
alias hiya rbnick3 | set %mes $1- | if (%mes == $null) { set %mes $?="Enter message up to 11 words" } | hiyagut %mes | .play -cthiya mrtrick.txt 300
alias hiyagut set %temp1 $1 | set %temp2 $2 | set %temp3 $3 | set %temp4 $4 | set %temp5 $5 | set %temp6 $6 | set %temp7 $7 | set %temp8 $8 | set %temp9 $9 | set %temp10 $10 | set %temp11 $11
alias hugs set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -cthugs mrtrick.txt 50
alias lemon set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctlemon mrtrick.txt 50
alias lol3 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctlol3 mrtrick.txt 50
alias luvit set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctluvit mrtrick.txt 300
alias oh set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctoh mrtrick.txt 100
alias pmk set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctpmk mrtrick.txt 100
alias thank set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctthank mrtrick.txt 100
alias wow1 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctwow1 mrtrick.txt 100
alias byeman set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctbyeman mrtrick.txt 100
alias heart2 set %mes $1 | if ($1 == $null) { set %mes $$?="Type First Nickname 9 or less letters" } | set %temp $2 | if ($2 == $null) { set %temp $$?="Type Second Nickname 9 or less letters" } | .play -ctheart2 mrtrick.txt 100
alias noo set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctnoo mrtrick.txt 100
alias dnite set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name or Message" } | .play -ctdnite mrtrick.txt 100
alias mxmas set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctmxmas mrtrick.txt 100
alias santa set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctsanta mrtrick.txt 200
alias thankr set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctthankr mrtrick.txt 100
alias nana set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctnana mrtrick.txt 50
alias rainb set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctrainb mrtrick.txt 200
alias mirror set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctmirror mrtrick.txt 100
alias mybox set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctmybox mrtrick.txt 50
alias sher2 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctsher2 mrtrick.txt 50
alias sign set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctsign mrtrick.txt 50
alias megahug set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Name" } | .play -ctmegahug mrtrick.txt 50
alias wow3 set %mes $1- | if (%mes == $null) { set %mes $$?="Enter Message" } | .play -ctwow3 mrtrick.txt 50
alias smile4 .play -ctsmile4 mrtrick.txt 50
alias qcol  set %txna 9 - $len(%word) | set %txnb %txna / 2 | set %txnc $str($chr(160),$int(%txnb)) $+ %word $+ $str($chr(160),$int(%txnb)) $+ $chr(160) | set %tx $+ %n $left(%txnc,9)
alias ctalk {
  set %now $str($chr(160),9) | set %word $1 | set %n 1 | /qcol $1 | set %word $2 | set %n 2 | /qcol $2 | set %word $3 | set %n 3 | /qcol $3 | set %word $4 | set %n 4 | /qcol $4
  set %word $5 | set %n 5 | /qcol $5 | set %word $6 | set %n 6 | /qcol $6 | set %word $7 | set %n 7 | /qcol $7 | set %word $8 | set %n 8 | /qcol $8
  set %txna 23 - $len($9) | set %txnb %txna / 2 | set %txnc $str($chr(160),$int(%txnb)) $+ $9 $+ $str($chr(160),$int(%txnb)) $+ $chr(160) | set %txa $left(%txnc,23)
  set %txna 25 - $len($10) | set %txnb %txna / 2 | set %txnc $str($chr(160),$int(%txnb)) $+ $10 $+ $str($chr(160),$int(%txnb)) $+ $chr(160) | set %txb $left(%txnc,25) | set %mes $11-
  .play -ctctalk mrtrick.txt 0 | .play c.tmp 300
}
alias kicksound if ($findfile($wavedir,$1,1) != $null) { /sound $1 } | else { echo 15 mrtricks.mrc did not find $1  }
alias rkick set %ran $rand(1,6) | rkick $+ %ran
alias rkick1 if ($me isop $active) { set %tempnick $1 | if (%tempnick == $null) { set %tempnick $$?="Enter Nickname to KICK" } | .play -ctkick1 mrtrick.txt 0 } | else { echo 4 You must be an operator on the channel }
alias rkick2 if ($me isop $active) { set %tempnick $1 | if (%tempnick == $null) { set %tempnick $$?="Enter Nickname to KICK" } | .play -ctkick2 mrtrick.txt 0 } | else { echo 4 You must be an operator on the channel }
alias rkick3 if ($me isop $active) { set %tempnick $1 | if (%tempnick == $null) { set %tempnick $$?="Enter Nickname to KICK" } | .play -ctkick3 mrtrick.txt 0 } | else { echo 4 You must be an operator on the channel }
alias rkick4 if ($me isop $active) { set %tempnick $1 | if (%tempnick == $null) { set %tempnick $$?="Enter Nickname to KICK" } | .play -ctkick4 mrtrick.txt 0 } | else { echo 4 You must be an operator on the channel }
alias rkick5 if ($me isop $active) { set %tempnick $1 | if (%tempnick == $null) { set %tempnick $$?="Enter Nickname to KICK" } | .play -ctkick5 mrtrick.txt 0 } | else { echo 4 You must be an operator on the channel }
alias rkick6 if ($me isop $active) { set %tempnick $1 | if (%tempnick == $null) { set %tempnick $$?="Enter Nickname to KICK" } | .play -ctkick6 mrtrick.txt 0 } | else { echo 4 You must be an operator on the channel }

alias hetu {
  unset %vvp | if (%hrttemp == rain) { set %tezu2 %tezu | :nope | set %tezu $rand(10,15) | if (%tezu == %tezu2) { goto nope } }
  if (%tezu == 1) { set %tezc 1 | set %vvp $hoss2(2,9,3, %vg ) }
  if (%tezu == 2) { set %tezc 1 | set %vvp $hoss2(4,11,10,13,6, %vg ) }
  if (%tezu == 3) { set %tezc 1 | set %vvp $hoss2(2,11,10, %vg ) }
  if (%tezu == 4) { set %tezc 1 | set %vvp $hoss2(4,13,6,0,15, %vg ) }
  if (%tezu == 5) { set %tezc 1 | set %vvp $hoss2(3,0,15,14, %vg ) }
  if (%tezu == 6) { set %tezc 1 | set %vvp $hoss2(2,4,5, %vg ) }
  if (%tezu == 7) { set %tezc 1 | set %vvp $hoss2(3,4,0,12, %vg ) }
  if (%tezu == 8) { set %tezc 1 | set %vvp $hoss2(2,13,6, %vg ) }
  if (%tezu == 9) { set %tezc 1 | set %vvp $hoss2(4,8,7,4,5, %vg ) }
  if (%tezu == 10) { set %tezc 1 | set %vvp $hoss2(6,8,7,4,11,13,9, %vg ) }
  if (%tezu == 11) { set %tezc 2 | set %vvp $hoss2(3,0,15,14, %vg ) }
  if (%tezu == 12) { set %tezc 4 | set %vvp $hoss2(3,8,0,7, %vg ) }
  if (%tezu == 13) { set %tezc 10 | set %vvp $hoss2(3,5,2,1, %vg ) }
  if (%tezu == 14) { set %tezc 12 | set %vvp $hoss2(5,0,11,15,14,1, %vg ) }
  if (%tezu == 15) { set %tezc 14 | set %vvp $hoss2(6,1,0,12,2,15,4, %vg ) }
  if (%tezu == 16) { set %tezc 0 | set %vvp $hoss2(4,14,02,01,05, %vg ) }
}
alias txnicks2 if ($chan == $active) { set %nicks $1 | set %nks $nick(#,0) | set %i 1 | :txnext | set %ii $rand(1,%nks) | set %tx $+ %i $nick(#,%ii) | set %temp $nick(#,%ii) | set %iii 1 | if (%nicks > %nks) { goto matchend } | :matchtest | if (%i == 1) { goto matchend } | set %temp2 [ % [ $+ [ tx [ $+ [ %iii ] ] ] ] ] | if (%iii == %i) { goto matchend } | if (%temp == %temp2) { goto txnext } | inc %iii | goto matchtest | :matchend | inc %i | if %i > %nicks goto txdone | goto txnext | :txdone } | else { echo -a 4Sorry $me the Rumors do not work in Private Windows...ya need nicknames :) | halt }
alias hoss2 { unset %tmpta | set %tmptcn $1 | inc %tmptcn 1 | set %tmpdn %tmptcn + 1 | set %tmpdl $ $+ %tmpdn $+ - | set %tmpd [ [ % [ $+ [ tmpdl ] ] ] ] | set %tmpta $ $+ gettok( | set %tmpi 1 
  :tmp | inc %tmpi 1 | set %tmpdy [ [ $ [ $+ [ %tmpi ] ] ] ]
  if (%tmpi < %tmptcn) { set %tmpta %tmpta $+ %tmpdy $+ $chr(38) | goto tmp }
  if (%tmpi == %tmptcn) { set %tmpta %tmpta $+ %tmpdy $+ ,%tmpc,38 $chr(41) } 
  unset %tmpo | set %tmpi $replace(%tmpd,$chr(32),) | set %tmpp 1 | set %tmpc 1
  :loop | set %tmpu $mid(%tmpi,%tmpp,1)
  if (%tmpu isnum) { set %tmpo %tmpo $+ $chr(3) $+ [ [ % [ $+ [ tmpta ] ] ] ] $+  $+ %tmpu | goto skip }
  set %tmpo %tmpo $+ $chr(3) $+ [ [ % [ $+ [ tmpta ] ] ] ] $+ %tmpu
  :skip | inc %tmpp | if ($mid(%tmpi,%tmpp,1) != $null) { inc %tmpc } | if (%tmpc = %tmptcn) { set %tmpc 1 } | if ($mid(%tmpi,%tmpp,1) != $null) { goto loop } | unset %tmpu | return %tmpo 
}
alias rbfancy2 {
  unset %rb
  set %test $1- | set %test $replace(%test,$chr(32),$chr(160)) | set %testlen $len(%test)
  set %i 0
  :next
  if ($len(%rb) == %testlen) { goto end }
  inc %i | set %char $mid(%test,%i,1)
  set %asc $asc(%char)
  if (%asc == 97) { %rb = %rb $+  | goto next }
  if (%asc == 99) { %rb = %rb $+  | goto next }
  if (%asc == 101) { %rb = %rb $+  | goto next }
  if (%asc == 105) { %rb = %rb $+  | goto next }
  if (%asc == 108) { %rb = %rb $+  | goto next }
  if (%asc == 110) { %rb = %rb $+  | goto next }
  if (%asc == 111) { %rb = %rb $+  | goto next }
  if (%asc == 112) { %rb = %rb $+  | goto next }
  if (%asc == 117) { %rb = %rb $+  | goto next }
  if (%asc == 121) { %rb = %rb $+  | goto next }
  if (%asc == 65) { %rb = %rb $+  | goto next }
  if (%asc == 66) { %rb = %rb $+  | goto next }
  if (%asc == 67) { %rb = %rb $+  | goto next }
  if (%asc == 68) { %rb = %rb $+  | goto next }
  if (%asc == 69) { %rb = %rb $+  | goto next }
  if (%asc == 73) { %rb = %rb $+  | goto next }
  if (%asc == 76) { %rb = %rb $+  | goto next }
  if (%asc == 78) { %rb = %rb $+  | goto next }
  if (%asc == 79) { %rb = %rb $+  | goto next }
  if (%asc == 80) { %rb = %rb $+  | goto next }
  if (%asc == 83) { %rb = %rb $+  | goto next }
  if (%asc == 85) { %rb = %rb $+  | goto next }
  if (%asc == 89) { %rb = %rb $+  | goto next }
  %rb = %rb $+ %char | goto next
  :end | return %rb | unset %test* %asc %char %i
}
alias rrt  {
  set %mes $replace($1-,$chr(32),$chr(160))
  %num = 1 | set %msg   | %num2 = 1 | %msg =  | :start | %num2 = $gettok(3.4.5.6.7.10.12.13.14,$rand(1,9),46) 
  if ($mid($1-,%num,1) != $null ) {
    set %temp $asc($mid(%mes,%num,1))
    if (%temp isnum)  { %msg = %msg $+   $+ %num2 $+   $+  $mid(%mes,%num, 1) }
    else { %msg = %msg $+   $+ %num2  $+  $mid(%mes,%num, 1) }
    /inc %num | /goto start
  }
  /say %msg
}
alias playkisswav set %temp $findfile($wavedir,*kiss*.wav,$rand(1,$findfile($wavedir,*kiss*.wav,0))) | if (%temp != $null) { sound %temp }
alias shgut set %temppp2 $len($me) | set %temppp3 12 - %temppp2 | set %tx $chr(160) $+ $me $+ $str($chr(160),%temppp3) $+ $chr(160) | set %temppp4 $len(%temppp) | set %temppp5 12 - %temppp4 | set %tx2 $str(,%temppp5) $+ %temppp
alias htn unset %vg | set %temppp $replace($1-,$chr(32),$chr(160)) | if ($chr(160) isin %temppp) { set %temppp %temppp $+ $chr(160) } | set %length $len(%temppp) | if (%length > 12) { echo 4 $me please limit heart nicknames to 12 spaces or messages to 11 characters...texxy | set %temppp $left(%temppp,12) | set %length 12 } | set %i 1 | :tz2nezt | set %z $+ %i $mid(%temppp,%i,1) | if (%i == 12) { goto tz2done } | inc %i | goto tz2nezt | :tz2done
alias bhcheck set %tempb $1- | if (%tempb == $null) { set %tempb $$?="enter nickname (up to 12 characters) or message (up to 11 characters)" } | htn %tempb | .play -ctheart $+ %length $+ f mrtrick.txt 2500 | playkisswav
alias shcheck set %tempb $1- | if (%tempb == $null) { set %tempb $$?="enter nickname (up to 12 characters) or message (up to 11 characters)" } | htn %tempb | shgut | .play -ctsmh $+ %length  mrtrick.txt 100
alias bh set %tezu $rand(1,16) | echo -a 10/ $+ bh $+ %tezu | bhcheck $1-
alias bhb set %tezu $rand(0,10) | echo -a 10/ $+ bh $+ %tezu | bhcheck $1-
alias bh0 unset %hrttemp | set %tezu 0 | bhcheck $1-
alias bh1 unset %hrttemp | set %tezu 1 | bhcheck $1-
alias bh2 unset %hrttemp | set %tezu 2 | bhcheck $1-
alias bh3 unset %hrttemp | set %tezu 3 | bhcheck $1-
alias bh4 unset %hrttemp | set %tezu 4 | bhcheck $1-
alias bh5 unset %hrttemp | set %tezu 5 | bhcheck $1-
alias bh6 unset %hrttemp | set %tezu 6 | bhcheck $1-
alias bh7 unset %hrttemp | set %tezu 7 | bhcheck $1-
alias bh8 unset %hrttemp | set %tezu 8 | bhcheck $1-
alias bh9 unset %hrttemp | set %tezu 9 | bhcheck $1-
alias bh10 unset %hrttemp | set %tezu 10 | bhcheck $1-
alias bh11 unset %hrttemp | set %tezu 11 | bhcheck $1-
alias bh12 unset %hrttemp | set %tezu 12 | bhcheck $1-
alias bh13 unset %hrttemp | set %tezu 13 | bhcheck $1-
alias bh14 unset %hrttemp | set %tezu 14 | bhcheck $1-
alias bh15 unset %hrttemp | set %tezu 15 | bhcheck $1-
alias bh16 unset %hrttemp | set %tezu 16 | bhcheck $1-
alias bhr set %hrttemp rain | bhcheck $1-
alias shcheck set %tempb $1- | if (%tempb == $null) { set %tempb $$?="enter nickname or message (up to 12 characters)" } | htn %tempb | shgut | .play -ctsmh $+ %length  mrtrick.txt 100
alias sh unset %hrttemp | set %tezu $rand(1,16) | echo -a 10/ $+ sh $+ %tezu | shcheck $1-
alias shb unset %hrttemp | set %tezu $rand(1,10) | echo -a 10/ $+ sh $+ %tezu | shcheck $1-
alias sh1 unset %hrttemp | set %tezu 1 | shcheck $1-
alias sh2 unset %hrttemp | set %tezu 2 | shcheck $1-
alias sh3 unset %hrttemp | set %tezu 3 | shcheck $1-
alias sh4 unset %hrttemp | set %tezu 4 | shcheck $1-
alias sh5 unset %hrttemp | set %tezu 5 | shcheck $1-
alias sh6 unset %hrttemp | set %tezu 6 | shcheck $1-
alias sh7 unset %hrttemp | set %tezu 7 | shcheck $1-
alias sh8 unset %hrttemp | set %tezu 8 | shcheck $1-
alias sh9 unset %hrttemp | set %tezu 9 | shcheck $1-
alias sh10 unset %hrttemp | set %tezu 10 | shcheck $1-
alias sh11 unset %hrttemp | set %tezu 11 | shcheck $1-
alias sh12 unset %hrttemp | set %tezu 12 | shcheck $1-
alias sh13 unset %hrttemp | set %tezu 13 | shcheck $1-
alias sh14 unset %hrttemp | set %tezu 14 | shcheck $1-
alias sh15 unset %hrttemp | set %tezu 15 | shcheck $1-
alias sh16 unset %hrttemp | set %tezu 16 | shcheck $1-
alias rbb set %num $rand(701,801) | $read -l $+ %num mrtrick.txt
alias nrb :startnrb | set %num $rand(701,782) | if ((%num > 708) && (%num < 722)) { goto startnrb } |  if ((%num > 762) && (%num < 778)) { goto startnrb } | $read -l $+ %num mrtrick.txt
alias sherb :startsherb | set %num $rand(709,791) | if ((%num > 721) && (%num < 763)) { goto startsherb } |  if ((%num > 777) && (%num < 783)) { goto startsherb } | $read -l $+ %num mrtrick.txt
alias rbb3 set %num $rand(701,721) | $read -l $+ %num mrtrick.txt
alias rbb5 set %num $rand(722,777) | $read -l $+ %num mrtrick.txt
alias rbb7 set %num $rand(778,791) | $read -l $+ %num mrtrick.txt
alias nrb3 set %num $rand(701,708) | $read -l $+ %num mrtrick.txt
alias nrb5 set %num $rand(722,762) | $read -l $+ %num mrtrick.txt
alias nrb7 set %num $rand(778,782) | $read -l $+ %num mrtrick.txt
alias sherb3 set %num $rand(709,721) | $read -l $+ %num mrtrick.txt
alias sherb5 set %num $rand(763,777) | $read -l $+ %num mrtrick.txt
alias sherb7 set %num $rand(783,791) | $read -l $+ %num mrtrick.txt
alias kjob set %num $rand(792,796) | $read -l $+ %num mrtrick.txt
alias krisb set %num $rand(797,800) | $read -l $+ %num mrtrick.txt
alias rb101 /join #mirc_rainbow
alias rb102 /join #mirc_rainbow2
alias rb103 /join #mirc_rainbow_colorz
alias txdela $read -l803 mrtrick.txt
alias txbx3a $read -l804 mrtrick.txt
alias txbx3b $read -l805 mrtrick.txt
alias txbx3c $read -l806 mrtrick.txt
alias txbx5a $read -l807 mrtrick.txt
alias txbx5b $read -l808 mrtrick.txt
alias txbx5c $read -l809 mrtrick.txt
alias txbx5d $read -l810 mrtrick.txt
alias txbx5e $read -l811 mrtrick.txt
alias txbx5f $read -l812 mrtrick.txt
alias txbx7a $read -l813 mrtrick.txt
alias txbx7b $read -l814 mrtrick.txt
alias txbx7c $read -l815 mrtrick.txt
alias rbbmshow $read -l816 mrtrick.txt
alias rbbm $read -l817 mrtrick.txt
alias tbox set %mes $1- | if (%mes == $null) { set %mes $$?="enter message } | $read -l $+ $rand(1091,1143) mrtrick.txt
alias txboxes3 {
  unset %word* | unset %temp | unset %tbox*
  set %wi 1 | :nextw | set %word  [ $ [ $+ [ %wi ] ] ] | if (%word == $null) { goto tboxsay } | :start | set %ran $rand(1,10) | set %icky $+ %wi %ran | set %ii 1 
  :ickycheck | if (%ii == %wi) { inc %ii | goto ickycheck } | if ((%wi < 11) && (%ii < 11)) { if (%icky [ $+ [ %ii ] ] == %ran) { goto start } | else { inc %ii | goto ickycheck } | }
  set %dsn1 %rdsn [ $+ [ %ran ] ] | set %txtc %rtxtc [ $+ [ %ran ] ]
  set %tshad $strip(%dsn1) | set %tshad2 $len(%tshad) | set %dsn3 14,14 $+ $str(,%tshad2)
  set %word $ [ $+ [ %wi ] ]
  set %tem $strip(%dsn1) | set %ldsn $len(%tem) | set %temptemp $len(%word) | set %temp %temptemp - 1 | %temp1 = [ %temp / %ldsn ] | if (%temp1 < 10) { set %ndsn $mid(%temp1,1,1) } | if (%temp1 >= 10) { set %ten $mid(%temp1,1,1)  | %tenm = [ %ten * 10 ] | set %one $mid(%temp1,2,1) | %ndsn = [ %tenm + %one ] }
  if (%temp1 >= 10) { set %ten $mid(%temp1,1,1)  | %tenm = [ %ten * 10 ] | set %one $mid(%temp1,2,1) | %ndsn = [ %tenm + %one ] } | inc %ndsn | set %temp3 %ndsn * %ldsn | set %temp4 $len(%word) | set %txna %temp3 - %temp4 | set %txnb %txna / 2 | set %txnc $str(,%txnb) $+ %word $+ $str(,%txnb) $+ $chr(160) | set %tx $left(%txnc,%temp3)  
  /set %tbox1 %tbox1 $+ $str(%dsn1,%ndsn) $+ 
  /set %tbox2 %tbox2 $+ %txtc $+  $+ %tx $+ 14,14
  /set %tbox3 %tbox3 $+ $str(%dsn1,%ndsn) $+ 14,14
  /set %tbox4 %tbox4 $+  $+ $str(%dsn3,%ndsn) $+ 
  inc %wi | goto nextw
  :tboxsay
  say %tbox1
  say %tbox2
  say %tbox3
  say %tbox4
  unset %word* | unset %temp | unset %tbox*
}
alias txbx3 {
  if ($1- == $null) { echo -a %ec 4Error: add message after /command.... | halt }
  set %mes  $+ $1- $+ 
  set %tem $strip(%dsn1)
  set %ldsn $len(%tem) 
  set %temp $len(%mes)
  %temp1 = [ %temp / %ldsn ] | if (%temp1 != $int(%temp1)) { set %temp1 %temp1 + 1 }
  set %ndsn $int(%temp1)
  set %txl $len($str(%tem,%ndsn))
  set %txna %txl - $len(%mes) | set %txnb %txna / 2
  set %txnb $int(%txnb)
  set %txnc $str(,$int(%txnb)) $+ %mes $+ $str(,$int(%txnb)) $+ $chr(160) | set %tx $left(%txnc,%txl)
}
alias ss $read -l $+ $rand(995,1054) mrtrick.txt | set %txsnd $1 $+ .wav | set %mes $2- | if ($1 == $null) { set %txsnd $$dir="Choose a WaV" [ $wavedir $+ .wav ] | set %bytes $file(%txsnd).size } | else { set %bytes $file($findfile($wavedir,%txsnd,1)).size } | /sound $nopath(%txsnd)   $+ %vc1 $+ , $+ %vc2  $+ ! $+ $me  $nopath(%txsnd)  $+ %vc2 $+ , $+ %vc1 %bytes  $+ %vc1 $+ , $+ %vc2 %mes 
alias s set %txsnd $1 $+ .wav | set %mes $2- | if ($1 == $null) { set %txsnd $$dir="Choose a WaV" [ $wavedir $+ .wav ] | set %bytes $file(%txsnd).size } | else { set %bytes $file($findfile($wavedir,%txsnd,1)).size } | /sound $nopath(%txsnd)  ! $+ $me  $nopath(%txsnd) < $+ %bytes $+ > %mes
alias playkisswav set %temp $findfile($wavedir,*kiss*.wav,$rand(1,$findfile($wavedir,*kiss*.wav,0))) | if (%temp != $null) { sound %temp }
alias playwav {
  set %temp $1 | if (%temp == $null) { set %temp $$?="Type in Word to SEARCH wavs, will play a wav with same word in title" }
  set %temp * $+ %temp $+ *.wav
  set %tempw $findfile($wavedir,%temp,$rand(1,$findfile($wavedir,%temp,0)))
  if (%tempw != $null) { /sound $active $nopath(%tempw) ! $+ $me $nopath(%tempw) <-- one of my $findfile($wavedir,%temp,0) %temp :) } | else { echo 4 Sorry $me $+ , you have zero .wavs with %temp $+ ! }
}
alias listascii {
  window -c @ascii
  window -d @ascii
  set %asciiv 0 | set %ii  $+ $chr(48)
  :asciibegin
  set %i $len(%asciiv) | %i = 4 - %i | set %i $str(%ii,%i) $+ %asciiv
  aline @ascii AsciiCode %asciiv is: $chr(%asciiv)  or alt- $+ %i Ascii Finder by Cstyle
  if ( %asciiv == 255 ) halt
  else inc %asciiv 
  goto asciibegin
}
alias o /set %o $rand(942,992) | $read -l $+ $rand(995,1054) mrtrick.txt | /onotice  $+ %vc1 $+ , $+ %vc2 {{ $read -l $+ %o mrtrick.txt }}  $+ %vc2 $+ , $+ %vc1 P  $chan:  $+ %vc1 $+ , $+ %vc2  $1- 
alias v /set %v $rand(836,886) | $read -l $+ $rand(995,1054) mrtrick.txt | /notice $$1  $+ %vc1 $+ , $+ %vc2 {{ $read -l $+ %v mrtrick.txt $$1 }}  $+ %vc2 $+ , $+ %vc1 $2-   
alias vx /set %x $rand(889,939) | $read -l $+ $rand(995,1008) mrtrick.txt | /notice $$1  $+ %vc1 $+ , $+ %vc2 {{ $read -l $+ %x mrtrick.txt $$1 }}  $+ %vc2 $+ , $+ %vc1 $2-  
alias ov set %end $vnick(#,0) | inc %end $opnick(#,0) | inc %end 1 | set %opvnotice $$?="op & voiced only notice" | set %count 1 | :next | .notice $nick(#,%count) 2?4 $me $+ 's  op +v notice12?0,0.9,1 %opvnotice 4,0 ( # ) | inc %count 1 | if ( %count < %end ) { goto next } | if ( %count == %end ) { goto end } | :end | unset %opvnotice
alias o2 /onotice 4,1ާ94:11,1 $1-  
alias mal {
  %c = $1- | /set %c $replace(%c,a,a) | /set %c $replace(%c,b,B) | /set %c $replace(%c,c,C) | /set %c $replace(%c,d,D) | /set %c $replace(%c,e,e) | /set %c $replace(%c,f,F) | /set %c $replace(%c,g,G) | /set %c $replace(%c,h,H) | /set %c $replace(%c,i,i) | /set %c $replace(%c,j,J) | /set %c $replace(%c,k,K) | /set %c $replace(%c,l,L) | /set %c $replace(%c,m,M)
  /set %c $replace(%c,n,N) | /set %c $replace(%c,o,o) | /set %c $replace(%c,p,P) | /set %c $replace(%c,q,Q) | /set %c $replace(%c,r,R) | /set %c $replace(%c,s,S) | /set %c $replace(%c,t,T) | /set %c $replace(%c,u,u) | /set %c $replace(%c,v,V) | /set %c $replace(%c,w,W) | /set %c $replace(%c,x,X) | /set %c $replace(%c,y,Y) | /set %c $replace(%c,z,z) | /set %c $replace(%c,?,?) | /set %c $replace(%c,.,.) | /say %c | /unset %c
}
alias r /set %i $replace($1-,$chr(32),) | /set %i $left(%i,200) | /set %o $chr(3) $+ 4,1 $+ | /set %p 1 | /set %c 1 | :loop | /set %o %o $+ $chr(3) $+ $gettok(4&0&8&9&11&13,%c,38) $+  $+  $+ $mid(%i,%p,1) | /inc %p | if ( $mid(i%,%p,1) != ) { inc %c } | if ( %c > 6 ) { set %c 1 } | if ( $mid(%i,%p,1) != $null ) { goto loop } | if ( $mid(%i,%p,1) != $null ) { goto loop } | /say %o | /unset %o %i %p %c
alias cr /set %i $replace($1-,$chr(32),) | /set %i $left(%i,200) | /set %o $chr(3) $+ 4,1 | /set %p 1 | set %c 1 | :loop | /set %o %o $+ $chr(3) $+ $gettok(4&8&9&11&13,%c,38) $+  $+  $+ $mid(%i,%p,1) | /inc %p | if ( $mid(%i,%p,1) != ) { inc %c } | if ( %c > 5 ) { set %c 1 } | if ( $mid(%i,%p,1) != $null ) { goto loop } | /mal %o | /unset %o %i %p %c
alias ac {
  %c = $1- | /set %c $replace(%c,a,4) | /set %c $replace(%c,b,3) | /set %c $replace(%c,c,6) | /set %c $replace(%c,d,7) | /set %c $replace(%c,e,4) | /set %c $replace(%c,f,12f) | /set %c $replace(%c,g,13g) | /set %c $replace(%c,h,6h) | /set %c $replace(%c,i,4) | /set %c $replace(%c,j,2j) | /set %c $replace(%c,k,3k) | /set %c $replace(%c,l,2) | /set %c $replace(%c,m,4m) | /set %c $replace(%c,n,6) | /set %c $replace(%c,o,4) 
  /set %c $replace(%c,p,12) | /set %c $replace(%c,q,7q) | /set %c $replace(%c,r,13) | /set %c $replace(%c,s,7) | /set %c $replace(%c,t,6t) | /set %c $replace(%c,u,4) | /set %c $replace(%c,v,3v) | /set %c $replace(%c,w,12w) | /set %c $replace(%c,x,7) | /set %c $replace(%c,y,7y) | /set %c $replace(%c,z,6z) | /set %c $replace(%c,?,1215?) | /set %c $replace(%c,!,25!) | /set %c $replace(%c,.,47.) | /say %c | /unset %c
}
alias bc2 { %r = $$1 $2 $3 $4 $5 | %l = $len(%r) | %nco = 1 | %bb = $chr(0160) | %bbc = $chr(44) | %bbs = $chr(3) | %bbo = $chr(15) | %bba = $chr(42) | %o = 1 | %o1 = 1 | %line = "" | :lop | if (%o = 6) { goto end } | %o1 = 1 | %line = "" | :red | if (%o1 > %l) { /say %line | /inc %o | goto lop } | %lt = $mid(%r,%o1,1) | if (%lt = $chr(32)) { set %lt sp } | %rt = %lt $+ %o | %lin = $readini mrtrick.mrc %lt %rt | %nco = %o1 | if (%nco == 16) { /set %nco 7 } | %mgl = %bbs $+ %nco $+ %bbc $+ %nco $+ %bb $+ %bbo | %clin = $replace(%lin,%bba,%mgl) | if (%lt == sp) { set %clin %lin } | %line = %line %clin | /inc %o1 | goto red | :end | }
alias bc big $1-
alias big set %temp $rand(1,13) | /bc2 $str(^,%temp) $+ $1-
alias ni /set %i $replace($1-,$chr(32),) | /set %i $left(%i,200) | /set %o $chr(3) $+ 4,0 $+ | /set %p 1 | /set %c 1 | :loop | /set %o %o $+ $chr(3) $+ $gettok(1&1&14&15&1&14,%c,38) $+  $+  $+ $mid(%i,%p,1) | /inc %p | if ( $mid(%i,%p,1) != ) { inc %c } | if ( %c > 6 ) { set %c 1 } | if ( $mid(%i,%p,1) != $null ) { goto loop } | if ( $mid(%i,%p,1) != $null ) { goto loop } | /say %o | /unset %o %i %p %c
alias coke %num = 1 | /unset %msg  | %msg =  | %color = p | :start | if %color == p { %num2 = 0 | %num3 = 4 | %color = y | /goto add } | if %color == y  { %num2 = 4 | %num3 = 0 | %color = p | /goto add } | :add | if ($mid($1-,%num,1) != $null) { set %temp $mid($1-,%num, 1) | if (%temp isnum) { set %temp  $+ %temp } | %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+ %temp $+   | /inc %num | /goto start  } | /say %msg
alias wdz /say 4,1  $1  12,8  $2  9,12 $3 13,1 $4 11,13 $5 9,1 $6 8,4 $7 12,11 $8 8,1 $9 1,13 $10 9,1 $11 8,4 $12 4,1 $13 11,12 $14 11,3 $15 12,6 $16
alias ct {
  %c = $1- | /set %c $replace(%c,a,4a) | /set %c $replace(%c,b,3B) | /set %c $replace(%c,c,6C) | /set %c $replace(%c,d,7D) | /set %c $replace(%c,e,4e) | /set %c $replace(%c,f,12F) | /set %c $replace(%c,g,13G) | /set %c $replace(%c,h,6H) | /set %c $replace(%c,i,4i) | /set %c $replace(%c,j,J) | /set %c $replace(%c,k,3K) | /set %c $replace(%c,l,L) | /set %c $replace(%c,m,4M) 
  /set %c $replace(%c,n,6N) | /set %c $replace(%c,o,4o) | /set %c $replace(%c,p,12P) | /set %c $replace(%c,q,Q) | /set %c $replace(%c,r,13R) | /set %c $replace(%c,s,7S) | /set %c $replace(%c,t,T) | /set %c $replace(%c,u,4u) | /set %c $replace(%c,v,V) | /set %c $replace(%c,w,12W) | /set %c $replace(%c,x,7X) | /set %c $replace(%c,y,Y) | /set %c $replace(%c,z,6z) | /set %c $replace(%c,?,1215?) | /set %c $replace(%c,.,1215.) | /say %c | /unset %c
}
alias aikman if ($isalias(hgute) == $true) { .play -ctaikman mrtrick.txt 0 } | else { echo -a 4You need mrnames.mrc or mrsport1.mrc loaded for this hidden alias to work. }
alias joker %num = 1 | /unset %msg  | %msg =  | %color = p | :start | if %color == p { %num2 = 13 | %num3 = 0 $+  | %color = y | /goto add } | if %color == y  { %num2 = 8 | %num3 = 1 $+  | %color = p | goto add } | :add | if $mid($1-,%num,1) != $null { | %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+  $mid($1-,%num, 1) $+   | /inc %num | /goto start } | /say %msg
alias rt  %num = 1 | unset %msg  | %num2 = 1 | %msg =  | :start | %num2 = $rand(1,14) | if %num2 = 8 { /goto start } | /if %num2 = 9 { | /goto start } | /if %num2 = 11 { | /goto start } | if $mid($1-,%num,1) != $null { %msg = %msg $+   $+ %num2 $+   $+  $mid($1-,%num, 1)  $+    |   /inc %num | /goto start  } | /say %msg
alias bee %num = 1 | unset %msg  | %msg =  | %color = p | :start | if %color == p { %num8 = 1 | %num1 = 8 | %color = y | goto add } | if %color == y  { %num8 = 8 | %num1 = 1 | %color = p | goto add } | :add | if $mid($1-,%num,1) != $null { set %temp $mid($1-,%num,1) | if (%temp isnum) { set %temp  $+ %temp } | %msg = %msg $+   $+ %num8 $+ , $+  %num1 $+ %temp $+    | inc %num |  goto start  } |  say %msg
alias blue %num = 1 | /unset %msg  | %msg =  | %color = p | :start | if %color == p { %num2 = 0 | %num3 = 2 | %color = y | /goto add } | if %color == y  { %num2 = 2 | %num3 = 0 | %color = p | /goto add } | :add | if $mid($1-,%num,1) != $null { set %temp $mid($1-,%num,1) | if (%temp isnum) { set %temp  $+ %temp } | %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+ %temp $+   | /inc %num | /goto start  } | /say %msg
alias tyg %num = 1 | unset %msg  | %msg =  | %color = p | :start | if %color == p { %num2 = 8 | %num3 = 5 | %color = y | goto add } | if %color == y  { %num2 = 11 | %num3 = 12 | %color = w | goto add } | if %color == w  { %num2 = 1 | %num3 = 4 | %color = z | goto add } | if %color == z  { %num2 = 0 | %num3 = 7 | %color = p | goto add } | :add | if $mid($1-,%num,1) != $null { set %temp $mid($1-,%num,1) | if (%temp isnum) { set %temp  $+ %temp } | %msg = %msg $+   $+ %num2 $+ , $+  %num3 $+ %temp $+   | inc %num | goto start  } | say %msg
menu query {
  -
  MR TrickS
  .RAINBOW 1 2 3 4 
  ..Ascii Popups
  ...Rainbow A-D
  ..../2Buns:/2buns $$?="Choose Msg max 28 letters"
  ..../3Hrts:/3hrts 
  ..../Ack:/ack $$?="Choose Msg"
  ..../Ack2 French:/ack2 $$?="Choose Msg"
  ..../Ang:/ang $$?="Choose a Message"
  ..../BigBye:/bigbye $$?="nick or max 15 letters"
  ..../Boo:/boo $$?="Max 40 letters"
  ..../Bow:/bow $$?="Choose Nick or max 12 letters"
  ..../byeman:/byeman $$?="Choose Nick or max 15 letters"
  ..../Cooking:/cooking  $$?="max 15 letters"
  ..../CTalk:/ctalk $$?="Choose Msg up to 10 words"
  ..../Cya:/cya $$?="nick or max 13 letters"
  ..../DaBaby:/dababy $$?="Choose Nick or Short Msg"
  ..../Dnite:/dnite $$?="Choose Nick or max 44 letters"
  ..../Doz:/doz $$?="Choose nick or short msg"
  ...Rainbow E-H
  ..../EEK:/eek $$?="Max 21 Letters"
  ..../Every1:/every1 $$?="Max 31 Letters"
  ..../Eyes:/eyes $$?="highlight nick, msg 30 letters"
  ..../Faces:/faces $$?="Max 28 Letters"
  ..../Flow:/flow $$?="Max 34 Letters"
  ..../Frogs:/frogs $$?="Choose Msg at least 3 Words"
  ..../Frown:/frown $$?="max 36 letters"
  ..../Grr:/grr $$?="max 25 letters"
  ..../Heart2:/heart2 $$?="Choose Nick" $$?="Choose Second Nick"
  ..../HeeHee:/heehee $$?="Choose Nick or Msg of 5 words"
  ..../HIya:/hiya $$?="Choose a Nick" $$?="Message up to 11 words"
  ..../Homer: /homer $??="Add Message"
  ..../Hugs:/hugs $$?="Max 34 Letters"
  ..../Hugs2:/hugs2 $$?="Choose Nick or Msg 28 letters"
  ...Rainbow I-L
  ..../Jet:/jet $$?="Choose Nick or max 36 letters"
  ..../Kewl:/kewl $$?="Msg of 32 letters"
  ..../Kis:/kis $$?="Choose Nick or Short Msg"
  ..../KissMy:/kissmy $$?="nick or max 40 letters"
  ..../Lemon:/lemon $$?="Max 27 Letters"
  ..../Liz:/liz $$?="highlight nick, msg max 28 letters"
  ..../LoL:/lol $$?="Choose Msg"
  ..../Lol2:/lol2 $$?="max 25 letters"
  ..../LOL3:/lol3 $$?="Max 26 Letters"
  ..../LoveTxt:/lovetxt $$?="Choose Nick or max 22 letters"
  ..../Luv:/luv $$?="nick or max 12 letters"
  ..../Luvit:/luvit $$?="Max 16 Letters"
  ...Rainbow M-P
  ..../Mag:/mag $$?="Choose Msg max 28 letters"
  ..../MegaHug:/megahug $$?="Choose Nick or Msg 20 letters"
  ..../Mirror:/mirror $$?="Choose Nick or Msg 14 letters"
  ..../Monu:/monu $$?="Choose Nick or Msg 17 letters"
  ..../MrSM:/mrsm $$?="Choose Message 34 letters"
  ..../MXmas:/mxmas $$?="Choose Message 48 letters"
  ..../MyBox:/mybox $$?="Choose Message 42 letters"
  ..../My2:/my2 $$?="max 13 letters"
  ..../MyAngel:/myangel $$?="Choose Nick"
  ..../Myou:/myou $$?="Choose Nick or Msg 43 letters"
  ..../NaNa:/nana $$?="Choose Nick or Msg 15 letters"
  ..../Noo:/noo $$?="Choose Message 35 letters"
  ..../Owl:/owl $$?="highlight nick, msg max 34 letters"
  ..../OH:/oh $$?="Max 33 Letters"
  ..../Paint:/paint $$?="Choose Nick or Msg 16 letters"
  ..../Phone:/phone $$?="Choose Message 25 letters"
  ..../Pmk:/pmk $$?="Max 33 Letters"
  ..../Prob:/prob $$?="Max 34 Letters"
  ...Rainbow R-T
  ..../Roll:/roll $$?="Choose Nick or Msg 26 letters"
  ..../Rainb:/rainb $$?="Choose Nick"
  ..../Santa:/santa $$?="Choose Nick"
  ..../SeeYa:/seeya $$?="Choose a Nick"
  ..../Sher2:/sher2 $$?="Choose Nick"
  ..../Sign:/sign $$?="Choose Message 48 letters"
  ..../Smile:/smile $$?="max 36 letters"
  ..../Smile4:/smile4 
  ..../Smiles:/smiles $$?="Choose a Nick or Short Msg"
  ....Suzy boxes
  ...../sz (Random sz):/sz $$?="Choose Msg max 37 letters"
  ...../1sz:/1sz $$?="Max 40 Letters"
  ...../2sz:/2sz $$?="Max 38 Letters"
  ...../3sz:/3sz $$?="Max 37 Letters"
  ...../4sz:/4sz $$?="Max 43 Letters"
  ..../thank:/thank $$?="Choose Nick or Msg 42 letters"
  ..../Thankr:/thankr $$?="Choose Nick or Msg max 44 letters"  
  ..../three:/three $$?="Msg of 24 letters"
  ..../thpt:/thpt $$?="max 40 letters"
  ..../toys:/toys $$?="Choose Nick or Msg 26 letters"
  ..../trek:/trek $$?="nick or max 12 letters"
  ..../trip:/trip $$?="highlight nick, msg max 48 letters"
  ..../tng:/tng $$?="Choose Nick or Short Msg"
  ...Rainbow U-Z
  ..../Und:/und $$?="max 48 letters"
  ..../UndS:/unds $$?="max 7 words"
  ..../Wel:/wel $$?="Choose Nick or max 23 letters"
  ..../Wel2:/wel2 $$?="Choose Nick or Msg max 26 letters"
  ..../WeeHart:/weehart $$?="Max 25 letters"
  ..../Wigg:/wigg $$?="Choose Msg max 34 letters"
  ..../Wink:/wink $$?="max message 46 letters"
  ..../WoW:/wow $$?="max 31 letters"  
  ..../WoW1:/wow1 $$?="Max 20 Letters"
  ..../WoW3:/wow3 $$?="max 30 letters"
  ..Color Text Talkers
  .../big /bc (LARGE LETTERS):/BIG $$?="Choose Msg"
  .../r (Rainbow):/r $$?="Choose Msg"
  .../cr (CrookedRainb):/cr $$?="Choose Msg"
  .../ac (AlternateChar):/ac $$?="Choose Msg"
  .../ni (NoInk):/ni $$?="Choose Msg"
  .../Coke:/coke $$?="Choose Msg"
  .../wdz (RainbowBar):/wdz $$?="Choose Msg"
  .../ct (CrookedColor):/ct $$?="Choose Msg"
  .../Joker:/joker $$?="Choose Msg"
  .../rt (RandomColor):/rt $$?="Choose Msg"
  .../Blue:/blue $$?="Choose Msg"
  .../Bee:/bee $$?="Choose Msg"
  .../Tyg:/tyg $$?="Choose Msg"
  .../mal:/mal $$?="Choose Msg"
  ../hin (last to join): hin
  ../hinn (add name):/hinn $$?="Choose a Nick"
  .RbBoxes 1 2 
  ..RbBox1 /rbb
  ...Random rb Box /rbb: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | rbb %mes
  ...-
  ...Three Line Boxes /rbb3: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | rbb3 %mes
  ...Five Line Boxes /rbb5: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | rbb5 %mes
  ...Seven Line Boxes /rbb7: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | rbb7 %mes
  ...-
  ...54 Nightrose Boxes /nrb: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | nrb %mes
  ...37 Sher^ Boxes /sherb: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | sherb %mes
  ...4 kjo boxes /kjob: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | kjob %mes
  ...5 ^kris boxes /krisb: set %mes $?="enter short message or OK for nickname" |  if (%mes == $null) { rbnick3 | set %mes Hello %nick } | krisb %mes
  ..RbBox2 /tbox: tbox $$?="enter message"
  .-
  .Hearts
  ..Small Hearts /SH
  ...Random Small Heart /SH: sh
  ...Random Black Heart /SHB: shb
  ...-
  ...1-10 Pick Sm. Black Heart
  ....1 Black with 9,3 /SH1: sh1
  ....2 Black with 11,10,13,6 /SH2: sh2
  ....3 Black with 11,10 /SH3: sh3
  ....4 Black with 13,0,6,15 /SH4: sh4
  ....5 Black with 0,15,14 /SH5: sh5
  ....6 Black with 4,5 /SH6: sh6
  ....7 Black with 4,0,12 /SH7: sh7
  ....8 Black with 13,6 /SH8: sh8
  ....9 Black with 8,7,4,5 /SH9: sh9
  ....10 Black with 8,7,4,11,13,9 /SH10: sh10
  ...-
  ...11 Blue Small Heart /SH11: sh11
  ...12 Red Small Heart /SH12: sh12
  ...13 Cyan Small Heart /SH13: sh13
  ...14 Lt. Blue Small Heart /SH14: sh14
  ...15 Grey Small Heart /SH15: sh15
  ...16 White Small Heart /SH16: sh16
  ..Big Hearts /BH
  ...Random Big Heart /BH: bh
  ...Random Black Heart /BHB: bhb
  ...Big Heart Rainbow /BHR: bhr
  ...-
  ...1-10 Pick Big Black Heart
  ....1 Black with 9,3 /BH1: bh1
  ....2 Black with 11,10,13,6 /BH2: bh2
  ....3 Black with 11,10 /BH3: bh3
  ....4 Black with 13,0,6,15 /BH4: bh4
  ....5 Black with 0,15,14 /BH5: bh5
  ....6 Black with 4,5 /BH6: bh6
  ....7 Black with 4,0,12 /BH7: bh7
  ....8 Black with 13,6 /BH8: bh8
  ....9 Black with 8,7,4,5 /BH9: bh9
  ....10 Black with 8,7,4,11,13,9 /BH10: bh10
  ...-
  ...11 Blue Big Heart /BH11: bh11
  ...12 Red Big Heart /BH12: bh12
  ...13 Cyan Big Heart /BH13: bh13
  ...14 Lt. Blue Big Heart /BH14: bh14
  ...15 Grey Big Heart /BH15: bh15
  ...16 White Big Heart /BH16: bh16
  .Shimmering Nicklist
  ..Random Shimmer /shim: shim
  ..Pick Your Own /shimmer: shimmer
  ..-
  ..Turn off Shimmer /shimoff: shimmeroff
  ..-
  ..Shimmers 1-10
  .../shim1 Party!: shim1
  .../shim2 Cowboys: shim2
  .../shim3 Bright: shim3
  .../shim4 Blue-Purple: shim4
  .../shim5 Purple: shim5
  .../shim6 Peek-A-Boo: shim6
  .../shim7 USA: shim7
  .../shim8 Prime: shim8
  .../shim9 Pink: shim9
  .../shim10 Easter: shim10
  ..Shimmers 11-20
  .../shim11 Fugly: shim11
  .../shim12 Raiders: shim12
  .../shim13 Green: shim13
  .../shim14 All Colors: shim14
  .../shim15 Red: shim15
  .../shim16 Halloween: shim16
  .../shim17 M: shim17
  .../shim18 Ghosts: shim18
  .../shim19 Nightrose: shim19
  .../shim20 Xmas Lights: shim20
  ..Shimmers 21-33
  .../shim21 Valentines: shim21
  .../shim22 Easter: shim22
  .../shim23 St-Patricks: shim23
  .../shim24 July-4th: shim24
  .../shim25 Hannukah: shim25
  .../shim26 Halloween: shim26
  .../shim27 Thanksgiving: shim27
  .../shim28 Xmas-Lights: shim28
  .../shim29 Santa: shim29
  .../shim30 Candy: shim30
  .../shim31 Bright-Neons: shim31
  .../shim32 Low-Ink: shim32
  .../shim33 Citrus: shim33
  ..-
  ..About Shimmer: echo -a 12Shimmer script written by CStyle, texxy, and chippy (shimmer will not work in mirc 5.11)
  .Word Pictures
  ..isfor /is4: is4
  ..hick /hick: hick
  ..money /money: money
  ..means /means: means
  .Wild Greets
  ../whello : rbnick3 | set %temp $rand(640,664) | $read -l $+ %temp mrtrick.txt
  ../wbye : rbnick3 | set %temp $rand(665,689) | $read -l $+ %temp mrtrick.txt
  .Rumors
  ..Random Rumor /rumor: rumor
  ..Rumors 1-9
  .../rumor1 jail 4 nicks: $read -l820 mrtrick.txt
  .../rumor2 great 4 nicks: $read -l821 mrtrick.txt
  .../rumor3 surprise 8 nicks: $read -l822 mrtrick.txt
  .../rumor4 affair 8 nicks: $read -l823 mrtrick.txt
  .../rumor5 inlaws 6 nicks: $read -l824 mrtrick.txt
  .../rumor6 nymph 8 nicks: $read -l825 mrtrick.txt
  .../rumor7 wham 6 nicks: $read -l826 mrtrick.txt
  .../rumor8 tape 8 nicks: $read -l827 mrtrick.txt
  .../rumor9 strip 5 nicks: $read -l828 mrtrick.txt
  ..Rumors 10-17
  .../rumor10 diary 4 nicks: $read -l829 mrtrick.txt
  .../rumor11 eat 6 nicks: $read -l830 mrtrick.txt
  .../rumor12 cyber 6 nicks: $read -l831 mrtrick.txt
  .../rumor13 lies 8 nicks: $read -l832 mrtrick.txt
  .../rumor14 trooo 8 nicks: $read -l833 mrtrick.txt
  .../rumor15 caught 7 nicks: $read -l1145 mrtrick.txt
  .../rumor16 nudists 9 nicks: $read -l1146 mrtrick.txt
  .../rumor17 kinky 5 nicks: $read -l1147 mrtrick.txt
  .Odds and Ends
  ..texxy Shifts
  .../sf5 (shift-F5) Awwwww:/sf5
  .../sf6 (shift-F6)hehehe:/sf6 
  .../sf7 (shift-F7)hmmmmm:/sf7
  .../sf8 (shift-F8)woohoo:/sf8
  .../sf9 (shift-F9)thpttt:/sf9
  .../sf10 (shift-F10)Shnikeys:/sf10
  ..Really Big Pops
  .../bigsmile: bigsmile
  .../bigfrown: bigfrown
  .../bigtung: bigtung
  .../biglol: biglol
  ..Color-Codes/Count
  .../Color:/color $$?="Choose Color #"
  .../Color2:/color2
  .../Color3:/color3
  .../mecolor:/mecolor   
  .../mecount:/mecount
  ..Private NOTICES
  .../v nickname:/v $$?="Choose any Nick on irc" $$?="message?"
  .../vx nickname (flirt):/vx $$?="Choose any Nick on irc" $$?="message?"
  ..OP Chat
  .../o:/o $$?="Choose Msg"
  .../o2:/o2 $$?="Choose Msg"
  .../ov (ops-voice):/ov $$?="Choose Msg"
  .../opwow:/opwow $$?="Choose Msg"
  ..List Ascii Codes /listascii: listascii
  ..Show Resolution Sizes
  ...640 X 480 /wrap:/wrap
  ...800 X 600 /wrap2:/wrap2
  ...1024 X 768 /wrap3:/wrap3
  ..Funny Timer Kicks
  ...Random Kick /rkick: rkick
  ...-
  .../rkick1 Shark: rkick1
  .../rkick2 Yankee!: rkick2
  .../rkick3 Hotdog: rkick3
  .../rkick4 Duel: rkick4
  .../rkick5 Karate: rkick5
  .../rkick6 Screw: rkick6
  ..SOUNDS/Wav Play
  .../s wav (simple sound):/s
  .../ss wav (colored sound):/ss
  .../playwav (Search for Word): playwav
  .-
  .Menu and Credits
  ..Menu /mrtmenu: mrtmenu
  ..Credits: .play -ctcredit mrtrick.txt 500
  .Sharing MRtrick
  ..MRtrick Offer /mrtoffer: mrtoffer
  ..Send MRtrick--> $snick(#,1) : rbnick3 | dcc send %nick mrtrick.mrc mrtrick.txt | msg %nick both the .txt and .mrc need to be in \mirc\ | msg %nick type--> 4 /load -rs mrtrick.mrc
}

[sp]
sp1=
sp2=
sp3=
sp4=
sp5=

[A]
A1=*
A2=**
A3=***
A4=**
A5=**

[B]
B1=**
B2=**
B3=**
B4=**
B5=**

[C]
C1=**
C2=*
C3=*
C4=*
C5=**

[D]
D1=***
D2=**
D3=**
D4=**
D5=***

[E]
E1=***
E2=*
E3=**
E4=*
E5=***

[F]
F1=***
F2=*
F3=**
F4=*
F5=*

[G]
G1=***
G2=*
G3=***
G4=**
G5=**

[H]
H1=**
H2=**
H3=***
H4=**
H5=**

[I]
I1=***
I2=*
I3=*
I4=*
I5=***

[J]
J1=*
J2=*
J3=*
J4=**
J5=**

[K]
K1=**
K2=**
K3=**
K4=**
K5=**

[L]
L1=*
L2=*
L3=*
L4=*
L5=***

[M]
M1=**
M2=****
M3=***
M4=**
M5=**

[N]
N1=**
N2=***
N3=***
N4=***
N5=**

[O]
O1=*
