/> coco colanın yazılış sekli
<SCRIPT language=VBScript> <!-- Dim Bar, Line, SP Bar = 0 Line = "|" sP = 100 Function Window_onLoad() Bar = 95 sP = 10 END Function Function Count() If Bar < 100 Then Bar = Bar + 1 Window.Status = "Yk006c0065006e0069yor: " & Bar & "%" & " " & String(Bar, Line) setTimeout "Count()", SP Else Window.Status = "Yk006c0065006d0065 Bitti" Document.Body.Style.Display = "" End If End Function Call Count() --> </SCRIPT> </div> /><img src="https://img.webme.com/pic/s/sevdaa-atesi/resim4.gif" _fcksavedurl="https://img.webme.com/pic/s/sevdaa-atesi/resim4.gif"/> <SCRIPT LANGUAGE="JavaScript"><br /><!--<br />// autostart - used instead body onload<br />setTimeout('animate()',5);<br />// create row of radio buttons<br />lay(20)<br />// set index of lamp to start animation<br />var current = 0<br />// set speed (pause in milliseconds between each movement)<br />var speed = 100<br />function lay(num) {<br />// assign "greater than" character to variable<br />var gt = unescape(">")<br />// open form<br />document.write("<FORM NAME='animation'" + gt)<br />// use loop to lay radio buttons down (all buttons in same group)<br />for (var i = 0; i < num; ++i) {<br />document.write("<INPUT TYPE='radio' NAME='lamps'" + gt)<br />}<br />// close form<br />document.write("</FORM" + gt)<br />}<br />function animate() {<br />// click next radio button<br />document.animation.lamps[current].click()<br />// if radio button is the last one reset variable to 0 (otherwise increment)<br />current = (current == document.animation.lamps.length - 1) ? 0 : ++current<br />// recursive call after speed milliseconds<br />timerID = setTimeout("animate()", speed)<br />}<br />// --><br /></SCRIPT><br /></body></html> <img src="http://www.natro.com/images/ICO_yeni.gif" _fcksavedurl="http://www.natro.com/images/ICO_yeni.gif"> <FCK:meta http-equiv="Page-Enter" content="progid:DXImageTransform.Microsoft.Iris(duration=2,irisStyle=star)" /> </body></html>