Multi Colored Text Generator

<html>
<head>
<title>Multi Colored Text Generator</title>
<style type="text/css">
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=JavaScript1.2>
<!--
var bName=navigator.appName;
var bVer=parseInt(navigator.appVersion);
var NS4=(bName=="Netscape" && bVer >= 4);
var IE4=(bName=="Microsoft Internet Explorer" && bVer >= 4);
var fstr_r;
var fstr_g;
var fstr_b;
var sItem="S";

function makeArray(){
  for(i = 0; i<makeArray.arguments.length; i++)
    this[i] = makeArray.arguments[i];
}

var convert = new makeArray('0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z');

function isNum(no, base){
  var cmp="0123456789";
  var chkStr=no;
  var chkChar;
  var rc=true;
  var nLen;

if(base == 16){
    cmp+="ABCDEFabcdef";
  }else if(base == 10){
    eval("chkStr=''+parseInt(chkStr)");
  }
  nLen=chkStr.length;

for(var i=0; i<nLen; i++){
     chkChar=chkStr.substring(i,i+1)
     if(i==0 && chkChar == "#" && base == 16){
     }else if(cmp.indexOf(chkChar)<0){
       rc=false;
     }
     if(rc == false) i=nLen;
  }
  return rc;
}

function chkNum(obj,base){
  var form=document.GradForm;
  var rc=true;

if(base==10){
    eval("rc=form."+obj+".value <= 255");
  }

if(rc){
    eval("rc=isNum(form."+obj+".value,"+base+")");
    if(!rc){
      alert("Incorrect entered numerical value!");
      eval("form."+obj+".focus()");
    }
  }else{
    alert("Numerical value exceeds 255!");
    eval("form."+obj+".focus()");
  }
  return rc;
}


function twobyte(no){
  var str=no;

if(isNum(no,16)){
    str="0"+str;
    str=str.substring((str.length-3)+1);
  }else{
    str="00";
  }
  return str;
}

function CstrLen(cStr){
  var sLen=cStr.length;
  var j=0;
  for(var i=0;i<sLen;i++){
     str=cStr.charAt(i);
     if(NS4 && str.charCodeAt(0)<1){
       i++;
     }
     j++;
  }
  return j;
}

function GradientText(form, color1, color2, color3, gStr, gType){
  var redStep, greenStep, BlueStep;
  var str_r, str_g, str_b, str;

var gStep=CstrLen(gStr);

var b1 = color1 % 0x100; if(isNaN(b1)) b1=0;
  var g1 = parseInt(color1 / 0x100) % 0x100; if(isNaN(g1)) g1=0;
  var r1 = parseInt(color1 / 0x10000) % 0x100; if(isNaN(r1)) r1=0;

var b2 = color2 % 0x100; if(isNaN(b2)) b2=0;
  var g2 = parseInt(color2 / 0x100) % 0x100; if(isNaN(g2)) g2=0;
  var r2 = parseInt(color2 / 0x10000) % 0x100; if(isNaN(r2)) r2=0;

var cStepAdd = parseInt(256 / gStep);

if(g1 > g2){
    greenStep = 0;
  }else if(g2 > g1){
    greenStep = 1;
  }else{
    greenStep = 2;
  }

if(r1 > r2){
    redStep = 0;
  }else if(r2 > r1){
    redStep = 1;
  }else{
    redStep = 2;
  }

if(b1 > b2){
    BlueStep = 0;
  }else if(b2 > b1){
    BlueStep = 1;
  }else{
    BlueStep = 2;
  }

var GradStr="";
  if(gType == 'S'){
    GradStr+='<TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0><TR><TD ALIGN=CENTER BGCOLOR="'+color3+'"><br>';
  }

for(var i=0; i<gStr.length; i++){
     str_r=twobyte(returnBase(r1,16));
     str_g=twobyte(returnBase(g1,16));
     str_b=twobyte(returnBase(b1,16));

str=gStr.charAt(i);
     if(NS4 && str.charCodeAt(0)<1){
       str=str+gStr.charAt(i+1);
       i++;
     }

GradStr+='<font color="#'+str_r+str_g+str_b+'">'+str+'</font>';

if(redStep==1){
       r1 = r1 + cStepAdd;
       if(r1 > r2) r1 = r2;
     }else if(redStep==0){
       r1 = r1 - cStepAdd;
       if(r1 < r2) r1 = r2;
     }
        
     if(greenStep==1){
       g1 = g1 + cStepAdd;
       if(g1 > g2) g1 = g2;
     }else if(greenStep==0){
       g1 = g1 - cStepAdd;
       if(g1 < g2) g1 = g2;
     }

if(BlueStep==1){
       b1 = b1 + cStepAdd;
       if(b1 > b2) b1 = b2;
     }else if(BlueStep==0){
       b1 = b1 - cStepAdd;
       if(b1 < b2) b1 = b2;
     }
  }

if(gType == 'S'){
    GradStr+='<br>&nbsp;</TD></TR></TABLE>';
  }

return GradStr;
}

