/ScriptServ

;---------I got this from MRTrick.mrc-----------
alias shimmer {
  rbtul | if ($1 == off) { shimmeroff | 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 101,11 111,12 121,13 131,14 141,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 2P3A4R5T6Y 7T10I12M13E /shim1
alias shim2 shimmer 2 14 | echo -a 14C2O14W2B14O2Y14S2 /shim2
alias shim3 shimmer 0 4 8 9 11 13 | echo -a 4B8R9I11G13H4T13 /shim3
alias shim4 shimmer 2 12 13 10 6 | echo -a 2B12L13U10E6-P2U12R13P10L6E /shim4
alias shim5 shimmer 6 6 13 13 14 | echo -a 6P13U14R6P13L14E6 /shim5
alias shim6 shimmer 0 0 14 15 1 1 | echo -a PE14EK-A-B15OO 14/shim6
alias shim7 shimmer 4 0 12 | echo -a 4U12S4A12 /shim7
alias shim8 shimmer 12 4 8 | echo -a 12P4R8I12M4E /shim8
alias shim9 shimmer 13 13 4 15 | echo -a 13P4I13N15K13 /shim9
alias shim10 shimmer 13 11 8 9 6 4 | echo -a 13E11A8S9T6E4R /shim10
alias shim11 shimmer 3 9 8 7 4 5 | echo -a 3F9U8G7L4Y5 /shim11
alias shim12 shimmer 1 14 | echo -a 1,14RAIDERS /shim12
alias shim13 shimmer 3 10 9 | echo -a 3G10R9E3E10N3 /shim13
alias shim14 shimmer 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | echo -a 1A2L3L4 C5O6L7O8R9S 10/11s12h13i15m1414
alias shim15 shimmer 4 4 4 13 5 | echo -a 4R13E4D5S4 /shim15
alias shim16 shimmer 1 1 1 2 7 4 15 | echo -a 7,1H4A2L15L7O4W2E15E7N4 /shim16
alias shim17 shimmer 12 8 9 1 | echo -a 12M 8/9s12h8i12m17
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,1N11I10G14H13T11R10O14S13E11 /shim19
alias shim20 shimmer 2 3 4 6 7 9 12 13 0 0 0 0 0 0 0 0 | echo -a 2X3M4A6S7 9L12I13G2H3T4S6 /shim20
alias shim21 shimmer 4 0 0 0 13 0 0 4 4 15 | echo -a 4V13A4L15E4N13T4I15N4E13 /shim21
alias shim22 shimmer 6 0 9 0 11 0 13 0 8 13 | echo -a 6E9A11S13T8E6R213 /shim22
alias shim23 shimmer 3 0 9 0 14 0 15 3 3 10 | echo -a 3S9T3. P14A3T15R3I9C15K3S /shim23
alias shim24 shimmer 4 4 12 1 12 4 0 15 | echo -a 4J12U4L15Y4 412T4H /shim24
alias shim25 shimmer 12 2 12 14 15 14 12 | echo -a 12H2A12N14N15A14K12U2H12 /shim25
alias shim26 shimmer 7 1 14 7 7 0 1 15 | echo -a 7H14A7L15L7O14W7E15E7N214 /shim26
alias shim27 shimmer 7 1 14 7 7 1 15 5 3 5 | echo -a 7T14H7AN15K3S5G7I14V7IN15G27 /shim27
alias shim28 shimmer 4 0 9 0 8 0 13 0 12 0 4 | echo -a 4X9M8A13S 12L4I9G8H13T12S24 /shim28
alias shim29 shimmer 4 1 14 4 | echo -a 4S14A4NT4A /shim29
alias shim30 shimmer 6 13 13 6 11 15 | echo -a 6C13A11N15D13Y6 /shim30
alias shim31 shimmer 9 11 8 0 0 0 9 13 | echo -a 9N11E8O9N13S /shim31
alias shim32 shimmer 14 15 1 0 | echo -a 14,0L15O1W 14I15N1K /shim32
alias shim33 shimmer 1 9 8 7  | echo -a 9C8I7T9R8U7S /shim33
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 }
}