Searchlight on the page

Source: Internet
Author: User
Tags cos sin
Tip: you can modify some code before running

<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>Searchlight on the page</title></head><body bgcolor="#000000" text="#FFFFFF"><p> </p><div ><p align="center"><font size="7" color="#FFFF00">Searchlight</font><fontface="文鼎中特广告体" size="7" color="#FFFF00">Effect</font></p><p align="left"><font face="文鼎中特广告体" size="4" color="#FFFF00">In the dark night, a white</font><font size="4" color="#FFFF00">When the Searchlight is shining, as the light goes back and forth, everything on the ground is exposed ...... this is often seen in war literature. Now, it has appeared on webpages in the peaceful age.</font></p> <p align="left"><font size="4" color="#FFFF00">If you adjust the program code, you can also make the light rotate 360 degrees along a single direction</font><font face="文鼎中特广告体" size="4" color="#FFFF00">Radar scanning effect</font></p> <p align="center"></p> </div><script language="vbscript">Dim red, gre, blu dim tx, ty, degree = 0 dim pi, I = 1 pi = 3.14 sub change1 () select case I case 1 tx = 240 + 100 * Cos (degree * Pi/180) ty = 240 + 100 * sin (degree * Pi/180) call myp. filters. light. movelight (0, tx, ty, 0, 1) window. settimeout "change1 ()", 10 degree = degree + 4 case 0 tx = 240 + 100 * Cos (degree * Pi/180) ty = 240 + 100 * sin (degree * Pi/180) call myp. filters. light. movelight (0, tx, ty, 0, 1) window. settimeout "change1 ()", 10 degree = degree-4 end select case degree case 0 I = 1 case 180 I = 0 end select end sub change () tx = 240 + 100 * Cos (degree * Pi/180) ty = 240 + 100 * sin (degree * Pi/180) call myp. filters. light. movelight (0, tx, ty, 0, 1) window. settimeout "change ()", 50 degree = degree + 4 end sub window_onload () red = 0 gre = 255 blu = 255 call myp. filters. light. addcone (, 50, 10, red, gre, blu, 10, 10) change1 () end sub</script> <div > </div> </body> </html>
Tip: you can modify some code before running

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.