一个DHTML的例子——3D文字
发表于:2007-06-30来源:作者:点击数:
标签:
HTMLHEADTITLE3D文字/TITLE META content=text/html; CHARSET=GB2312 http-equiv=Content-Type META content=EN-US name=MS.LOCALE META content=noindex name=ROBOTS META content=MSHTML 5.00.2614.3500 name=GENERATOR SCRIPT language= VB Script !-- @#
<HTML><HEAD><TITLE>3D文字</TITLE>
<META content="text/html; CHARSET=GB2312" http-equiv=Content-Type>
<META content=EN-US name=MS.LOCALE>
<META content=noindex name=ROBOTS>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<SCRIPT language=
VBScript>
<!--
@# Sets initial variables and letter starting positions
Sub Window_OnLoad()
call SG1.Scale(0.50, 0.50, 0.50)
call SG2.Scale(0.50, 0.50, 0.50)
call SG3.Scale(0.50, 0.50, 0.50)
call SG4.Scale(0.50, 0.50, 0.50)
call SG1.Rotate(0, 0, 0)
call SG2.Rotate(90, 0, 0)
call SG3.Rotate(0, 90, 0)
RotateAll
end sub
@# sets rotation speed and behavior as well as creating loop
Sub RotateAll
Call SG1.Rotate(4,6,2)
Call SG2.Rotate(4,6,2)
Call SG3.Rotate(4,6,2)
Call SG4.Rotate(4,6,2)
FILK = Window.SetTimeOut("Call RotateAll", 10, "VBSCript")
End Sub
-->
</SCRIPT>
</HEAD>
<BODY bgColor=white>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG4
style="HEIGHT: 400px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 0"><PARAM NAME="Line0001" VALUE="SetLineStyle(0)"><PARAM NAME="Line0002" VALUE="SetFillColor(164, 164, 255)"><PARAM NAME="Line0003" VALUE="SetFillStyle(1)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 180, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#你好!@#, -95, 87)"></OBJECT>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG1
style="HEIGHT: 400px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 0"><PARAM NAME="Line0001" VALUE="SetLineStyle(1)"><PARAM NAME="Line0002" VALUE="SetLineColor(0, 0, 0)"><PARAM NAME="Line0003" VALUE="SetFillStyle(0)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 180, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#你好!@#, -95, 87)"></OBJECT>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG3
style="HEIGHT: 300px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 1"><PARAM NAME="Line0001" VALUE="SetLineStyle(1)"><PARAM NAME="Line0002" VALUE="SetLineColor(66,158, 144)"><PARAM NAME="Line0003" VALUE="SetFillStyle(0)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 280, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#函数@#, -95, 87)"></OBJECT>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG2
style="HEIGHT: 400px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 2"><PARAM NAME="Line0001" VALUE="SetLineStyle(1)"><PARAM NAME="Line0002" VALUE="SetLineColor(255, 111,210)"><PARAM NAME="Line0003" VALUE="SetFillStyle(0)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 180, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#啊@#, -95, 0)"></OBJECT></BODY></HTML>
原文转自:http://www.ltesting.net