📄 21.html

📁 《CSS完全使用详解》源文件下载书籍源码

💻 HTML

字号:

<html>
<head>
<title>CSS Demo</title>
<style>
body { background-color: #000000; }
</style>
</head>

<body>
<script language=VBScript>
x=0
n=0

sub window_onload
x=0
n=0
timerid1=settimeOut("do_light5()",1)
timerid2=settimeOut("do_light50()",1)
end sub

sub do_light2()
if x>0 then
coverCss.filters.light(0).MoveLight 0, x, 90, 140, 1
coverCss.filters.light(1).MoveLight 1, 200-x, 190, 140, 1
x=x-16
timerid1=settimeOut("do_light2()",2)
else
timerid1=settimeOut("do_light()",5)
end if
end sub

sub do_light20()
if n>0 then
coverHtml.filters.light(0).MoveLight 0, n, 90, 140, 1
coverHtml.filters.light(1).MoveLight 1, 200-n, 190, 140, 1
n=n-16
timerid2=settimeOut("do_light20()",2)
else
timerid2=settimeOut("do_light0()",5)
end if
end sub

sub do_light()
if x<200 then
coverCss.filters.light(0).MoveLight 0, x, 90, 140, 1
coverCss.filters.light(1).MoveLight 1, 200-x, 190, 140, 1
x=x+16
timerid1=settimeOut("do_light()",2)
else
timerid1=settimeOut("do_light2()",5)
end if
end sub

sub do_light0()
if n<200 then
coverHtml.filters.light(0).MoveLight 0, n, 90, 140, 1
coverHtml.filters.light(1).MoveLight 1, 200-n, 190, 140, 1
n=n+16
timerid2=settimeOut("do_light0()",2)
else
timerid2=settimeOut("do_light20()",5)
end if
end sub

sub do_light5()
x=0
coverCss.filters.light(0).addCone 0,140,140,0,90,255,128,128,80,90
coverCss.filters.light(1).addCone 200,140,140,200,190,128,128,255,80,90
timerid1=settimeOut("do_light()",10)
end sub

sub do_light50()
n=0
coverHtml.filters.light(0).addCone 0,140,140,0,90,128,255,128,80,90
coverHtml.filters.light(1).addCone 200,140,140,200,190,128,128,255,80,90
timerid2=settimeOut("do_light0()",10)
end sub
</script>
<table>
<tr>
	<td class="coverCell" width="35%" valign="middle" align="center">
	<img id="coverHtml" src="cover_html.gif" alt="HTML" style="FILTER: Light;">
	</td>
	<td class="coverCell" width="35%" valign="middle" align="center">
	<img id="coverCss" src="cover_css.gif" alt="CSS" style="FILTER: Light;">
	</td>
</tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -