[mIRC] Colored mode

/*
THIS SCRIPT HAS BEEN MADE BY [MM]IKKE
DO NOT DELETE ANY OF THESE CREDITS

USAGE
-----------
1. Copy-paste this to your remote tab (mIRC) in scripts editor.
2. Do "/set %colored 1" to enable colored mode.
3. Do "/set %colored 0" to disable colored mode.
4. Enjoy!

NOTE: This command will corrupt when a word starts with a number, or a standalone number, due to the way IRC color codes work. Refrain from using them with this mode.
*/

on *:INPUT:*: {
  if (%colored == 1 && $left($1-,1) != $chr(47) && $active != Status Window) {
    set %text.tmp $null
    var %i = 1
    while (%i <= $len($1-)) {
      if ($mid($1-,%i,1) == $chr(32)) {
        inc %i
        set %text.tmp %text.tmp $+  $+ $rand(2,13) $mid($1-,%i,1)
      }
      else {
        set %text.tmp %text.tmp $+  $+ $rand(2,13) $+ $mid($1-,%i,1)
      }
      inc %i
    }
    msg $active %text.tmp
    unset %text.tmp
    haltdef
  }
}