Scripts d'Evolve

Ici des scripts nettoyés autant que possible avec le nom de l'auteur du moteur.

VML

Code:: <html xmlns:v = "urn:schemas-microsoft-com:vml">

<head>
<title>evolve - vml squirals</title>

<style>
v\:* {
behavior: url(#default#VML);
antialias: true;
position: absolute;
coordsize: 21600,21600;
}
</style>

</head>
<body bgcolor=#000000 onload="init();">

<div class="ev_squiral" style="position:absolute;overflow:hidden;left:50px;top:50px;width:280px;
height:80px;border:2px #ffffff ridge;"
params="baselen:25;zoomspeed:0.12;starthue:25;endhue:29;stephue:2;
startsat:0.6;endsat:0.8;stepsat:0.01;startval:0.4;endval:0.8;stepval:0.02;">
</div>

<div class="ev_squiral" style="position:absolute;overflow:hidden;left:150px;top:150px;width:100px;
height:100px;border:2px #ffffff ridge;"
params="numsquares:15;baselen:25;zoomspeed:0.12;starthue:0;endhue:360;
stephue:75;startsat:0.6;endsat:0.8;stepsat:0.01;startval:0.4;endval:0.8;
stepval:0.02;">
</div>

<div class="ev_squiral" style="position:absolute;overflow:hidden;left:350px;top:350px;width:280px;
height:180px;border:2px #ffffff ridge;"
params="theta:0.16362461737446839783659600954581;baselen:25;
zoomspeed:0.2;starthue:25;endhue:25;stephue:0;startsat:0.1;endsat:0.8;
stepsat:0.1;startval:0.4;endval:0.4;stepval:0;">
</div>

<script>
/////////////////////////////////////
// VML Squirals //
// evolve November 2000 //
// http://www.mgifos.demon.co.uk //
// last evolved 26/06/2004 //
/////////////////////////////////////

var ob=new Array();

function init(){
var i;
var docall=document.getElementsByTagName("*");
for (i in docall)if(docall[i].className=="ev_squiral")ob.push(new squiral(docall[i]));

setInterval("anim();",50);
}

function anim(){
var i;
for(i in ob)ob[i].anim();
}

//squiral//////////////////////////////////////////////////////////////////////
function squiral(ctnr){
var i,p,f,side,vrect,vstroke,vfill;
if(ctnr.params)p=ctnr.params.split(";");
//default values
this.baselen=25;
this.zoomspeed=0.1;
this.starthue=0;
this.endhue=360;
this.stephue=1;
this.startsat=0.2;
this.endsat=0.8;
this.stepsat=0.01;
this.startval=0.4;
this.endval=0.9;
this.stepval=0.05;
this.angle=0;
//replace with any parameter values entered in the html
for(i in p)if(p[i].indexOf(":")!=-1)eval("this."+p[i].replace(":","=").toLowerCase());

this.cx=parseInt(ctnr.style.width)/2;
this.cy=parseInt(ctnr.style.height)/2;

//optional values with calculated defaults
if(this.numsquares){
if(!this.theta)this.theta=2*Math.PI/(this.numsquares);
}
else{
if(!this.theta)this.theta=Math.PI/6;
this.f=Math.cos(this.theta)+Math.sin(this.theta);
this.numsquares=Math.ceil(1+Math.log(2*Math.sqrt(this.cx*this.cx+this.cy*this.cy)/this.baselen)/Math.log(this.f));
}

this.f=Math.cos(this.theta)+Math.sin(this.theta);
this.hue=this.starthue;
this.sat=this.startsat;
this.val=this.startval;
this.col=new colour(this.hue,this.sat,this.val);
this.lenmult=1;
this.noffset=0//this.numsquares-1;
this.rs=new Array();
this.cl=new Array();

for(i=0;i<this.numsquares;i++){
side=this.baselen*Math.pow(this.f,i);
vrect=document.createElement("<v:rect style='top:"+(this.cy-side/2)+";left:"+(this.cx-side/2)+";width:"+(side)+";height:"+(side)+";rotation:"+((this.angle+i*this.theta)*180/Math.PI)+";'></v:rect>");
vstroke=document.createElement("<v:stroke on='false'/>");
vfill=document.createElement("<v:fill type='Solid' Color='RGB(0,0,0)'/>");
vrect.appendChild(vstroke);
vrect.appendChild(vfill);
ctnr.appendChild(vrect);
this.rs[i]=vrect.style;
this.cl[i]=vfill;
}

this.changecolour=function(){
with(this){
col.h=hue;
col.s=sat;
col.v=val;
col.hsv2rgb();
hue=(hue+stephue)%360;
if(starthue!=endhue){
if(hue>endhue || hue<starthue){
stephue*=-1;
hue+=2*stephue;
}
}
if(startsat!=endsat){
sat+=stepsat;
if(sat>endsat || sat<startsat){
stepsat*=-1;
sat+=2*stepsat;
}
}
if(startval!=endval){
val+=stepval;
if(val>endval || val<startval){
stepval*=-1;
val+=2*stepval;
}
}
}
}

this.anim=function(){
var side,ss,i;
with(this){
lenmult+=zoomspeed;
if(lenmult>f){
lenmult/=f;
noffset=(numsquares+noffset-1)%numsquares;
this.changecolour();
cl[noffset].Color="'"+col.rgb+"'";
angle+=theta;
rs[noffset].rotation=angle*180/Math.PI;
}
for(i=0;i<numsquares;i++){
j=(i+noffset)%numsquares;
side=baselen*lenmult*Math.pow(f,i);
s=rs[j];
s.width=side;
s.height=side;
s.left=cx-side/2;
s.top=cy-side/2;
s.zIndex=-i;
}
}
}
}

//colour///////////////////////////////////////////////////////////////////////

function colour(h,s,v){
this.colr=new Array(2,1,0,0,3,2);
this.colg=new Array(3,2,2,1,0,0);
this.colb=new Array(0,0,3,2,2,1);
this.h=h%360;
this.s=s;
this.v=v;
this.r=0;
this.g=0;
this.b=0;
this.rgb="";
//method to calculate rgb values from hsv values
this.hsv2rgb=function(){
var colp=new Array(4);
var nh,ic,fc,ts;
with(this){
if(s==0){
r=Math.floor(255*v);
g=r;
b=r;
return;
}
h=h%360;
nh=h/60;
ic=Math.floor(nh);
fc=nh-ic;
colp[2]=255*v;
colp[0]=colp[2]*(1-s)
colp[1]=colp[2]*(1-s*fc)
colp[3]=colp[2]*(1-s*(1-fc))
r=Math.floor(colp[this.colr[ic]]);
g=Math.floor(colp[this.colg[ic]]);
b=Math.floor(colp[this.colb[ic]]);
ts="000000"+(65536*r+256*g+b).toString(16);
rgb="#"+ts.substring(ts.length-6, ts.length);
}
}
//convert on construction
this.hsv2rgb();
}

</script>
<script language=Javascript>

</script>

</body>
</html>

Code:: <HTML>
<HEAD>
<TITLE></TITLE>
<STYLE TYPE="text/css">

</STYLE>
</HEAD>
<BODY>
<DIV>
<SCRIPT>
//things to play with
str=" It works a treat!"; //the message
maxD=11;       //number of elements
cr=238;          //trail colour red value
cg=130;          //trail colour blue value
cb=177;          //trail colour green value
cx=200;          //centre of rotation from left
cy=100;          //centre of rotation from top
rx=0;          //rotation ellipse half width
ry=8;          //rotation ellipse half height
dp=2;          //depth of the black text
k=2.5;          //depth of still text
dphi=0.3;       //angle between each element
dtheta=0.1;       //change in rotation angle per frame
theta=Math.PI/2;
phi=theta;
newDiv="";
for(i=0;i<maxD;i++){
f=i/maxD;
r=(i==dp)?0:cr+f*(255-cr);
g=(i==dp)?0:cg+f*(255-cg);
b=(i==dp)?0:cb+f*(255-cb);
newDiv += "<DIV ID='D" + i + "' NOWRAP=1 CLASS='default' ";
newDiv += "STYLE='position:absolute;left:"+(cx+(i-k)*rx*Math.cos(phi))+";top:"+(cy-(i-k)*ry*Math.sin(phi))+";z-index:"+(maxD-i)+";"
newDiv += "font-size:"+(48-3*i)+";color:RGB("+r+","+g+","+b+");'>"+str+"</DIV>";
phi+=dphi;
}
document.write(newDiv);
window.setInterval("frame();",32);

function frame(){
theta-=dtheta;
if(theta<-(Math.PI))theta+=2*Math.PI;
phi=theta;
for(i=0;i<maxD;i++){
   f=(i+dp);
   if(f>maxD)f-=maxD;
   f=(1+Math.sin(1*Math.PI*f/maxD))/2;
   r=cr+f*(255-cr);
   g=cg+f*(255-cg);
   b=cb+f*(255-cb);
   D=document.all["D"+i].style;
   D.left=cx+(i-k)*rx*Math.cos(phi);
   D.top=cy-(i-k)*ry*Math.sin(phi);
   D.color="RGB("+r+","+g+","+b+")";
   phi+=dphi;
}
dp+=0.5;
if(dp>maxD)dp=0;
}

</SCRIPT>
</DIV>
</BODY>
</HTML>

Code:: <HEAD>
<TITLE>Wavy Edge</TITLE>
<style>
body{
color:#B17328;
font-family:"Georgia, Times New Roman, Times, serif";
font-size:18px;
font-style:italic;
}
</style>
</HEAD>
<BODY bgcolor=#000000>
Played a bit more<br><br>
Phil
<bgsound balance=0 loop=-1 src="../midi/CURE__Lullaby.mid" volume=0>


<img id=twirlimg src="../images/squares2.gif" style="position:absolute;left:-10000">

<script>
//wavey edge
//phil 20/4/00
//http://www.mgifos.demon.co.uk

//effect controls the 'look' of the border. Use simple ratios for best results e.g. 1/2, 5/2
effect=2/3
//amount of swing - play with this for different effects
overlap=0.5
//speed of wiggle
speed=1

//you MUST fill these in for image width and height
imwidth=83
imheight=314

wphase=0
numimgs=0
dy=0
imwidth=imwidth*2
imheight=Math.floor(imheight/2)
init()
window.setInterval("wave();",25)

function init(){
scrheight=screen.height
numimgs=Math.ceil(scrheight/imheight)
divheight=numimgs*imheight
wfreq=(effect*divheight)-1
wstrength=overlap*imwidth
D="<div id=wavimage style='position:absolute;left:0;top:0;width:"+(imwidth)+";height:"+(divheight)+";filter:wave(enabled=true,add=0,freq="+(wfreq)+",strength="+(wstrength)+",lightstrength=80,phase=0)'>"
for(i=0;i<numimgs;i++){
   D+="<img id='wi"+(i)+"' src='"+twirlimg.src+"' style='position:absolute;left:0;top:"+(i*imheight)+";"
   if(i%2==0)D+="filter:flipv;"
   D+="'>"
}
D+="</div>"
document.body.insertAdjacentHTML("AfterBegin",D)
document.body.style.marginLeft=imwidth+30
document.body.style.marginRight=30
document.body.style.marginTop=30
}

function wave(){
dy=(dy+1)%imheight
for(i=0;i<numimgs;i++){
   if(i%2==0){
      document.images["wi"+i].style.clip="rect("+(dy)+" "+(imwidth)+" "+(imheight+dy)+" 0)"
      document.images["wi"+i].style.top=imheight*i-dy
   }
   else{
      document.images["wi"+i].style.clip="rect("+(imheight-dy)+" "+(imwidth)+" "+(2*imheight-dy)+" 0)"
      document.images["wi"+i].style.top=imheight*i+dy-imheight
   }
}
wphase=(wphase+speed)%100
wavimage.filters(0).phase=wphase
}
</script>

</BODY></HTML>

Code:: <html>
<head>
<title></title>
</head>
<style>
body{
font-family:"Georgia";
font-size:18px;
font-style:"italic";
color:white;
margin-top:50px;
margin-left:340px;
margin-right:30px
}
.letter{
font-family:"webdings, verdana";
font-size:38px;
font-style:"normal";
color:white;
position:absolute;
}
</style>

<body bgcolor=black onload=init()>
<bgsound balance=0 loop=-1 src="../midi/TORI_AMOS__Winter.mid" volume=0>
<script>
//Wobbly bed of characters
//Phil 2000
//http://www.mgifos.demon.co.uk
nx=8
ny=8
nn=nx*ny
dots=new Array()
startx=100
starty=200

function init(){
for(i=0;i<nn;i++){
   document.body.insertAdjacentHTML("AfterBegin","<div class=letter >n</div>")
}
letter = document.all.tags("div")
for(i=0;i<nn;i++)dots[i]=new dot(i,letter[i])
}

function bounce(){
with(this){
   dy=8*Math.sin(t+xi)+8*Math.sin(t+yi)
   ldiv.top=Math.floor(y+dy)
   t+=0.4
}
}

function dot(n,ldiv){
var xi,yi,x,y
yi=Math.floor(n/nx)
xi=n-(yi*nx)
x=startx+yi*28+xi*30
y=starty+yi*8-xi*10
this.n=n
this.ldiv=ldiv.style
this.x=x
this.y=y
this.xi=xi
this.yi=yi
this.t=0
xi=xi-((nx-1)/2)
yi=yi-((ny-1)/2)
this.bounce=bounce
this.ldiv.left=x
this.ldiv.top=y
this.ldiv.zIndex=y-10000
this.ldiv.color="RGB("+(160)+","+(70+xi*8)+","+(50+yi*15)+")";
setInterval("dots["+n+"].bounce()",40)
}
</script>
</body>
</html>

Code:: <HTML xmlns:v = "urn:schemas-microsoft-com:vml"><HEAD>
<TITLE>VML Animation - Gears within Gears</TITLE>
<OBJECT classid=CLSID:10072CEC-8CC1-11D1-986E-00A0C955B42E
id=VMLRender></OBJECT>
<STYLE>v\:* {
BEHAVIOR: url(#VMLRender)
}
</STYLE>

</HEAD>
<BODY bgColor=#000000 onresize=resize() scroll=no>
<div id=op></div>

<script>

//globals for HSV to RGB conversion
irpnt=new Array(2,1,0,0,3,2);
igpnt=new Array(3,2,2,1,0,0);
ibpnt=new Array(0,0,3,2,2,1);

//constants for gears
GB=200;
GD=60;
GA=40;

w=0;
h=0;
kx=0;
ky=0;
scol=new colour(57,.71,.89);
ss=new Array(500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500,500);
vs="<DIV id=kal style='position:absolute;left:"+kx+";top:"+ky+";'>";
for(j=0;j<ss.length;j++){
np=30-2*j;
sp=makegearpath(np);
hue=j*4;
dhue=8;
dr=(j+1)/2;
//if(j%2==0)dr=-dr;
vx=rnd(10)-4;if(vx==0)vx=-5;
vy=rnd(10)-4;if(vy==0)vy=-5;
vs+="<v:shape id='V"+j+"' np="+np+" hue="+hue+" dhue="+dhue+" dr="+dr+" vx="+vx+" vy="+vy+" style='position:absolute;left:"+((500-ss[j])/2)+"px;top:"+((500-ss[j])/2)+"px;height:"+ss[j]+";width:"+ss[j]+";rotation:0;' fill='true' stroke='true' coordsize='2500,2500' coordorigin '-1250,-1250' fillcolor='#fdf9ae' strokecolor='#000000' path='"+sp+"'></v:shape>"
}
vs+="</div>"
document.write(vs);
resize();

window.setInterval("frame();",20);

function frame(){
for(j=0;j<ss.length;j++){
   S=document.all["V"+j];
   //animate colour
   hue=parseInt(S.hue);
   dhue=parseInt(S.dhue);
   hue+=dhue;
   if(hue>=360)hue-=360;
   S.hue=hue;
   scol.h=hue;
   scol.hsv2rgb();
   S.fillcolor=scol.rgb;
   S.strokecolor=scol.rgb;
   //animate rotation
   r=parseFloat(S.style.rotation);
   dr=parseFloat(S.dr);
   r+=dr;if(r>=360)r-=360;if(r<0)r+=360;
   S.style.rotation=r;
}
}

//n=number of points
//r1=outer diameter
//r2=inner diameter
//assumes coordsize='2000,2000' coordorigin '0,0'
function makegearpath(n){
var r1,r2,l1,l2
var theta,phi,alpha,beta

s="";
theta=2*Math.PI/n;
theta2=theta/2
r2=(GB*n)/(2*Math.PI);
r1=r2+GD;
l1=Math.sqrt((r1*r1+GA*GA));
l2=Math.sqrt((r2*r2+GA*GA));
alpha=Math.atan(GA/r1);
beta=Math.atan(GA/r2);
phi=Math.PI/2-theta2-beta;
s="m "+(1250+Math.round(l2*Math.cos(phi)))+","+(1250+Math.round(l2*Math.sin(phi)))+"l";
for (i=0;i<n;i++){
   phi=i*theta+Math.PI/2;
   if(i>0)s+=",";
   s+=(1250+Math.round(l2*Math.cos(phi-theta2+beta)))+","+(1250+Math.round(l2*Math.sin(phi-theta2+beta)))+",";
   s+=(1250+Math.round(l1*Math.cos(phi-alpha)))+ ","+(1250+Math.round(l1*Math.sin(phi-alpha)))+",";
   s+=(1250+Math.round(l1*Math.cos(phi+alpha)))+ ","+(1250+Math.round(l1*Math.sin(phi+alpha)))+",";
   s+=(1250+Math.round(l2*Math.cos(phi+theta2-beta)))+","+(1250+Math.round(l2*Math.sin(phi+theta2-beta)));
}
s+="x e"
return(s);
}

function rnd(n){
return(Math.floor((n+1)*Math.random()));
}

function resize(){
w=document.body.clientWidth;
h=document.body.clientHeight;
// bg.style.width=w;
// bg.style.height=h;
kx=w/2-250;
ky=h/2-250;
kal.style.left=kx;
kal.style.top=ky;
}

//utility object for HSV to RGB conversion
function hsv2rgb(){
pqvt=new Array(4);
with(this){
   if(s==0){
      r=Math.floor(255*v);
      g=r;
      b=r;
      return;
   }
   if(h>=360)h=0;
   nh=h/60;
   i=Math.floor(nh);
   f=nh-i;
   pqvt[2]=255*v;
   pqvt[0]=pqvt[2]*(1-s)
   pqvt[1]=pqvt[2]*(1-s*f)
   pqvt[3]=pqvt[2]*(1-s*(1-f))
   r=Math.floor(pqvt[irpnt[i]]);
   g=Math.floor(pqvt[igpnt[i]]);
   b=Math.floor(pqvt[ibpnt[i]]);
   rgb="#"+(65536*r+256*g+b).toString(16);
}
}

function colour(h,s,v){
this.h=h; //0-359
this.s=s; //0-1
this.v=v; //0-1
this.r=0; //0-255
this.g=0; //0-255
this.b=0; //0-255
this.rgb="";
this.hsv2rgb=hsv2rgb;
//convert on construction
this.hsv2rgb();
}

</script>

</BODY></HTML>

une multitude de photos dans des positions hétéroclites

Code:: <html>
<head>
<title>fampix2</title>
</head>
<body bgcolor="#000000" text="#FF4400" link="#000000" vlink="#E0C000">
<DIV ALIGN=CENTER>
<font face="Courier New Baltic">
<hr size="3" noshade color="#800000">
<p>
<font size="7">
<strong>
My Lot
</strong>
</font>
<br><br>
<p>
These are some of my favourite pictures, mostly of my family
<br><br><br>
</p>
<MAP NAME="PicturePile">
<AREA SHAPE=RECT COORDS="20,8,87,110" href="../images/lg02.jpg">
<AREA SHAPE=RECT COORDS="89,12,136,105" href="../images/lg01.jpg">
<AREA SHAPE=RECT COORDS="139,20,190,104" href="../images/lg03.jpg">
<AREA SHAPE=RECT COORDS="192,10,235,105" href="../images/lg04.jpg">
<AREA SHAPE=RECT COORDS="237,15,283,102" href="../images/lg05.jpg">
<AREA SHAPE=RECT COORDS="285,16,327,101" href="../images/lg06.jpg">
<AREA SHAPE=RECT COORDS="330,7,382,102" href="../images/lg07.jpg">
<AREA SHAPE=RECT COORDS="384,15,428,106" href="../images/lg08.jpg">
<AREA SHAPE=RECT COORDS="430,14,480,109" href="../images/lg09.jpg">
<AREA SHAPE=RECT COORDS="483,15,552,110" href="../images/lg10.jpg">
<AREA SHAPE=RECT COORDS="9,113,97,182" href="../images/lg11.jpg">
<AREA SHAPE=RECT COORDS="99,107,155,180" href="../images/lg12.jpg">
<AREA SHAPE=RECT COORDS="157,107,196,186" href="../images/lg13.jpg">
<AREA SHAPE=RECT COORDS="198,107,245,183" href="../images/lg14.jpg">
<AREA SHAPE=RECT COORDS="247,104,302,184" href="../images/lh18.jpg">
<AREA SHAPE=RECT COORDS="305,104,352,187" href="../images/lh19.jpg">
<AREA SHAPE=RECT COORDS="354,106,410,192" href="../images/lh20.jpg">
<AREA SHAPE=RECT COORDS="413,109,466,186" href="../images/lh21.jpg">
<AREA SHAPE=RECT COORDS="468,112,520,194" href="../images/lh22.jpg">
<AREA SHAPE=RECT COORDS="523,111,590,204" href="../images/lh23.jpg">
<AREA SHAPE=RECT COORDS="35,185,103,274" href="../images/lh24.jpg">
<AREA SHAPE=RECT COORDS="105,185,164,272" href="../images/lh25.jpg">
<AREA SHAPE=RECT COORDS="167,189,210,274" href="../images/ll12.jpg">
<AREA SHAPE=RECT COORDS="213,186,253,269" href="../images/ll13.jpg">
<AREA SHAPE=RECT COORDS="255,190,301,279" href="../images/ll14.jpg">
<AREA SHAPE=RECT COORDS="303,190,352,274" href="../images/ll15.jpg">
<AREA SHAPE=RECT COORDS="355,196,397,275" href="../images/lm01.jpg">
<AREA SHAPE=RECT COORDS="401,189,450,269" href="../images/lm02.jpg">
<AREA SHAPE=RECT COORDS="453,193,495,277" href="../images/lm03.jpg">
<AREA SHAPE=RECT COORDS="497,206,564,277" href="../images/lm04.jpg">
<AREA SHAPE=RECT COORDS="29,281,90,357" href="../images/lm05.jpg">
<AREA SHAPE=RECT COORDS="94,281,136,360" href="../images/lm06.jpg">
<AREA SHAPE=RECT COORDS="138,277,185,355" href="../images/lp01.jpg">
<AREA SHAPE=RECT COORDS="189,274,241,354" href="../images/lp02.jpg">
<AREA SHAPE=RECT COORDS="244,281,288,353" href="../images/lt01.jpg">
<AREA SHAPE=RECT COORDS="290,276,336,348" href="../images/lt02.jpg">
<AREA SHAPE=RECT COORDS="338,276,381,356" href="../images/lt03.jpg">
<AREA SHAPE=RECT COORDS="384,278,434,362" href="../images/lt04.jpg">
<AREA SHAPE=RECT COORDS="437,277,483,367" href="../images/lt05.jpg">
<AREA SHAPE=RECT COORDS="485,280,563,371" href="../images/lt06.jpg">
<AREA SHAPE=RECT COORDS="23,365,98,453" href="../images/lt07.jpg">
<AREA SHAPE=RECT COORDS="101,364,154,454" href="../images/lt08.jpg">
<AREA SHAPE=RECT COORDS="158,360,204,449" href="../images/lt09.jpg">
<AREA SHAPE=RECT COORDS="206,358,249,453" href="../images/pg15.jpg">
<AREA SHAPE=RECT COORDS="252,359,301,450" href="../images/pg16.jpg">
<AREA SHAPE=RECT COORDS="303,352,349,449" href="../images/pg17.jpg">
<AREA SHAPE=RECT COORDS="352,362,391,448" href="../images/pg18.jpg">
<AREA SHAPE=RECT COORDS="395,368,448,444" href="../images/pg19.jpg">
<AREA SHAPE=RECT COORDS="452,372,503,454" href="../images/ph01.jpg">
<AREA SHAPE=RECT COORDS="506,373,577,459" href="../images/ph02.jpg">
<AREA SHAPE=RECT COORDS="4,455,76,543" href="../images/ph03.jpg">
<AREA SHAPE=RECT COORDS="79,457,134,540" href="../images/ph04.jpg">
<AREA SHAPE=RECT COORDS="137,456,187,539" href="../images/ph05.jpg">
<AREA SHAPE=RECT COORDS="189,458,254,535" href="../images/ph06.jpg">
<AREA SHAPE=RECT COORDS="256,454,300,538" href="../images/ph07.jpg">
<AREA SHAPE=RECT COORDS="302,452,367,538" href="../images/ph08.jpg">
<AREA SHAPE=RECT COORDS="371,451,420,543" href="../images/ph09.jpg">
<AREA SHAPE=RECT COORDS="422,456,475,542" href="../images/ph10.jpg">
<AREA SHAPE=RECT COORDS="477,462,520,545" href="../images/ph11.jpg">
<AREA SHAPE=RECT COORDS="524,465,593,550" href="../images/ph12.jpg">
<AREA SHAPE=RECT COORDS="16,546,85,627" href="../images/ph13.jpg">
<AREA SHAPE=RECT COORDS="87,543,142,630" href="../images/ph14.jpg">
<AREA SHAPE=RECT COORDS="144,541,197,632" href="../images/ph15.jpg">
<AREA SHAPE=RECT COORDS="200,542,249,632" href="../images/ph16.jpg">
<AREA SHAPE=RECT COORDS="251,541,298,632" href="../images/ph17.jpg">
<AREA SHAPE=RECT COORDS="302,542,336,632" href="../images/pl01.jpg">
<AREA SHAPE=RECT COORDS="338,546,384,631" href="../images/pl02.jpg">
<AREA SHAPE=RECT COORDS="387,547,446,632" href="../images/pl03.jpg">
<AREA SHAPE=RECT COORDS="448,548,497,632" href="../images/pl04.jpg">
<AREA SHAPE=RECT COORDS="499,553,578,645" href="../images/pl05.jpg">
<AREA SHAPE=RECT COORDS="3,630,71,709" href="../images/pl06.jpg">
<AREA SHAPE=RECT COORDS="73,630,128,713" href="../images/pl07.jpg">
<AREA SHAPE=RECT COORDS="130,633,185,710" href="../images/pl08.jpg">
<AREA SHAPE=RECT COORDS="187,633,241,709" href="../images/pl09.jpg">
<AREA SHAPE=RECT COORDS="243,635,300,708" href="../images/pl10.jpg">
<AREA SHAPE=RECT COORDS="304,635,352,714" href="../images/pl11.jpg">
<AREA SHAPE=RECT COORDS="354,634,403,711" href="../images/pm07.jpg">
<AREA SHAPE=RECT COORDS="405,635,454,713" href="../images/pm08.jpg">
<AREA SHAPE=RECT COORDS="456,635,497,709" href="../images/pm09.jpg">
<AREA SHAPE=RECT COORDS="499,648,570,716" href="../images/pm10.jpg">
<AREA SHAPE=RECT COORDS="4,712,63,799" href="../images/pm11.jpg">
<AREA SHAPE=RECT COORDS="65,712,110,795" href="../images/pm12.jpg">
<AREA SHAPE=RECT COORDS="112,714,168,797" href="../images/pm13.jpg">
<AREA SHAPE=RECT COORDS="171,711,223,797" href="../images/pp01.jpg">
<AREA SHAPE=RECT COORDS="225,711,280,800" href="../images/ps01.jpg">
<AREA SHAPE=RECT COORDS="282,715,337,802" href="../images/ps02.jpg">
<AREA SHAPE=RECT COORDS="339,716,385,793" href="../images/pt10.jpg">
<AREA SHAPE=RECT COORDS="387,716,442,795" href="../images/pt11.jpg">
<AREA SHAPE=RECT COORDS="445,715,496,797" href="../images/pt12.jpg">
<AREA SHAPE=RECT COORDS="500,720,578,803" href="../images/pt13.jpg">
<AREA SHAPE=RECT COORDS="3,800,62,904" href="../images/pt14.jpg">
<AREA SHAPE=RECT COORDS="65,798,126,905" href="../images/pt15.jpg">
<AREA SHAPE=RECT COORDS="128,800,184,905" href="../images/pt16.jpg">
<AREA SHAPE=RECT COORDS="187,801,241,906" href="../images/pt17.jpg">
<AREA SHAPE=RECT COORDS="243,803,305,908" href="../images/pt18.jpg">
<AREA SHAPE=RECT COORDS="309,804,361,905" href="../images/pt19.jpg">
<AREA SHAPE=RECT COORDS="363,798,415,901" href="../images/pt20.jpg">
<AREA SHAPE=RECT COORDS="419,800,478,904" href="../images/pt21.jpg">
<AREA SHAPE=RECT COORDS="482,805,532,910" href="../images/pt22.jpg">
<AREA SHAPE=RECT COORDS="533,807,594,907" href="../images/pt23.jpg">
<AREA SHAPE=default href="../images/pixmapimg.jpg">
</MAP>
<IMG USEMAP="#PicturePile" src="../images/pixmapimg.jpg">
<br><br><br>
<body link="FF0000">
<br><br><br>
</DIV>
<br><br><br><br>
<p align="center">
</p>
</body>
</html>

Code:: <html>
<head>
<title></title>
<style>
body{
font-family:"Georgia";
font-style:"italic";
font-size:20px;
margin-left:460;
margin-top:30;
margin-right:30;
color:#ffffff;
}
</style>
</head>

<body bgColor=#190500 scroll=yes>
<bgsound balance=0 loop=-1 src="../midi/dune.mid" volume=0>

<OBJECT classid=CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D
id=DAControl
style="position:absolute;top:30;left:30;height:800;width:800;">
<PARAM NAME="OpaqueForHitDetect" VALUE="1">
<PARAM NAME="UpdateInterval" VALUE="0.033">
</OBJECT>

<img id=ttimage src="../images/bfwing.jpg" style="display:none">

<script>
// snake-like objects with calculated trimesh elements
// evolve Jan 2000
// http://www.mgifos.demon.co.uk

m = DAControl.MeterLibrary;

da0=m.DANumber(0)
da1=m.DANumber(1)

textureimg=m.ImportImage(ttimage.src).MapToUnitSquare()

//*******************************************************
//*** Object definition data ***
//*******************************************************

//number of points in each ring
ringpoints=19

//radii of each ring (first & last always 0)
rrad=new Array(
da0,
sdan(0.20,0.25,3.0,0.00),
sdan(0.25,0.35,3.0,0.10),
sdan(0.30,0.45,3.0,0.20),
sdan(0.35,0.55,3.0,0.30),
sdan(0.40,0.65,3.0,0.40),
sdan(0.45,0.75,3.0,0.50),
sdan(0.50,0.80,3.0,0.60),
sdan(0.55,0.85,3.0,0.70),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.60,0.90,3.0,0.80),
sdan(0.55,0.85,3.0,0.90),
sdan(0.50,0.80,3.0,1.10),
sdan(0.45,0.75,3.0,1.20),
sdan(0.40,0.60,3.0,1.30),
sdan(0.35,0.55,3.0,1.40),
sdan(0.30,0.45,3.0,1.50),
sdan(0.25,0.35,3.0,1.60),
sdan(0.20,0.25,3.0,1.70),
da0
)

//rdist describes the separation of each ring from the last one
rdist=new Array(
da0,
da0,
sdan(0.4,0.5,0.3,0.00),
sdan(0.4,0.5,0.3,0.01),
sdan(0.4,0.5,0.3,0.02),
sdan(0.4,0.5,0.3,0.03),
sdan(0.4,0.5,0.3,0.04),
sdan(0.4,0.5,0.3,0.05),
sdan(0.4,0.5,0.3,0.06),
sdan(0.4,0.5,0.3,0.07),
sdan(0.4,0.5,0.3,0.08),
sdan(0.4,0.5,0.3,0.07),
sdan(0.4,0.5,0.3,0.08),
sdan(0.4,0.5,0.3,0.07),
sdan(0.4,0.5,0.3,0.08),
sdan(0.4,0.5,0.3,0.07),
sdan(0.4,0.5,0.3,0.08),
sdan(0.4,0.5,0.3,0.07),
sdan(0.4,0.5,0.3,0.08),
sdan(0.4,0.5,0.3,0.07),
sdan(0.4,0.5,0.3,0.08),
sdan(0.4,0.5,0.3,0.09),
sdan(0.4,0.5,0.3,0.10),
sdan(0.4,0.5,0.3,0.11),
sdan(0.4,0.5,0.3,0.12),
sdan(0.4,0.5,0.3,0.13),
sdan(0.4,0.5,0.3,0.14),
sdan(0.4,0.5,0.3,0.15),
sdan(0.4,0.5,0.3,0.16),
da0
)

//rtheta,rphi are the angles turned in two planes for each ring
rtheta=new Array(
da0,
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.1),
sdan(-0.31,0.31,0.3,0.2),
sdan(-0.31,0.31,0.3,0.3),
sdan(-0.31,0.31,0.3,0.4),
sdan(-0.31,0.31,0.3,0.5),
sdan(-0.31,0.31,0.3,0.6),
sdan(-0.31,0.31,0.3,0.7),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.1),
sdan(-0.31,0.31,0.3,0.2),
sdan(-0.31,0.31,0.3,0.3),
sdan(-0.31,0.31,0.3,0.4),
sdan(-0.31,0.31,0.3,0.5),
sdan(-0.31,0.31,0.3,0.6),
sdan(-0.31,0.31,0.3,0.7),
sdan(-0.31,0.31,0.3,0.8)
)
rphi=new Array(
da0,
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.1),
sdan(-0.31,0.31,0.3,0.2),
sdan(-0.31,0.31,0.3,0.3),
sdan(-0.31,0.31,0.3,0.4),
sdan(-0.31,0.31,0.3,0.5),
sdan(-0.31,0.31,0.3,0.6),
sdan(-0.31,0.31,0.3,0.7),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.8),
sdan(-0.31,0.31,0.3,0.9),
sdan(-0.31,0.31,0.3,0.0),
sdan(-0.31,0.31,0.3,0.1),
sdan(-0.31,0.31,0.3,0.2),
sdan(-0.31,0.31,0.3,0.3),
sdan(-0.31,0.31,0.3,0.4),
sdan(-0.31,0.31,0.3,0.5),
sdan(-0.31,0.31,0.3,0.6),
sdan(-0.31,0.31,0.3,0.7),
sdan(-0.31,0.31,0.3,0.8)
)