function GenTag(form){
  var ss,ee,bb;

if(!isNum(form.start.value,16)){
    alert("Please check the numerical value of start color");
  }else if(!isNum(form.end.value,16)){
    alert("Please check the numerical value of end color");
  }else if(!isNum(form.bg.value,16)){
    alert("Please check the numerical value of background color");
  }else{
    eval("ss=0x"+form.start.value.substring(1)+";");
    eval("ee=0x"+form.end.value.substring(1)+";");
    eval("bb=form.bg.value");
    form.code.value=GradientText(form,ss,ee,bb,form.showstr.value,"C");
  }
}

function newRGB(type, field2){
  var form=document.GradForm;
  var chkOK=true;
  var vNo;

if(field2==""){
    if(sItem=="S"){
      chkOK=chkNum('start',16);
    }else if(sItem=="E"){
      chkOK=chkNum('end',16);
    }else if(sItem=="B"){
      chkOK=chkNum('bg',16);
    }
  }

if(chkOK){
    if(type==0){
      if(field2 != "") eval("chkOK=isNum(form.rgb_"+field2+".value,10)");
      if(chkOK){
        if(field2 != "") eval("chkOK=chkNum('rgb_"+field2+"',10)");
        if(chkOK){
          fstr_r=twobyte(returnBase(form.rgb_r.value,16));
          fstr_g=twobyte(returnBase(form.rgb_g.value,16));
          fstr_b=twobyte(returnBase(form.rgb_b.value,16));
          if(sItem=="S"){
            form.start.value="#"+fstr_r+fstr_g+fstr_b;
          }else if(sItem=="E"){
            form.end.value="#"+fstr_r+fstr_g+fstr_b;
          }else if(sItem=="B"){
            form.bg.value="#"+fstr_r+fstr_g+fstr_b;
          }
        }
      }else{
        alert("Incorrect entered numerical value of color??");
        eval("form.rgb_"+field2+"s.focus()");
      }
    }else{
      if(sItem=="S"){
        fstr_r=form.start.value.substring(1,3);
        fstr_g=form.start.value.substring(3,5);
        fstr_b=form.start.value.substring(5,7);
      }else if(sItem=="E"){
        fstr_r=form.end.value.substring(1,3);
        fstr_g=form.end.value.substring(3,5);
        fstr_b=form.end.value.substring(5,7);
      }else if(sItem=="B"){
        fstr_r=form.bg.value.substring(1,3);
        fstr_g=form.bg.value.substring(3,5);
        fstr_b=form.bg.value.substring(5,7);
      }
      form.rgb_r.value=parseInt(fstr_r,16);
      form.rgb_g.value=parseInt(fstr_g,16);
      form.rgb_b.value=parseInt(fstr_b,16);
    }
    if(chkOK) AddText();
  }
}

function AddText(){
  var form=document.GradForm;
  var ss,ee,bb;

eval("ss=0x"+form.start.value.substring(1)+";");
  eval("ee=0x"+form.end.value.substring(1)+";");
  eval("bb=form.bg.value");

str=GradientText(form,ss,ee,bb,form.showstr.value,"S");
  display("fsample", str);
}

