%26lt;title%26gt;Untitled%26lt;/title%26gt;
%26lt;/head%26gt;
%26lt;body bgcolor=%26quot;Black%26quot;%26gt;
%26lt;div id=%26quot;myLightObject%26quot; style=%26quot;position: relative; height: 400px; width: 400px; top: 10px; left: 0px;
color: White; filter: light%26quot;%26gt;
%26lt;p align=%26quot;center%26quot;%26gt;
春花秋月何时了,往事知多少
%26lt;/p%26gt;
%26lt;p align=%26quot;center%26quot;%26gt;
%26lt;br%26gt;
小楼昨夜又东风
%26lt;/p%26gt;
%26lt;p align=%26quot;center%26quot;%26gt;
%26lt;br%26gt;
故国不堪回首月明中。
%26lt;/p%26gt;
%26lt;p align=%26quot;center%26quot;%26gt;
%26lt;br%26gt;
雕栏玉砌应犹在,只是朱颜改。
%26lt;/p%26gt;
%26lt;p align=%26quot;center%26quot;%26gt;
问君能有几多愁,
%26lt;/p%26gt;
%26lt;p align=%26quot;center%26quot;%26gt;
%26lt;br%26gt;
恰似一江春水向东流。%26lt;br%26gt;
%26lt;/p%26gt;
%26lt;/div%26gt;
%26lt;script language=%26quot;VBScript%26quot;%26gt;
Option Explicit
sub window_OnLoad()
call myLightObject.filters.light(0).addambient(0,0,255,30)
call myLightObject.filters.light(0).addcone(400,400,200,100,100,200,204,200,80,10)
end sub
sub document_onMouseMove()
call myLightObject.filters.light(0).MoveLight(1,window.event.x,window.event.y,0,1)
end sub
%26lt;/script%26gt;
%26lt;/body%26gt;
%26lt;/html%26gt;