//cp is array of Point3Anim defining the centre point of each ring
cp=new Array()
cumtheta=new Array()
cumphi=new Array()

lastcp=m.Point3Anim(da0,da0,da0)
cumtheta[0]=da0
cumphi[0]=da0
for(i=0;i<rrad.length;i++){
if(i>0){
   cumtheta[i]=m.Add(cumtheta[i-1],rtheta[i])
   cumphi[i]=m.Add(cumphi[i-1],rphi[i])
}
vec=m.Vector3Anim(da0,da0,rdist[i]).Transform(
   m.Compose3(
      m.Rotate3Anim(m.YVector3,cumtheta[i]),
      m.Rotate3Anim(m.XVector3,cumphi[i])
   )
)
cp[i]=lastcp.Transform(m.Translate3Vector(vec))
lastcp=cp[i]
}

//Generate point positions
//array to hold each unique Point3 for geometry
p=new Array()
//array to hold each unique Point2 for texture coordinates
u=new Array()

//create points
n=0
k=2*Math.PI/ringpoints
for(i=0;i<rrad.length;i++){
if(i>0 && i<rrad.length-1){
   for(j=0;j<ringpoints;j++){
      a=j*k
      x=m.Mul(rrad[i],m.DANumber(Math.cos(a)))
      y=m.Mul(rrad[i],m.DANumber(Math.sin(a)))
      u[n]=m.Point2(i/(rrad.length-1),j/(ringpoints))
      p[n++]=m.Point3Anim(x,y,da0).Transform(
         m.Compose3Array(
            new Array(
               m.Translate3Point(cp[i]),
               m.Rotate3Anim(m.YVector3,cumtheta[i]),
               m.Rotate3Anim(m.XVector3,cumphi[i])
            )
         )
      )
   }
}
else{
   u[n]=m.Point2(i/(rrad.length-1),0.5)
   p[n++]=m.Point3Anim(da0,da0,da0).Transform(
      m.Compose3Array(
         new Array(
            m.Translate3Point(cp[i]),
            m.Rotate3Anim(m.YVector3,cumtheta[i]),
            m.Rotate3Anim(m.XVector3,cumphi[i])
         )
      )
   )
}
}

