Rainbow Text Colourer- Updated

By frishy on Oct 29, 2009

Basically this is an update on my old script from my old account i forgot the password too, and thought about a better way to do it sometime even tho ive not been on mirc for a long while. And i decided to upload it coz i can =p.

This can colour you text in a rainbow sequence. Just load into your remotes (Alt+R).

When loaded right click and then select under "rainbow" one of for options.

"text On" will colour the font in a rainbow sequence

"text background On" will colour the font and background colour in a rainbow sequence.

"Colour Off" turns both of these colours off.

note that "text On" and "text background On" can only colour a certain number of characters and will uncolour the text if it is too much. (It doesnt seem to be much of a concern anymore tho)

on *:input:#: {
if (%rainbowtexton) && (!$istok(! $chr(47),$left($1,1),32)) {
    var %r1 1
    var %rainbownupt 1
    var %nintext $len($1-) + 1
    var %rainboworder 4,7,8,9,11,6,13
    while (%r1 < %nintext) {
      if ($mid($1-,%r1,1) != $chr(32)) { var %msgrbw $addtok(%msgrbw,$gettok(%rainboworder,%rainbownupt,44) $+ $mid($1-,%r1,1),0) | inc %rainbownupt $iif(%rainbownupt = 7,-6,1) }
      else { var %msgrbw %msgrbw $chr(32) }
      inc %r1
    }
    say %msgrbw
    haltdef
  }
  elseif (%rainbowtextandbackgroundon) && (!$istok(! $chr(47),$left($1,1),32)) {
    var %r1 1
    var %rainbownupt 1
    var %nintext $len($1-) + 1
    var %rainboworder 6,04.13,07.11,08.3,09.8,11.7,13.4,06
    while (%r1 < %nintext) {
      if ($mid($1-,%r1,1) != $chr(32)) { var %msgrbw $addtok(%msgrbw,$gettok(%rainboworder,%rainbownupt,46) $+ $mid($1-,%r1,1),0) }
      else { var %msgrbw %msgrbw $+ $gettok(%rainboworder,%rainbownupt,46) $chr(32) }
      inc %r1
      inc %rainbownupt $iif(%rainbownupt = 7,-6,1)
    }
    say %msgrbw
    haltdef
  }
}

menu channel {
  -
  Rainbow
  .Text On:{
    unset %rainbowtextandbackgroundon
    set %rainbowtexton 1
    ;echo -a Rainbow text turned on
  }
  .Text + Background On:{
    unset %rainbowtexton
    set %rainbowtextandbackgroundon 1
    ;echo -a Rainbow text and background colour turned on
  }
  .Colour Off:{
    unset %rainbowtexton
    unset %rainbowtextandbackgroundon
    ;echo -a Rainbow text, and Rainbow text with background colour turned off
  }
  -
}

Comments

Sign in to comment.
frishy   -  Nov 04, 2009

thnx =]

if u prefer to use darker colours u can change the colour scheme easily my changing this line:
var %rainboworder 4,7,8,9,11,6,13

 Respond  
3nigmat1c   -  Nov 04, 2009

It works VERY well. But my only complaint is that it's not very easy on the eyes, I should get a drak background then it will work perfectly. :)

 Respond  
Cracker200   -  Oct 30, 2009

Lol i would but i'm banned from the server i go on >.> But yes i will asap :D but other then that i see, no probs, so 8/10 :P o.O

 Respond  
frishy   -  Oct 29, 2009

it should work, just double checked it and everything seems matched up, try putting it in a new file.

 Respond  
Cracker200   -  Oct 29, 2009

LOL Ah ok, well shyte like that happens in life huh, And by the way Your code don't work :P

 ***
* /if: close bracket not found
***
* /if: close bracket not found
*** 
 Respond  
frishy   -  Oct 29, 2009

FRISH also the email address for that account stopped logging in for some reason, the pass i forgot coz it was generated for me not custom :<

 Respond  
Cracker200   -  Oct 29, 2009

What was your Name on here b4, your old Account name?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.