Okay, so this has nothing to do with deviantart but I need it so...i am posting it here...it is for mIRC and it goes in remote...

=^-^= The Wonderfully Confusing Fire Tiger

alias lastColor {
var %text = $$1-
noop $regex(%text,/(\d\d?(?:,\d\d?)?|(?!\d)|)/g))
var %lastColor = $regml($regml(0))
if ($istok( ,%lastColor,32)) { return }
return %lastColor
}

on *:input:*: {
if ( ( $left($1,1-) != / ) || ( $1 == /me ) ) {
var %next = 10<12cont10>
var %continue = 10<12cont10>
var %more = 10<12cont10>
var %done = 10<2end10>
var %textlen = $len($1-)
var %prevline
if (%textlen > 400) {
var %pos = 1
var %text = $mid($1-, %pos, 400)
var %firsttime = 1

while ( %text != $null ) {
if ( $len($deltok(%text, -1, 32)) < 370 ) {
%text = $left(%text, 370)
inc %pos 370
}
else {
%text = $deltok(%text,-1,32)
inc %pos $len(%text)
inc %pos
}
var %outtext = %text
%text = $mid($1-, %pos, 400)
if (%firsttime == 1) {
if ($gettok(%outtext, 1, 32) == /me) {
var %outtext = %outtext + 6
%outtext %next
%prevline = %outtext
}
else {
say %outtext %next
%prevline = %outtext
}
%firsttime = 0;
}
else {
if (%text != $null) {

say %continue $lastcolor(%prevline) %outtext %next
%prevline=%outtext
}
else {
if (%textlen <= 945) {
say %continue $lastcolor(%prevline) %outtext %done
%prevline=%outtext
}
else {
say %continue $lastcolor(%prevline) %outtext %next
%prevline=%outtext
}
}
}
}
halt
}
} | else {

var %aliaslen = $len($1)
var %alias = $1

var %prevline
var %next = 10<12cont10>
var %continue = 10<12cont10>
var %more = 10<12cont10>
var %done = 10<12end10>
var %textlen = $len($1-)
if (%textlen > 400) {
var %pos = 1
var %text = $mid($1-, %pos, 400)
var %firsttime = 1

while ( %text != $null ) {
if ( $len($deltok(%text, -1, 32)) < 370 ) {
%text = $left(%text, 370)
inc %pos 370
}
else {
%text = $deltok(%text,-1,32)
inc %pos $len(%text)
inc %pos
}
var %outtext = %text
%text = $mid($1-, %pos, 400)
if (%firsttime == 1) {
if ($gettok(%outtext, 1, 32) == /me) {
%outtext %next
%prevline = %outtext
}
else {
$alias %outtext %next
%prevline = %outtext
}
%firsttime = 0;
}
else {
if (%text != $null) {
say %continue $lastcolor(%prevline) $alias %outtext %next
%prevline = %outtext
}
else {
if (%textlen <= 945) {
say %continue $lastcolor(%prevline) $alias %outtext %done
%prevline = %outtext
}
else {
say %continue $lastcolor(%prevline) $alias %outtext %more
%prevline = %outtext
}
}
}
}
halt
}



}