<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> <a href="http://tutunesonverin.net">tütüne son</a>