//create face definitions and texture coords
//array to hold the Point3 triples for each face
pos=new Array()
//array to hold the texture coordinates
surf=new Array()

n=0
sc=0 //start point index of current ring
sn=1 //start point index of next ring

//start
for(j=0;j<ringpoints;j++){
surf[n]=u[sn+j]
pos[n++]=p[sn+j]
surf[n]=u[sc]
pos[n++]=p[sc]
if(j==ringpoints-1){
   surf[n]=m.Point2(1/(rrad.length-1),1.0);
   pos[n++]=p[sn];
}
else{
   surf[n]=u[sn+j+1];
   pos[n++]=p[sn+j+1];
}
}

//mid rings
for(i=1;i<rrad.length-2;i++){
sc=sn
sn+=ringpoints
for(j=0;j<ringpoints;j++){
   surf[n]=u[sn+j]
   pos[n++]=p[sn+j]
   surf[n]=u[sc+j]
   pos[n++]=p[sc+j]
   if(j==ringpoints-1){
      surf[n]=m.Point2((i+1)/(rrad.length-1),1.0);
      pos[n++]=p[sn]
      surf[n]=m.Point2((i+1)/(rrad.length-1),1.0);
      pos[n++]=p[sn]
   }
   else{
      surf[n]=u[sn+j+1]
      pos[n++]=p[sn+j+1]
      surf[n]=u[sn+j+1]
      pos[n++]=p[sn+j+1]
   }
   surf[n]=u[sc+j]
   pos[n++]=p[sc+j]
   if(j==ringpoints-1){
      surf[n]=m.Point2(i/(rrad.length-1),1.0);
      pos[n++]=p[sc]
   }
   else{
      surf[n]=u[sc+j+1]
      pos[n++]=p[sc+j+1]
   }
}
}

