<P align=left><FONT color=#ff9966 size=2>
<SCRIPT language=VBScript>
<!--
Dim i
Dim Rotation
Dim Lib
Dim DRS
Dim winsizew
Dim winsizeh
Sub Window_OnLoad
i=0
Rotation=0
Call Seq("1").Play
End Sub
Sub Seq_OnInit
Call seq("1").at(0.000, "Gen", 20, 0.150, 1)
Call seq("1").at(0.000, "Rot", -1, 0.030, 1)
Call seq("1").at(3.500, "ShowMegaRecords")
Call seq("1").at(5.000, "MoveMegaRecords", 15, 0.020)
End Sub
Sub ShowMegaRecords
Mega.style.visibility="visible"
Records.style.visibility="visible"
End Sub
Sub MoveMegaRecords
Star.style.left=Star.style.posleft -25
Star.style.top=Star.style.postop - 9
Call Star.scale(.90,.9,.9)
Mega.style.left=mega.style.posleft - 19
Mega.style.top=mega.style.postop - 11
Call Mega.Scale(.95,.95,.95)
Records.style.left=Records.style.posLeft - 19
Records.style.top=Records.style.posTop - 14
Call Records.Scale(.95,.95,.95)
End Sub
Sub Gen
Set Lib=Star.Library
Set DRS=Star.DrawSurface
Call DRS.FillStyle(0)
Call DRS.LineDashStyle(1)
if i mod 2=1 then
Call DRS.BorderColor(lib.ColorRgb255(200,200,255))
Else
Call DRS.BorderColor(lib.ColorRgb255(100,100,255))
End If
Rotation=i * 18
Call DRS.PieDegrees(-120, -120, Rotation, Rotation+10 , 240, 240)
Star.DrawSurface=DRS
i=i+1
End Sub
Sub Rot
Call Star.Rotate(-4,2,-2)
End Sub
Sub Window_OnUnLoad
Call Seq("1").Stop
End Sub
-->
<!--本特效完美的邂逅.jy.js.id666.com-->
</SCRIPT>
<OBJECT id=Star style="Z-INDEX: 1; LEFT: 421px; WIDTH: 303px; POSITION: absolute; TOP: 11px; HEIGHT: 282px" classid=clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6><PARAM NAME="SourceURL" VALUE=""><PARAM NAME="CoordinateSystem" VALUE="0"><PARAM NAME="MouseEventsEnabled" VALUE="0"><PARAM NAME="HighQuality" VALUE="0"><PARAM NAME="PreserveAspectRatio" VALUE="-1"></OBJECT>
<OBJECT id=mega style="LEFT: 300%; VISIBILITY: hidden; WIDTH: 90%; POSITION: absolute; TOP: 75px; HEIGHT: 200px" height=14 width=14 classid=clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6><PARAM NAME="SourceURL" VALUE=""><PARAM NAME="CoordinateSystem" VALUE="0"><PARAM NAME="MouseEventsEnabled" VALUE="0"><PARAM NAME="HighQuality" VALUE="0"><PARAM NAME="PreserveAspectRatio" VALUE="-1"><PARAM NAME="Line0001" VALUE="SetFont('Impact',100,650,1,0,0)"><PARAM NAME="Line0002" VALUE="SetLineColor(110,255,0)"><PARAM NAME="Line0003" VALUE="SetFillColor(255,255,255,255,255,255)"><PARAM NAME="Line0004" VALUE="SetFillStyle(1)"><PARAM NAME="Line0005" VALUE="Text('邂逅的站!',-115,75)"></OBJECT>
<OBJECT id=Records style="LEFT: 300%; VISIBILITY: hidden; WIDTH: 90%; POSITION: absolute; TOP: 210px; HEIGHT: 100px" height=14 width=14 classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6><PARAM NAME="SourceURL" VALUE=""><PARAM NAME="CoordinateSystem" VALUE="0"><PARAM NAME="MouseEventsEnabled" VALUE="0"><PARAM NAME="HighQuality" VALUE="0"><PARAM NAME="PreserveAspectRatio" VALUE="-1"><PARAM NAME="Line0001" VALUE="SetFont('Impact',50,700,1,0,0)"><PARAM NAME="Line0002" VALUE="SetLineColor(110,255,0)"><PARAM NAME="Line0003" VALUE="SetFillColor(200,200,200,200,200,200)"><PARAM NAME="Line0004" VALUE="SetFillStyle(0)"><PARAM NAME="Line0005" VALUE="Text('JY_JS.id666.com',-125,40)"></OBJECT>
<OBJECT id=Seq height=50 width=50 align=top classid=CLSID:B0A6BAE2-AAF0-11d0-A152-00A0C908DB96></OBJECT></FONT></P>