function setRGB(id,no){
  var form=document.GradForm;
  var nid="rgb_"+id;

if(id){
    var tmp=eval("parseInt(form."+nid+".value)+parseInt("+no+")");
    if(tmp<0) tmp=255;
    else if(tmp>255) tmp=0;

eval("form."+nid+".value="+tmp);
  }

fstr_r=twobyte(returnBase(form.rgb_r.value,16));
  fstr_g=twobyte(returnBase(form.rgb_g.value,16));
  fstr_b=twobyte(returnBase(form.rgb_b.value,16));

if(sItem=="S"){
    form.start.value="#"+fstr_r+fstr_g+fstr_b;
  }else if(sItem=="E"){
    form.end.value="#"+fstr_r+fstr_g+fstr_b;
  }else if(sItem=="B"){
    form.bg.value="#"+fstr_r+fstr_g+fstr_b;
  }

AddText();
}

ResetValue();
  AddText();
}

function set(swtch){
  if(swtch == 1) sItem="S";
  else if (swtch == 2) sItem="E";
  else if (swtch == 0) sItem="B";
  ResetValue();
}

function ResetValue(){
  var form=document.GradForm;
  var str_r, str_g, str_b;

if(sItem=="S"){
    str_r=form.start.value.substring(1,3);
    str_g=form.start.value.substring(3,5);
    str_b=form.start.value.substring(5,7);
  }else if(sItem=="E"){
    str_r=form.end.value.substring(1,3);
    str_g=form.end.value.substring(3,5);
    str_b=form.end.value.substring(5,7);
  }else if(sItem=="B"){
    str_r=form.bg.value.substring(1,3);
    str_g=form.bg.value.substring(3,5);
    str_b=form.bg.value.substring(5,7);
  }
  form.rgb_r.value=parseInt(str_r,16);
  form.rgb_g.value=parseInt(str_g,16);
  form.rgb_b.value=parseInt(str_b,16);
}

function nomsg(){
  self.status="";
}

function myReset(){
  AddText();
}

//-->
</script>

</head>

<body bgcolor="#fef4d9">
<br>
<br>
<center><font color=red face="Arial" size=6>Multi Colored Text Generator</font></center>
<br>
<center>
<table border=5 bordercolor=blue borderlight=green>
<tr><td align=center><strong><font size=5 color=red>The following is script displayed area</font></strong></td></tr>
<tr><td align=center width=450 height=400>
 <form name=GradForm>
<table border=1><tr><td>
&nbsp;<INPUT type=radio name=setitem value="bg" onClick="set(0)">background color<input type=text name="bg" size=6 value="#FFFFFF" onChange="newRGB(1,'')">
<INPUT type=radio name=setitem value="start" onClick="set(1)" checked>start color<input type=text name="start" size=6 value="#FF0000" onChange="newRGB(1,'')"> 
&nbsp;<INPUT type=radio name=setitem value="end" onClick="set(2)">end color<input type=text name="end" size=6 value="#0000FF" onChange="newRGB(1,'')"> 
</td></tr> 
 
<tr><td> 
<font color="#FF0000">red</font> <input type="Button" value="+" onClick="setRGB('r',1)"><INPUT type=text name=rgb_r size=3 value=0 onChange="newRGB(0,'r')"><input type="Button" value="-" onClick="setRGB('r',-1)"> 
?@<font color="#009900">green</font> <input type="Button" value="+" onClick="setRGB('g',1)"><INPUT type=text name=rgb_g size=3 value=0 onChange="newRGB(0,'g')"><input type="Button" value="-" onClick="setRGB('g',-1)"> 
?@<font color="#0000FF">blue</font> <input type="Button" value="+" onClick="setRGB('b',1)"><INPUT type=text name=rgb_b size=3 value=255 onChange="newRGB(0,'b')"><input type="Button" value="-" onClick="setRGB('b',-1)"> 
 
</td></tr> 
 
