Top

Rainbow Text


mIRC Code
+ 0 likes
Please Register to submit score.
Bookmark and Share
Average Score  3.0 (of 2 scores)
Date Added  Mar 19, 2007
Last Updated  Mar 19, 2007
Tags  color  rainbow  text 

Introduction

This is based off of the same premise of my other rainbow script.

What it does: Automatically changes the color of text that you type into a smooth rainbow.

To use: Copy the script to the clipboard, press alt+r in mIRC, File->New, Edit->Paste. Right-click in a channel to enable/disable it and change whether the rainbow colors will be the foreground or background colors. Unforunately, numbers can obviously cause some problems, so if the text contains any numbers it won't modify it. If you don't like that, remove ' && ($1- isalpha)' from line 10.

Grab the Code

on *:LOAD:{
  set %RainbowTextOn 0
  set %RainTxtStatus Enable
  set %RainTxtColK Background
  set %RainTxtColH 0
  halt
}
 
on *:INPUT:*:{
  if (/* !iswm $1) && (%RainbowTextOn == 1) && ($1- isalpha) {
    set %RainTxtCols 4,7,8,9,11,12,6
    var %RainTxtK = $replace($1-,$chr(32),~)
    var %k = $r(1,7), %l = 1
    while (%l <= $len(%RainTxtK)) {
      if (%k > 7) {
        var %k = 1
        continue
      }
      elseif ($mid(%RainTxtK,%l,1) == ~) {
        inc %l
        var %RainTxt = $+(%RainTxt,~)
        continue
      }
      else {
        var %RainTxtCol = $gettok(%RainTxtCols,%k,44)
        $iif(%RainTxtColH == 0,set -u0 %RainTxt $+(%RainTxt,,%RainTxtCol,$mid(%RainTxtK,%l,1)), $&
          set -u0 %RainTxt $+(%RainTxt,,1,$chr(44),%RainTxtCol,$mid(%RainTxtK,%l,1)))
        inc %l
        inc %k
      }
    }
    msg $target $replace(%RainTxt,~,$chr(32))
    halt
  }
}
 
menu channel {
  -
  Rainbow Text
  .%RainTxtStatus:{
    $iif(%RainTxtStatus == Enable,set %RainbowTextOn 1,set %RainbowTextOn 0)
    $iif(%RainTxtStatus == Enable,set %RainTxtStatus Disable,set %RainTxtStatus Enable)
    halt
  }
  .Use %RainTxtColK Colors:{
    $iif(%RainTxtColK == Foreground,set %RainTxtColH 0,set %RainTxtColH 1)
    $iif(%RainTxtColK == Foreground,set %RainTxtColK Background,set %RainTxtColK Foreground)
    halt
  }
  -
}
 

Comments

  (10)  RSS
Calzo
Comments: 13
 
mIRC Snippet:  Rainbow Text
Posted on Jul 18, 2007 10:26 pm
Dude, it doesn't work :|
Xemnas
Comments: 44
 
mIRC Snippet:  Rainbow Text
Posted on Jul 21, 2007 12:57 am
>:O CALLUM!
Calzo
Comments: 13
 
mIRC Snippet:  Rainbow Text
Posted on Jul 29, 2007 12:37 am
ROXAS >:O
Sora-
Comments: 18
 
mIRC Snippet:  Rainbow Text
Posted on Sep 9, 2007 10:03 pm
ROXAS AND CALLUM! xD Rofl.
erry
Comments: 13
 
mIRC Snippet:  Rainbow Text
Posted on Sep 26, 2007 10:11 am
O.o hi guys.Way more useless and fun scripts!^_^Btw it does work.Just /load it.
RussellReal
Comments: 37
 
mIRC Snippet:  Rainbow Text
Posted on Sep 26, 2007 1:46 pm
alias rainbow {
var %a = 01 03 05 07 09 12 14
return $regsubex($1-,/([^ ])/g,$+($chr(3),$gettok(%a,$iif($calc(\n % $numtok(%a,32)),$v1,$numtok(%a,32)),32),\1))
}
RussellReal
Comments: 37
 
mIRC Snippet:  Rainbow Text
Posted on Sep 26, 2007 1:48 pm
alias rainbow {
var %a = 01 03 05 07 09 12 14
return $regsubex($1-,/([^ ])/g,$+($chr(3),$gettok(%a,$iif($calc(\\n % $numtok(%a,32)),$v1,$numtok(%a,32)),32),\\1))
}
sry for double posting but hawkee's comment system removes slashes, because in php \n would be a new line, but I don't see why he would need to remove slashes but anyways, repost 'escaping' my slashes
TropicalMeltdown
Comments: 72
 
mIRC Snippet:  Rainbow Text
Posted on Aug 16, 2008 2:43 am
Creative
booboo24
Comments: 4
 
mIRC Snippet:  Rainbow Text
Posted on May 18, 2009 4:30 pm
cool script but every time i press spacebar the colour goes any way around this guys im now to all this crap so plz could ya let me know thanks =]
ShadowTsukasa
Comments: 3
 
mIRC Snippet:  Rainbow Text
Posted on Jul 8, 2009 4:27 pm
Seriously, it works with only one word!

Commenting Options

Register or Login to Hawkee.com or use your Facebook or Twitter account by clicking the corresponding button below.

  
Bottom