// CREDITS:
// Text Wheel
// By Urs Dudli and Peter Gehrig
// Copyright (c) 2003 Peter Gehrig and Urs Dudli. All rights reserved.
// Permission given to use the script provided that this notice remains as is.
// Additional scripts can be found at http://www.24fun.com
// info@24fun.com
// 2/5/2003

// IMPORTANT:
// If you add this script to a script-library or script-archive
// you have to add a highly visible link to
// http://www.24fun.com on the webpage
// where this script will be featured

// CONFIGURATION:
// Go to http://www.24fun.com
// and create your own text animation
// with our new Text Factory.

/////////////////////////////////////////////////////////////////////////////
// Edit the code below this line
/////////////////////////////////////////////////////////////////////////////

// Set your messages. Add as many as you like
var text=new Array()
text[0]=" >> Excellence is never accidental"
text[1]=" >> PERSIST PERSIST PERSIST"
text[2]=" >> Feed hungrier people"
text[3]=" >> FALL IN LOVE REPEATEDLY"
text[4]=" >> Ask More People More Times"
text[5]=" >> You already DO know how"

// Set the font
var textfont="Arial"

// Set the font-size
var textfontsize=32

// Set the font-color
var textfontcolor="#ff0000"

// Set the font-weight (values from 100 to 900)
var textweight="900"

/////////////////////////////////////////////////////////////////////////////
// Do not edit the code below this line
/////////////////////////////////////////////////////////////////////////////

var textitalic="0"
var message=new Array()
var x_textposition=0
var y_textposition=0
var i_segments=Math.round(360/text.length)
var i_grad=0
var grad=0
var colorrgbred
var colorrgbgreen
var colorrgbblue
var windowwidth
var windowheight

var ns4=document.layers?1:0
var ns6=document.getElementById&&!document.all?1:0 
var ie=document.all?1:0
if (textweight=="bold") {textweight=900}
if (textweight=="normal") {textweight=100}

if (textitalic=="italic") {textitalic=1}
if (textitalic=="normal") {textitalic=0}

for (i=0;i<=text.length-1;i++) {
	message[i]=text[i].replace(/'/g,"`")
}

translateintorgb()
function translateintorgb() {
	var hexanewred=textfontcolor.substring(1,3)
	var hexanewgreen=textfontcolor.substring(3,5)
	var hexanewblue=textfontcolor.substring(5,7)
	colorrgbred=parseInt("0x"+hexanewred)
	colorrgbgreen=parseInt("0x"+hexanewgreen)
	colorrgbblue=parseInt("0x"+hexanewblue)
}

function initiate() {
	windowheight=parseInt(document.body.clientHeight)/2
	windowwidth=parseInt(document.body.clientWidth)-40

	for (i=0;i<text.length;i++) {
 var thisspan=eval("document.all.rotationstyle"+i)
 thisspan.style.posLeft=20
 thisspan.style.posTop=0
	}
	settexts()
}

function settexts() {
	for (i=0;i<text.length;i++) {
 var thisid="rotationobj"+i
 var thisspan=eval("rotationstyle"+i)
 thisspan.innerHTML= 
 '<OBJECT ID="'+thisid+'" CLASSID="CLSID:369303C2-D7AC-11d0-89D5-00A0C90833E6" STYLE="position:relative;width:'+windowwidth+'px;height:'+2*windowheight+'px">'+
        '<PARAM NAME="Line0001" VALUE="SetLineStyle(0)">'+
        '<PARAM NAME="Line0002" VALUE="SetLineColor(0,0,0)">'+
 '<PARAM NAME="Line0003" VALUE="SetFillColor('+colorrgbred+','+colorrgbgreen+','+colorrgbblue+')">'+
 '<PARAM NAME="Line0004" VALUE="SetFont(\''+textfont+'\', '+textfontsize+', '+textweight+', '+textitalic+', 0, 0)">'+
 '<PARAM NAME="Line0005" VALUE="Text(\''+message[i]+'\',0, 2, 0)">'+
 '</OBJECT>' 	
	}
	for (i=0;i<text.length;i++) {
 var thisobj=eval("rotationobj"+i)
 thisobj.Rotate(0,i_grad,0) 
 i_grad+=i_segments
	}
	startscroll()
}

function startscroll() {
	for (i=0;i<text.length;i++) {	
 var thisobj=eval("rotationobj"+i)
 thisobj.Rotate(1,2,0) 
	}
	timer=setTimeout("startscroll()",20)
}

if (ie) {
	for (i=0;i<text.length;i++) {	
 var thisid="rotationstyle"+i
 var thisobjid="rotationobj"+i
 document.write("<SPAN ID='"+thisid+"' STYLE='position:absolute'>")
 document.write("<OBJECT ID='"+thisobjid+"' CLASSID='CLSID:369303C2-D7AC-11d0-89D5-00A0C90833E6'>")
 document.write("</OBJECT>")
 document.write("</SPAN>")
 onload=initiate
	}
}