New BB tag to do rainbow text...

This is a fairly simple hack that allows you to create a new BB tag to do
rainbow colors with text. It is only a few lines and the only file affected
by it is admin/functions.php.

You can see a sample output in this thread: http://www.ls1.com/forums/showthread...hreadid=225576


Note1: This hack has been done and tested on VB 2.2.9
Note2: Using other BB tags within the rainbow tags will convert the underlying HTML code in to rainbow text.

Note3: You can find the revised and BB code friendly version in this post

Note4: You can find the version that displays the full spectrum of colors in this post.

[Barret]

Zzed,
We are waiting man. Glad you are helping with this.
Thanks in advance.

[Zzed]

Here is the version with the full spectrum of colors.

This is what the output of the tag looks like: http://www.ls1.com/forums/showthread...59#post2190859

Enjoy

[Barret]

Zzed,
You are the greatest and I am pleased to be the first to thank you.
Thanks!
Clicks install

{{UPDATE}} This hack also is fixed from the previous version where there were a few problems as posted by john.eovie
Here

[Zzed]

Originally posted by Barret
Zzed,
You are the greatest and I am pleased to be the first to thank you.
Thanks!
Clicks install

{{UPDATE}} This hack also is fixed from the previous version where there were a few problems as posted by john.eovie
Here

Thank you for your kind words.

[Boofo]

Zzed, I couldn't do the new version with the following line:

PHP Code:

$bbcode=str_replace("{", "{", $bbcode); // stop people posting replacements in their posts 


Because my line for that is this:

PHP Code:

// $bbcode=str_replace("{", "{", $bbcode); // stop people posting replacements in their posts 


because of another hack. I just changed the "// ###################### Startdorainbow #######################" part and left the first part from version 1 in there instead. It seems to work.

[XIanX]

Originally posted by Zzed
I went ahead and made a new version that looks like DrkFusion's posts. Here is an example. I will release it in this thread for anyone who is interested.

I'm interested.

[Zzed]

Originally posted by XIanX
I'm interested.

LOL, Look at Post #52 in this thread.

[Jack of Xanadu]

I did some fine tweaking on the scripts and merged both scripts a little and now it looks awsome:
You can see it in action in here
original script:

// ###################### Startdorainbow #######################
function dorainbow($code) {
$textlen = 0;
$tag = 0;
$len = strlen($code);

for($x = 0;$x < $len;$x++) {
if(substr($code,$x,1) == "\\") {
continue;
}
if($tag == 0) {
if(substr($code,$x,1) == "<") {
$tag = 1;
}
else {
$textlen++;
}
}
else {
if(substr($code,$x,1) == ">") {
$tag = 0;
}
}
}

$buffer = "<table><tr><td bgcolor=\"#000000\">";
$slice = $textlen / 6;
$step = 255 / $slice;
$index = 0;
$R = 255;
$G = 0;
$B = 0;
$section = 0;
$count = 0;
for($x = 0;$x < $len;$x++) {
if(substr($code,$x,1) == "\\") {
continue;
}
if($tag == 0) {
if(substr($code,$x,1) == "<") {
$buffer .= substr($code,$x,1);
$tag = 1;
}
else {
if($section == 0) {
$Rx = 0;
$Gx = $step;
$Bx = 0;
} else if ($section == 1) {
$Rx = (-1) * $step;
$Gx = 0;
$Bx = 0;
} else if ($section == 2) {
$Rx = 0;
$Gx = 0;
$Bx = $step;
} else if ($section == 3) {
$Rx = 0;
$Gx = (-1) * $step;
$Bx = 0;
} else if ($section == 4) {
$Rx = $step;
$Gx = 0;
$Bx = $step;
} else {
$Rx = 0;
$Gx = 0;
$Bx = (-1) * $step;
}
$count++;
if($count > $slice) {
$section++;
$count = 0;
}
$R += $Rx;
$G += $Gx;
$B += $Bx;
$R = iif($R > 255, 255, $R);
$R = iif($R < 0, 0, $R);
$G = iif($G > 255, 255, $G);
$G = iif($G < 0, 0, $G);
$B = iif($B > 255, 255, $B);
$B = iif($B < 0, 0, $B);
$color = sprintf("#%02X%02X%02X", $R, $G, $B);
$buffer .= "<font color=\"$color\">";
$buffer .= substr($code,$x,1);
$buffer .= "</font>";
$index++;
}
}
else {
if(substr($code,$x,1) == ">") {
$tag = 0;
}
$buffer .= substr($code,$x,1);
}
}
$buffer .= "</td></tr></table>";

return($buffer);
}

Replace it with:

// ###################### Startdorainbow #######################
function dorainbow($code) {
$textlen = 0;
$tag = 0;
$len = strlen($code);

for($x = 0;$x < $len;$x++) {
if(substr($code,$x,1) == "\\") {
continue;
}
if($tag == 0) {
if(substr($code,$x,1) == "<") {
$tag = 1;
}
else {
$textlen++;
}
}
else {
if(substr($code,$x,1) == ">") {
$tag = 0;
}
}
}

$buffer = "<table style=\"filter:glow(color=black, strength=6)\"><tr><td>";
$slice = $textlen / 6;
$step = 255 / $slice;
$index = 0;
$R = 255;
$G = 0;
$B = 0;
$section = 0;
$count = 0;
for($x = 0;$x < $len;$x++) {
if(substr($code,$x,1) == "\\") {
continue;
}
if($tag == 0) {
if(substr($code,$x,1) == "<") {
$buffer .= substr($code,$x,1);
$tag = 1;
}
else {
if($section == 0) {
$Rx = 0;
$Gx = $step;
$Bx = 0;
} else if ($section == 1) {
$Rx = (-1) * $step;
$Gx = 0;
$Bx = 0;
} else if ($section == 2) {
$Rx = 0;
$Gx = 0;
$Bx = $step;
} else if ($section == 3) {
$Rx = 0;
$Gx = (-1) * $step;
$Bx = 0;
} else if ($section == 4) {
$Rx = $step;
$Gx = 0;
$Bx = $step;
} else {
$Rx = 0;
$Gx = 0;
$Bx = (-1) * $step;
}
$count++;
if($count > $slice) {
$section++;
$count = 0;
}
$R += $Rx;
$G += $Gx;
$B += $Bx;
$R = iif($R > 255, 255, $R);
$R = iif($R < 0, 0, $R);
$G = iif($G > 255, 255, $G);
$G = iif($G < 0, 0, $G);
$B = iif($B > 255, 255, $B);
$B = iif($B < 0, 0, $B);
$color = sprintf("#%02X%02X%02X", $R, $G, $B);
$buffer .= "<font color=\"$color\" face=\"Verdana\" size=2><b>";
$buffer .= substr($code,$x,1);
$buffer .= "</font>";
$index++;
}
}
else {
if(substr($code,$x,1) == ">") {
$tag = 0;
}
$buffer .= substr($code,$x,1);
}
}
$buffer .= "</td></tr></table>";

return($buffer);
}

[Boofo]

LOL That was already done (with a little less glow effect, which looks better) in the beginning of the thread. What else was changed, maybe I missed it?

[Areku]

The one with glow effect at the beginning of the thread was NOT having the full spectrum of colours

Thanks Jack!