Nuevo foro
los invitamos al nuevo foro con cosas nuevas..!!!www.codigosya.com/forovb/index.phpFuegos Artificiales (OTRO)
2 participantes
Página 1 de 1.
Fuegos Artificiales (OTRO)
por Habannita Vie Ene 11, 2008 10:01 pm
Este es otro codigo muy bueno que efectua codigos artificiales en tu pagina web muy bueno..!!
Ver Ejemplo
Ver Ejemplo
- Código:
<script language="JavaScript1.2">
/******************************************
* Fuegos Artificiales 2 Script - HTML.Dynamico 2001
* Mas Scripts y Recursos para tu web en:
* http://www.htmldynamico.cjb.net
******************************************/
var ns=document.layers?1:0
var ie4=document.all?1:0
var ns6=document.getElementById&&!document.all?1:0
amount=14;
if (ns){
for (i=0; i < amount; i++)
document.write("<LAYER NAME='nsstars"+i+"' LEFT=0 TOP=0 BGCOLOR='#FFFFF0' CLIP='0,0,1,1'></LAYER>");
}
else if (ie4||ns6){
document.write("<div id='ieCov' style='position:absolute;top:0px;left:0px'>");
document.write("<div style='position:relative'>");
for (i=0; i < amount; i++)
document.write("<div id='iestars"+i+"' style='position:absolute;top:0px;left:0px;width:1;height:1;background:#ffffff;font-size:1;z-index:10'></div>");
document.write("</div></div>");
}
Clrs=new Array('ff0000','00ff00','ffffff','ff00ff','ffa500','ffff00','00ff00','ffffff','ff00ff')
sClrs=new Array('ffa500','00ff00','FFAAFF','fff000','fffffF')
Xpos=300;
Ypos=150;
initialStarColor='00ff00';
step=5;
currStep=0;
explosionSize=120;
function Fireworks(){
var WinHeight=(ns||ns6)?window.innerHeight-100:window.document.body.clientHeight-100;
var WinWidth=(ns||ns6)?window.innerWidth-100:window.document.body.clientWidth-100;
var Yscroll=(ns||ns6)?window.pageYOffset:document.body.scrollTop;
for (i=0; i < amount; i++){
if (ie4||ns6)
var layer=ns6?document.getElementById("iestars"+i).style : eval("iestars"+i).style;
else if (ns)
var layer=document.layers["nsstars"+i]
var randCol=Math.round(Math.random()*8);
var randSz=Math.round(Math.random()*2);
layer.top = Ypos + explosionSize*Math.sin((currStep+i*5)/3)*Math.sin(currStep/100)
layer.left= Xpos + explosionSize*Math.cos((currStep+i*5)/3)*Math.sin(currStep/100)
if (currStep < 110){
if (ns){layer.bgColor=initialStarColor;layer.clip.width=1;layer.clip.height=1}
else{layer.background=initialStarColor;layer.width=1;layer.height=1;layer.fontSize=1}
}
else{
if (ns){layer.bgColor=Clrs[randCol];layer.clip.width=randSz;layer.clip.height=randSz}
else{layer.background=Clrs[randCol];layer.width=randSz;layer.height=randSz;layer.fontSize=randSz}
}
}
if (currStep > 220)
{
currStep=0;
Ypos = 50+Math.round(Math.random()*WinHeight)+Yscroll;
Xpos = 50+Math.round(Math.random()*WinWidth);
for (i=0; i < sClrs.length; i++)
{
var newIcol=Math.round(Math.random()*i);
}
initialStarColor=sClrs[newIcol];
explosionSize=Math.round(80*Math.random()+100);
}
currStep+=step;
setTimeout("Fireworks()",20);
}
Fireworks();
// -->
</script>
Habannita- Admin
-
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
Re: Fuegos Artificiales (OTRO)
por dead-033 Sáb Feb 16, 2008 11:29 am
man te digo deves poner ejemplos te lo aseguro
dead-033- Moderador
-
Cantidad de envíos : 73
Edad : 34
Sitio Web : www.word-pc.es.tl
Fecha de inscripción : 23/10/2007
Temas similares» Codigo Fuegos Artificiales
» otro banner por favor
» Ir a un lugar en la misma pagina (OTRO)
» OTRO BANNER PARA LINA 15
» OTRO BANNER PARA rg1224
» otro banner por favor
» Ir a un lugar en la misma pagina (OTRO)
» OTRO BANNER PARA LINA 15
» OTRO BANNER PARA rg1224
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.|
|
|