. Loodan, et suutsin end arusaadavaks teha.Tänud juba ette!
Postituse lõpus on allalaetav kood html-ina.
| Kood: |
| <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD><TITLE>here he comes!</TITLE> <META http-equiv=Content-Type content="text/html; charset=windows-1252"> <STYLE>BODY { SCROLLBAR-FACE-COLOR: #f4f1f4; FONT-SIZE: 10pt; MARGIN: 0px; SCROLLBAR-HIGHLIGHT-COLOR: #b21a1f; SCROLLBAR-SHADOW-COLOR: #f4f1f4; COLOR: #b21a1f; SCROLLBAR-3DLIGHT-COLOR: #f4f1f4; SCROLLBAR-ARROW-COLOR: #b21a1f; SCROLLBAR-TRACK-COLOR: #f4f1f4; FONT-FAMILY: verdana; SCROLLBAR-DARKSHADOW-COLOR: #b21a1f; SCROLLBAR-BASE-COLOR: #f4f1f4 } </STYLE> <STYLE> body ( A:link { COLOR: #B21A1F; font-style: italic; TEXT-DECORATION: none} A:visited {COLOR: #B21A1F; font-style: italic; TEXT-DECORATION: none} A:active {COLOR: #B21A1F; font-style: italic; TEXT-DECORATION: none} A:hover {BACKGROUND: #B21A1F; COLOR: #F4F1F4; font-style: italic; TEXT-DECORATION: none}} </STYLE> <SCRIPT language=VBScript> '---------------------------------------------------------------------------- ' Original Greeting Card, by Bill Scott '---------------------------------------------------------------------------- ' All HTML and script by Bill Scott, March, 2000 ' billscott@redrivernet.com ' http://lettermanstationery.tripod.com ' Updated 03/03/01 for scrolling text. ' Updated 08/06/00 for IE 5.5 problem. Dim ypos Sub Window_OnLoad() CardText.style.backgroundColor="transparent" CardFront.style.pixelLeft=(document.body.clientWidth-501)/2 CardInside.style.pixelLeft=(document.body.clientWidth-501)/2 cardImage.style.pixelLeft=0 cardImage.style.pixelTop=0 cardImage.style.posWidth=501 cardImage.style.posHeight=376 note.style.pixelLeft=(document.body.clientWidth-501)/2 CardFront.style.visibility="visible" note.style.visibility="visible" End Sub Sub openCard() ypos = CardFront.style.pixelTop CardFront.style.pixelTop = ypos if ypos < 0 then SetTimeOut "openCard",35 else hideFront end if End Sub Sub hideFront() CardFront.filters.item(0).Apply() CardFront.style.visibility = "hidden" CardFront.filters.item(0).Transition=12 CardFront.filters.item(0).play(5.000) CardInside.filters.item(0).Apply() CardInside.style.visibility = "visible" CardInside.filters.item(0).Transition=12 CardInside.filters.item(0).play(5.000) End Sub Sub closeCard() CardInside.filters.item(0).Apply() CardInside.style.visibility = "hidden" CardInside.filters.item(0).Transition=12 CardInside.filters.item(0).play(5.000) CardFront.filters.item(0).Apply() CardFront.style.visibility = "visible" CardFront.filters.item(0).Transition=12 CardFront.filters.item(0).play(5.000) SetTimeOut "moveCardUp",5000 End Sub Sub moveCardUp() ypos = CardFront.style.pixelTop CardFront.style.pixelTop = ypos if ypos >3000 then SetTimeOut "moveCardUp",35 else end if End Sub Sub Window_OnResize() window.location.reload() End Sub </SCRIPT> <META content="MSHTML 6.00.2900.2523" name=GENERATOR></HEAD> <BODY bgColor=#f4f1f4><BGSOUND balance=0 src="herecomes.mid" volume=0 loop=infinite><!-- HERE COMES THE FLAKE GIF, YOU CAN ALSO ADJUST THE VALUES OF VAR NO AND VAR SPEED --><IMG id=snowtemp style="DISPLAY: none" src="flakepink.gif"> <SCRIPT language=JavaScript1.2> var no = 5; // snow number var speed = 8; // smaller number moves the snow faster var snowflake = snowtemp.src; var ns4up = (document.layers) ? 1 : 0; // browser sniffer var ie4up = (document.all) ? 1 : 0; var dx, xp, yp; // coordinate and position variables var am, stx, sty; // amplitude and step variables var i, doc_width = 800, doc_height = 500; if (ns4up) { doc_width = self.innerWidth; doc_height = self.innerHeight; } else if (ie4up) { doc_width = document.body.clientWidth; doc_height = document.body.clientHeight; } dx = new Array(); xp = new Array(); yp = new Array(); am = new Array(); stx = new Array(); sty = new Array(); for (i = 0; i < no; ++ i) { dx[i] = 0; // set coordinate variables xp[i] = Math.random()*(doc_width-50); // set position variables yp[i] = Math.random()*doc_height; am[i] = Math.random()*20; // set amplitude variables stx[i] = 0.02 + Math.random()/10; // set step variables sty[i] = 0.7 + Math.random(); // set step variables if (ns4up) { // set layers if (i == 0) { document.write("<layer name=\"dot"+ i +"\" left=\"15\" "); document.write("top=\"15\" visibility=\"show\"><img src=\""); document.write(snowflake + "\" border=\"0\"></layer>"); } else { document.write("<layer name=\"dot"+ i +"\" left=\"15\" "); document.write("top=\"15\" visibility=\"show\"><img src=\""); document.write(snowflake + "\" border=\"0\"></layer>"); } } else if (ie4up) { if (i == 0) { document.write("<div id=\"dot"+ i +"\" style=\"POSITION: "); document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: "); document.write("visible; TOP: 15px; LEFT: 15px;\"><img src=\""); document.write(snowflake + "\" border=\"0\"></div>"); } else { document.write("<div id=\"dot"+ i +"\" style=\"POSITION: "); document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: "); document.write("visible; TOP: 15px; LEFT: 15px;\"><img src=\""); document.write(snowflake + "\" border=\"0\"></div>"); } } } function snowNS() { // Netscape main animation function for (i = 0; i < no; ++ i) { // iterate for every dot yp[i] += sty[i]; if (yp[i] > doc_height-50) { xp[i] = Math.random()*(doc_width-am[i]-30); yp[i] = 0; stx[i] = 0.02 + Math.random()/10; sty[i] = 0.7 + Math.random(); doc_width = self.innerWidth; doc_height = 500; } dx[i] += stx[i]; document.layers["dot"+i].top = yp[i]; document.layers["dot"+i].left = xp[i] + am[i]*Math.sin(dx[i]); } setTimeout("snowNS()",speed); } function snowIE() { // IE main animation function for (i = 0; i < no; ++ i) { // iterate for every dot yp[i] += sty[i]; if (yp[i] > doc_height-50) { xp[i] = Math.random()*(doc_width-am[i]-30); yp[i] = 0; stx[i] = 0.02 + Math.random()/10; sty[i] = 0.7 + Math.random(); doc_width = document.body.clientWidth; doc_height = 500; } dx[i] += stx[i]; document.all["dot"+i].style.pixelTop = yp[i]; document.all["dot"+i].style.pixelLeft = xp[i] + am[i]*Math.sin(dx[i]); } setTimeout("snowIE()",speed); } if (ns4up) { snowNS(); } else if (ie4up) { snowIE(); } // End --></SCRIPT> <DIV id=note style="LEFT: -1800px; COLOR: #b21a1f; POSITION: absolute; TOP: 1px"><I>click on card to open</I> </DIV><!--The opened card image is here--> <DIV id=CardInside style="Z-INDEX: 1; FILTER: revealTrans; VISIBILITY: hidden; WIDTH: 501px; POSITION: absolute; TOP: 20px; HEIGHT: 376px"><SPAN language=VBScript style="LEFT: 258px; WIDTH: 91px; CURSOR: hand; POSITION: absolute; TOP: 40px; HEIGHT: 122px" onclick=closeCard><IMG height=30 alt="click here to flip back to front of card" src="hohoho.jpg" width=126 border=0> </SPAN><IMG style="WIDTH: 501px; HEIGHT: 376px" height=376 src="santa1o.jpg" width=501> <P><!--Text background color is removed and made transparent by the script. It exists only to enable setting the cursor in Outlook Express--></P> <DIV id=CardText style="Z-INDEX: 2; LEFT: 0px; WIDTH: 501px; POSITION: absolute; TOP: 120px; HEIGHT: 376px; BACKGROUND-COLOR: #ffffff"> <DIV id=text style="LEFT: 250px; OVERFLOW: auto; WIDTH: 113px; POSITION: absolute; TOP: -42px; HEIGHT: 250px"><FONT color=#b21a1f>i hope santa drops by with lots of neat little things for you</FONT> <P><FONT color=#b21a1f>have a wonderful holiday</FONT></P> <P><FONT color=#b21a1f>xo</FONT></P> <P><A href="http://www.mamselle.ca">mamselle</A> </P></DIV></DIV></DIV><!--Add your card image here. Image will be expanded automatically to fill card front--><!--You can adjust the border around the card in the next line. For no border, use border-style:none--> <DIV language=VBScript id=CardFront style="BORDER-RIGHT: #ffffff 10px; BORDER-TOP: #ffffff 10px; Z-INDEX: 3; FILTER: revealTrans; LEFT: -1800px; VISIBILITY: visible; BORDER-LEFT: #ffffff 10px; WIDTH: 501px; BORDER-BOTTOM: #ffffff 10px; POSITION: absolute; TOP: 20px; HEIGHT: 376px" onclick=openCard><IMG id=cardImage style="LEFT: -1800px; POSITION: absolute" height=376 src="santa2o.jpg" width=501> </DIV> <SCRIPT language=JavaScript><!-- ScrollSpeed = 350; // milliseconds between scrolls ScrollChars = 3; // chars scrolled per time period function SetupTicker() { // Thanks to who ever created this Java script! msg="m @ m s e l l e "; RunTicker();} function RunTicker() { window.setTimeout('RunTicker()',ScrollSpeed); window.status = msg; msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);} SetupTicker(); <!-- end // --> </SCRIPT> </BODY></HTML> |
Lisa fail: xmas12.html (9kB)
Seda faili on alla laaditud 575 korda
[Muudetud: 8.12.2010 Andrus30]





kaubaotsing