<tr><td> 
<TABLE BORDER=1 CELLSPACING=-1 CELLPADDING=1> 
<TR> 
<TD BGCOLOR="#FFFFFF"><a href="default.htm" onClick="SetColor('FFFFFF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FFFF00"><a href="default.htm" onClick="SetColor('FFFF00');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FFE000"><a href="default.htm" onClick="SetColor('FFE000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FFC000"><a href="default.htm" onClick="SetColor('FFC000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FFA000"><a href="default.htm" onClick="SetColor('FFA000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF8000"><a href="default.htm" onClick="SetColor('FF8000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF6000"><a href="default.htm" onClick="SetColor('FF6000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF4000"><a href="default.htm" onClick="SetColor('FF4000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF0000"><a href="default.htm" onClick="SetColor('FF0000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#E00000"><a href="default.htm" onClick="SetColor('E00000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#C00000"><a href="default.htm" onClick="SetColor('C00000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FFC0FF"><a href="default.htm" onClick="SetColor('FFC0FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FFA0FF"><a href="default.htm" onClick="SetColor('FFA0FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF80FF"><a href="default.htm" onClick="SetColor('FF80FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF60FF"><a href="default.htm" onClick="SetColor('FF60FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#FF00FF"><a href="default.htm" onClick="SetColor('FF00FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#E000FF"><a href="default.htm" onClick="SetColor('E000FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#C000FF"><a href="default.htm" onClick="SetColor('C000FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#A000FF"><a href="default.htm" onClick="SetColor('A000FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#8000FF"><a href="default.htm" onClick="SetColor('8000FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00FFFF"><a href="default.htm" onClick="SetColor('00FFFF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00E0FF"><a href="default.htm" onClick="SetColor('00E0FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD></tr><tr> 
<TD BGCOLOR="#00C0FF"><a href="default.htm" onClick="SetColor('00C0FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00A0FF"><a href="default.htm" onClick="SetColor('00A0FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#0080FF"><a href="default.htm" onClick="SetColor('0080FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#0060FF"><a href="default.htm" onClick="SetColor('0060FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#0000FF"><a href="default.htm" onClick="SetColor('0000FF');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#0000E0"><a href="default.htm" onClick="SetColor('0000E0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#0000C0"><a href="default.htm" onClick="SetColor('0000C0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#D0FF00"><a href="default.htm" onClick="SetColor('D0FF00');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#A0FF00"><a href="default.htm" onClick="SetColor('A0FF00');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#80FF00"><a href="default.htm" onClick="SetColor('80FF00');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00FF00"><a href="default.htm" onClick="SetColor('00FF00');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00E000"><a href="default.htm" onClick="SetColor('00E000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00C000"><a href="default.htm" onClick="SetColor('00C000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00A000"><a href="default.htm" onClick="SetColor('00A000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#008000"><a href="default.htm" onClick="SetColor('008000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#00A0A0"><a href="default.htm" onClick="SetColor('00A0A0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#A0A000"><a href="default.htm" onClick="SetColor('A0A000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#A0A0A0"><a href="default.htm" onClick="SetColor('A0A0A0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#A0A0E0"><a href="default.htm" onClick="SetColor('A0A0E0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#E0A0A0"><a href="default.htm" onClick="SetColor('E0A0A0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#A0E0A0"><a href="default.htm" onClick="SetColor('A0E0A0');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
<TD BGCOLOR="#000000"><a href="default.htm" onClick="SetColor('000000');return false" onMouseOver="nomsg();return true">&nbsp;&nbsp;</a></TD> 
</TR> 
</TABLE> 
</td></tr> 
 
<tr><td> 
Display Text??<input type=text name="showstr" value="Registry Winner" onChange="AddText()"> 
</td></tr> 
 
<tr><td> 
<input type=hidden name="tempVal" value=""> 
code??<br> 
<TEXTAREA wrap=soft name=code COLS=62 ROWS=6"></TEXTAREA> 
</td></tr><tr><td> 
<INPUT TYPE="button" VALUE="Generate Code" onClick='GenTag(this.form)'> 
<INPUT TYPE="button" VALUE="Prefect Shot Preview" onClick='AddText()'> 
<INPUT TYPE="reset" VALUE="Clear All"> 
</td></tr></table> 
</form> 
</CENTER> 
<SPAN ID="fsample" STYLE="position: absolute;left:280;top:460; color: black; font-weight: normal; font-size: 9pt"> 
<form name="fsample2"> 
start color<input type=text name="startcolor" size=8 onfocus="this.blur()"> 
end color<input type=text name="endcolor" size=8 onfocus="this.blur()"> 
</form> 
</SPAN> 
 
<SCRIPT LANGUAGE="JavaScript"> 
 
</SCRIPT> 
</td></tr></table> 
</form> 
<center> 
<br> 
</center> 
</body> 
</html>

Multi Colored Text Generator

Multi Colored Text Generator

The following is script displayed area