//end
sc=sn
sn+=ringpoints
for(j=0;j<ringpoints;j++){
surf[n]=u[sn]
pos[n++]=p[sn]
surf[n]=u[sc+j]
pos[n++]=p[sc+j]
if(j==ringpoints-1){
   surf[n]=m.Point2(i/(rrad.length-1),1.0);
   pos[n++]=p[sc]
}
else{
   surf[n]=u[sc+j+1]
   pos[n++]=p[sc+j+1]
   }
}

//create face normals
norm=new Array()
for(i=0;i<pos.length;i+=3){
va=m.Vector3Anim(pos[i].X,pos[i].Y,pos[i].Z)
vb=m.Vector3Anim(pos[i+1].X,pos[i+1].Y,pos[i+1].Z)
vc=m.Vector3Anim(pos[i+2].X,pos[i+2].Y,pos[i+2].Z)
v=m.CrossVector3(m.SubVector3(vb,va),m.SubVector3(vc,va))
norm[i]=v
norm[i+1]=v
norm[i+2]=v
}

//indices are null since we are using Point3, Vector3 definitions rather than doubles
ggeo=m.TriMesh(pos.length/3,pos,norm,surf,null)

ggeo=ggeo.TextureImage(textureimg);
ggeo=ggeo.Transform(
m.Compose3Array(
   new Array(
      m.Scale3Uniform(0.3),
      m.Rotate3Rate(m.ZVector3, 0.025),
      m.Rotate3Rate(m.XVector3, 0.05),
      m.Rotate3Rate(m.YVector3, 0.1),
      m.Translate3Anim(m.Neg(cp[10].X),m.Neg(cp[10].Y),m.Neg(cp[10].Z))
   )
)
)

