PB Code Zone
This button rotates a list of links. All of the links are active. You can place any number of links on it. This script is compatible with PC's. I have defined the size and text color for WebTV. These attributes are not seen by PC's. <!-- Paste this script in the head of your page --> <script LANGUAGE="JavaScript"> <!-- var WhereTo = null; var TimerID = null; var now = new Date(); var pos = 0; var StartTime = null; var PauseTime = 3000; // Change the PauseTime value (in milliseconds) to // change the speed at which the button URLs rotate. function InitializeArray() { this.length = InitializeArray.arguments.length for (var i = 0; i < this.length; i++) { this[i+1] = InitializeArray.arguments[i] } } function ParseString(data,num) { for(var i=0;i<data.length;i++) { if(data.substring(i,i+1)=="|") break; } if (num==0) return(data.substring(0,i)); else return(data.substring(i+1,data.length)); } function StartTimer() { now = new Date(); StartTime=now.getTime(); StopTimer(); WhereTo = new InitializeArray( "PB Code Zone|https://www.angelfire.com/mi4/kcgleams/main1/.html", "Scrapbook Uploader|https://www.angelfire.com/mi4/kcgleams/main1/pgh88.html", "Easy Test Bed|https://www.angelfire.com/mi4/kcgleams/main1/codk.html", "My Image Site|https://www.angelfire.com/mi4/kcgleams/.html", "Spell checker|https://www.angelfire.com/mi4/kcgleams/main1/c6.html", "Browser detection|https://www.angelfire.com/mi4/kcgleams/main1/ab.html", "Personal Counter|https://www.angelfire.com/mi4/kcgleams/main1/ace4.html", "Alphabetize A List|https://www.angelfire.com/mi4/kcgleams/main1/codx.html", "Lg. Email Form|https://www.angelfire.com/mi4/kcgleams/main1/b2.html", "Email Me|mailto:gleam_KC@webtv.net"); ShowTimer(); } function StopTimer() { TimerID = null; WhereTo = null; } function ShowTimer() { pos= (pos == WhereTo.length) ? 1 : pos + 1; document.forms[0].elements[0].value=ParseString(WhereTo[pos],0); TimerID=window.setTimeout('ShowTimer()',PauseTime); } function DestinationUrl() { this.location=ParseString(WhereTo[pos],1); return (false); } //--> </script> </head> <!-- Paste the following code to begin your body --> <body onLoad="window.StartTimer()" bgcolor=000000 text=ffffff link=654321 vlink=123456> <!-- Paste the following where you want it to appear in the body of your page. --> <form> <center><p><input TYPE="button" VALUE="Cool Links!" text=660000 width=250 NAME="Destination" onClick="window.DestinationUrl()"></p>
TIP ~ BLOCK SIGNATURE VIEW SOURCE Prevent other's from using the plaintext code to view your sig codes by putting this at the beginning of your Sig. </plaintext>
PB Code Zone: Take Two
