Teknologi 3D pada Halaman WEB: Direct Animation 7

HAPUS KODE BR / pada script!

Copy kode di bawah ini pada notepad, dan paste pada notepad simpan dengan nama file (animasi.html) atau (animasi.hta) bila kita menggunakan ekstensi hta, kita dapat melihat letak kode error-nya.
Setelah disimpan, buka file (animasi.htm) pada Internet Explorer 5.0 pada windows XP. atau double klik pada file (animasi.hta)

<HTML>
 <HEAD>
 <SCRIPT LANGUAGE="VBScript">
 Sub Window_OnLoad()
 	TCG.Item("Action1").AT 2.00,"a.Rotate(1,1,1)",-1
 	TCG.Item("Action1").AT 3.00,"b.Rotate(1,3,1)",-1
 	TCG.Item("Action1").AT 0.00,"c.Rotate(2,1,1)",-1
 	TCG.Item("Action1").AT 1.00,"d.Rotate(2,1,1)",-1
 	TCG.Item("Action1").Play
 End Sub
 </script>
 </head>
 <body bgcolor=black background="DX_bknd.gif">
 <object id="c" classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
 style="border:1px solid white; width:70;height:70; z-index:1" VIEWASTEXT>
 <param name="line0001" value="SetLineStyle(1,0)">
 <param name="line0002" value="SetLineColor(225,10,225)">
 <param name="line0003" value="SetFillStyle(1)">
 <param name="line0004" value="SetFillColor(70,90,220)">
 <param name="line0005" value="SetFont('Verdana',60,60,0,0,0)">
 <param name="line0006" value="Text('D',-10,10)">
 </object>
 
 <object id="d" classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
 style="border:1px solid white; width:70;height:70; z-index:1" VIEWASTEXT>
 <param name="line0001" value="SetLineStyle(1,0)">
 <param name="line0002" value="SetLineColor(225,10,225)">
 <param name="line0003" value="SetFillStyle(1)">
 <param name="line0004" value="SetFillColor(70,90,220)">
 <param name="line0005" value="SetFont('Verdana',60,60,0,0,0)">
 <param name="line0006" value="Text('U',-10,10)">
 </object>
 
 
 <object id="a" classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
 style="border:1px solid white;width:70;height:70; z-index:1" VIEWASTEXT>
 <param name="line0001" value="SetLineStyle(1,0)">
 <param name="line0002" value="SetLineColor(230,120,225)">
 <param name="line0003" value="SetFillStyle(1)">
 <param name="line0004" value="SetFillColor(130,230,210)">
 <param name="line0005" value="SetFont('Verdana',60,60,0,0,0)">
 <param name="line0006" value="Text('D',-10,10)">
 </object>
 
 <object id="b" classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
 style="border:1px solid white;width:70;height:70; z-index:1" VIEWASTEXT>
 <param name="line0001" value="SetLineStyle(3,0)">
 <param name="line0002" value="SetLineColor(100,50,240)">
 <param name="line0003" value="SetFillStyle(1)">
 <param name="line0004" value="SetFillColor(220,20,0)">
 <param name="line0005" value="SetFont('Verdana',60,60,0,0,0)">
 <param name="line0006" value="Text('I',-10,10)">
 </object>
 
 
 <object classid="clsid:B0A6BAE2-AAF0-11D0-A152-00A0C908DB96" id="TCG" style="width:2; height:2">
 </object>
 </body>
 </html>

Teknologi 3D pada Halaman WEB

Sabtu, 06 Februari 2010

Direct Animation 7

HAPUS KODE BR / pada script!

Tidak ada komentar:

Mengenai Saya