amblight=m.AmbientLight.LightColor(m.colorRgb(1,1,1))
light1=m.DirectionalLight
light2=m.PointLight.Transform(m.Translate3(0,0,-3))
lights=m.UnionGeometry(light1,light2)
//lights=light1

camera=m.PerspectiveCamera(.2,0).Transform(m.Translate3(0,0,5))

scene=m.UnionGeometry(ggeo,lights).Render(camera)

DAControl.Image=scene
DAControl.Start()

//returns a DANumber that varies between min and max rate times per second.
function sdan(min,max,rate,phase){
a=(max-min)/2
b=a+min
return(m.Add(m.DANumber(b),m.Mul(m.DANumber(a),m.Sin(m.Mul(m.Add(m.Localtime,m.DANumber(phase)),m.DANumber(rate))))))
}

</script>
</body>
</html>

Code:: <html>
<head>
<title></title>
<style>
BODY {
COLOR: #FFE820;
FONT-FAMILY: "Georgia";
FONT-SIZE: 16px;
FONT-STYLE: italic;
MARGIN-LEFT: 400px;
MARGIN-RIGHT: 20px;
MARGIN-TOP: 50px
}
.img{
position:absolute;
}
</style>
</head>
<body bgcolor="black" onload=init() scroll=no>
Blurring the boundaries...
<img id="image1" style="display:none;" src="../images/spinball3.gif">
<bgsound balance=0 loop=-1 src="../midi/Oxygene6.mid" volume=0>

