笨笨網站超級論壇 (綠色版本)


頁: [1]

#1  彩虹字 -  (Administrator) 發表於 31-5-2013 11:54

<P><FONT color=purple>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!-- Begin<BR>function createHexArray(n) {<BR>this.length = n;<BR>for (var i = 1; i &lt;= n; i++)<BR>this = i - 1;</FONT></P>
<P><FONT color=purple>this[11] = "A";<BR>this[12] = "B";<BR>this[13] = "C";<BR>this[14] = "D";<BR>this[15] = "E";<BR>this[16] = "F";<BR>return this;<BR>}<BR>hx = new createHexArray(16);</FONT></P>
<P><FONT color=purple>function convertToHex(x) {<BR>if (x &lt; 17) x = 16;<BR>var high = x / 16;<BR>var s = high+"";<BR>s = s.substring(0, 2);<BR>high = parseInt(s, 10);<BR>var left = hx[high + 1];<BR>var low = x - high * 16;<BR>if (low &lt; 1) low = 1;<BR>s = low + "";<BR>s = s.substring(0, 2);<BR>low = parseInt(s, 10);<BR>var right = hx[low + 1];<BR>var string = left + "" + right;<BR>return string;<BR>}</FONT></P>
<P><FONT color=purple>function makeRainbow(text) {<BR>text = text.substring(0, text.length);<BR>color_d1 = 255;<BR>mul = color_d1 / text.length;<BR>for(var i = 0; i &lt; text.length; i++) {<BR>color_d1 = 255*Math.sin(i / (text.length / 3));<BR>color_h1 = convertToHex(color_d1);<BR>color_d2 = mul * i;<BR>color_h2 = convertToHex(color_d2);</FONT></P>
<P><FONT color=purple>k = text.length;<BR>j = k - i;<BR>if (j &lt; 0) j = 0;<BR>color_d3 = mul * j;<BR>color_h3 = convertToHex(color_d3);</FONT></P>
<P><FONT color=purple>document.write("&lt;FONT COLOR=\"#" + color_h3 + color_h1 + color_h2 + "\"&gt;" + text.substring(i, i + 1) + "&lt;/FONT&gt;";<BR>   }<BR>}<BR>// End --&gt;<BR>&lt;/script&gt;</FONT></P>
<P><FONT color=purple></FONT> </P><FONT color=blue>
<P><BR><FONT color=purple>&lt;right&gt;<BR>&lt;font size=7 face="impact"&gt;<BR>&lt;script&gt;<BR>&lt;!--<BR>makeRainbow("笨笨網站bunbun000.com";<BR>// --&gt;<BR>&lt;/script&gt;<BR>&lt;/font&gt;<BR>&lt;right&gt;</FONT></P>
<P></FONT><FONT color=blue></FONT> </P>
<P><FONT color=blue></FONT> </P>
<P><FONT color=blue>笨笨網站bunbun000.com &lt;&lt;&lt;&lt; 可隨意更改</FONT></P>
<P><FONT color=#0000ff></FONT> </P>
<P><FONT color=#0000ff></FONT> </P>
<P><FONT color=#0000ff size=3>如不能顯示語法效果可貼去本站</FONT><A href="http://www.bunbun000.com/html/index.htm" target=_blank><FONT color=red size=3>語法測試板</FONT></A><FONT color=#0000ff size=3>試看</FONT></P>

#2  複製上列語法 -  (Administrator) 發表於 31-5-2013 12:00

<form name="copy">
<textarea cols="40" name="txt" rows="4" style="BACKGROUND-COLOR:#ffffff; COLOR:#000000; FONT-SIZE:9pt">
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
function createHexArray(n) {
this.length = n;
for (var i = 1; i <= n; i++)
this = i - 1;

this[11] = "A";
this[12] = "B";
this[13] = "C";
this[14] = "D";
this[15] = "E";
this[16] = "F";
return this;
}
hx = new createHexArray(16);

function convertToHex(x) {
if (x < 17) x = 16;
var high = x / 16;
var s = high+"";
s = s.substring(0, 2);
high = parseInt(s, 10);
var left = hx[high + 1];
var low = x - high * 16;
if (low < 1) low = 1;
s = low + "";
s = s.substring(0, 2);
low = parseInt(s, 10);
var right = hx[low + 1];
var string = left + "" + right;
return string;
}

function makeRainbow(text) {
text = text.substring(0, text.length);
color_d1 = 255;
mul = color_d1 / text.length;
for(var i = 0; i < text.length; i++) {
color_d1 = 255*Math.sin(i / (text.length / 3));
color_h1 = convertToHex(color_d1);
color_d2 = mul * i;
color_h2 = convertToHex(color_d2);

k = text.length;
j = k - i;
if (j < 0) j = 0;
color_d3 = mul * j;
color_h3 = convertToHex(color_d3);

document.write("<FONT COLOR=\"#" + color_h3 + color_h1 + color_h2 + "\">" + text.substring(i, i + 1) + "</FONT>";
   }
}
// End -->
</script>




<right>
<font size=7 face="impact">
<script>
<!--
makeRainbow("笨笨網站bunbun000.com";
// -->
</script>
</font>
<right>
</textarea><br>
<input onclick="javascript:this.form.txt.focus();this.form.txt.select();" type="button" value="全選">
</form>

<br>

<script type="text/javascript"><!--
google_ad_client = "ca-pub-4078143172638881";
/* 336X280 */
google_ad_slot = "3268225205";
google_ad_width = 336;
google_ad_height = 280;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
頁: [1]

Powered by Discuz Simply! 0.54 Released © wxyuan90