| 
回帖0主题精华积分16218注册时间2008-9-12最后登录1970-1-1阅读权限90积分16218 
 | 
 
 
 楼主|
发表于 2013-1-26 17:56
|
显示全部楼层 
| 紫陌如烟 发表于 2013-1-22 12:38 滚动的文字框,渐现的人物~~~纯子老师的代码帖做的真是美妙绝伦~~~欣赏~~·问好
这个代码是许多年前一个朋友送我的!
 
 因为我先送了一个旋转立方体给他~!
 
 现在转送给大家
 复制代码<HTML xmlns:v>
<HEAD>
<TITLE>白衣墨痕生日快乐</TITLE>
<STYLE>
v\:*{behavior:url(#default#VML);}
</STYLE>
<script>
var exptime=0;endtime="/27";zhenlens=0;zhenlens2=0;
function statusreplace(){window.status="The FlashVml Play Time\'s "+exptime+endtime+" Seconds,An animation:"+zhenlens+",Milli-an animation:"+zhenlens2}
function statuschange(){
if(top.location==self.location)setInterval('exptime++;statusreplace()',1000)
}
</script>
<script id="myscript" language="javascript">
var archtml="";arcpos=0,arcbu=0.02,time1=null
function zhuan1(){
vml1.extrusion.backdepth="5pt";vml1.extrusion.color="black";vml1.extrusion.diffusity="1.1";vml1.extrusion.rotationangle="0,0";vml1.extrusion.on=true;time1=setInterval("zhuan2()",50)
}
var rotmxpos=1
function zhuan2(){
rotmxpos+=1;vml1.extrusion.rotationangle=rotmxpos+","+rotmxpos;vml1.Rotation+=rotmxpos
vml1.extrusion.color="rgb("+Math.round(Math.random()*255)+","+Math.round(Math.random()*255)+","+Math.round(Math.random()*255)+")"
if(rotmxpos>2000){clearInterval(time1);location.reload()}
}</script>
</HEAD>
<BODY background="http://www.hongrenju.com.cn/bbs/attachments/month_0902/20090213_8d4e84645b40d912fed5icICn3b7918G.jpg" bgcolor=ff0000>
<script>
function flashvml(){ //
setTimeout("zhenlens++;statusreplace();vml1.style.width=500;vml1.style.height=500;vml1.style.left=document.body.offsetWidth/2-125;vml1.style.top=document.body.offsetHeight/2-125;archtml=vml1.outerHTML;","12000");
setTimeout("zhenlens++;statusreplace();vml1.outerHTML=archtml.replace(/ arcsize \= ".*?"/g,' arcsize="0.5"');zhuan1()","16000");
setTimeout("zhenlens++;statusreplace();zhuan1()","27000");
}
</script>
<script>
var dzobj2=null,tuoldx=0,tuoldy=0,dzbuzhou=1
function dizhen(dzobj,zhenfu){ //
if(dzobj2!=dzobj){
if(dzobj2!=null){if(dzobj2==window)dzobj2.moveTo(tuoldx,tuoldy);else {dzobj2.style.left=tuoldx;dzobj2.style.top=tuoldy;}}
dzobj2=dzobj
if(dzobj==window){tuoldx=window.screenLeft;tuoldy=window.screenTop;}else{tuoldx=parseInt(dzobj.style.left);tuoldy=parseInt(dzobj.style.top);}
}
zhenfu2=Math.round(Math.random()*zhenfu)
if(dzobj!=window){
Math.random()>0.5?zhengui2="+":zhengui2="-";
if(dzbuzhou==1){eval("dzobj.style.left=tuoldx"+zhengui2+"zhenfu2")}
else if(dzbuzhou==2){eval("dzobj.style.top=tuoldy"+zhengui2+"zhenfu2")}
else if(dzbuzhou==3){dzobj.style.left=tuoldx}
else if(dzbuzhou==4){dzobj.style.top=tuoldy}
}else{
Math.random()>0.5?windowBy=zhenfu2:windowBy=-zhenfu2;
if(dzbuzhou==1){eval("window.moveBy("+windowBy+",0)")}
else if(dzbuzhou==2){eval("window.moveBy(0,"+windowBy+")")}
else if(dzbuzhou==3){window.moveTo(tuoldx+","+window.screenTop)}
else if(dzbuzhou==4){window.moveTo(tuoldx+","+tuoldy)}
}
dzbuzhou++;if(dzbuzhou==5)dzbuzhou=1
}
//
var objwid=0,objhei=0,cliptop=0,clipright=0,clipdown=0,clipleft=0,clipoldobj=null
function clipcool(clipobj,clipsudu,cliptopyes,cliprightyes,clipdownyes,clipleftyes,clipwidth,clipheight){
if(clipoldobj!=clipobj){
objwid=clipobj.offsetWidth;objhei=clipobj.offsetHeight;
clipobj.style.clip="rect(0 "+objwid+" "+objhei+" 0)"
cliptop=0;clipright=objwid;clipdown=objhei;clipleft=0
clipoldobj=clipobj
}
if(cliprightyes==true)objwid-=clipsudu
if(clipdownyes==true)objhei-=clipsudu
if(cliptopyes==true)cliptop+=clipsudu
if(clipleftyes==true)clipleft+=clipsudu
clipobj.style.clip="rect("+cliptop+"px "+objwid+"px "+objhei+"px "+clipleft+"px)"
}
function flashvml2(){ //
FlashVmlIntervalVar0="zhenlens2++;statusreplace();vml1.style.top=parseInt(vml1.style.top)+1;vml1.style.height=parseInt(vml1.style.height)+1;";
setTimeout("FlashVmlIntervalTime0=setInterval(FlashVmlIntervalVar0,20)",500);
setTimeout("clearInterval(FlashVmlIntervalTime0)",3000);
FlashVmlIntervalVar1="zhenlens2++;statusreplace();vml1.style.top=parseInt(vml1.style.top)+1;if(parseInt(vml1.style.height)>2){vml1.style.height=parseInt(vml1.style.height)-1;}";
setTimeout("FlashVmlIntervalTime1=setInterval(FlashVmlIntervalVar1,20)",3000);
setTimeout("clearInterval(FlashVmlIntervalTime1)",6000);
FlashVmlIntervalVar2="zhenlens2++;statusreplace();vml1.style.left=parseInt(vml1.style.left)-1;vml1.style.width=parseInt(vml1.style.width)+2;";
setTimeout("FlashVmlIntervalTime2=setInterval(FlashVmlIntervalVar2,20)",6000);
setTimeout("clearInterval(FlashVmlIntervalTime2)",9000);
FlashVmlIntervalVar3="zhenlens2++;statusreplace();vml1.style.top=parseInt(vml1.style.top)-1.5;vml1.style.height=parseInt(vml1.style.height)+3;";
setTimeout("FlashVmlIntervalTime3=setInterval(FlashVmlIntervalVar3,20)",9000);
setTimeout("clearInterval(FlashVmlIntervalTime3)",11900);
FlashVmlIntervalVar4="zhenlens2++;statusreplace();arcpos+=arcbu;vml1.outerHTML=archtml.replace(/ arcsize \= ".*?"/g,' arcsize="'+arcpos+'"')";
setTimeout("FlashVmlIntervalTime4=setInterval(FlashVmlIntervalVar4,20)",13000);
setTimeout("clearInterval(FlashVmlIntervalTime4)",15900);
FlashVmlIntervalVar5="zhenlens2++;statusreplace();vml1.fillcolor=='red'?vml1.fillcolor='white':vml1.fillcolor='red';";
setTimeout("FlashVmlIntervalTime5=setInterval(FlashVmlIntervalVar5,50)",17000);
setTimeout("clearInterval(FlashVmlIntervalTime5)",20000);
FlashVmlIntervalVar6="zhenlens2++;statusreplace();vml1.fillcolor='rgb('+Math.round(Math.random()*255)+','+Math.round(Math.random()*255)+','+Math.round(Math.random()*255)+')';";
setTimeout("FlashVmlIntervalTime6=setInterval(FlashVmlIntervalVar6,50)",20000);
setTimeout("clearInterval(FlashVmlIntervalTime6)",23000);
FlashVmlIntervalVar7="zhenlens2++;statusreplace();vml1.dizhen=true;dizhen(vml1,15);";
setTimeout("FlashVmlIntervalTime7=setInterval(FlashVmlIntervalVar7,20)",23000);
setTimeout("clearInterval(FlashVmlIntervalTime7)",26000);
}
</script>
<script>
//
if(screen.width<1024||screen.height<768){alert("本页最佳适应于大于1024*768显示器分辨率的环境工作,检测您的分辨率低于这个数值,请在[控制面板--显示]中调整为1024*768或大于这个分辨率,而后刷新本页,即可看到最佳效果");}
var loadtime=null,loadtext='if(document.readyState!="complete"){window.status=window.status+"."}else{clearInterval(loadtime);window.status=""}';
window.status=''
loadtime=setInterval(loadtext,200)
function window.onload(){
flashvml();
flashvml2();
statuschange();
}
</script>
<v:roundrect id=vml1 style="Z-INDEX:3005;LEFT:450px;WIDTH:2px;POSITION:absolute;TOP:30px;HEIGHT:0px" arcsize="0" filled="t" fillcolor="black" strokecolor="black" strokeweight=".75pt">
<v:fill src="http://www.9yfeng.com/data/attachment/forum/201301/21/091623wfgd7fjgjbnbxkkn.jpg" type="frame" opacity=".5"/>
</v:roundrect>
<script> //try{var bodyobjs=document.body.children;for(i=0;i<bodyobjs.length;i++){if(bodyobjs.yincang!=null)bodyobjs.style.display='none';}}catch(e){}</script>
<v:curve id="circle" style="Z-INDEX:1;LEFT:10;POSITION:absolute;TOP:80" from="0,0" to="216.5pt,-1.5pt" filled="t" fillcolor="#0000FF" onmouseover="move()" stroked="f">
<v:extrusion on="t" backdepth="80pt" color="#ff0000" diffusity="0.1"/>
<v:path textpathok="t"/>
<v:textpath style="FONT-SIZE:20;FONT-FAMILY:华文新魏" on="t" fitpath="t" string="白衣墨痕生日快乐"/>
<v:fill src="http://tech.china.com/zh_cn/home4u/sucai/gifanimation/line/0024.gif" type="frame" opacity="1.0"/>
<script>
var canmove=false;
function move()
{
circle.style.position="absolute";
canmove=true;
document.onmousemove=new Function("if(canmove){circle.style.posLeft=event.x;circle.style.posTop=event.y;}");
}
document.onclick=new Function("canmove=false");
</script>
</v:curve>
<MARQUEE scrollAmount=2 direction=up height=600>
<DIV align=left>
<TABLE cellSpacing=2 cellPadding=4 background=http://tech.china.com/zh_cn/home4u/sucai/gifanimation/line/0024.gif>
<TBODY>
<TR>
<TD style="FILTER: chroma(color=#336699)">
<DIV align=center>
<TABLE id=table1 cellSpacing=20 borderColorDark=#ff0000 cellPadding=4 width="100%" align=left bgColor=#000000 borderColorLight=#ff0000 border=0>
<TBODY>
<TR>
<TD bgColor=#000000>
<CENTER><FONT face=隶书 color=#336699 size=6><B><B>
热 烈 祝 贺
白 衣 墨 痕
生 日 快 乐 
九月
有你真精彩
 纯子贺 2013-1-21
<P align=center>
</font></p>
</font></p>
</FONT></CENTER></B></B></TD></TR></TBODY></TABLE></DIV></TD></TR></TBODY></TABLE></DIV></MARQUEE>
<DIV style="LEFT: 600px; POSITION: absolute; TOP: 30px">
<EMBED style="FILTER: invert" height=74 width=500 type=application/x-shockwave-flash src=http://box.baidu.com/widget/flash/song.swf?name=遇上你是我的缘&artist=阿鲁阿卓&autoPlay=true&loop=true WMODE="opaque" AllowScriptAccess="samedomain"></EMBED></DIV>
<body oncontextmenu="window.event.returnValue=false" onkeypress="window.event.returnValue=false" onkeydown="window.event.returnValue=false" onkeyup="window.event.returnValue=false" ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false">
</BODY></HTML>
 | 
 |