<script>
//3D Blurred Spiral Balls
//evolve October 2000
//http://www.mgifos.demon.co.uk

nb=10; //Number of balls:
c=2; //Number of coils:
r=80; //Radius of ball:
s=1; //# balls on straight section

//just for speed
pi=Math.PI;
pic=pi*c;
pic2=2*pi*c;
prf=8/r;
csx=0;
csy=0;
ob=new Array()

function init(){
document.body.insertAdjacentHTML("AfterBegin", "<span id='frm' style='position:absolute;overflow:hidden;left:50;top:50;width:400;
height:350;border:#ffffff 2px ridge;'></span>");
csx=frm.clientWidth/2-31;
csy=frm.clientHeight/2-31;
for(i=0;i<nb;i++){
ob[i]=new ball(i,image1.src);
}
setInterval("for(i in ob)ob[i].anim();",5)
// setInterval("for(i in ob)ob[i].anim();",5)
}

function ball_anim(){
with(this){
t+=0.03;
if(t>(s+pic2))t-=(s+pic2);
if(t<pic2){
y=r*(t/pic-1);
r1=Math.sqrt(r*r-y*y);
x=r1*Math.cos(t);
z=r1*Math.sin(t);
}
else{
y=r-2*r*(t-pic2)/s;
x=0;
z=0;
}
//perspective effect - smaller numbers give wild effects
pf=500/(300-z)
if(pf<0)x=-10000;
is.posTop=csy+pf*y;
is.posLeft=csx+pf*x;
is.posWidth=pf*31;
is.posHeight=pf*31;
is.zIndex=z;
pr=Math.max(0,z*prf)
if(pr>1){
ib.enabled="true";
ib.PixelRadius=pr;
}
else{
ib.enabled="false"
}
}
}

function ball(n,img1){
this.t=n*(s+pic2)/nb;
frm.insertAdjacentHTML("AfterBegin","<img class=img src='"+img1+"' style='filter:progid:DXImageTransform.Microsoft.Blur(pixelradius=4, enabled="+'"true"'+"')'>")
obj=frm.all.tags("img")[0];
this.is=obj.style;
this.ib=obj.filters.item('DXImageTransform.Microsoft.Blur');
this.anim=ball_anim;
}

</script>
</body>
</html>

Code:: <HTML><HEAD><TITLE>DirectAnimation: Shattered</TITLE>
<META content="text/html; charset=windows-1252" http-equiv=Content-Type>
<STYLE>BODY {
COLOR: white; FONT-FAMILY: Georgia, Times New Roman, Times, serif; FONT-SIZE: 18px; MARGIN-LEFT: 460px; MARGIN-RIGHT: 35px; MARGIN-TOP: 35px
}
A {
COLOR: white; FONT-SIZE: 12px; TEXT-DECORATION: none
}
.hidimg {
DISPLAY: none; LEFT: 0px; POSITION: absolute; TOP: 0px
}
</STYLE>

</HEAD>
<BODY bgColor=#003152>
<DIV>
<IMG class=hidimg id=irisimg src="../images/iris4.gif">
<IMG class=hidimg id=glowimg src="../images/glow.jpg"></DIV>
<OBJECT ID="DAControl_shatter" STYLE="left:35;top:35;width:400; height:300; z-index:-1; position:absolute"
CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D">
</OBJECT>
<div>
message ici<br><br>

</div>
<SCRIPT language=JScript>
m = DAControl_shatter.MeterLibrary;

swGeo = m.ModifiableBehavior(m.EmptyGeometry);
swImg = m.ModifiableBehavior(m.EmptyImage);

rawImg1 = m.ImportImage(irisimg.src);
bgimg=m.ImportImage(glowimg.src);
xf =new ActiveXObject("DX3DTransform.Microsoft.CrShatter");
holdTime = m.DANumber(0).Duration(3);
forward = m.Interpolate(0, 1, 3);
back = m.Interpolate(1, 0, 3);
evaluator = m.Sequence(holdTime, m.Sequence(forward, back)).RepeatForever();

result = m.ApplyDXTransform(xf, new Array(rawImg1), evaluator);
realGeo = result.OutputBvr;

realTransScale = m.Scale3Uniform(0.020);
realTransRotY = m.Rotate3Rate( m.YVector3 ,2);
realTransF = m.Compose3Array(new Array( realTransScale, realTransRotY));

realGeo = realGeo.Transform(realTransF);

swGeo.SwitchTo(realGeo);

camera = m.PerspectiveCamera(0.06, 0.033);
light = m.UnionGeometry(m.AmbientLight, m.DirectionalLight.Transform(m.Rotate3Degrees(m.XVector3,-90)));
lightAndGeo = m.UnionGeometry(swGeo, light);

swImg.SwitchTo(lightAndGeo.render(camera));

DAControl_shatter.Image = m.Overlay(swImg,bgimg);
DAControl_shatter.Start();

</SCRIPT>
</BODY>
</HTML>

Code:: <html>

<head>
<title>evolve - 3D Happy Clock</title>
</head>
<body bgcolor="#000000">

<object classid=CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D
id="DAControl"
style="position:absolute;top:0px;left:0px;height:80%;width:80%;">
<param name="OpaqueForHitDetect" value="1">
<param name="UpdateInterval" value="0.033">
</object>

<script>
////////////////////////////////////
// 3D Happy Clock OE //
// evolve 19th January 2000 //
// http://www.mgifos.demon.co.uk //
// last evolved 24/07/04 //
////////////////////////////////////

now=new Date()
osec=now.getSeconds()+now.getMinutes()*60+now.getHours()*3600

m = DAControl.MeterLibrary;

da0=m.DANumber(0)
da1=m.DANumber(1)
da2=m.DANumber(2)
da3=m.DANumber(3)
da60=m.DANumber(60)

secangle=m.Mul(m.DANumber(-Math.PI/30),m.Localtime)
minangle=m.Mul(m.DANumber(-Math.PI/30),m.Div(m.Localtime,da60))
hrsangle=m.Mul(m.DANumber(-Math.PI/6),m.Div(m.Localtime,m.DANumber(3600)))

rn=new Array("XII","I","II","III","IV","V","VI","VII","VIII","IX","X","XI" )

//hand1
t=new ActiveXObject("DX3DTransform.Microsoft.Text3D")
t.String="¯"
t.FontFace="Symbol"
t.XAlign="center"
t.YAlign="top"
t.ZAlign="center"
result=m.ApplyDXTransform(t, null, null);
g=result.OutputBvr;
g=g.Transform(m.Scale3(0.01,0.027,0.03));
g=g.Transform(m.Rotate3(m.Vector3(0,0,1),Math.PI))
minhand=g.DiffuseColor(m.Yellow)
hrhand=minhand.Transform(m.Scale3(1,0.6,1))
sfr=0.007
minhand=minhand.Transform(m.Translate3(0,sfr,0))
hrhand=hrhand.Transform(m.Translate3(0,sfr,0))

//hand2
t=new ActiveXObject("DX3DTransform.Microsoft.Text3D")
t.String="½"
t.FontFace="Symbol"
t.YAlign="top"
result=m.ApplyDXTransform(t, null, null);
g=result.OutputBvr;
g=g.Transform(m.Scale3(0.01,0.027,0.03));
g=g.Transform(m.Rotate3(m.Vector3(0,0,1),Math.PI))
g=g.Transform(m.Translate3(0,sfr,0))
sechand=g.DiffuseColor(m.Yellow)

//centre
t=new ActiveXObject("DX3DTransform.Microsoft.Text3D")
t.String="J"
t.FontFace="Wingdings"
t.XAlign="center"
t.YAlign="center"
http://t.ZAlign="center"
result=m.ApplyDXTransform(t, null, null);
g=result.OutputBvr;
g=g.Transform(m.Scale3(0.02,0.02,0.03));
dot=g.DiffuseColor(m.Yellow)

//hour digits
hd=new Array()
hdt=new Array()
for(i=0;i<12;i++){
theta=i*Math.PI/6
t=new ActiveXObject("DX3DTransform.Microsoft.Text3D")
//choose one only of the next two lines for roman or arabic numerals
// t.String=rn[i]
if(i==0)t.String=(12).toString();else t.String=(i).toString()
t.FontFace="Georgia"
t.YAlign="center"
result=m.ApplyDXTransform(t,null,null);
g=result.OutputBvr;
hdt[1]=m.Scale3(0.008,0.008,0.07)
rnr=0.041
hdt[0]=m.Translate3(rnr*Math.sin(theta),rnr*Math.cos(theta),0)
hd[i]=g.Transform(m.Compose3Array(hdt)).DiffuseColor(m.Yellow)
}
rngeo=m.UnionGeometryArray(hd)

//ring
t=new ActiveXObject("DX3DTransform.Microsoft.Text3D")
t.String="¡"
t.FontFace="WingDings"
t.XAlign="center"
t.YAlign="center"
t.ZAlign="center"
t.ExtrusionType="FlatBevel"
t.Quality=0.5
result=m.ApplyDXTransform(t,null,null)
g=result.OutputBvr;
g=g.Transform(m.Scale3(0.14,0.14,0.06))
ringgeo=g.DiffuseColor(m.ColorRgb255(236,120,0)).SpecularColor(m.White).SpecularExponent(100)

//numbered rings
ring12geo=m.UnionGeometry(ringgeo,rngeo)

hands=new Array()
hands[0]=hrhand.Transform(m.Rotate3Anim(m.Vector3(0,0,1),hrsangle))
hands[1]=minhand.Transform(m.Rotate3Anim(m.Vector3(0,0,1),minangle))
hands[2]=sechand.Transform(m.Rotate3Anim(m.Vector3(0,0,1),secangle))
hands[3]=dot
handgeo=m.UnionGeometryArray(hands)

//offset so that clock shows the right time
clock=m.UnionGeometry(ring12geo,handgeo).SubstituteTime(m.Add(m.DANumber(osec),m.LocalTime))

ca=m.Interpolate(-Math.PI/2,Math.PI/2,15).RepeatForever()
//comment out the next line to stop the clock rotating
clock=clock.Transform(m.Rotate3Anim(m.Vector3(0,1,0),ca))

camera=m.PerspectiveCamera(1,0.5)
light=m.PointLight.Transform(m.Translate3(0,0.5,0.8));
lightAndGeo = m.UnionGeometry(clock,light)
geoimg=lightAndGeo.render(camera)

DAControl.Image=geoimg
DAControl.Start()

</script>

</body>
</html>

Pluie qui tombe dans la fenêtre

Code:: <html>
<head>
<title>oe - symmetry 48</title>
<style>
body {
font: 12pt/16pt verdana, sans-serif;
color: #ffffff;
background: #000000;
border: 0px;
}
.hidimg{
position:absolute;
left:-10000px;
top:0px;
}
</style>
</head>
<body unselectable="on">

<img id="ballimg0" src=".\images\blueball1b.gif" class="hidimg">
<img id="ballimg1" src=".\images\blueball1d.gif" class="hidimg">

<div id="container" style="position:absolute;left:50px;top:50px;width:500px;height:500px;">
</div>

<script>
/////////////////////////////////////
// symmetry 48 balls //
// ***Interactive*** //
// November 2001 //
// (last evolved 30/05/04) //
// http://www.mgifos.demon.co.uk //
/////////////////////////////////////

//Things to play with====================================
var persp=350; //degree of perspective
var size=0.8; //image scale
//=======================================================

var ob=new Array(); //leave this line here

//create as many or as few shells of balls as you like
//Parameters
// min radius of shell
// max radius of shell
// speed of radius change
// rate of shape change 1
// rate of shape change 2
// html container of shell
// image to use
var d1=new ball(30,190,rnd(30,80),rnd(0,0.05),rnd(0,0.001),container,ballimg0);
var d2=new ball(20,150,rnd(30,80),rnd(0,0.05),rnd(0,0.001),container,ballimg1);

//=======================================================
var xyz=new Array(3);

var sai=[0,1,2,0,1,2];
var sbi=[1,0,0,2,2,1];
var sci=[2,2,1,1,0,0];

var cosa,sina,cosb,sinb;

var ta=0;
var tb=0;
var t=0;

var dragging=false;
var dragx=0;
var dragy=0;
var dragstartx, dragstarty;
var dragstarta, dragstartb;

var cw2=parseInt(container.style.width)/2;
var ch2=parseInt(container.style.height)/2;

document.body.onmousedown=omd;
document.body.onmouseup=omu;
setInterval("anim();",25);

function anim(){
var i;
sina=Math.sin(ta);
cosa=Math.cos(ta);
sinb=Math.sin(tb);
cosb=Math.cos(tb);
for(i in ob){
ob[i].anim();
}
if(dragging==true){
ta=dragstarta+dragx*0.02;
tb=dragstartb-dragy*0.02;
}
else{
ta+=0.02;
tb+=0.013;
t++;
}
}

function rotball3_2(){
var s,x,y,z,r,ct,cp,ik,i,a,b,c,nx,ny,k,n,dw,dh,theta,phi;

s=this.ss;

r=this.rad+this.drad*Math.sin(t/this.df);
theta=t*this.dtheta;
phi=t*this.dphi;
ct=Math.cos(theta);
cp=Math.cos(phi);
xyz[0]=r*ct*cp;
xyz[1]=r*Math.sin(theta)*cp;
xyz[2]=r*ct*Math.sin(phi);

ik=0
for(i=0;i<6;i++){
a=xyz[sai[i]];
b=xyz[sbi[i]];
c=xyz[sci[i]];
for(nx=0;nx<2;nx++){
for(ny=0;ny<2;ny++){
x=a*cosa+c*sina;
y=b*cosb+c*cosa*sinb-a*sina*sinb;
z=c*cosa*cosb-a*sina*cosb-b*sinb;
k=persp/(persp-z)
n=s[ik++];
dw=size*k*this.w;
dh=size*k*this.h
n.zIndex=z;
n.pixelLeft=cw2+k*x-dw/2;
n.pixelTop=ch2+k*y-dh/2;
n.pixelWidth=dw;
n.pixelHeight=dh;

k=persp/(persp+z)
n=s[ik++];
dw=size*k*this.w;
dh=size*k*this.h
n.zIndex=-z;
n.pixelLeft=cw2+-k*x-dw/2;
n.pixelTop=ch2+-k*y-dh/2;
n.pixelWidth=dw;
n.pixelHeight=dh;
b*=-1;
}
a*=-1;
}
}
}

function ball(minrad, maxrad, dr, dtheta, dphi, container, srcimg){
var i;
var img=new Array();

this.ss=new Array();
this.rad=(maxrad+minrad)/2;
this.drad=(maxrad-minrad)/2;
this.df=dr;
this.dtheta=dtheta;
this.dphi=dphi;
this.w=srcimg.width;
this.h=srcimg.height;
for(i=0;i<48;i++){
img[i]=document.createElement("img");
img[i].setAttribute("src",srcimg.src);
img[i].setAttribute("unselectable","on");
img[i].style.setAttribute("position","absolute");
container.appendChild(img[i]);
this.ss[i]=img[i].style;
}
this.anim=rotball3_2;
ob.push(this);
}

function omd(){
document.body.onmousemove=omm;
dragging=true;
dragstartx=window.event.clientX+document.body.scrollLeft;
dragstarty=window.event.clientY+document.body.scrollTop;
dragstarta=ta;
dragstartb=tb;
dragx=0;
dragy=0;
}

function omu(){
document.body.onmousemove="";
dragging=false;
}

function omm(){
dragx=window.event.clientX+document.body.scrollLeft-dragstartx;
dragy=window.event.clientY+document.body.scrollTop-dragstarty;
var m=window.event.button;
if((m & 1)==0)omu();
}

function rnd(min, max){
return(min+Math.random()*(max-min));
}

</script>

</body>
</html>

» Scripts de Gi & moteurs de scripts de Gérard Ferrandez
» Scripts & moteurs de scripts : de Ginette Villeneuve
» Windows XP et les scripts
» Liens de scripts
» Scripts à 5 images