文字3D效果，線腳本實現-WEBASP.NET

精彩推薦

分類最新特效

分類熱點特效

文字3D效果，線腳本實現

日期：2004-06-02 人氣：【字體：大中小】【收藏此文】

<HTML>
<HEAD>
<META http-equiv='Content-Type' content='text/html; charset=gb2312'>
<TITLE>文字3D效果，線腳本實現</TITLE>

<SCRIPT language=VBScript>
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 >

</BODY></HTML>

<SCRIPT language=VBScript>
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>




<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('JavaScript', -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('JavaScript', -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('linlin', -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('JavaScript', -95, 0)"></OBJECT>