Habannita
¿Quieres reaccionar a este mensaje? Regístrate en el foro con unos pocos clics o inicia sesión para continuar.
Nuevo foro
los invitamos al nuevo foro con cosas nuevas..!!!www.codigosya.com/forovb/index.php

Hojas de Otoño que caen

2 participantes

Ir abajo

Hojas de Otoño que caen Empty Hojas de Otoño que caen

Mensaje por Habannita Vie Ene 11, 2008 10:13 pm

Hace que aparescan unas hojas que caen por toda tu web




Código:
<script language="JavaScript1.2">

/******************************************
* Otoño Script - HTML.Dynamico 2001
* Mas Scripts y Recursos para tu web en:
* http://www.htmldynamico.cjb.net
******************************************/

//Pre-load your image below!
grphcs=new Array(6)
Image0=new Image();
Image0.src=grphcs[0]="al.gif";
Image1=new Image();
Image1.src=grphcs[1]="bl.gif"
Image2=new Image();
Image2.src=grphcs[2]="cl.gif"
Image3=new Image();
Image3.src=grphcs[3]="dl.gif"
Image4=new Image();
Image4.src=grphcs[4]="el.gif"
Image5=new Image();
Image5.src=grphcs[5]="fl.gif"

Amount=8; //Smoothness depends on image file size, the smaller the size the more you can use!
Ypos=new Array();
Xpos=new Array();
Speed=new Array();
Step=new Array();
Cstep=new Array();
ns=(document.layers)?1:0;
ns6=(document.getElementById&&!document.all)?1:0;

if (ns){
for (i = 0; i < Amount; i++){
var P=Math.floor(Math.random()*grphcs.length);
rndPic=grphcs[P];
document.write("<LAYER NAME='sn"+i+"' LEFT=0 TOP=0><img src="+rndPic+"></LAYER>");
}
}
else{
document.write('<div style="position:absolute;top:0px;left:0px"><div style="position:relative">');
for (i = 0; i < Amount; i++){
var P=Math.floor(Math.random()*grphcs.length);
rndPic=grphcs[P];
document.write('<img id="si'+i+'" src="'+rndPic+'" style="position:absolute;top:0px;left:0px">');
}
document.write('</div></div>');
}
WinHeight=(ns||ns6)?window.innerHeight:window.document.body.clientHeight;
WinWidth=(ns||ns6)?window.innerWidth-70:window.document.body.clientWidth;
for (i=0; i < Amount; i++){                                                               
 Ypos[i] = Math.round(Math.random()*WinHeight);
 Xpos[i] = Math.round(Math.random()*WinWidth);
 Speed[i]= Math.random()*5+3;
 Cstep[i]=0;
 Step[i]=Math.random()*0.1+0.05;
}
function fall(){
var WinHeight=(ns||ns6)?window.innerHeight:window.document.body.clientHeight;
var WinWidth=(ns||ns6)?window.innerWidth-70:window.document.body.clientWidth;
var hscrll=(ns||ns6)?window.pageYOffset:document.body.scrollTop;
var wscrll=(ns||ns6)?window.pageXOffset:document.body.scrollLeft;
for (i=0; i < Amount; i++){
sy = Speed[i]*Math.sin(90*Math.PI/180);
sx = Speed[i]*Math.cos(Cstep[i]);
Ypos[i]+=sy;
Xpos[i]+=sx;
if (Ypos[i] > WinHeight){
Ypos[i]=-60;
Xpos[i]=Math.round(Math.random()*WinWidth);
Speed[i]=Math.random()*5+3;
}
if (ns){
document.layers['sn'+i].left=Xpos[i];
document.layers['sn'+i].top=Ypos[i]+hscrll;
}
else if (ns6){
document.getElementById("si"+i).style.left=Math.min(WinWidth,Xpos[i]);
document.getElementById("si"+i).style.top=Ypos[i]+hscrll;
}
else{
eval("document.all.si"+i).style.left=Xpos[i];
eval("document.all.si"+i).style.top=Ypos[i]+hscrll;
}
Cstep[i]+=Step[i];
}
setTimeout('fall()',20);
}

window.onload=fall
//-->
</script>


Última edición por el Vie Feb 08, 2008 2:50 pm, editado 1 vez
Habannita
Habannita
Admin
Admin

Masculino
Cantidad de envíos : 363
Edad : 34
Sitio Web : http://www.codigosya.com/
Foro : https://habannita.forosactivos.net/
Fecha de inscripción : 12/07/2007

Estados
Hoy me siento: Feliz
Comentario: www.codigosya.com

Volver arriba Ir abajo

Hojas de Otoño que caen Empty Re: Hojas de Otoño que caen

Mensaje por Koni! Dom Feb 03, 2008 7:43 am

Sigo sin saber donde poner este codigo en el portal Sad

Creo un nuevo modulo pero se queda en blanco, no muestra nada.. ni caen cosas..


tengo el mismo foro que ustedes
Koni!
Koni!
Bebé
Bebé

Femenino
Cantidad de envíos : 9
Edad : 33
Fecha de inscripción : 03/02/2008

Volver arriba Ir abajo

Hojas de Otoño que caen Empty Re: Hojas de Otoño que caen

Mensaje por Habannita Dom Feb 03, 2008 6:37 pm

Koni! escribió:Sigo sin saber donde poner este codigo en el portal Sad

Creo un nuevo modulo pero se queda en blanco, no muestra nada.. ni caen cosas..


tengo el mismo foro que ustedes

ah dejame ver de que manera soluciono eso porque no le he intentado para foro cuando lo tenga te aviso
Habannita
Habannita
Admin
Admin

Masculino
Cantidad de envíos : 363
Edad : 34
Sitio Web : http://www.codigosya.com/
Foro : https://habannita.forosactivos.net/
Fecha de inscripción : 12/07/2007

Estados
Hoy me siento: Feliz
Comentario: www.codigosya.com

Volver arriba Ir abajo

Hojas de Otoño que caen Empty Re: Hojas de Otoño que caen

Mensaje por Koni! Jue Feb 07, 2008 8:32 am

Okiz, esperando noticias
Koni!
Koni!
Bebé
Bebé

Femenino
Cantidad de envíos : 9
Edad : 33
Fecha de inscripción : 03/02/2008

Volver arriba Ir abajo

Hojas de Otoño que caen Empty Re: Hojas de Otoño que caen

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.