Javascript  »  Datum  »  Analog-Uhr

zur Übersicht

Kategorie	Datum
Bezeichnung	Analog-Uhr
ScriptDemo	Neues Fenster für Demo öffnen
Statistik	30347 Aufrufe davon 2x gestern
Keine Beschreibung vorhanden.
Javascript-Quellcode  (einfach markieren, kopieren und lokal abspeichern) <SCRIPT LANGUAGE="VBScript"> Dim a Dim min1 Dim hr1 Dim sec1 'Initializes clock and tells it how to behave, when to start animation, etc Sub window_onload a = time theTimeDate.innerText = now sec1 = second(a) min1 = minute(a) hr1 = hour(a) if hr1 > 12 then hr1 = hr1 - 12 end if call sgSecondHand.Rotate(0,0,sec1*6 - 90) call sgMinuteHand.Rotate(0,0,min1*6 - 90) call sgHourHand.Rotate(0,0,hr1*360/12 - 90) call sgHourHand.Rotate(0,0,int(min1/2)) call seq("Time").Play end Sub 'Sequencer initilization Sub Seq_OnInit Call seq("Time").at(1.000, "SecRot", -1,1.000, 1) End Sub 'rotates second hand of clock Sub SecRot theTimeDate.innerText = now a = time sec1 = second(a) min1 = minute(a) hr1 = hour(a) if hr1 > 12 then hr1 = hr1 - 12 end if Call sgSecondHand.Rotate(0,0,6) if sec1 = 0 then Call sgMinuteHand.Rotate(0,0,6) if min1 mod 2 = 0 then call sgHourHand.Rotate(0,0,1) end if end if End Sub </SCRIPT> <DIV ID = "MASTERLAYOUT" STYLE="POSITION:relative;WIDTH:300; HEIGHT:260;TOP:80;LEFT:50; background:#ffffff"> <DIV STYLE="POSITION:ABSOLUTE; HEIGHT:60; WIDTH:200; TOP:230; left:50"> <CENTER> <P id=theTimeDate></P> </CENTER> </DIV> <DIV ID="divTimeText" STYLE="POSITION:ABSOLUTE; WIDTH:202;HEIGHT:202; TOP:0; LEFT:0;z-index:2"> <OBJECT ID="SgNumbers" CLASSID = "CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6" STYLE= "POSITION:ABSOLUTE; WIDTH:200; HEIGHT:200; TOP:10; LEFT:50;Z-INDEX:5"> <PARAM NAME="Line0001" VALUE="SetLineColor(0, 0, 0)"> //hier den Farbcode der Zahlen angeben <PARAM NAME="Line0002" VALUE="SetLineStyle(1)"> <PARAM NAME="Line0003" VALUE="SetFillStyle(1)"> <PARAM NAME="Line0004" VALUE="SetFillColor(0,0,0)"> //hier den Farbcode der Zahlen angeben <PARAM NAME="Line0005" VALUE="SetFont('ARIAL',24,650,0,0,0)"> <PARAM NAME="Line0006" VALUE="Text('.',40,-72,0"> <PARAM NAME="Line0007" VALUE="Text('.',70,-42,0"> <PARAM NAME="Line0008" VALUE="Text('3',80,7,0"> <PARAM NAME="Line0009" VALUE="Text('.',70,45,0"> <PARAM NAME="Line0010" VALUE="Text('.',40,76,0"> <PARAM NAME="Line0011" VALUE="Text('6',-8,90,0"> <PARAM NAME="Line0012" VALUE="Text('.',-47,76,0"> <PARAM NAME="Line0013" VALUE="Text('.',-77,45,0"> <PARAM NAME="Line0014" VALUE="Text('9',-92,7,0"> <PARAM NAME="Line0015" VALUE="Text('.',-77,-42,0"> <PARAM NAME="Line0016" VALUE="Text('.',-47,-72,0"> <PARAM NAME="Line0017" VALUE="Text('12',-14,-76,0"> </OBJECT> </div> <OBJECT ID="sgBackground" CLASSID = "CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6" STYLE="POSITION:absolute; TOP:10; LEFT:50; WIDTH:200; HEIGHT:200"> <PARAM NAME="Line0001" VALUE="SetLineColor(0, 0, 0)"> //hier den Farbcode der hintergrund angeben <PARAM NAME="Line0001" VALUE="SetLineStyle(5)"> <PARAM NAME="Line0002" VALUE="SetFillStyle(1)"> <PARAM NAME="Line0003" VALUE="SetFillColor(255,255,255)"> <PARAM NAME="Line0004" VALUE="SetGradientFill(0,0,-100,-100,0)"> <PARAM NAME="Line0005" VALUE="Oval(-100,-100,199,199,0)"> </OBJECT> <DIV ID="divClock" STYLE="POSITION:ABSOLUTE; WIDTH:200; HEIGHT:200; TOP:0; LEFT:0;"> <OBJECT ID="sgSecondHand" CLASSID = "CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6" STYLE="POSITION:absolute; TOP:10; LEFT:50; WIDTH:200; HEIGHT:200; Z-INDEX:5"> <PARAM NAME="Line0001" VALUE="SetLineColor(0, 0, 0)"> //hier den Farbcode der sekundenzeiger angeben <PARAM NAME="Line0002" VALUE="SetLineStyle(1)"> <PARAM NAME="Line0003" VALUE="SetFillColor(0,0,0)"> //hier den Farbcode der sekundenzeiger angeben <PARAM NAME="Line0004" VALUE="SetFillStyle(1)"> <PARAM NAME="Line0005" VALUE="Rect(0,0,95,0,0)"> </OBJECT> <OBJECT ID="sgMinuteHand" CLASSID = "CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6" STYLE="POSITION:absolute; TOP:10; LEFT:50; WIDTH:200; HEIGHT:200; Z-INDEX:5"> <PARAM NAME="Line0001" VALUE="SetLineColor(0, 0, 0)"> //hier den Farbcode der mintenzeiger angeben <PARAM NAME="Line0002" VALUE="SetLineStyle(1)"> <PARAM NAME="Line0003" VALUE="SetFillColor(0,0,0)"> //hier den Farbcode der minutenzeiger angeben <PARAM NAME="Line0004" VALUE="SetFillStyle(1)"> <PARAM NAME="Line0005" VALUE="Rect(0,-1,85,1,0)"> </OBJECT> <OBJECT ID="sgHourHand" CLASSID = "CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6" STYLE="POSITION:ABSOLUTE; TOP:10; LEFT:50; WIDTH:200; HEIGHT:200; Z-INDEX:5"> <PARAM NAME="Line0001" VALUE="SetLineColor(0, 0, 0)"> //hier den Farbcode der stundenzeiger angeben <PARAM NAME="Line0002" VALUE="SetLineStyle(1)"> <PARAM NAME="Line0003" VALUE="SetFillColor(0,0,0)"> //hier den Farbcode der stundenzeiger angeben <PARAM NAME="Line0004" VALUE="SetFillStyle(1)"> <PARAM NAME="Line0005" VALUE="Rect(0,-2,70,2,0)"> </OBJECT> </DIV> </DIV> <OBJECT ID="Seq" CLASSID="CLSID:B0A6BAE2-AAF0-11d0-A152-00A0C908DB96"> </OBJECT> <script language="JavaScript"> <!-- if (navigator.appName == "Microsoft Internet Explorer") { document.write(''); }else{ document.write("<font face='Arial,Helvetica,MS Sans Serif'><center>Dieses Skript läuft nur mit dem MSIE 4.0!</center></font><br>"); } // --> </script>

Kommentare zu Analog-Uhr

2 Kommentar(e) vorhanden / Anzeige der neuesten 5

am 05.08.2005 um 18:19 Uhr von Seir
Die Uhr klappt net mit Firefox.... 

am 13.05.2005 um 09:25 Uhr von MW
geht leider nicht mit Firfox... 


Alle Kommentare anzeigen   -   Kommentar hinzufügen