
Mots d'art & Scénarios Poésie, littérature, pensées, scripts d'art, oeuvres de Ginette Villeneuve |
| | Scripts (tous les genres) | |
| | Auteur | Message |
---|
Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Scripts (tous les genres) Dim 19 Déc - 22:14 | |
| Ici des scripts nettoyés autant que possible avec le nom de l'auteur du moteur. Que j'ai mis entre
- Code:
-
et
Dernière édition par Gi le Sam 22 Aoû - 23:34, édité 3 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: script de Mackie Dim 19 Déc - 22:40 | |
| script de Mackie Script : - Code:
-
<HTML><HEAD><TITLE>popup36</TITLE>
<SCRIPT language=vbs> ' Mini script to eliminate BASE tag "Access Denied" error from OE for popup scripts. ' Script by Bill Scott, June, 2002 ' http://lettermanstationery.tripod.com ' VBScript version. Set bs0 = document.all.tags("BASE") on error resume next bs0(0).removeAttribute "href",0 </SCRIPT>
<STYLE>BODY { BORDER-RIGHT: #6d3126 8px ridge; BORDER-TOP: #6d3126 8px ridge; BORDER-LEFT: #6d3126 8px ridge; SCROLLBAR-ARROW-COLOR: #6d3126; BORDER-BOTTOM: #6d3126 8px ridge; SCROLLBAR-BASE-COLOR: #6d3126 } </STYLE>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD> <BODY bgColor=#6d3126 background=cid:001501c43853$26052950$abba2d3e@scenarios> <DIV> </DIV><IMG id=pic style="FILTER: glow(strength=2,enabled=1,color:#FDBB67); LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:000d01c43853$2602b850$abba2d3e@scenarios"> <BUTTON language=vbscript id=openbtn style="BORDER-RIGHT: #6d3126 2px ridge; BORDER-TOP: #6d3126 2px ridge; FONT-SIZE: 16pt; LEFT: -1800px; BORDER-LEFT: #6d3126 2px ridge; WIDTH: 60px; CURSOR: hand; COLOR: #fdbb67; BORDER-BOTTOM: #6d3126 2px ridge; FONT-FAMILY: schindler; POSITION: absolute; TOP: -1800px; HEIGHT: 35px; BACKGROUND-COLOR: #6d3126" onclick=popOpen()>Open</BUTTON> <DIV id=contents style="DISPLAY: none"> <STYLE id=PopupStyle>.div1{border-top:#6D3126 15px double;border-bottom:#6D3126 15px double;border-left:#6D3126 15px double; border-right:#6D3126 15px double;scrollbar-base-color:#6D3126; scrollbar-arrow-color:#6D3126}</STYLE> <IMG id=back style="LEFT: -1800px; VISIBILITY: hidden; POSITION: absolute; TOP: -1800px" src="cid:000e01c43853$26052950$abba2d3e@scenarios"> <IMG id=pic5 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:000f01c43853$26052950$abba2d3e@scenarios"> <IMG id=pic6 style="RIGHT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:001001c43853$26052950$abba2d3e@scenarios"> <IMG id=pic7 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:001101c43853$26052950$abba2d3e@scenarios"> <IMG id=pic8 style="LEFT: -1800px; BOTTOM: -1800px; POSITION: absolute" src="cid:001201c43853$26052950$abba2d3e@scenarios"> <IMG id=pic1 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:001301c43853$26052950$abba2d3e@scenarios"> <IMG id=pic2 style="FILTER: progid:DXImageTransform.Microsoft.RandomDissolve(); LEFT: -1800px; VISIBILITY: visible; POSITION: absolute; TOP: -1800px" src="cid:001401c43853$26052950$abba2d3e@scenarios"> <DIV class=div1 id=mess style="FILTER: progid:DXImageTransform.Microsoft.Iris(irisstyle=CIRCLE,motion=out)
glow(strength=5,enabled=1,color:#FDBB67); LEFT: 0px; VISIBILITY: hidden; OVERFLOW: auto; WIDTH: 360px; POSITION: absolute; TOP: 0px; HEIGHT: 410px; BACKGROUND-COLOR: #6d3126"> <FONT style="LEFT: 5px; POSITION: relative; TOP: 5px" face="Lucida Handwriting" color=#fdbb67 size=4>message ici</FONT> </DIV><BUTTON language=vbscript id=closeit style="BORDER-RIGHT: #dd9d52 5px outset; BORDER-TOP: #dd9d52 5px outset; FONT-SIZE: 10pt; LEFT: 47%; BORDER-LEFT: #dd9d52 5px inset; WIDTH: 50px; CURSOR: hand; COLOR: #000000; BORDER-BOTTOM: #dd9d52 5px inset; POSITION: absolute; TOP: 95%; HEIGHT: 30px; BACKGROUND-COLOR: #dd9d52" onclick=parent.Popup.hide()>close</BUTTON> </DIV> <SCRIPT language=VBScript> '-------------------------- 'script geschreven door Mackie 'mei 2004 'deze tekst laten staan '--------------------------
Dim scw,sch,picw,pich,openbtnw,openbtnh,thi
z=0 w=0 Sub Window_Onload() scw=document.body.clientwidth sch=document.body.clientheight openbtnw=60 openbtnh=35 openbtn.style.postop=189 openbtn.style.posleft=scw/2-openbtnw/2+7 picw=401 pich=241 pic.style.postop=80 pic.style.posleft=scw/2-picw/2 window.status="~~~script and design by mackie~~~" Clearinterval(thi) thi=Setinterval ("scroll", 64) End Sub
Sub scroll() z=z w=w-1 document.body.style.backgroundposition=z&" "&w End Sub
Dim winx, winy,pic1w,pic1h,pic2w,pic2h,messw,messh,rd Dim pic5w,pic5h,pic6w,pic6h,pic7w,pic7h,pic8w,pic8h,pic5posw,pic5posh,pic6posw, pic6posh,pic7posw,pic7posh,pic8posw,pic8posh Dim th,th1,th2,th3 z1=0 w1=0 Set Popup=window.createPopup() Set PopupBody=Popup.document.body set rd=PopupBody.all winx=window.parent.screen.width winy=window.parent.screen.height messw=360 messh=410 mess.style.posleft=(winx/2)-(messw/2) mess.style.postop=(winy/2)-(messh/2)+10 pic1w=800 pic1h=500 pic1.style.postop=winy/2-pic1h/2 pic1.style.posleft=winx/2-pic1w/2-13 pic2w=367 pic2h=500 pic2.style.postop=winy/2-pic2h/2 pic2.style.posleft=winx/2-pic2w/2 pic5w=163 pic5h=96 pic5posw=winx/2-pic5w/2 pic5posh=winy/2-pic5h/2 pic5.style.posleft=pic5posw pic5.style.postop=pic5posh pic6w=163 pic6h=96 pic6posw=winx/2-pic6w/2 pic6posh=winy/2-pic6h/2 pic6.style.posright=pic6posw pic6.style.postop=pic6posh pic7w=163 pic7h=96 pic7posw=winx/2-pic7w/2 pic7posh=winy/2-pic7h/2 pic7.style.posleft=pic7posw pic7.style.postop=pic7posh pic8w=163 pic8h=96 pic8posw=winx/2-pic8w/2 pic8posh=winy/2-pic8h/2-30 pic8.style.posleft=pic8posw pic8.style.posbottom=pic8posh PopupBody.style.border="10px ridge #6D3126" PopupBody.background=back.src PopupBody.innerHTML="<div style='display:none'>"+PopupStyle.innerHTML+"</div>"+contents.innerHTML
Sub popOpen() Popup.show 0, 0, winx, winy Settimeout "start",3000 SetInterval "scrollback", 64 Cleartimeout(th) th=Settimeout ("move",7000) Cleartimeout(th1) th1=Settimeout ("move1",7000) Cleartimeout(th2) th2=Settimeout ("move2",7000) Cleartimeout(th3) th3=Settimeout ("move3",7000) End Sub
Sub start() Cleartimeout rd.pic2.filters(0).Apply() rd.pic2.style.visibility="hidden" rd.pic2.filters(0).Play(4.000) Settimeout "start2",3000 End Sub
Sub start2() Cleartimeout rd.mess.filters(0).Apply() rd.mess.style.visibility="visible" rd.mess.filters(0).Play(2.000) End Sub
Sub move() Cleartimeout(th) pic5posh=pic5posh pic5posw=pic5posw-2 rd.pic5.style.postop=pic5posh rd.pic5.style.posleft=pic5posw if pic5posw =< -200 then th=Settimeout ("nep",30) else th=Settimeout ("move",30) End Sub
Sub nep() Cleartimeout(th) pic5posh=pic5posh pic5posw=pic5posw+2 rd.pic5.style.postop=pic5posh rd.pic5.style.posleft=pic5posw if pic5posw => winx/2-pic5w/2 then th=Settimeout ("move",30) else th=Settimeout ("nep",30) End Sub
Sub move1() Cleartimeout(th1) pic6posh=pic6posh pic6posw=pic6posw-2 rd.pic6.style.postop=pic6posh rd.pic6.style.posright=pic6posw if pic6posw =< -200 then th1=Settimeout ("neppa",30) else th1=Settimeout ("move1",30) End Sub
Sub neppa() Cleartimeout(th1) pic6posh=pic6posh pic6posw=pic6posw+2 rd.pic6.style.postop=pic6posh rd.pic6.style.posright=pic6posw if pic6posw => winx/2-pic6w/2 then th1=Settimeout ("move1",30) else th1=Settimeout ("neppa",30) End Sub
Sub move2() Cleartimeout(th2) pic7posh=pic7posh-2 pic7posw=pic7posw rd.pic7.style.postop=pic7posh rd.pic7.style.posleft=pic7posw if pic7posh =< -280 then th2=Settimeout ("nep2",30) else th2=Settimeout ("move2",30) End Sub
Sub nep2() Cleartimeout(th2) pic7posh=pic7posh+2 pic7posw=pic7posw rd.pic7.style.postop=pic7posh rd.pic7.style.posleft=pic7posw if pic7posh => winy/2-pic7h/2 then th2=Settimeout ("move2",30) else th2=Settimeout ("nep2",30) End Sub
Sub move3() Cleartimeout(th3) pic8posh=pic8posh-2 pic8posw=pic8posw rd.pic8.style.posbottom=pic8posh rd.pic8.style.posleft=pic8posw if pic8posh =< -300 then th3=Settimeout ("neppa1",30) else th3=Settimeout ("move3",30) End Sub
Sub neppa1() Cleartimeout(th3) pic8posh=pic8posh+2 pic8posw=pic8posw rd.pic8.style.posbottom=pic8posh rd.pic8.style.posleft=pic8posw if pic8posh => winy/2-pic8h/2 then th3=Settimeout ("move3",30) else th=Settimeout ("neppa1",30) End Sub
Sub scrollback() z1=z1 w1=w1+1 PopupBody.style.backgroundposition=z1&" "&w1 End Sub Sub Window_Onresize() window_onload End Sub </SCRIPT> <SCRIPT language=JavaScript> <!-- ScrollSpeed = 250; // milliseconds between scrolls ScrollChars = 4; // chars scrolled per time period
function SetupTicker() { // add space to the left of the message msg = " Ginette Villeneuve : http://www.liensutiles.org/gvilleneuve.htm "; RunTicker();}
function RunTicker() { window.setTimeout('RunTicker()',ScrollSpeed); window.status = msg; msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);} SetupTicker();
<!-- end --> </SCRIPT> </BODY></HTML>
Dernière édition par le Mer 11 Mai - 22:30, édité 7 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Un script de Jetty Sam 25 Déc - 16:51 | |
| - Code:
-
<HTML><HEAD><TITLE></TITLE>
<STYLE>BODY { BORDER-RIGHT: #886b4b 3px ridge; BORDER-TOP: #886b4b 3px ridge; MARGIN: 0px; SCROLLBAR-HIGHLIGHT-COLOR: #886b4b; BORDER-LEFT: #886b4b 3px ridge; SCROLLBAR-SHADOW-COLOR: #886b4b; SCROLLBAR-ARROW-COLOR: #886b4b; SCROLLBAR-TRACK-COLOR: #d7b788; BORDER-BOTTOM: #886b4b 3px ridge; SCROLLBAR-BASE-COLOR: #d7b788 } .mess { BORDER-RIGHT: #886b4b 3px double; PADDING-RIGHT: 7px; BORDER-TOP: #886b4b 3px double; PADDING-LEFT: 7px; FONT-SIZE: 14pt; PADDING-BOTTOM: 7px; OVERFLOW: auto; BORDER-LEFT: #886b4b 3px double; WIDTH: 400px; COLOR: #000000; PADDING-TOP: 7px; BORDER-BOTTOM: #886b4b 3px double; FONT-FAMILY: papyrus; HEIGHT: 175px; TEXT-ALIGN: center } </STYLE>
<HEAD> <BODY bgColor=#d7b788 background=cid:02d201c4d7fb$907c87e0$2101a8c0@scenarios>
<BGSOUND balance=0 src="cid:02d301c4d7fb$907c87e0$2101a8c0@scenarios" volume=0 loop=99> <TABLE align=center> <TBODY> <TR> <TD id=div3 style="FILTER: progid:DXImageTransform.Microsoft.Slide(slidestyle=HIDE, Bands=50)" align=middle><!--hoofdplaatje--><IMG id=pic1 src="cid:02d101c4d7fb$907c87e0$2101a8c0@scenarios"> </TD></TR> <TR> <TD align=middle> <DIV class=mess> <DIV>Message ici pour ce script facile à réaliser mais qui demande une image et un cadre spécial à cause de l'image qui doit avoir des barres de chaque coté de l'image pour donner un bel effet,</DIV> </DIV></TD></TR></TBODY></TABLE><BR> <SCRIPT language=vbscript> '------------------------------------------ 'please leave all these lines in 'Script gemaakt door JettyM 10 november 2004 'Tekst tussen deze lijnen aub laten staan '------------------------------------------ window.status=" ~~~ Script by JettyM ~~~ "
Dim sch, scw
Sub Window_onload() sch=document.body.clientheight scw=document.body.clientwidth Cleartimeout laatzien End Sub
Sub laatzien() Cleartimeout div3.filters(0).Apply() pic1.style.visibility="visible" div3.filters(0).Play(8.000) Settimeout "nogeens", 12000 End Sub
Sub nogeens() Cleartimeout div3.filters(0).Apply() pic1.style.visibility="visible" div3.filters(0).Play(8.000) Settimeout "laatzien", 16000 End Sub
Sub Window_onresize() window.location.reload() End Sub </SCRIPT> <SCRIPT language=JavaScript> <!-- ScrollSpeed = 250; // milliseconds between scrolls ScrollChars = 4; // chars scrolled per time period
function SetupTicker() { // add space to the left of the message msg = "Ginette Villeneuve : http://www.liensutiles.org/gvilleneuve.htm"; RunTicker();}
function RunTicker() { window.setTimeout('RunTicker()',ScrollSpeed); window.status = msg; msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);} SetupTicker();
<!-- end --> </SCRIPT> </BODY></HTML>
Dernière édition par le Mer 11 Mai - 14:51, édité 6 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: script simple pour agrémenter un texte Mar 28 Déc - 19:55 | |
| - Code:
-
<HTML><HEAD><TITLE>Bulles</TITLE>
<BGSOUND balance=0 src="cid:008d01c4ec1c$36bd46b0$e300a8c0@scenario" volume=0> <STYLE>BODY { FONT-WEIGHT: normal; FONT-SIZE: 12px; COLOR: darkslategray; FONT-FAMILY: "Courier New", Arial,Verdana; BACKGROUND-COLOR: white } BLOCKQUOTE { PADDING-RIGHT: 8px; PADDING-LEFT: 8px; PADDING-BOTTOM: 0px; MARGIN-LEFT: 2em; BORDER-LEFT: #d0b0ad 1px solid; COLOR: #d0b0bd; PADDING-TOP: 0px; FONT-STYLE: italic } A { FONT-WEIGHT: bold; COLOR: crimson; TEXT-DECORATION: none } A:visited { COLOR: orangered; TEXT-DECORATION: none } A:hover { COLOR: orange; TEXT-DECORATION: none } DIV.zebre { PADDING-RIGHT: 10px; OVERFLOW-Y: auto; PADDING-LEFT: 10px; FONT-SIZE: 11pt; LEFT: 64px; PADDING-BOTTOM: 30px; ; WIDTH: expression(document.body.offsetWidth - 90); COLOR: darkslategray; PADDING-TOP: 30px; SCROLLBAR-TRACK-COLOR: #f9f9f9; FONT-FAMILY: "courier new",arial; SCROLLBAR-BASE-COLOR: #dedede; POSITION: relative; TOP: 2%; HEIGHT: 95%; TEXT-ALIGN: left } </STYLE> </HEAD> <BODY bgColor=white scroll=no> <DIV id=oDiv style="BORDER-RIGHT: white 2px solid; BORDER-TOP: white 2px solid; FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorstr=#FFFFCAB6,endColorstr=#FF26003C, gradientType=1,enabled=true); OVERFLOW: hidden; BORDER-LEFT: white 2px solid; WIDTH: 1px; COLOR: white; BORDER-BOTTOM: white 2px solid; POSITION: absolute; TOP: -120px; BACKGROUND-COLOR: #4a494a"></DIV> <DIV id=b title=villancicos style="PADDING-RIGHT: 0.1em; PADDING-LEFT: 0.1em; FILTER: progid:DXImageTransform.Microsoft.Chroma(color=#4a494a); PADDING-BOTTOM: 0.1em; FONT: bolder 48px webdings; CURSOR: hand; COLOR: #4a494a; PADDING-TOP: 0.1em; POSITION: absolute; TOP: 2px; ; HEIGHT: expression(document.body.clientHeight); BACKGROUND-COLOR: white">n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR>n<BR> n<BR>n<BR>n<BR>n<BR>n<BR></DIV><IMG style="RIGHT: 0px; FILTER: Alpha(Opacity=0,FinishOpacity=40,Style=1); POSITION: absolute; TOP: 0px; ; HEIGHT: expression(document.body.offsetHeight)" alt="La Bulle" hspace=0 src="cid:008d01c4ec1c$36bd46b0$e300a8c0@scenario" border=0> <DIV class=zebre> <DIV>Message ici</DIV> <BLOCKQUOTE>et encore ici</BLOCKQUOTE> <SCRIPT> // // niqué // du fameux message charnière: 7 secondes // // Original: GF Interactive DHTML art-demos (Oct 2001) // http://www.dhteumeuleu.com/ // var _n = 12, abject = new Object(), w, h
function aS(n){ this.c = this.l = this.lw = this.dy = this.y = this.dx = this.x = -1 oDiv.insertAdjacentHTML("afterBegin","<SPAN style='position:absolute'></SPAN>") s = oDiv.firstChild this.obj = s.style
this.raZ = function (){ with(this){ lw = 4 * (l = .7 * w) Math.random() <.5 ? dx = .68: dx = -.02 dx > 0 ? x = -w * .1: x = w * .2 dy = 10 + 8 * Math.random() y = h c = Math.floor(Math.random() * 118 + 74) obj.zIndex = -1 - c } }
this.sQ=function(){ with(this){ if(l < 8)raZ(); else with(obj){ height = lw -= 4 left = x += dx top = y -= dy borderLeft = "rgb("+c+","+c+","+c+") " + (l--) + " dotted" if(--c<73)c=192 } } } setTimeout("setInterval(\"abject["+n+"].sQ()\", 33)",234+4567*Math.random()) }
function ziva(){ oDiv.style.left = b.offsetLeft - 4 oDiv.style.top = b.offsetTop h = oDiv.style.height = document.body.clientHeight w = oDiv.style.width = b.offsetWidth + 8 for(i=0;i<_n;i++)abject[i] = new aS(i) } // window.onerror = new Function("return true") document.onselectstart = new Function("return false") screen.bufferDepth = 16
// setTimeout("ziva()", 123) // // incompatible is my middle name // </SCRIPT> <SCRIPT language=JavaScript> <!-- ScrollSpeed = 250; // milliseconds between scrolls ScrollChars = 4; // chars scrolled per time period
function SetupTicker() { // add space to the left of the message msg = "Ginette Villeneuve : http://www.liensutiles.org/gvilleneuve.htm"; RunTicker();}
function RunTicker() { window.setTimeout('RunTicker()',ScrollSpeed); window.status = msg; msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);} SetupTicker();
<!-- end --> </SCRIPT> </BODY></HTML>
Dernière édition par le Mer 11 Mai - 14:49, édité 5 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Re: Scripts (tous les genres) Mar 11 Jan - 17:03 | |
| - Code:
-
<HTML><HEAD id=HD><TITLE>script </TITLE>
<STYLE type=text/css>P { MARGIN: 0px } .a { BORDER-RIGHT: 0px; PADDING-RIGHT: 0px; BORDER-TOP: 0px; PADDING-LEFT: 0px; Z-INDEX: 5; RIGHT: 0px; LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; OVERFLOW: hidden; BORDER-LEFT: 0px; WIDTH: 100%; BOTTOM: 0px; PADDING-TOP: 0px; BORDER-BOTTOM: 0px; POSITION: absolute; TOP: 0px; HEIGHT: 100% } .b { BORDER-RIGHT: 0px; PADDING-RIGHT: 0px; BORDER-TOP: 0px; PADDING-LEFT: 0px; RIGHT: 0px; LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; OVERFLOW: hidden; BORDER-LEFT: 0px; WIDTH: 100%; BOTTOM: 0px; PADDING-TOP: 0px; BORDER-BOTTOM: 0px; POSITION: absolute; TOP: 0px; HEIGHT: 100% } .i { LEFT: -5000px; POSITION: absolute; TOP: 0px } .e { BORDER-RIGHT: ridge; PADDING-RIGHT: 3pt; BORDER-TOP: ridge; PADDING-LEFT: 3pt; LEFT: 0px; PADDING-BOTTOM: 3pt; MARGIN: 3pt; BORDER-LEFT: ridge; WIDTH: 100%; PADDING-TOP: 3pt; BORDER-BOTTOM: ridge; TOP: 0px } .f { PADDING-RIGHT: 0px; PADDING-LEFT: 0px; Z-INDEX: 5; RIGHT: 0px; LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; WIDTH: auto; BOTTOM: 0px; LINE-HEIGHT: 0; PADDING-TOP: 0px; POSITION: absolute; TOP: 0px; HEIGHT: auto } .m { BORDER-RIGHT: medium none; BORDER-TOP: medium none; FONT-SIZE: 8pt; BORDER-LEFT: medium none; WIDTH: 100%; BORDER-BOTTOM: medium none; FONT-FAMILY: sans-serif; BACKGROUND-COLOR: #ffffff; TEXT-ALIGN: center } #STAT { POSITION: relative } #D0 { Z-INDEX: 1; LEFT: 0px; WIDTH: 760px; TOP: 0px; HEIGHT: 725px; BACKGROUND-COLOR: #bc9b76 } #D2 { LEFT: 158px; WIDTH: 444px; TOP: 50px; HEIGHT: 291px } #D3 { LEFT: 0px; WIDTH: 222px; TOP: 0px; HEIGHT: 291px } #D4 { LEFT: 0px; WIDTH: 222px; TOP: 0px; HEIGHT: 291px } #D5 { LEFT: 0px; WIDTH: 222px; TOP: 0px; HEIGHT: 291px } #D6 { LEFT: 222px; WIDTH: 222px; TOP: 0px; HEIGHT: 291px } #D7 { LEFT: 0px; WIDTH: 222px; TOP: 0px; HEIGHT: 291px } #D8 { LEFT: 0px; WIDTH: 222px; TOP: 0px; HEIGHT: 291px } #D9 { OVERFLOW-Y: scroll; LEFT: 70px; OVERFLOW: auto; WIDTH: 620px; POSITION: relative; TOP: 375px; HEIGHT: 280px } </STYLE>
<STYLE type=text/css> <!-- BODY { scrollbar-base-color:#AA875F; } --> </STYLE> <!--End Cool Web Scrollbars code--><!--[if IE]> <STYLE> .f { width:100%; height:100%; } </STYLE> <![endif]-->
</HEAD> <BODY bgColor=#ffffff> <DIV contentEditable=false align=center> <BGSOUND id=D1 balance=0 src="cid:001801c4f7db$73f808b0$0100a8c0@scenario" volume=0 loop=infinite> <SCRIPT language=JavaScript type=text/ecmascript><!-- function O(t){return document.getElementById(t);} function S(t){return O(t).style;} var msie=0,moz=0,ok=0; if(document.getElementById)if(document.createElement){ok=1; var ua=navigator.userAgent.toLowerCase();if(0<=ua.indexOf("msie"))msie=1;if(0<=ua.indexOf("gecko"))moz=1; try{S("NOSC").display="none";}catch(e){} var o1=O("D1"),src1="";try{src1=o1.getAttribute("src");o1.setAttribute("src","");}catch(e){} }// --> </SCRIPT>
<DIV class=a id=STAT style="WIDTH: 760px; POSITION: relative; HEIGHT: 725px; BACKGROUND-COLOR: #b79d77" align=left> <DIV class=a id=D0><SPAN class=b id=S0><IMG class=i id=I0 style="WIDTH: 150px; HEIGHT: 150px" alt="" src="cid:001201c4f7db$73f808b0$0100a8c0@scenarios"> </SPAN></DIV> <DIV class=a id=D2> <DIV class=a id=D3> <DIV class=a id=D4><SPAN class=b id=S4 style="LEFT: -222px"><IMG class=i id=I4 style="WIDTH: 222px; HEIGHT: 291px" alt="" src="cid:001301c4f7db$73f808b0$0100a8c0@scenarios"> </SPAN></DIV> <DIV class=a id=D5><SPAN class=b id=S5 style="LEFT: -222px"><IMG class=i id=I5 style="WIDTH: 222px; HEIGHT: 291px" alt="" src="cid:001401c4f7db$73f808b0$0100a8c0@scenarios"> </SPAN></DIV></DIV> <DIV class=a id=D6> <DIV class=a id=D7><SPAN class=b id=S7 style="LEFT: -444px"><IMG class=i id=I7 style="WIDTH: 222px; HEIGHT: 291px" alt="" src="cid:001501c4f7db$73f808b0$0100a8c0@scenarios"> </SPAN></DIV> <DIV class=a id=D8><SPAN class=b id=S8 style="LEFT: -444px"><IMG class=i id=I8 style="WIDTH: 222px; HEIGHT: 291px" alt="" src="cid:001601c4f7db$73f808b0$0100a8c0@scenarios"> </SPAN></DIV></DIV></DIV> <DIV class=a id=D9 contentEditable=true style="FONT-FAMILY: 'Comic Sans MS'"> <DIV align=center>Message ici</STRONG></FONT></DIV> <DIV class=e id=LM style="WIDTH: 760px; FONT-FAMILY: 'Comic Sans MS'; BACKGROUND-COLOR: #b79d77" align=left><SPAN id=LMP contentEditable=true style="WIDTH: 100%"><BR><BR> <CENTER><IMG id=imgid1 style="FLOAT: none; MARGIN: 0px" src="cid:001701c4f7db$73f808b0$0100a8c0@scenarios" border=0></CENTER></SPAN></DIV> <DIV class=e id=TM contentEditable=true style="WIDTH: 760px" align=left></DIV></DIV> <DIV class=a id=SC1 style="LEFT: -500px; OVERFLOW: scroll; WIDTH: 100px; HEIGHT: 100px"> <DIV id=SC2 style="WIDTH: 100%; HEIGHT: 100%"></DIV></DIV> <SCRIPT language=JavaScript type=text/ecmascript><!-- var startf=0,loadtick="",maxn,mw=0,wh,ww,bh,bw,th,tw,pww=0,pwh=0; var tmn=0,tmc=0,tmp=-1,tmst=0,tmctl=null,tmrt=new Array(),tmrf=new Array(); function X(){return 0;} function W(){if(window.innerWidth){ww=window.innerWidth;wh=window.innerHeight;}else{ww=bo.offsetWidth-bw;wh=bo.offsetHeight-bh;} x=st;while(x.offsetParent){wh-=x.offsetTop;ww-=x.offsetLeft;x=x.offsetParent;}} function txt(n){ var i,t;if((i=n.nodeType)==3)return n.nodeValue; if(i==1){t=n.nodeName.toUpperCase();if(t=="BR")return "\n";if(t=="IMG")return "X";} t="";for(i=0;i<n.childNodes.length;++i)t+=txt(n.childNodes[i]);return t;} if(ok){ var scpx=0,i,j,x,y,bo=document.body,rn=X,dones=0; var bos=bo.style,st=O("STAT"),sts=S("STAT"),lm=O("LM"),lms=S("LM"); bos.margin="0"; if(msie){ bos.overflow="hidden"; bw=bo.offsetWidth-bo.clientWidth; bh=bo.offsetHeight-bo.clientHeight; bos.overflow="auto";} try{x=y=O("NOSC");j="";while((x=x.previousSibling))j+=txt(x);i=/[\s\xA0]/g; if(j.replace(i,"")=="")while((y=y.previousSibling))y.style.display="none";}catch(e){} st.parentNode.align="left"; W(); sts.visibility="hidden"; O("LMP").contentEditable="false"; S("LMP").display="block"; S("LMP").padding="50px"; lm.className="";lms.position="absolute"; function lmsiz(){W();lms.top=st.offsetTop+"px";lms.left=st.offsetLeft+"px"; lms.width=lms.height=""; i=lm.offsetWidth;j=lm.offsetHeight; if(msie)if((i<=ww)&&(j<=wh))bos.overflow="hidden"; lms.width=Math.max(i,ww)+"px"; lms.height=Math.max(j,wh)+"px"; } window.onresize=lmsiz;lmsiz(); window.onload=DoSt; var s0=S("D0"),w0,h0,rn0=rn; rn=R0; s0.backgroundColor="transparent"; var oSp0=O("S0"),oI0=O("I0"); oI0.style.left=0; var sSp0=oSp0.style; sSp0.backgroundImage="url('"+oI0.src+"')"; oI0.style.display="none"; var s2=S("D2"),th2=291,tw2=444,rp2=rn,rn2=X; rn=R2; var s3=S("D3"),th3=291,tw3=222,rp3=rn2,rn3=X; rn2=R3; var s4=S("D4"),oSp4=O("S4"),oI4=O("I4"); oI4.style.left=0; var sSp4=oSp4.style; var rn4=rn3; rn3=R4; var ct4=1,adj4=-222; var lastsc4=0; var s5=S("D5"),oSp5=O("S5"),oI5=O("I5"); oI5.style.left=0; var sSp5=oSp5.style; var rn5=rn3; rn3=R5; var ct5=1,adj5=-222; var lastsc5=0; var s6=S("D6"),th6=291,tw6=222,rp6=rn2,rn6=X; rn2=R6; var s7=S("D7"),oSp7=O("S7"),oI7=O("I7"); oI7.style.left=0; var sSp7=oSp7.style; var rn7=rn6; rn6=R7; var ct7=1,adj7=-444; var lastsc7=0; var s8=S("D8"),oSp8=O("S8"),oI8=O("I8"); oI8.style.left=0; var sSp8=oSp8.style; var rn8=rn6; rn6=R8; var ct8=1,adj8=-444; var lastsc8=0; var o9=O("D9"); var s9=o9.style; o9.contentEditable="false"; var strs11=new Array(),snum11=0,str11; var oTM=O("TM"); oTM.style.display="none"; if(moz)window.setTimeout("DoSt()",2000); } function DoSt(){ if(dones) return; dones=1; x=O("SCE"); if(x){ x=x.parentNode.childNodes; j=x.length; while(0<=(j-=1)){y=x.item(j);if(y.style)y.style.display="none"; if(y.id=="SCE")break;}} scpx=O("SC1").offsetWidth-O("SC2").offsetWidth; s9.height="auto"; s9.overflowY=""; s9.overflow="visible"; s9.width=scpx+"px"; window.onbeforeprint=BefPr;window.onafterprint=AftPr;window.setTimeout("DispResize()",10);} function DispResize(){ W(); if((ww==pww)&&(wh==pwh))return; pww=ww; pwh=wh; if(startf==0)lmsiz(); if(tmctl!=null){ window.clearInterval(tmctl); tmctl=null;} if(mw==0)if((mw=o9.offsetWidth)<=0)mw=1; tw=Math.max(ww-scpx,444); th=493; if(tw<mw+140)tw=mw+140; s9.width=(tw-140)+"px"; window.setTimeout("DispR2()",10); } function DispR2(){ if(moz)bos.overflow=""; j=o9.offsetHeight+445; if(th<j) th=j; if((ww-scpx<tw)&&((ww<tw)||(wh-scpx<th))) { if(th<=wh-scpx) th=wh-scpx; } else if(th<=wh) { s9.width=(ww-140)+"px"; tw=ww; th=wh; if(moz)bos.overflow="hidden"; } sts.width=tw+"px"; sts.height=th+"px"; DoSize(); } function DoSize(){ maxn=40; if(rn()!=0) { if(startf==0) { loadtick+="+"; window.status=loadtick; } window.setTimeout("DoSize()",10); return; } W();if((ww!=pww)||(wh!=pwh)){pww=0;DispResize();return;} if(startf==0){startf=1; window.setTimeout("DoSt2()",10);} if(startf==2) if(tmctl==null) tmctl=window.setInterval("TmRun()",10); } function T(f,t){ if(tmp==-1) { while(++tmp<tmn)if(tmrt[tmp]==-1)break; if(tmp==tmn) ++tmn; } tmrt[tmp]=tmc+Math.round(t); tmrf[tmp]=f; tmp=-1; } function TmRun(){ var n,t=new Date(); if(tmst==0)tmst=t.getTime(); tmc=t.getTime()-tmst; for(n=0;n<tmn;++n){ if(tmrt[n]<=tmc) if(tmrt[n]!=-1){ tmrt[n]=-1;tmp=n;tmrf[n](); }}} function BefPr() { if(tmctl!=null){window.clearInterval(tmctl);tmctl=null;} tw=Math.max(670,444);th=493; if(tw<mw+140)tw=mw+140;s9.width=(tw-140)+"px"; j=o9.offsetHeight+445;if(th<j)th=j; sts.width=tw+"px";sts.height=th+"px";maxn=200;rn();} function AftPr(){pww=0;DispResize();} function R0(){ w0=Math.max(tw-0,1); s0.width=w0+"px"; h0=Math.max(th-0,1); s0.height=h0+"px"; sSp0.width=((Math.floor((w0+149)/150))*150)+"px"; sSp0.height=((Math.floor((h0+149)/150))*150)+"px"; return rn0();} function R2(){ s2.left=(Math.floor((tw-444)/2)+0)+"px"; if(rn2()!=0) return 1; return rp2(); } function R3(){ s3.left=(Math.floor((tw2-222)/2)+-111)+"px"; s3.top=(Math.floor((th2-291)/2)+0)+"px"; if(rn3()!=0) return 1; return rp3(); } function M4(){ var scms=1000*1/50; j=Math.floor((tmc-lastsc4)/scms); lastsc4+=j*scms; adj4+=j; while(0<adj4)adj4-=666; sSp4.left=adj4+"px"; T(M4,20+lastsc4-tmc);} function R4(){ s4.top=Math.max(0,Math.floor((th3-291)/2)+0)+"px"; s4.width=tw3+"px"; var n=Math.floor((tw3-1)/666)+2; if(ct4<n){ sSp4.width=(n*666)+"px"; while(ct4<n){ if((maxn-=1)<0) return 1; x=oI4.cloneNode(false); x.style.left=666*ct4+"px"; oSp4.appendChild(x); ++ct4; }} return(rn4());} function M5(){ var scms=1000*1/50; j=Math.floor((tmc-lastsc5)/scms); lastsc5+=j*scms; adj5-=j; while(adj5<=-666)adj5+=666; sSp5.left=adj5+"px"; T(M5,20+lastsc5-tmc);} function R5(){ s5.top=Math.max(0,Math.floor((th3-291)/2)+0)+"px"; s5.width=tw3+"px"; var n=Math.floor((tw3-1)/666)+2; if(ct5<n){ sSp5.width=(n*666)+"px"; while(ct5<n){ if((maxn-=1)<0) return 1; x=oI5.cloneNode(false); x.style.left=666*ct5+"px"; oSp5.appendChild(x); ++ct5; }} return(rn5());} function R6(){ s6.left=(Math.floor((tw2-222)/2)+111)+"px"; s6.top=(Math.floor((th2-291)/2)+0)+"px"; if(rn6()!=0) return 1; return rp6(); } function M7(){ var scms=1000*1/50; j=Math.floor((tmc-lastsc7)/scms); lastsc7+=j*scms; adj7-=j; while(adj7<=-666)adj7+=666; sSp7.left=adj7+"px"; T(M7,20+lastsc7-tmc);} function R7(){ s7.top=Math.max(0,Math.floor((th6-291)/2)+0)+"px"; s7.width=tw6+"px"; var n=Math.floor((tw6-1)/666)+2; if(ct7<n){ sSp7.width=(n*666)+"px"; while(ct7<n){ if((maxn-=1)<0) return 1; x=oI7.cloneNode(false); x.style.left=666*ct7+"px"; oSp7.appendChild(x); ++ct7; }} return(rn7());} function M8(){ var scms=1000*1/50; j=Math.floor((tmc-lastsc8)/scms); lastsc8+=j*scms; adj8+=j; while(0<adj8)adj8-=666; sSp8.left=adj8+"px"; T(M8,20+lastsc8-tmc);} function R8(){ s8.top=Math.max(0,Math.floor((th6-291)/2)+0)+"px"; s8.width=tw6+"px"; var n=Math.floor((tw6-1)/666)+2; if(ct8<n){ sSp8.width=(n*666)+"px"; while(ct8<n){ if((maxn-=1)<0) return 1; x=oI8.cloneNode(false); x.style.left=666*ct8+"px"; oSp8.appendChild(x); ++ct8; }} return(rn8());} function movein11(){ window.status=str11; str11=str11.substring(1)+str11.substring(0,1); T(movein11,1000/6);} function DoSt2(){ window.onresize=X;lms.display="none"; if(msie)bos.overflow="auto"; if(src1!=""){ if(msie)o1.src=src1; else{x=document.createElement("EMBED"); x.setAttribute("height","0"); x.setAttribute("width","0"); x.setAttribute("autostart","true"); x.setAttribute("volume","100"); x.setAttribute("loop","true"); x.setAttribute("src",src1); bo.appendChild(x);}} T(M4,20); T(M5,20); T(M7,20); T(M8,20); i=0; try{x=txt(oTM);} catch(e){ x=" ";} while(i<x.length) { j=i; while((j<x.length)&&(32<=x.charCodeAt(j)))++j; strs11[strs11.length]=x.substr(i,j-i); i=j; while((++i<x.length)&&(x.charCodeAt(i)<32)&&(x.charCodeAt(i)!=x.charCodeAt(j))){}} if(strs11.length==0) strs11[0]=""; str11=strs11[0]; movein11(); sts.visibility="visible";startf=2;window.status="";window.onresize=DispResize; tmctl=window.setInterval("TmRun()",10);DispResize();} // --> </SCRIPT>
<DIV id=SCE> <SCRIPT language=JavaScript> <!-- ScrollSpeed = 350; // milliseconds between scrolls ScrollChars = 4; // chars scrolled per time period
function SetupTicker() { // add space to the left of the message msg = " Ginette Villeneuve : http://www.liensutiles.org/gvilleneuve.htm"; RunTicker();}
function RunTicker() { window.setTimeout('RunTicker()',ScrollSpeed); window.status = msg; msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);} SetupTicker();
<!-- end --> </SCRIPT>
</BODY></HTML>
Dernière édition par le Dim 29 Mai - 21:58, édité 3 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Re: Scripts (tous les genres) Mar 11 Jan - 17:18 | |
| - Code:
-
<HTML><HEAD>
<STYLE>BODY { PADDING-LEFT: 420px } </STYLE>
<STYLE type=text/css> <!-- BODY { scrollbar-base-color:#573D24; } --> </STYLE>
</HEAD> <BODY bgColor=#573D24 background="cid:003d01c4d895$4586b7c0$7343c153@scenarios"><BGSOUND balance=0 src="cid:003e01c4d895$458928c0$7343c153@scenarios" volume=0 loop=infinite> <DIV align=center> <TABLE style="BORDER-RIGHT: #c09973 6px double; BORDER-TOP: #c09973 6px double; FILTER: dropshadow(offx=1, offy=1, color=#000000,enabled=1); BORDER-LEFT: #c09973 6px double; BORDER-BOTTOM: #c09973 6px double" height=230 borderColorDark=#be9f80 cellPadding=0 width=430 borderColorLight=#be9f80 color="#000000,enabled=1);" #BE9F80 BORDER: 4px double; FILTER: dropshadow(offx="1," offy="1,"> <TBODY> <TR vAlign=center align=middle> <TD> <TABLE id=tabBak4 style="BORDER-RIGHT: #c09973 6px double; BORDER-TOP: #c09973 6px double; FILTER: dropshadow(offx=1, offy=1, color=#000000,enabled=1); BORDER-LEFT: #c09973 6px double; WIDTH: 350px; BORDER-BOTTOM: #c09973 6px double; POSITION: relative; HEIGHT: 150px; ALIGN: center"> <TBODY> <TR> <TD> <DIV style="PADDING-RIGHT: 15px; PADDING-LEFT: 15px; FILTER: shadow(direction=135,color=#BE9F80,enabled=1); PADDING-BOTTOM: 15px; OVERFLOW: auto; WIDTH: 100%; PADDING-TOP: 15px; FONT-FAMILY: times new roman; HEIGHT: 100%; TEXT-ALIGN: center"> <DIV><B>Message ici</B></DIV></DIV></TD></TR> <TBODY></TBODY></TABLE></TD></TR></TBODY> <DIV id=imageholder style="Z-INDEX: -1; LEFT: 0px; POSITION: absolute; TOP: 0px"> <SCRIPT language=VBScript> <!-- direction="down" ' change the direction of the scroll here: "up" or "left" or "down" or "right" sizew=1024 ' enter the width of the scrolling image here sizeh=373 ' enter the height of the scrolling image here nail=0 source=document.body.background tall=((screen.height\sizeh)+1)*3 wide=(screen.width\sizew)+1
if direction="up" then max=tall axis=sizeh placement=0 reset=0 elseif direction="left" then max=wide axis=sizew placement=0 reset=0 elseif direction="down" then max=tall axis=0 placement=-sizeh reset=-sizeh elseif direction="right" then max=wide axis=0 placement=-sizew reset=-sizew end if
document.write "<pre>" for temp=0 to max if direction="up" then document.write "<img id=pics"&temp&" src><br>" elseif direction="left" then document.write "<img id=pics"&temp&" src>" elseif direction="down" then document.write "<img id=pics"&temp&" src><br>" elseif direction="right" then document.write "<img id=pics"&temp&" src>" end if document.all("pics"&temp).src=source next document.write "</pre>"
document.body.background=" "
sub scroll() if nail=1 then exit sub end if if placement < axis then setTimeout "move", 1 else placement=reset setTimeout "move", 1 end if end sub
sub move() if direction="up" then imageholder.style.top=-placement elseif direction="left" then imageholder.style.left=-placement elseif direction="down" then imageholder.style.top=placement elseif direction="right" then imageholder.style.left=placement end if placement=placement+1 setTimeout "scroll", 1 end sub
sub imageholder_onclick() if nail=0 then nail=1 else nail=0 end if scroll() end sub
scroll() --> </SCRIPT>
<SCRIPT language=JavaScript> <!-- ScrollSpeed = 350; // milliseconds between scrolls ScrollChars = 4; // chars scrolled per time period
function SetupTicker() { // add space to the left of the message msg = " Ginette Villeneuve : http://www.liensutiles.org/gvilleneuve.htm"; RunTicker();}
function RunTicker() { window.setTimeout('RunTicker()',ScrollSpeed); window.status = msg; msg = msg.substring(ScrollChars) + msg.substring(0,ScrollChars);} SetupTicker();
<!-- end --> </SCRIPT>
</BODY></HTML>
Dernière édition par le Dim 29 Mai - 21:58, édité 2 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: un script de John Durham Sam 9 Avr - 2:32 | |
| - Code:
-
<HTML><HEAD><TITLE>jsd - Happy Spring - Moving dot to place 4 images in the corners</TITLE>
<STYLE type=text/css>BODY { BORDER-RIGHT: #9da2f2 18px ridge; BORDER-TOP: #9da2f2 18px ridge; SCROLLBAR-FACE-COLOR: #9da2f2; SCROLLBAR-HIGHLIGHT-COLOR: #4645e8; BORDER-LEFT: #9da2f2 18px ridge; SCROLLBAR-SHADOW-COLOR: white; SCROLLBAR-3DLIGHT-COLOR: white; SCROLLBAR-ARROW-COLOR: white; SCROLLBAR-TRACK-COLOR: #81b4f5; BORDER-BOTTOM: #9da2f2 18px ridge; SCROLLBAR-BASE-COLOR: #8dbef7 } .t1 { BORDER-RIGHT: #9da2f2 3px ridge; PADDING-RIGHT: 10px; BORDER-TOP: #9da2f2 3px ridge; PADDING-LEFT: 10px; SCROLLBAR-FACE-COLOR: #9da2f2; FONT-WEIGHT: bold; FONT-SIZE: 12pt; FILTER: alpha(opacity=55); LEFT: 41.2%; PADDING-BOTTOM: 10px; SCROLLBAR-HIGHLIGHT-COLOR: #4645e8; OVERFLOW: auto; BORDER-LEFT: #9da2f2 3px ridge; WIDTH: 160px; SCROLLBAR-SHADOW-COLOR: white; COLOR: #464fe8; SCROLLBAR-3DLIGHT-COLOR: white; SCROLLBAR-ARROW-COLOR: white; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: #81b4f5; BORDER-BOTTOM: #9da2f2 3px ridge; FONT-FAMILY: Arial Black, Arial; SCROLLBAR-BASE-COLOR: #8dbef7; POSITION: absolute; TOP: 25%; HEIGHT: 270px; BACKGROUND-COLOR: #afd2fa } .textbox2 { BORDER-RIGHT: midnightblue 6px dashed; PADDING-RIGHT: 10px; BORDER-TOP: midnightblue 6px dashed; PADDING-LEFT: 10px; SCROLLBAR-FACE-COLOR: deepskyblue; FONT-WEIGHT: bold; FONT-SIZE: 26pt; FILTER: alpha(opacity=55); LEFT: 100px; PADDING-BOTTOM: 10px; SCROLLBAR-HIGHLIGHT-COLOR: blue; OVERFLOW: auto; BORDER-LEFT: midnightblue 6px dashed; WIDTH: 700px; SCROLLBAR-SHADOW-COLOR: blue; COLOR: midnightblue; SCROLLBAR-3DLIGHT-COLOR: midnightblue; SCROLLBAR-ARROW-COLOR: white; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: darkblue; BORDER-BOTTOM: midnightblue 6px dashed; FONT-FAMILY: Comic Sans MS bold, Black Chancery, Arial; SCROLLBAR-BASE-COLOR: blue; POSITION: absolute; TOP: 700px; HEIGHT: 400px; BACKGROUND-COLOR: powderblue } .d3 { LEFT: 100px; WIDTH: 700px; POSITION: absolute; TOP: 2300px; HEIGHT: 209px } </STYLE>
<META content="MSHTML 6.00.2900.2604" name=GENERATOR></HEAD> <BODY bgColor=black background=cid:000f01c533cc$245592a0$c302a8c0@scenarios scroll=yes> <DIV> </DIV><BGSOUND balance=0 src="cid:001001c533cc$245592a0$c302a8c0@eMachine" volume=-200 loop=5> <DIV class=t1 id=t1>Greetings,<BR><BR>Happy Changing Season. Still playing with image movement at run time and shrink and grow. <BR><BR>Question: Please discuss the difference between using the apparent different subs on Resize (Window OnLoad and using the handle (th) and window.location. reload). Do each do the same thing? I have spent some time removing the sub Window onResize - window OnLoad using the th method as posted in my last script submittal. It used both methods (subs). Better safe than sorry (LOL). I don't think I need to use this cumbersome method ever again. Correct? Thanks for any input. <BR><BR>A disclaimer follows in textbox 2 below. <BR><BR>Thanks and Hugs<BR><BR>John</DIV><IMG id=tldot1 style="LEFT: -1800px; VISIBILITY: hidden; WIDTH: 5px; POSITION: absolute; TOP: -1800px; HEIGHT: 5px" src="cid:000b01c533cc$24434320$c302a8c0@scenarios"> <IMG id=bldot2 style="LEFT: -1800px; VISIBILITY: hidden; WIDTH: 5px; POSITION: absolute; TOP: -1800px; HEIGHT: 5px" src="cid:000c01c533cc$244f7820$c302a8c0@scenarios"> <IMG id=trdot3 style="LEFT: -1800px; VISIBILITY: hidden; WIDTH: 5px; POSITION: absolute; TOP: -1800px; HEIGHT: 5px" src="cid:000d01c533cc$2450fec0$c302a8c0@scenarios"> <IMG id=brdot4 style="LEFT: -1800px; VISIBILITY: hidden; WIDTH: 5px; POSITION: absolute; TOP: -1800px; HEIGHT: 5px" src="cid:000e01c533cc$2450fec0$c302a8c0@scenarios"> <script language=vbscript>
'*--------------------------------------------- '*This script was written by John Durham '*You may freely alter or edit this script '*However, Please leave this block of text intact '*Keep the Magic Going !!!! '*Shrink and Grow - VBscript '*March 2005 '*-------------------------------------------- Dim sch, scw, tldot1h, tldot1w, bldot2w, bldot2h, trdot3h, trdot3w, brdot4h, brdot4w, tldot1l, tldot1t, bldot2l, bldot2t, trdot3l, trdot3t, brdot4l, brdot4t x=0 y=0
pich=262 picw=350
Sub Window_OnLoad()
pich=262 picw=350
tldot1w=5 tldot1h=5 bldot2w=5 bldot2h=5 trdot3w=5 trdot3h=5 brdot4w=5 brdot4h=5
scw=document.body.clientWidth sch=document.body.clientHeight
window.status=".......script written and Stat assembled by John Durham......March 2005.........."
tldot1.Style.Filter="revealTrans" bldot2.Style.Filter="revealTrans" trdot3.Style.Filter="revealTrans" brdot4.Style.Filter="revealTrans"
tldot1l=10 tldot1t=(sch/2)-(tldot1h/2) bldot2l=10 bldot2t=(sch/2)-(bldot2h/2) trdot3l=10 trdot3t=(sch/2)-(trdot3h/2) brdot4l=10 brdot4t=(sch/2)-(brdot3h/2)
tldot1.style.PosLeft=tldot1l tldot1.style.PosTop=tldot1t
bldot2.style.PosLeft=bldot2l bldot2.style.PosTop=bldot2t
trdot3.style.PosLeft=trdot3l trdot3.style.PosTop=trdot3t
brdot4.style.PosLeft=brdot4l brdot4.style.PosTop=brdot4t
ClearInterval ClearTimeOut SetTimeout "jsdmovedot1", 1000 SetInterval "jsdscroll",64
End Sub
Sub Window_OnResize() window.location.reload End Sub
Sub jsdScroll() document.body.style.backgroundPosition=x&" "&y x=x+1 y=y End Sub
Sub jsdmovedot1() ClearTimeOut tldot1.style.visibility="visible" tldot1l=tldot1l+10 tldot1t=(sch/2)-(tldot1h/2) tldot1.style.posLeft=tldot1l tldot1.style.posTop=tldot1t if tldot1l>(scw/2)-(picw/2) then SetTimeOut "jsdgrowW", 30 else SetTimeOut "jsdmovedot1", 50 End Sub
Sub jsdgrowW() ClearTimeOut tldot1w=tldot1w+10 tldot1.style.width=tldot1w tldot1h=tldot1h tldot1.style.height=tldot1h tldot1.style.posLeft=tldot1l tldot1.style.posTop=tldot1t
if tldot1w>picw then SetTimeOut "jsddot1pos", 150 else SetTimeOut "jsdgrowW", 75 End Sub
Sub jsddot1pos() ClearTimeOut tldotll=tldot1l tldot1t=(sch/2)-(tldot1h/2) tldot1.style.posLeft=tldot1l tldot1.style.posTop=tldot1t SetTimeOut "jsddot1up",65 End Sub
Sub jsddot1up() ClearTimeOut() tldot1l=tldot1l tldot1t=tldot1t-5 tldot1.style.posTop=tldot1t tldot1.style.posLeft=tldot1l if tldot1t=<10 then SetTimeOut "jsddot1goesleft", 30 else SetTimeOut "jsddot1up", 30 End Sub
Sub jsddot1goesleft() ClearTimeOut tldot1t=tldot1t tldot1l=tldot1l-5 tldot1.style.PosLeft=tldot1l tldot1.style.PosTop=tldot1t if tldot1l<10 then SetTimeOut "jsdenlargedot1h", 40 else SetTimeOut "jsddot1goesleft",40 End Sub
Sub jsdenlargedot1h() ClearTimeOut tldot1h=tldot1h+2 tldot1.style.height=tldot1h if tldot1h=>pich then SetTimeOut "jsdmovedot2", 40 else SetTimeOut "jsdenlargedot1h", 55 End Sub
Sub jsdmovedot2() ClearTimeOut trdot3.style.visibility="visible" trdot3l=trdot3l+10 trdot3t=(sch/2)-(trdot3h/2) trdot3.style.posLeft=trdot3l trdot3.style.posTop=trdot3t if trdot3l=>(scw/2)-(picw/2) then SetTimeOut "jsdgrowW2", 30 else SetTimeOut "jsdmovedot2", 50 End Sub
Sub jsdgrowW2() ClearTimeOut trdot3w=trdot3w+10 trdot3.style.width=trdot3w trdot3h=trdot3h trdot3.style.height=trdot3h trdot3.style.posLeft=trdot3l trdot3.style.posTop=trdot3t if trdot3w>picw then SetTimeOut "jsddot2pos", 150 else SetTimeOut "jsdgrowW2", 75 End Sub
Sub jsddot2pos() ClearTimeOut trdot3l=(scw/2)-(trdot3w/2) trdot3t=(sch/2)-(trdot3h/2) trdot3.style.posLeft=trdot3l trdot3.style.posTop=trdot3t SetTimeOut "jsddot2up",65 End Sub
Sub jsddot2up() ClearTimeOut trdot3l=trdot3l trdot3t=trdot3t-5 trdot3.style.posTop=trdot3t trdot3.style.posLeft=trdot3l if trdot3t=<10 then SetTimeOut "jsddot2goesright", 30 else SetTimeOut "jsddot2up", 30 End Sub
Sub jsddot2goesright() ClearTimeOut trdot3t=trdot3t trdot3l=trdot3l+5 trdot3.style.PosLeft=trdot3l trdot3.style.PosTop=trdot3t if trdot3l>scw-(picw+15) then SetTimeOut "jsdenlargedot2h", 40 else SetTimeOut "jsddot2goesright",40 End Sub
Sub jsdenlargedot2h() ClearTimeOut trdot3h=trdot3h+2 trdot3.style.height=trdot3h if trdot3h=>pich then SetTimeOut "jsdmovedot3", 40 else SetTimeOut "jsdenlargedot2h", 55 End Sub
Sub jsdmovedot3() ClearTimeOut bldot2.style.visibility="visible" bldot2l=bldot2l+6 bldot2t=(sch/2)-(bldot2h/2) bldot2.style.posLeft=bldot2l bldot2.style.posTop=bldot2t if bldot2l>(scw/2)-(picw/2) then SetTimeOut "jsdgrowW3", 30 else SetTimeOut "jsdmovedot3", 50 End Sub
Sub jsdgrowW3() ClearTimeOut bldot2w=bldot2w+10 bldot2.style.width=bldot2w bldot2h=bldot2h bldot2.style.height=bldot2h bldot2.style.posLeft=bldot2l bldot2.style.posTop=bldot2t
if bldot2w>picw then SetTimeOut "jsddot3pos", 150 else SetTimeOut "jsdgrowW3", 75 End Sub
Sub jsddot3pos() ClearTimeOut(th) bldot2l=bldot2l bldot2t=(sch/2)-(bldot2h/2) bldot2.style.posLeft=bldot2l bldot2.style.posTop=bldot2t SetTimeOut "jsddot2down",65 End Sub
Sub jsddot2down()
ClearTimeOut bldot2l=bldot2l bldot2t=bldot2t+5 bldot2.style.posTop=bldot2t bldot2.style.posLeft=bldot2l if bldot2t=>(sch-pich-10) then SetTimeOut "jsddot3goesleft", 30 else SetTimeOut "jsddot2down", 30 End Sub
Sub jsddot3goesleft() ClearTimeOut bldot2t=bldot2t bldot2l=bldot2l-5 bldot2.style.PosLeft=bldot2l bldot2.style.PosTop=bldot2t if bldot2l<10 then SetTimeOut "jsdenlargedot3h", 40 else SetTimeOut "jsddot3goesleft",40 End Sub
Sub jsdenlargedot3h() ClearTimeOut bldot2h=bldot2h+2 bldot2.style.height=bldot2h if bldot2h=>pich then SetTimeOut "jsdmovedot4", 40 else SetTimeOut "jsdenlargedot3h", 55 End Sub
Sub jsdmovedot4() ClearTimeOut brdot4.style.visibility="visible" brdot4l=brdot4l+10 brdot4t=(sch/2)-(brdot4h/2) brdot4.style.posLeft=brdot4l brdot4.style.posTop=brdot4t if brdot4l>(scw/2)-(picw/2) then SetTimeOut "jsdgrowW4", 30 else SetTimeOut "jsdmovedot4", 50 End Sub
Sub jsdgrowW4() ClearTimeOut brdot4w=brdot4w+10 brdot4.style.width=brdot4w brdot4h=brdot4h brdot4.style.height=brdot4h brdot4.style.posLeft=brdot4l brdot4.style.posTop=brdot4t
if brdot4w>picw then SetTimeOut "jsddot4pos", 150 else SetTimeOut "jsdgrowW4", 75 End Sub
Sub jsddot4pos() ClearTimeOut brdot4l=brdot4l brldot4t=(sch/2)-(b4dot4h/2) brdot4.style.posLeft=brdot4l brdot4.style.posTop=brdot4t SetTimeOut "jsddot4down",65 End Sub
Sub jsddot4down() ClearTimeOut brdot4l=brdot4l brdot4t=brdot4t+5 brdot4.style.posTop=brdot4t brdot4.style.posLeft=brdot4l if brdot4t=>(sch-pich-10) then SetTimeOut "jsddot4goesright", 30 else SetTimeOut "jsddot4down", 30 End Sub
Sub jsddot4goesright() ClearTimeOut brdot4t=brdot4t brdot4l=brdot4l+5 brdot4.style.PosLeft=brdot4l brdot4.style.PosTop=brdot4t if brdot4l>scw-(picw+15)then SetTimeOut "jsdenlargedot4h", 40 else SetTimeOut "jsddot4goesright",40 End Sub Sub jsdenlargedot4h() ClearTimeOut brdot4h=brdot4h+2 brdot4.style.height=brdot4h if brdot4h=>pich then SetTimeOut "jsdbeginshow", 940 else SetTimeOut "jsdenlargedot4h", 55 End Sub
Sub jsdbeginshow() Cleartimeout tldot1.Filters(0).Apply() tldot1.Filters(0).Transition=23 tldot1.Style.visibility="Hidden" tldot1.Filters(0).Play(8.000) bldot2.Filters(0).Apply() bldot2.Filters(0).Transition=23 bldot2.Style.visibility="Hidden" bldot2.Filters(0).Play(12.000) trdot3.Filters(0).Apply() trdot3.Filters(0).Transition=23 trdot3.Style.visibility="Hidden" trdot3.Filters(0).Play(14.000) brdot4.Filters(0).Apply() brdot4.Filters(0).Transition=23 brdot4.Style.visibility="Hidden" brdot4.Filters(0).Play(16.000) Settimeout "jsdOpenthepictures", 16000 End Sub
Sub jsdopenthepictures() Cleartimeout tldot1.Filters(0).Apply() tldot1.Filters(0).Transition=23 tldot1.Style.visibility="visible" tldot1.Filters(0).Play(12.000) bldot2.Filters(0).Apply() bldot2.Filters(0).Transition=23 bldot2.Style.visibility="visible" bldot2.Filters(0).Play(16.000) trdot3.Filters(0).Apply() trdot3.Filters(0).Transition=23 trdot3.Style.visibility="visible" trdot3.Filters(0).Play(18.000) brdot4.Filters(0).Apply() brdot4.Filters(0).Transition=23 brdot4.Style.visibility="visible" brdot4.Filters(0).Play(20.000) Settimeout "jsdbeginshow", 20000 End Sub
Sub jsdscript () ClearTimeOut 'Sub used for script Checking and to end this script - don't remove End Sub
</script> <DIV class=textbox2>Texte ici</DIV> <DIV class=d3></DIV></BODY></HTML>
Dernière édition par Gi le Sam 22 Aoû - 23:29, édité 2 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: slide show Dim 10 Avr - 19:12 | |
| - Code:
-
<html>
<head> <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1"> <title>Slide show 1</title> <script LANGUAGE="Javascript"> <!-- Original: Mike Canonigo (mike@canonigo.com) --> <!-- Web Site: http://www.munkeehead.com -->
<!-- This script and many more are available free online at --> <!-- The Javascript Source!! http://javascript.internet.com -->
<!-- Begin NewImg = new Array ( "1.jpg", "2.jpg", "3.jpg", "4.jpg", "5.jpg" ); var ImgNum = 0; var ImgLength = NewImg.length - 1;
//Délai entre les diapositives en millisecondes. var delay = 3000;
var lock = false; var run; function chgImg(direction) { if (document.images) { ImgNum = ImgNum + direction; if (ImgNum > ImgLength) { ImgNum = 0; } if (ImgNum < 0) { ImgNum = ImgLength; } document.slideshow.src = NewImg[ImgNum]; } } function auto() { if (lock == true) { lock = false; window.clearInterval(run); } else if (lock == false) { lock = true; run = setInterval("chgImg(1)", delay); } } // End --> </script>
</head>
<body bgcolor="black" text="#DCCCB5" link="#DCCCB5" vlink="#DCCCB5" alink="#DCCCB5"> <p align="center"><img src="1.jpg" name="slideshow" width="209" height="209"> <table width="211" align="center"> <tr> <td align="right" width="61"> <p align="center"><a href="javascript:chgImg(-1)"><font face="Verdana" size="1" color="#DCCCB5">Précédent</font></a></td> <td align="center" width="63"> <p align="center"><a href="javascript:auto()"><font face="Verdana" size="1" color="#DCCCB5">Auto/Stop</font></a></td> <td align="left" width="44"> <p align="center"><a href="javascript:chgImg(1)"><font face="Verdana" size="1" color="#DCCCB5">Suivant</font></a></td> <p> </tr> </table> <p><font color="#DCCCB5"> </font></p> <p align="center"><font size="1" face="Verdana" color="#DCCCB5">écrits ici <br></font><a href="adresse du lien" target="_blank"><font size="1" face="Verdana" color="#DCCCB5">Anne Geddes</font></a> <p align="center"> </p> <p align="center"><font size="1" face="Verdana"><a href=# onclick="self.close()">Fermer cette fenêtre</a></font></p> </body> </html>
Dernière édition par Gi le Sam 22 Aoû - 23:30, édité 1 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: par John Durham Mar 12 Avr - 13:57 | |
| - Code:
-
<HTML><HEAD><TITLE>The Butterfly - Circular Movements (4)</TITLE> <!--This script was written by John Durham.......Moving Images at Runtime using VBscript.........Circular Movements --> <STYLE type=text/css>BODY { BORDER-RIGHT: mediumvioletred 18px ridge; BORDER-TOP: mediumvioletred 18px ridge; SCROLLBAR-HIGHLIGHT-COLOR: antiquewhite; BORDER-LEFT: mediumvioletred 18px ridge; SCROLLBAR-3DLIGHT-COLOR: navajowhite; SCROLLBAR-ARROW-COLOR: white; SCROLLBAR-TRACK-COLOR: #fccfe0; BORDER-BOTTOM: mediumvioletred 18px ridge; SCROLLBAR-BASE-COLOR: #fbb9d2 } .t1 { BORDER-RIGHT: #9d1e22 8px dashed; PADDING-RIGHT: 10px; BORDER-TOP: #9d1e22 8px dashed; PADDING-LEFT: 10px; SCROLLBAR-FACE-COLOR: #faa3c4; FONT-WEIGHT: bold; FONT-SIZE: 18pt; FILTER: alpha(opacity=85); LEFT: 230px; PADDING-BOTTOM: 10px; SCROLLBAR-HIGHLIGHT-COLOR: #fde1ec; OVERFLOW: auto; BORDER-LEFT: #9d1e22 8px dashed; WIDTH: 500px; SCROLLBAR-SHADOW-COLOR: #fa9abe; COLOR: #9d1e22; SCROLLBAR-3DLIGHT-COLOR: #fbb9d2; SCROLLBAR-ARROW-COLOR: white; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: #fbb9d2; BORDER-BOTTOM: #9d1e22 8px dashed; FONT-FAMILY: Times-Roman; SCROLLBAR-BASE-COLOR: #faa3c4; POSITION: absolute; TOP: 450px; HEIGHT: 200px; BACKGROUND-COLOR: #fbb9d2; TEXT-ALIGN: center } .textbox2 { BORDER-RIGHT: midnightblue 6px dashed; PADDING-RIGHT: 10px; BORDER-TOP: midnightblue 6px dashed; PADDING-LEFT: 10px; SCROLLBAR-FACE-COLOR: deepskyblue; FONT-WEIGHT: bold; FONT-SIZE: 26pt; FILTER: progid:DXImageTransform.Microsoft.Gradient (startColorstr=blue, endColorstr=pink, GradientType=0, ENABLED=1); LEFT: 100px; PADDING-BOTTOM: 10px; SCROLLBAR-HIGHLIGHT-COLOR: blue; OVERFLOW: auto; BORDER-LEFT: midnightblue 6px dashed; WIDTH: 700px; SCROLLBAR-SHADOW-COLOR: blue; COLOR: midnightblue; SCROLLBAR-3DLIGHT-COLOR: midnightblue; SCROLLBAR-ARROW-COLOR: white; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: darkblue; BORDER-BOTTOM: midnightblue 6px dashed; FONT-FAMILY: Comic Sans MS bold, Black Chancery, Arial; SCROLLBAR-BASE-COLOR: blue; POSITION: absolute; TOP: 900px; HEIGHT: 400px; BACKGROUND-COLOR: powderblue } .d3 { LEFT: 100px; WIDTH: 700px; POSITION: absolute; TOP: 1400px; HEIGHT: 209px } </STYLE> <BGSOUND balance=0 src="cid:000901c53aa7$79cb4040$c302a8c0@scenario" volume=-200 loop=5> <META content="MSHTML 6.00.2900.2604" name=GENERATOR></HEAD> <BODY bgColor=peachpuff background=cid:000801c53aa7$79cb4040$c302a8c0@scenario> <DIV> </DIV><IMG id=p style="LEFT: 30%; WIDTH: 350px; POSITION: absolute; TOP: 10%; HEIGHT: 350px" src="cid:000601c53aa7$79a36cf0$c302a8c0@scenario> <IMG id=pic1 style="LEFT: 110px; WIDTH: 50px; POSITION: absolute; TOP: 300px" src="cid:000701c53aa7$79b76a20$scenario"> <IMG id=pic2 style="LEFT: 110px; WIDTH: 50px; POSITION: absolute; TOP: 300px" src="cid:000701c53aa7$79b76a20$c302a8c0@scenario"> <IMG id=pic3 style="LEFT: 110px; WIDTH: 50px; POSITION: absolute; TOP: 300px" src="cid:000701c53aa7$79b76a20$c302a8c0@scenario"> <IMG id=pic4 style="LEFT: 110px; WIDTH: 50px; POSITION: absolute; TOP: 300px" src="cid:000701c53aa7$79b76a20$c302a8c0@scenario"> <script language=VBscript>
'*--------------------------------------------- '*This script was written by John Durham '*You may freely alter or edit this script '*However, Please leave this block of text intact '*Keep the Magic Going !!!! '*Circular Movements - VBscript '*April 2005 '*--------------------------------------------
Dim cch, ccw, R, A, ppic1w, ppic1h, th, th1, pic1w, pic1h, cch2, ccw2, R2, A2, ppic2h,ppic2w, pic2h, pic2w, cch3, ccw3, R3, A3, ppic3w, ppic3h, pic3w, pic3h, cch4, ccw4, R4, A4, ppic4h, ppic4w, pic4h, pic4w
pic1h=pic1.style.posHeight pic1w=pic1.style.posWidth pic2h=pic2.style.posHeight pic2w=pic2.style.posWidth cch=275 ccw=450 A=360 R=265
cch2=275 ccw2=450 A2=160 R2=26
cch3=275 ccw3=450 A3=360 R3=265
cch4=275 ccw4=450 A4=160 R4=26
x=0 y=0
sub window_OnLoad() window.status=" (VBS script - Circular Movement ....... script by John Durham...... April 2005.........." scw=document.body.clientWidth sch=document.body.clientHeight pic1h=pic1.style.posHeight pic1w=pic1.style.posWidth pic2h=pic2.style.posHeight pic2w=pic2.style.posWidth cch=275 ccw=450 A=360 R=265
cch2=275 ccw2=450 A2=360 R2=265
scw=document.body.clientWidth sch=document.body.clientHeight pic3h=pic3.style.posHeight pic3w=pic3.style.posWidth pic4h=pic4.style.posHeight pic4w=pic4.style.posWidth cch3=275 ccw3=450 A3=260 R3=265
cch4=275 ccw4=450 A4=260 R4=265 ClearTimeOut(th) th=SetTimeOut ("circle",1) th=SettimeOut("circleCCW",1)
ClearInterval(th1) th1=SetInterval("scroll", 64) End sub
Sub scroll() document.body.style.backgroundPosition=x&" "&y x=x+1 y=y-1 End Sub
Sub circle() ClearTimeOut(th) Rem angle gets bigger A=A+.03 Rem calculating position of the image ppic1w=R*cos(A)+ccw ppic1h=R*sin(A)+cch REM position of the image pic1.style.Left=ppic1w pic1.style.Top=ppic1h Rem nex angle SetTimeOut"circleCCW",40 End Sub
Sub circleCCW() ClearTimeOut(th) Rem angle gets bigger A2=A2-.02 Rem calculating position of the image ppic2w=R2*cos(A2)+ccw2 ppic2h=R2*sin(A2)+cch2 REM position of the image pic2.style.Left=ppic2w pic2.style.Top=ppic2h Rem nex angle th=SetTimeOut("circle2",440) End Sub
Sub circle2() ClearTimeOut(th) Rem angle gets bigger A3=A3+.02 Rem calculating position of the image ppic3w=R3*cos(A3)+ccw3 ppic3h=R3*sin(A3)+cch3 REM position of the image pic3.style.Left=ppic3w pic3.style.Top=ppic3h Rem nex angle SetTimeOut"circleCCW2",40 End Sub
Sub circleCCW2() ClearTimeOut(th) Rem angle gets bigger A4=A4-.03 Rem calculating position of the image ppic4w=R4*cos(A4)+ccw4 ppic4h=R4*sin(A4)+cch4 REM position of the image pic4.style.Left=ppic4w pic4.style.Top=ppic4h Rem nex angle th=SetTimeOut("circle",40) End Sub Sub Window_OnResize() window.location.reload End Sub
Sub jsdscript () ClearTimeOut 'Sub used for script Checking and to end this script - don't remove End Sub
</script> <DIV class=t1 id=t1> <DIV>écrits ici </DIV> <DIV class=d3></DIV></BODY></HTML>
Dernière édition par Gi le Sam 22 Aoû - 23:31, édité 1 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: script de Lavonne Mar 12 Avr - 14:01 | |
| - Code:
-
<HTML><HEAD><TITLE></TITLE>
<!--Script by LaVonne--> <STYLE>BODY { BORDER-RIGHT: #69b12f 7px inset; BORDER-TOP: #69b12f 7px outset; SCROLLBAR-FACE-COLOR: #69b12f; SCROLLBAR-HIGHLIGHT-COLOR: #cdebb5; BORDER-LEFT: #69b12f 7px outset; SCROLLBAR-SHADOW-COLOR: #86d347; SCROLLBAR-3DLIGHT-COLOR: #86d347; SCROLLBAR-ARROW-COLOR: #cdebb5; SCROLLBAR-TRACK-COLOR: #69b12f; BORDER-BOTTOM: #69b12f 7px inset; SCROLLBAR-DARKSHADOW-COLOR: #aedb8a } .tc { BORDER-RIGHT: #69b12f 7px inset; PADDING-RIGHT: 20px; BORDER-TOP: #69b12f 7px outset; PADDING-LEFT: 20px; BACKGROUND: #aedb8a; PADDING-BOTTOM: 20px; BORDER-LEFT: #69b12f 7px outset; PADDING-TOP: 20px; BORDER-BOTTOM: #69b12f 7px inset } .tc2 { BORDER-RIGHT: #69b12f 7px inset; BORDER-TOP: #69b12f 7px outset; BACKGROUND: #aedb8a; BORDER-LEFT: #69b12f 7px outset; BORDER-BOTTOM: #69b12f 7px inset } .phto { LEFT: 0px; WIDTH: 301px; POSITION: absolute; TOP: 0px; HEIGHT: 432px } .dv { BORDER-RIGHT: #69b12f 7px inset; BORDER-TOP: #69b12f 7px outset; LEFT: 0px; BORDER-LEFT: #69b12f 7px outset; WIDTH: 315px; BORDER-BOTTOM: #69b12f 7px inset; POSITION: relative; TOP: 0px; HEIGHT: 446px } .txt { BORDER-RIGHT: #69b12f 7px inset; PADDING-RIGHT: 10px; BORDER-TOP: #69b12f 7px outset; PADDING-LEFT: 10px; SCROLLBAR-FACE-COLOR: #69b12f; FONT-SIZE: 18pt; PADDING-BOTTOM: 10px; SCROLLBAR-HIGHLIGHT-COLOR: #cdebb5; OVERFLOW: auto; BORDER-LEFT: #69b12f 7px outset; WIDTH: 100%; SCROLLBAR-SHADOW-COLOR: #86d347; COLOR: #69b12f; SCROLLBAR-3DLIGHT-COLOR: #86d347; SCROLLBAR-ARROW-COLOR: #cdebb5; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: #69b12f; BORDER-BOTTOM: #69b12f 7px inset; FONT-FAMILY: Chancellor; SCROLLBAR-DARKSHADOW-COLOR: #aedb8a; HEIGHT: 150px; TEXT-ALIGN: center } </STYLE> <!--background tile here keep this all on one line--> <META content="MSHTML 6.00.2900.2180" name=GENERATOR></HEAD> <BODY bgColor=#ffffff background=cid:009301c53655$e0d89ea0$1fc4a818@scenario> <DIV> </DIV><!--Midi file here--><BGSOUND balance=0 src="cid:009401c53655$e0d89ea0$1fc4a818@scenario" volume=0 loop=infinite> <TABLE cellSpacing=30 cellPadding=0 width=350 align=center> <TBODY> <TR> <TD class=tc align=middle> <DIV class=dv align=center><A href="http://www.liensutiles.org/gvilleneuve.htm "><IMG class=phto id=p1 src="cid:009001c53655$e0d3e3b0$1fc4a818@scenario" border=0> <IMG class=phto id=p2 src="cid:009101c53655$e0d62da0$1fc4a818@scenario" border=0></A></A></DIV></TD></TR> <TR> <TD class=tc2 align=middle> <DIV class=txt id=tx> <DIV>cliquez sur l'image</DIV> <DIV>message ici</DIV> <DIV></DIV></TD></TR></TBODY></TABLE><!--tile goes on textbox--><IMG id=tbg1 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:009201c53655$e0d62da0$1fc4a818@scenario"> <SCRIPT language=vbscript>
'*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>* '*----------------do not remove or change these lines '*----------------This script was written by LaVonne Boruk '*----------------© March 31, 2005 '*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>* '*--------Please change the ticker below---------------* window.status="Script and stationery by LaVonne"
tx.style.backgroundimage="URL("&tbg1.src&")"
x=0 y=0
SetInterval "hltbscroll",64 Sub hltbscroll() x=x+1 y=y+1 document.body.style.backgroundposition=x&" "&y End Sub
p1.style.FILTER="progid:DXImageTransform.Microsoft.Stretch" p2.style.FILTER="progid:DXImageTransform.Microsoft.Stretch"
Sub Window_OnLoad p1.style.visibility="visible" p2.style.visibility="visible" SetTimeout "hltbaction", 6000 End Sub
Sub hltbaction() ClearTimeOut p2.filters(0).Apply() p2.filters(0).StretchStyle="push" p2.style.visibility="hidden" p2.filters(0).Duration=6.000 p2.filters(0).Play() p1.filters(0).Apply() p1.filters(0).StretchStyle="push" p1.style.visibility="visible" p1.filters(0).Duration=6.000 p1.filters(0).Play() SetTimeout "hltbaction2", 6000 End Sub
Sub hltbaction2() ClearTimeout p1.filters(0).Apply() p1.filters(0).StretchStyle="spin" p1.style.visibility="hidden" p1.filters(0).Duration=8.000 p1.filters(0).Play() p2.filters(0).Apply() p2.filters(0).StretchStyle="spin" p2.style.visibility="visible" p2.filters(0).Duration=6.000 p2.filters(0).Play() SetTimeout "hltbaction3", 6000 End Sub
Sub hltbaction3() ClearTimeOut p2.filters(0).Apply() p2.filters(0).StretchStyle="hide" p2.style.visibility="hidden" p2.filters(0).Duration=6.000 p2.filters(0).Play() p1.filters(0).Apply() p1.filters(0).StretchStyle="hide" p1.style.visibility="visible" p1.filters(0).Duration=6.000 p1.filters(0).Play() SetTimeout "hltbaction4", 6000 End Sub
Sub hltbaction4() ClearTimeOut p1.filters(0).Apply() p1.filters(0).StretchStyle="spin" p1.style.visibility="hidden" p1.filters(0).Duration=6.000 p1.filters(0).Play() p2.filters(0).Apply() p2.filters(0).StretchStyle="spin" p2.style.visibility="visible" p2.filters(0).Duration=6.000 p2.filters(0).Play() SetTimeout "hltbaction", 6000 End Sub
</SCRIPT> </BODY></HTML>
Dernière édition par le Mer 11 Mai - 14:50, édité 1 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Coloriser la barre de défilement de vos pages Mer 27 Avr - 2:39 | |
| Coloriser la barre de défilement de vos pages A coller entre les balises <HEAD> et </HEAD>. Modifiez les couleurs en fonction de votre page (couleurs exadécimales qui se présentent ainsi : #CC0066). Note : Ce script ne fonctionne qu'avec IE 5.5 et plus. - Code:
-
<style type="text/css"><!-- BODY { scrollbar-arrow-color:#CC0066 ; scrollbar-track-color:#FFFFCC ; scrollbar-shadow-color:#990066 ; scrollbar-face-color:#FFCCCC ; scrollbar-highlight-color:#FFFFFF ; scrollbar-darkshadow-color:#660066 ; scrollbar-3dlight-color:#CC3399 ; } //--></style> | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Script de Michel Claveau : fond qui change de couleur Mer 11 Mai - 14:55 | |
| - Code:
-
<HTML xmlns:v = "urn:schemas-microsoft-com:vml"><HEAD>
<!---><!---><!---><!-----------------fond (couleur uniquement---------------> </HEAD> <BODY bgColor=#ffffff><!---><!---><!---><!--------------------- musique ---------------------><BGSOUND balance=0 src="cid:001101c29c33$89ada940$0701a8c0@scenario" volume=0 loop=infinite>
<BLOCKQUOTE dir=ltr style="MARGIN-RIGHT: 0px">
<!---><!---><!---><!---------------------- texte ---------------------->Écrits ici.</FONT></EM></STRONG></DIV> </DIV><!---------------------------------------------------><!---------- Michel Claveau Informatique ------------><!---------------------- 2002 -----------------------><!--------------- http://mclaveau.com ---------------><!---------------------------------------------------><!---------------------------------------------------><!- Vous pouvez ajouter des images & autres objets -><!---------------------------------------------------> <OBJECT id=VMLRender classid=CLSID:10072CEC-8CC1-11D1-986E-00A0C955B42E></OBJECT> <STYLE>v\:* { BEHAVIOR: url(#VMLRender) } BODY { FONT-SIZE: 14pt; MARGIN-LEFT: 0px; COLOR: #2020ac; MARGIN-RIGHT: 0px; FONT-FAMILY: "Comic Sans MS"; BACKGROUND-COLOR: #ffffff } </STYLE>
<DIV style="FONT: 10pt arial"><v:rect id=grad style="Z-INDEX: -1; LEFT: 0pt; WIDTH: 1000px; POSITION: absolute; TOP: 0pt; HEIGHT: 1000pt" coordsize = "21600,21600" fillcolor = "navy"><v:fill id=fl type = "gradient" color2 = "white" angle = "0" method = "none"></v:fill></v:rect></DIV><!---><!---><!---><!---------------------- script ----------------------> <SCRIPT language=VBScript>
Dim w, wW, wH, sH, wx, Res, Ang, myTimer, rr, vv, bb, r, v, b, dr, dv, db Set w=document.body
sub setUp() grad.style.width=document.body.clientWidth wW=w.clientWidth wH=w.offsetHeight sH=w.scrollHeight bH=wH if sH>wH then bH=sH grad.style.height=bH Ang=0 rr=32 vv=32
bb=140 dr=1.1 dv=1.5 db=1 doIt end sub
sub doIt() ClearTimeOut(myTimer) Ang=Ang+6 rr=rr+dr if rr>=240 then dr=-dr if rr<20 then dr=-dr vv=vv+dv if vv>=240 then dv=-dv if vv<20 then dv=-dv bb=bb+db if bb>=250 then db=-db if bb<=20 then db=-db r=Hex(rr) v=Hex(vv) b=Hex(bb) // if r<="F" then r="0" & r // if v<="F" then v="0" & v // if b<="F" then b="0" & b fl.color= "#" & r & v & b
if Ang>359 then Ang=0 fl.angle=Ang
myTimer=SetTimeOut("doIt",72) end sub
sub Window_OnLoad() wW=w.clientWidth wH=w.offsetHeight wx=window.screen.width Res=INT(wx/128) w.style.fontSize = 14+Res setUp end sub
sub Window_OnResize() setUp end sub </SCRIPT> </BODY></HTML> | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Re: Scripts (tous les genres) Mer 11 Mai - 15:01 | |
| - Code:
-
<HTML><HEAD>
<STYLE>BODY { BORDER-RIGHT: silver 0px outset; BORDER-TOP: silver 6px outset; OVERFLOW: auto; BORDER-LEFT: silver 0px outset; COLOR: #9999ff; BORDER-BOTTOM: silver 6px outset; FONT-FAMILY: arial } </STYLE>
</HEAD> <BODY style="BORDER-RIGHT: #4682b4 0px ridge; BORDER-TOP: #4682b4 0px ridge; FILTER: progid:DXImageTransform.Microsoft.GRADIENT(startColorstr=#4682b4 ,endColorstr=#99cccc,gradientType=1 ;; BORDER-LEFT: #4682b4 0px ridge; BORDER-BOTTOM: #4682b4 0px ridge" bgColor=#ffffff>
<BGSOUND balance=0 src="D:\Magie\Musique coup de coeur\sons divers\MerOiseaux.mid" volume=0 loop=infinite><BGSOUND balance=0 src="D:\Magie\Musique coup de coeur\sons divers\OCEAN.WAV" volume=0 loop=infinite>
<DIV><IMG style="WIDTH: 192px; HEIGHT: 106px" height=156 alt="" hspace=0 src="D:\Magie\gifs animés merveilleux\oiseaux\angedenuit.gif" width=192 align=baseline border=0><IMG alt="" hspace=0 src="D:\Magie\gifs animés merveilleux\oiseaux\nbbird2.gif" align=baseline border=0><BR></DIV> <BUTTON language=vbs id=" Open Popup" style="Z-INDEX: 100; BACKGROUND: none transparent scroll repeat 0% 0%; LEFT: 50%; FONT: bold 12px Arrial; CURSOR: hand; COLOR: red; POSITION: absolute; TOP: 3%; HEIGHT: 25px" onclick=popOpen()>Le bord de mer</FONT></BUTTON> <DIV id=text style="DISPLAY: none; FONT-SIZE: 12pt; LEFT: 0px; WIDTH: 100%; POSITION: absolute; TOP: 40%; HEIGHT: 60%; TEXT-ALIGN: center">message ici</DIV> <DIV id=src style="DISPLAY: none"> <STYLE id=PopupStyle>BODY { } </STYLE> <! Put your transparent airplane gif here using your sources <!-- marqueee --> <DIV style="LEFT: 0px; POSITION: absolute; TOP: 40px"> <MARQUEE scrollAmount=3 scrollDelay=10 width="105%" align="bottom" z-index="0"><IMG src="D:\Magie\gifs animés merveilleux\oiseaux\nbbird2.gif"><IMG alt="" hspace=0 src="D:\Magie\gifs animés merveilleux\oiseaux\angedenuit.gif" align=baseline border=0></MARQUEE></DIV> <DIV style="LEFT: 0px; BOTTOM: 40px; POSITION: absolute"> <MARQUEE scrollAmount=2 scrollDelay=20 direction=right width="105%" align="bottom" z-index="0"><IMG src="D:\Magie\gifs animés merveilleux\oiseaux\angedenuit.gif"><IMG style="WIDTH: 207px; HEIGHT: 113px" height=156 alt="" hspace=0 src="D:\Magie\gifs animés merveilleux\oiseaux\angedenuit.gif" width=207 align=baseline border=0></MARQUEE></DIV><BUTTON language=vbs id="Close Popup" style="Z-INDEX: 100; RIGHT: 50%; BACKGROUND: none transparent scroll repeat 0% 0%; FONT: 12px Arrial; CURSOR: hand; COLOR: white; BOTTOM: 3%; POSITION: absolute; HEIGHT: 36px" onclick=parent.Popup.hide()>Les oiseaux</BUTTON> <!-- The image is being used as the background, enter the dimensions of your image where you see bkgwidth and bkgheight in the script below --><IMG id=bkg style="DISPLAY: none" src="D:\Magie\Mes images coup de coeur\femmes\eau.jpg"> <IMG alt="" hspace=0 src="D:\Magie\gifs animés merveilleux\oiseaux\nbbird1.gif" align=baseline border=0></DIV> <SCRIPT language=VBS> 'for Jim's marquess - Uncle Debi May 2001 ' 'scénario : Gi givi-le-ek@iquebec.com - 13 déc. 2002
bkgwidth=670 bkgheight=480
Set Popup=window.createPopup() Set PopupBody=Popup.document.body PopupBody.style.cursor="crosshair" PopupBody.style.backgroundColor="#9999ff" PopupBody.style.color="#9999ff" PopupBody.style.border = "9 ridge #9999ff" PopupBody.background=bkg.src PopupBody.innerHTML="<div style='display:none'>"+PopupStyle.innerHTML+"</div>"+src.innerHTML nx=window.parent.screen.width ny=window.parent.screen.height
sub popOpen Popup.show(nx-bkgwidth)/2,(ny-bkgheight)/2,bkgwidth,bkgheight text.style.display="" end sub </SCRIPT>
</SCRIPT> </BODY></HTML> | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Neige dans une image Animated Floaties by EVP Mer 11 Mai - 15:40 | |
| Neige dans une image... - Code:
-
<HTML><HEAD>
</HEAD> <BODY id=BG bgColor=#ac0005 background=cid:01b301c29cc6$cd759cd0$8825fea9@scenario scroll=no onload=strt();>
<!-- IMPORTANT - When using a Full-Screen post, delete the <BASE> line in the <HEAD> section from the Source window before posting or it won't work --><!-- This message displayed on opening or closing post -->
<DIV id=textbox style="BORDER-RIGHT: #d3c1d2 0px dotted; BORDER-TOP: #d3c1d2 0px dotted; DISPLAY: none; SCROLLBAR-FACE-COLOR: #959bbb; FONT-WEIGHT: bold; FONT-SIZE: 14pt; FILTER: progid:DXImageTransform.Microsoft.shadow(color=#98819D, direction=135,strength=1); LEFT: 10px; OVERFLOW: auto; BORDER-LEFT: #d3c1d2 0px dotted; WIDTH: 400px; COLOR: #4b4e63; SCROLLBAR-ARROW-COLOR: #d3c1d2; BORDER-BOTTOM: #d3c1d2 0px dotted; FONT-FAMILY: hansa; SCROLLBAR-BASE-COLOR: #959bbb; POSITION: absolute; TOP: 10px; HEIGHT: 300px">
<DIV style="Z-INDEX: 100; LEFT: 40%; FONT: bold 12pt 'tempus sans itc'; WIDTH: 10%; CURSOR: hand; COLOR: #5c6699; BOTTOM: 4px; POSITION: absolute; HEIGHT: 116px" onclick=doPop() align=center> <CENTER>message ici</CENTER> <CENTER>message qui se continue .</CENTER>
<IMG src="cid:01ad01c29cc6$cd759cd0$8825fea9@scenario"></DIV> <!-- This DIV contains the FS HTML --> <DIV id=src style="DISPLAY: none"> <STYLE id=PopupStyle>IMG { Z-INDEX: -1; POSITION: absolute } </STYLE> <!-- Image container --> <DIV id=box style="BORDER-RIGHT: #5c6699 5px ridge; BORDER-TOP: #5c6699 5px ridge; LEFT: -1800px; OVERFLOW: hidden; BORDER-LEFT: #5c6699 5px ridge; WIDTH: 100px; COLOR: #000090; BORDER-BOTTOM: #5c6699 5px ridge; POSITION: absolute; TOP: -1800px; HEIGHT: 100px"></DIV><!-- This is the popup textbox. Double-click when in the Edit mode and enter your message here. DO NOT delete outside the text area. --> <DIV id=popText style="PADDING-RIGHT: 10px; DISPLAY: none; PADDING-LEFT: 10px; FILTER: progid:DXImageTransform.Microsoft.shadow(color=#595E7F, direction=135,strength=1); LEFT: 410px; PADDING-BOTTOM: 10px; FONT: 14pt 'hansa'; OVERFLOW: auto; WIDTH: 400px; COLOR: #c2bcd8; SCROLLBAR-ARROW-COLOR: #d3c1d2; PADDING-TOP: 10px; SCROLLBAR-BASE-COLOR: #959bbb; POSITION: absolute; TOP: 10px; HEIGHT: 300px; BACKGROUND-COLOR: #606060" scrollbar-arrow-color: #f0f0ff; scrollbar-base-color: F8E26B; z-index:100?>
<P>Message ici !<BR><BR>!<BR><BR>
<DIV style="Z-INDEX: 100; LEFT: 70%; FONT: bold 12pt 'tempus sans itc'; WIDTH: 10%; CURSOR: hand; COLOR: #5c6699; BOTTOM: 40px; POSITION: absolute; HEIGHT: 116px" onclick=parent.closeIt();parent.objPopup.hide() align=center> <IMG src="cid:01ad01c29cc6$cd759cd0$8825fea9@scenario"></DIV><!-- End of FS HTML --> <!-- This is the popup image --> <IMG id=bkg1 style="Z-INDEX: -1; LEFT: -1800px; WIDTH: 559px; POSITION: absolute; TOP: -1800px; HEIGHT: 680px" src="cid:01ae01c29cc6$cd759cd0$8825fea9@scenario">
<!-- These are the floating images, numbered sequentially --> <IMG id=p1 style="LEFT: -1800px; WIDTH: 12px; POSITION: absolute; TOP: -1800px; HEIGHT: 10px" src="cid:01af01c29cc6$cd759cd0$8825fea9@scenario"> <IMG id=p2 style="LEFT: -1800px; WIDTH: 15px; POSITION: absolute; TOP: -1800px; HEIGHT: 16px" src="cid:01b001c29cc6$cd759cd0$8825fea9@scenario"> <IMG id=p3 style="LEFT: -1800px; WIDTH: 17px; POSITION: absolute; TOP: -1800px; HEIGHT: 17px" src="cid:01b101c29cc6$cd759cd0$8825fea9@scenario"> <IMG id=p4 style="LEFT: -1800px; WIDTH: 15px; POSITION: absolute; TOP: -1800px; HEIGHT: 16px" src="cid:01b201c29cc6$cd759cd0$8825fea9@scenario"> <IMG id=p5 style="LEFT: -1800px; WIDTH: 15px; POSITION: absolute; TOP: -1800px; HEIGHT: 16px" src="cid:01b001c29cc6$cd759cd0$8825fea9@scenario"> <IMG id=fsbk style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:01b301c29cc6$cd759cd0$8825fea9@scenario">
<SCRIPT language=JavaScript> // Animated Floaties by EVP // November 30, 2002
// This sets up the FS nx=window.parent.screen.width ny=window.parent.screen.height
objPopup=window.createPopup(); objPopupBody=objPopup.document.body; // objPopupBody.style.border="5px ridge #5C6699" objPopupBody.background=fsbk.src objPopupBody.style.backgroundColor="#000000" objPopupBody.innerHTML="<span style='display:none'>"+PopupStyle.innerHTML+"</span>"+src.innerHTML //-----------------------------------------------
fs=objPopupBody.all w=document.body
// *** Enter the Quantity of Source images here *** numSource=5
// *** Enter the number of Bouncing Images here *** numPics=60
// *** Set the popup Image offset from the window edge (in pixels) *** picOffset=50
// *** Show the popup textbox? Answer "Y"es or else the image will center *** showPop="Y"
// *** Enter the textbox offset (in percent) *** textOffset=15
// *** Show the textbox on "O"pening or "C"losing the popup *** showText="C"
var x=new Array() var y=new Array() var dx=new Array()
var dy=new Array() var T=new Array() var dt=new Array() var num=new Array() var object=new Array()
function strt() { // Position the text box tl=textOffset/100*w.clientWidth tt=textOffset/100*w.clientHeight textbox.style.backgroundColor="" textbox.style.width=w.clientWidth-tl*2 textbox.style.height=w.clientHeight-tt*2 textbox.style.top=tt textbox.style.left=tl if (showText=="O") {textbox.style.display=""} // Get the image Dimensions ww=bkg1.style.posWidth hh=bkg1.style.posHeight fs("box").style.width=ww fs("box").style.height=hh fs("box").style.top=Math.floor(ny/2-hh/2) fs("popText").style.backgroundColor="" fs("popText").style.width=nx-(ww+picOffset*3) fs("popText").style.height=hh fs("popText").style.top=Math.floor(ny/2-hh/2) fs("popText").style.left=ww+picOffset*2 if (showPop=="Y") { fs("popText").style.display="" fs("box").style.left=picOffset }else{ fs("box").style.left=nx/2-ww/2 }
fs("box").style.backgroundImage="URL("+bkg1.src+")" }
function closeIt() { if (showText=="C") {textbox.style.display=""} }
function doPop() { textbox.style.display="none" objPopup.show(0,0,nx,ny) }
// Move the objects function doIt(){ with (this) { // Loop for each object // Increment position x=x+dx y=y+dy // Check if still on screen if (y>ny || x<-10 || x>=nx) {y=-(Math.random()*ny/4+50);x=Math.random()*(nx*.8)} // Position object img.style.posTop = y img.style.posLeft = x T=T+dt if (T<=0 || T>=25) { dt=-dt num++ if (num>numSource) {num=1} n="p"+num img.src=document.all(n).src } } }
// Initialize object positions and speed // Randomly position the floaters above the window function doFloat(i) { // Randomly set start positions x[i]=Math.random()*(nx*.8) y[i]=-(Math.random()*ny) // Randomly set speed dx[i]=(Math.floor(Math.random()*5)) if (dx[i]<2) {dx[i]=-dx[i]}
dy[i]=Math.floor(Math.random()*5)+4 T[i]=Math.floor(Math.random()*25)+1 dt[i]=Math.floor(Math.random()*10)+2 num[i]=(Math.floor(Math.random()*numSource)+1) np="p"+num[i] var sw=Math.floor(Math.random()*(document.all(np).style.posWidth-8))+8 data="<img id='B"+i+"' src='"+document.all(np).src+"' style='position:absolute;top:100;left:100;width:"+sw+";height:"+sw+";z-index:100;visibility:visible'>" fs("box").insertAdjacentHTML("afterBegin",data) o="B"+i this.i=i this.x=x[i] this.y=y[i] this.dx=dx[i] this.dy=dy[i] this.W=sw this.H=sw this.T=T[i] this.dt=dt[i] this.num=num[i] this.doIt=doIt this.img=fs(o) setInterval("object["+i+"].doIt()",32) }
for (i=1; i<=numPics; i++) object[i] = new doFloat(i)
</SCRIPT>
<OBJECT id="Net Show" height=1 width=1 align=center classid=clsid:2179C5D3-EBFF-11CF-B6FD-00AA00B4E220><PARAM NAME="AutoStart" VALUE="-1"><PARAM NAME="AnimationAtStart" VALUE="-1"><PARAM NAME="AllowScan" VALUE="-1"><PARAM NAME="AllowChangeControlType" VALUE="-1"><PARAM NAME="AllowChangeDisplaySize" VALUE="-1"><PARAM NAME="AutoRewind" VALUE="-1"><PARAM NAME="BaseURL" VALUE=""><PARAM NAME="BufferingTime" VALUE="5"><PARAM NAME="ClickToPlay" VALUE="-1"><PARAM NAME="ControlType" VALUE="0"><PARAM NAME="CursorType" VALUE="1"><PARAM NAME="CurrentPosition" VALUE="0"><PARAM NAME="CurrentMarker" VALUE="0"><PARAM NAME="DefaultFrame" VALUE="1"><PARAM NAME="DisplaySize" VALUE="0"><PARAM NAME="EnableContextMenu" VALUE="-1"><PARAM NAME="Filename" VALUE="http://www.megspace.com/entertainment/Music/asf.asf"><PARAM NAME="InvokeURLs" VALUE="-1"><PARAM NAME="PlayCount" VALUE="1"><PARAM NAME="Rate" VALUE="1"><PARAM NAME="SendOpenStateChangeEvents" VALUE="-1"><PARAM NAME="SendWarningEvents" VALUE="-1"><PARAM NAME="SendErrorEvents" VALUE="-1"><PARAM NAME="SendKeyboardEvents" VALUE="-1"><PARAM NAME="SendMouseClickEvents" VALUE="-1"><PARAM NAME="SendMouseMoveEvents" VALUE="-1"><PARAM NAME="SendStateChangeEvents" VALUE="-1"><PARAM NAME="SendPlayStateChangeEvents" VALUE="-1"><PARAM NAME="TransparentAtStart" VALUE="0"></OBJECT>
</BODY></HTML> | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Kurt Grigg Mer 11 Mai - 22:15 | |
| DES ÉTOILES ROUGE ET OR QUI BOUGENT AVEC LA SOURIS - Code:
-
<HTML><HEAD>
<STYLE>BODY { SCROLLBAR-ARROW-COLOR: #ffffff; SCROLLBAR-TRACK-COLOR: #000000; SCROLLBAR-BASE-COLOR: #000000 } </STYLE> </HEAD> <BODY bgColor=#000000>
<BGSOUND balance=0 src="cid:01a701c5568f$e7e1e3a0$bfae5e41@scenario" volume=0 loop=infinite>
<SCRIPT language=JavaScript> <!-- Script by kurt.grigg@virgin.net
if (document.all){
colours=new Array('DE2929','FFBD08','DE2929','DE2929','FFBD08','FFBD08','DE2929','FFBD08','DE2929')
amount=colours.length; YgetDelay=0,XgetDelay=0,Ydelay=0,Xdelay=0,step=0.2,currStep=0,my=0,mx=0; document.write('<div id="ie" style="position:absolute;top:0;left:0;"><div style="position:relative">'); for (i=0; i < amount; i++) document.write('<div id="iestars" style="position:absolute;top:0px;left:0px;height:70px;width:70px;font-family:Courier New;font-size:9px;color:'+colours[i]+';padding-top:20px;text-align:center">.</div>'); document.write('</div></div>'); ini=1; gstep=1; function iMouse(){ my=event.y;mx=event.x; } document.onmousemove=iMouse function dim(){ ini-=gstep; dt=setTimeout('dim()',10); if (ini < 2){ clearTimeout(dt); glow(); } } function glow(){ ini+=gstep; gt=setTimeout('glow()',10); if (ini > 14){ clearTimeout(gt); dim(); } } function stars(){ ie.style.top=document.body.scrollTop; for (i=0; i < amount; i++) { var layer=iestars[i].style; layer.filter='glow(color='+colours[i]+', strength='+ini+')'; layer.top= Ydelay+100*Math.sin((5*Math.sin((currStep-15.99)/10))+i*70)*Math.sin((currStep)/10)*Math.cos((currStep+i*25)/10); layer.left=Xdelay+180*Math.cos((5*Math.sin((currStep-15.99)/10))+i*70)*Math.sin((currStep)/10)*Math.cos((currStep+i*25)/10); } currStep+=step; } function delay(){ Ydelay = YgetDelay+=(my-YgetDelay)*1/20; Xdelay = XgetDelay+=(mx-XgetDelay)*1/20; stars(); setTimeout('delay()',10); } delay(); glow(); } //--> </SCRIPT>
<DIV><STRONG><FONT face="Berlin Sans FB Demi" color=steelblue size=4>Message ici</FONT></STRONG></DIV>
<DIV align=center><IMG alt="" hspace=0 src="cid:01a601c5568f$e7e05d00$bfae5e41@scenario" align=baseline border=0></DIV> </BODY></HTML> | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: DES ÉTOILES QUI DANSENT (auteur inconnu) Mer 11 Mai - 22:24 | |
| - Code:
-
[size=9]<HTML><HEAD>
<STYLE type=text/css>BODY { SCROLLBAR-FACE-COLOR: #ffcccc; SCROLLBAR-HIGHLIGHT-COLOR: #8db6cd; SCROLLBAR-SHADOW-COLOR: #990066; SCROLLBAR-3DLIGHT-COLOR: #000000; SCROLLBAR-ARROW-COLOR: pink; SCROLLBAR-TRACK-COLOR: #8db6cd; SCROLLBAR-DARKSHADOW-COLOR: #660066 } </STYLE>
<STYLE> body {} v\:* {behavior:url(#default#VML)} </STYLE> </HEAD> <BODY style="BORDER-RIGHT: medium none; BORDER-TOP: medium none; FILTER: progid:DXImageTransform.Microsoft.GRADIENT(startColorstr=#000000 ,endColorstr=#8db6cd , gradientType=0); BORDER-LEFT: medium none; BORDER-BOTTOM: medium none" text=#000000 vLink=#fffff0 aLink=#ff9900 link=#e86519 bgColor=#ffffff>
<BGSOUND balance=0 src="cid:013f01c55688$d1185160$bfae5e41@scenariog" volume=0 loop=infinite> <DIV align=center><IMG alt="" hspace=0 src="cid:013e01c55688$d1154420$bfae5e41@scenario" align=baseline border=0> <script>
colors = new Array();
colors[0] = new Array('yellow', 'fushia'); colors[1] = new Array('blue', 'pink') colors[2] = new Array('white', 'blue'); colors[3] = new Array('pink', 'fushia'); colors[4] = new Array('fushia', 'white'); colors[5] = new Array('white', 'pink'); colors[6] = new Array('fushia', 'fuhsia'); colors[7] = new Array('fushia', 'white');
maximum = 1000; vmlobj=''; for(i = 0; i < 12; i++){ vmlobj += '<div id="ster'+i+'" style="position:absolute; left:-50px; top-50px; visibility:hidden; z-index:50;">'; vmlobj += '<v:shape style="width:25px; height:25px;" fillcolor="crimson" coordorigin="0,0" coordsize="50 50">'; vmlobj += '<v:path v="m 8,65 l 72,65, 92,11, 112,65, 174,65, 122,100, 142,155,92,121, 42,155, 60,100 x e"/>'; vmlobj += '<v:stroke on="false" /></v:shape></div>'; } document.write(vmlobj); vmlobj = null; aantal = 0; function begin(){ try { if(aantal == maximum){ return;} kleurschema = Math.floor(Math.random() * colors.length); posLinks = Math.floor(Math.random() * (document.body.clientWidth - 180)); posLinks = (posLinks < 170)? 170: posLinks; posBoven = Math.floor(Math.random() * (document.body.clientHeight - 180)); posBoven = (posBoven < 170)? 170: posBoven; straal = 0; uiteen = true; teller = 1; flikkereffect = false; for(var i = 0; i < 12; i++){ document.getElementsByTagName('shape')[i].setAttribute('fillcolor', colors[kleurschema][0]); document.getElementById('ster'+i).style.visibility = 'hidden'; document.getElementById('ster'+i).style.left = posLinks; document.getElementById('ster'+i).style.top = posBoven; } document.getElementById('ster0').style.top = (document.body.clientHeight - 20); document.getElementById('ster0').style.visibility = 'visible'; omhoog(); } catch(e){} } function omhoog(){ try { positie = parseInt(document.getElementById('ster0').style.top); if(positie > posBoven){ document.getElementById('ster0').style.top = (positie - 25); setTimeout('omhoog()', 50); } else { for(i = 1; i < 12; i++){ document.getElementById('ster'+i).style.top = positie; document.getElementById('ster'+i).style.visibility = 'visible'; } uiteenspatten(); } } catch(e){} } function uiteenspatten() { try { if(straal > 120 && straal % 10 == 0){ flikkereffect = true; teller = (teller == colors[kleurschema].length)? 0: (teller+1); } for(var i = 0; i < 12; i++){ var hoek = i * 30; var piHoek = Math.PI - Math.PI / 180 * hoek; var links = posLinks + Math.round(straal * Math.sin(piHoek)); var boven = positie + Math.round(straal * Math.cos(piHoek)); document.getElementById('ster'+i).style.left = links; document.getElementById('ster'+i).style.top = boven; if(flikkereffect){ document.getElementsByTagName('shape')[i].setAttribute('fillcolor', colors[kleurschema][teller]); }} if(straal < 160 && uiteen){ straal += (straal < 120)? 10: 5; setTimeout('uiteenspatten()', 50); } else if(straal > 120){ uiteen = false; straal -= 5; setTimeout('uiteenspatten()', 50); } else if(straal <= 120){ for(var i = 0; i < 12; i++){ document.getElementById('ster'+i).style.visibility = 'hidden'; } aantal++; setTimeout('begin()', 500); } } catch(e) {} } window.onload=begin; </script>
<IMG alt="" hspace=0 src="cid:013e01c55688$d1154420$bfae5e41@scenario" align=baseline border=0> <IMG alt="" hspace=0 src="cid:013e01c55688$d1154420$bfae5e41@scenario" align=baseline border=0>
</BODY> </HTML>[/[/size]
Dernière édition par Gi le Sam 22 Aoû - 23:24, édité 2 fois | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Neige dans des barres ~ EVP Mer 11 Mai - 22:35 | |
| Neige dans des barres EdgarV Poirier - Code:
-
<HTML><HEAD>
<STYLE>BODY { FILTER: progid:DXImageTransform.Microsoft.gradient(startColorstr=#c00000ff,endColorstr=#c0000000,gradientType=0); COLOR: #86a6b5; BACKGROUND-COLOR: #00142f } </STYLE>
</HEAD> <BODY bgColor=#ffffff scroll=no onload=strt();> <DIV> </DIV><!-- This is the text input box. Double-click when in the Edit mode and enter your message here. DO NOT delete outside the text area. --> <DIV id=textbox style="BORDER-RIGHT: #0000af 1px solid; PADDING-RIGHT: 10px; BORDER-TOP: #0000af 1px solid; DISPLAY: none; PADDING-LEFT: 10px; LEFT: 10px; PADDING-BOTTOM: 10px; FONT: bold 12pt 'Tempus Sans ITC'; OVERFLOW: auto; BORDER-LEFT: #0000af 1px solid; WIDTH: 400px; COLOR: #86a6b5; SCROLLBAR-ARROW-COLOR: #330000; PADDING-TOP: 10px; SCROLLBAR-TRACK-COLOR: #0000af; BORDER-BOTTOM: #0000af 1px solid; SCROLLBAR-BASE-COLOR: #0000af; POSITION: absolute; TOP: 10px; HEIGHT: 300px; BACKGROUND-COLOR: #606060"> <P>Message ici.</P> </DIV><!-- Popup Open Button --> <DIV style="PADDING-RIGHT: 5px; PADDING-LEFT: 5px; Z-INDEX: 100; FILTER: progid:DXImageTransform.Microsoft.Alpha(Opacity=80,FinishOpacity=0,Style=2); LEFT: 35%; PADDING-BOTTOM: 5px; FONT: bold 12px 'Tempus Sans ITC'; WIDTH: 30%; CURSOR: hand; COLOR: #202050; BOTTOM: 0px; PADDING-TOP: 5px; POSITION: absolute; HEIGHT: 14px; BACKGROUND-COLOR: #0000ff" onclick=doPop() align=center>Open</DIV> <DIV id=src style="DISPLAY: none"> <STYLE id=PopupStyle></STYLE> <!-- This is the gradient filter in the popup background --> <DIV id=gradFilter style="Z-INDEX: -1; FILTER: progid:DXImageTransform.Microsoft.gradient(startColorstr=#c00000ff,endColorstr=#c0000000,gradientType=0); LEFT: 0px; WIDTH: 100%; POSITION: absolute; TOP: 0px; HEIGHT: 100%"></DIV> <!-- Popup Close Button --> <DIV style="PADDING-RIGHT: 5px; PADDING-LEFT: 5px; Z-INDEX: 100; FILTER: progid:DXImageTransform.Microsoft.Alpha(Opacity=80,FinishOpacity=0,Style=2); LEFT: 35%; PADDING-BOTTOM: 5px; FONT: bold 12px 'Tempus Sans ITC'; WIDTH: 30%; CURSOR: hand; COLOR: #202050; BOTTOM: 0px; PADDING-TOP: 5px; POSITION: absolute; HEIGHT: 14px; BACKGROUND-COLOR: #0000ff" onclick=parent.objPopup.hide() align=center>Close</DIV></DIV><!-- Scrolling background tile for the panels --> <IMG id=Tile style="LEFT: -1800px; WIDTH: 800px; POSITION: absolute; TOP: -1800px; HEIGHT: 600px" src="cid:000901c29efa$1edda510$0200a8c0@scenario"> <!-- Image used for the popup background tile --> <IMG id=bkg2 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:000a01c29efa$1edda510$0200a8c0@scenario"> <!-- Layer Tile Images - Use 1 Image per Layer --><IMG id=L1 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:000b01c29efa$1edda510$0200a8c0@scenario"> <IMG id=L2 style="LEFT: -1800px; POSITION: absolute; TOP: -1800px" src="cid:000c01c29efa$1edf2bb0$0200a8c0@scenario">
<SCRIPT language=JavaScript> // Edgar V. Poirier // Multi-Panel Scroll 3 // This version allows the use of an untileable background image // as long as the scrolling is turned off AND Layers. // December 8, 2002
nx=window.parent.screen.width ny=window.parent.screen.height
objPopup=window.createPopup(); objPopupBody=objPopup.document.body; objPopupBody.style.border="5px ridge #8B4A62" objPopupBody.style.backgroundColor="black" objPopupBody.style.backgroundImage="URL("+bkg2.src+")"; objPopupBody.innerHTML="<div style='display:none'>"+PopupStyle.innerHTML+"</div>"+src.innerHTML
w=document.body fs=objPopupBody.all
var x=new Array() var y=new Array() var panelWidth=new Array() var panelHeight=new Array() var Lx=new Array() var Ly=new Array() var Ldx=new Array() var Ldy=new Array()
// *** Important Layer Information *** // Each Layer requires direction and speed coordinates // They require one horizontal Ldx[layers] and // one vertical LDy[layers] where a 0 means no movement, // a positive number will give a movement to the Right // or Down while a negative number moves Up or Left. Ldx[1]=-1 Ldy[1]=2 Ldx[2]=-1 Ldy[2]=1 Ldx[3]=-1 Ldy[3]=1 Ldx[4]=-1 Ldy[4]=1 Ldx[5]=-2 Ldy[5]=2 Ldx[6]=0 Ldy[6]=1 Ldx[7]=-2 Ldy[7]=2 Ldx[8]=-2 Ldy[8]=2 Ldx[9]=2 Ldy[9]=2 Ldx[10]=2 Ldy[10]=1 Ldx[11]=-1 Ldy[11]=1 Ldx[12]=1 Ldy[12]=1 Ldx[13]=-2 Ldy[13]=1 Ldx[14]=1 Ldy[14]=2 Ldx[15]=-1 Ldy[15]=1 Ldx[16]=1 Ldy[16]=2
var ppL, ppW, ppH
// Enter the number of panels required on each side // ***NOTE*** You have to adjust the number of direction // entries in the Parameters following this one. numPanels=8
// Enter the maximum Height for the panels (in pixels) maxHeight=Tile.style.posHeight
// Enter the maximum vertical offset between panels (in pixels) panelSpace=80
// Enter the definition for the panel Border (Enter a width of 0 for no Border) panelBorder="2px #FB4A62 ridge"
// Enter the panel Shadow width (in pixels) shadowWidth=6
// Enter the shadow color shadowColor="#392E28"
// Enter the opening or closing textbox offset (in percent) textOffset=15
// Show text "B"efore or "A"fter popup textLocation="A"
// If you want the image in the panels to scroll, enter the pixels/step // and Direction (- = left) here. Enter a 0 for no scroll. dx=1
// Number of Layers numLayers=2
// Get popup borderWidth pWidth=(isNaN(parseInt(objPopupBody.style.borderWidth)))?0:parseInt(objPopupBody.style.borderWidth)
// Display the popup function doPop() { textbox.style.display="none" objPopup.show(0,0,nx,ny) }
// Detect if the popup has been closed objPopupBody.onunload=doClean
// Popup closing handler function doClean() { // This is the result of closing the popup if (textLocation=="A") {textbox.style.display=""} }
// Start here function strt() { // Insert the same background as the popup in the main BODY tag to correct an OE6 SP1 bug w.background=bkg2.src // Find the panel widths and maximum height ppW=0 ppH=0 // Get the panel border width pB=Math.floor(panelBorder.substr(0,1)) // Get the overall width of the panels tW=(Tile.style.posWidth-((pB*(numPanels-1))*2+shadowWidth*(numPanels-1)))/numPanels // Find the various panel heights and set the widths for (i=0; i<numPanels; i++) { panelHeight[i]=(Math.random()*panelSpace)*2+(maxHeight-panelSpace*2) if (panelHeight[i]>ppH) {ppH=panelHeight[i]} panelWidth[i]=tW ppW=ppW+panelWidth[i] } // Set the background vertical offset knowing the tallest panel ppH=ny/2-ppH/2 // Set the leftmost panel position ppL=(nx/2-(Tile.style.posWidth+shadowWidth)/2)+pWidth // Create the panels for (i=0; i<numPanels; i++) { // Set the background image offsets x[i]=-(i*panelWidth[i]+pB+shadowWidth) y[i]=(ppH-(ny/2-panelHeight[i]/2)) // Panel creation occurs here data="<div id='P"+i+"' style='position:absolute;top:"+(ny/2-panelHeight[i]/2)+";left:"+ppL+";width:"+(panelWidth[i])+";height:"+panelHeight[i]+";background-image:URL("+Tile.src+");overflow:hidden;border:"+panelBorder+";filter:progid:DXImageTransform.Microsoft.dropshadow(OffX="+shadowWidth+",OffY="+shadowWidth+",Color="+shadowColor+")'>" data=data+"</div>" // Advance to the next panels left offset ppL=ppL+panelWidth[i]+shadowWidth // Insert the created panel into the popup objPopupBody.insertAdjacentHTML("beforeEnd",data) } var count=1 var pan=0 // Create the Layers for (i=1; i<=(numPanels*numLayers); i++) { pp="L"+count data="<div id='B"+i+"' style='position:absolute;top:0;left:0;width:100%;height:100%;background-image:URL("+document.all(pp).src+")'></div>" dd="P"+pan fs(dd).insertAdjacentHTML("beforeEnd",data) count++ // Is this a new panel? if (count%3==0) { count=1 pan++ } // Initialize the background tile position Lx[i]=0 Ly[i]=0 } // Position the text box tl=textOffset/100*w.clientWidth tt=textOffset/100*w.clientHeight textbox.style.backgroundColor="" textbox.style.width=w.clientWidth-tl*2 textbox.style.height=w.clientHeight-tt*2 textbox.style.top=tt textbox.style.left=tl // Display the textbox if it should be seen before the popup if (textLocation=="B") {textbox.style.display=""} // Position the background images in the panels doMove() }
// Scroll the panel backgrounds function doMove() { // Check all panels for (i=0; i<numPanels; i++) { // Scrolling happens here if dx is not equal to 0 x[i]=x[i]+dx pp="P"+i // Position the background image fs(pp).style.backgroundPosition=x[i]+" "+y[i] } // Scroll the Layers for (j=1; j<=(numLayers*numPanels); j++) { LL="B"+j Lx[j]=Lx[j]+Ldx[j] Ly[j]=Ly[j]+Ldy[j] fs(LL).style.backgroundPosition=Lx[j]+" "+Ly[j] } // Repeat setTimeout("doMove()",64) }
</SCRIPT> <BGSOUND balance=0 src="cid:000d01c29efa$1edf2bb0$0200a8c0@MAGGIEPIE" volume=+0></BODY></HTML> | |
|  | | Gi Rang: Administrateur
Nombre de messages : 14616 Localisation : Lévis secteur Charny, Québec, Canada Date d'inscription : 18/12/2004
 | Sujet: Re: Scripts (tous les genres) Dim 29 Mai - 21:53 | |
| Ascenceur à gauche - Code:
-
<HTML dir=rtl><HEAD><TITLE></TITLE>
</HEAD> <BODY bgColor=#ffffff> <SCRIPT language=javascript>
var begcolor='#33ff00'; var endcolor='#0000ff'; var steps=6; var delay=66;
if(document.all && document.getElementById){
document.body.style.scrollbarBaseColor=begcolor;
function colorset(num){ this.beg=parseInt('0x'+begcolor.substring(num,num+2)); this.end=parseInt('0x'+endcolor.substring(num,num+2)); this.up=this.startup=(this.end>=this.beg)? true : false; this.incr=Math.abs(this.end-this.beg)/steps; this.current=this.beg; } function changecolors(){ var color=new Array(); for(i=1;i<=3; i++){ (data[i].up)? data[i].current+=data[i].incr : data[i].current-=data[i].incr; if(data[i].startup){ if(data[i].current>=data[i].end){ data[i].up=false; data[i].current=data[i].end} if(data[i].current<=data[i].beg){ data[i].up=true; data[i].current=data[i].beg } } if(!data[i].startup){ if(data[i].current<=data[i].end){ data[i].up=true; data[i].current=data[i].end} if(data[i].current>=data[i].beg){ data[i].up=false; data[i].current=data[i].beg} } color[i]=data[i].current; } color[4]=Math.floor(color[1]).toString(16); if(color[4].length==1)color[4]='0'+color[4]; color[5]=Math.floor(color[2]).toString(16); if(color[5].length==1)color[5]='0'+color[5]; color[6]=Math.floor(color[3]).toString(16); if(color[6].length==1)color[6]='0'+color[6];
document.body.style.scrollbarBaseColor='#'+color[4]+color[5]+color[6]; http://document.bgColor='#'+color[4]+color[5]+color[6]; } var data=new Array(); for(i=1, j=1;i<=3; i++, j+=2)data[i]=new colorset(j); window.onload=function(){ setInterval('changecolors()',delay) } }
</SCRIPT>
<SCRIPT language=JavaScript1.2> if (document.all) document.body.style.cssText="border: 7 ridge steelblue" </SCRIPT>
<STYLE>BODY { FILTER: progid:DXImageTransform.Microsoft.Gradient(startColorstr=#ddffdd,endColorstr=steelblue,gradientType=0,enabled=true) } </STYLE>
</BODY></HTML>
| |
|  | | Contenu sponsorisé
 | Sujet: Re: Scripts (tous les genres)  | |
| |
|  | | | Scripts (tous les genres) | |
|
Sujets similaires |  |
|
| Permission de ce forum: | Vous ne pouvez pas répondre aux sujets dans ce forum
| |
| |
| |
|