VBScript/文字の影を動かすの変更点

追加された行はこの色です。
削除された行はこの色です。
VBScript/文字の影を動かすへ行く。
VBScript/文字の影を動かすの差分を削除

　文字の後ろを白抜きの影が移動します。Webサイトのタイトルなんかに使えるかな？

DropShadow.html
 <SCRIPT Language=VBScript><!--
   Dim offX,offY
   Sub Window_onLoad()
     setInterval "Drop()",100
   End Sub
   Sub Drop()
     offX=offX+1
     offY=offY+1
     If offX>70 Then offX=-70
     If offY>70 Then offY=-70
     Target.filters.DropShadow.offX=offX
     Target.filters.DropShadow.offY=offY
     Target.filters.DropShadow.Positive=0
   End Sub
 //--></SCRIPT>
 <DIV ID="Target" Style="Width:100%;Font-Size:72;Font- Weight:900;Color:LightGreen;
   Filter:DropShadow (Color=Gray,offx=0,offy=0,Positive=1)">
 DropShadow 
 </DIV>

VBScript/文字の影を動かす の変更点

VBScript/文字の影を動かすの変更点