黑客帝国代码雨源代码vbs(黑客帝国代码雨动态壁纸)
时间:2023-03-02 07:30 来源:网络整理 作者:默认发布 点击:次
黑客帝国--绿色字母雨代码--知道的进 BODY script language="JavaScript" !-- if (document.all){ Cols=6; Cl=24;//Space's are included so real length is 48! Cs=10; Ts=10; Tc='#008800'; Tc1='#00ff00'; MnS=20; MxS=30; I=Cs; Sp=new Array();S=new Array();Y=new Array(); C=new Array();M=new Array();B=new Array(); RC=new Array();E=new Array();Tcc=new Array(0,1); document.write("div"); document.write("div"); for(i=0; i Cols; i++){ S[i]=I+=Cs; document.write("div/div"); } document.write("/div/div"); for(j=0; j Cols; j++){ RC[j]=1+Math.round(Math.random()*Cl); Y[j]=0; Sp[j]=Math.round(MnS+Math.random()*MxS); for(i=0; i RC[j]; i++){ B[i]=''; C[i]=Math.round(Math.random()*1)+' '; M[j]=B[0]+=C[i]; } } function Cycle(){ Container.style.top=window.document.body.scrollTop; for (i=0; i Cols; i++){ var r = Math.floor(Math.random()*Tcc.length); E[i] = 'font color='+Tc1+''+Tcc[r]+'/font'; Y[i]+=Sp[i]; if (Y[i] window.document.body.clientHeight){ for(i2=0; i2 Cols; i2++){ RC[i2]=1+Math.round(Math.random()*Cl); for(i3=0; i3 RC[i2]; i3++){ B[i3]=''; C[i3]=Math.round(Math.random()*1)+' '; C[Math.floor(Math.random()*i2)]=' '+' '; M[i]=B[0]+=C[i3]; Y[i]=-Ts*M[i].length/1.5; A[i].style.visibility='visible'; } Sp[i]=Math.round(MnS+Math.random()*MxS); } } A[i].style.top=Y[i]; A[i].innerHTML=M[i]+' '+E[i]+' '; } setTimeout('Cycle()',20) } Cycle(); } // -- /script 演示地址: 注:必须要有body标签~ 怎么制作VBE代码?这个代码有点像黑客帝国里的'数字雨' 在桌面上创建一个--文本文档--,复制下面的代码,保存,把后缀名改为.vbs ------------------------------------------------------------------------------------------------------ ------------------------------------------------------------------------------------------------------ @echo offsetlocal EnableDelayedExpansioncolor 0amode con: cols=80 lines=26 set a=1234567890 10 1 01 1 01 10 1 1 1 1 10 1 101 10 1 01 10 1 01010 1 10 1 1 set sec=%time:~6,4% :loop set /a num1=!random!%%80,num2=!random!%%80,num3=!random!%%80,num4=!random!%%80,num5=!random!%%80,num6=!random!%%80,num7=!random!%%80,num8=!random!%%80,num9=!random!%%80,num10=!random!%%80,num11=!random!%%80,num12=!random!%%80,num13=!random!%%80,num14=!random!%%80,num15=!random!%%80,num16=!random!%%80,num17=!random!%%80,num18=!random!%%80,num19=!random!%%80,num20=!random!%%80,num21=!random!%%80,num22=!random!%%80,num23=!random!%%80,num24=!random!%%80,num25=!random!%%80,num26=!random!%%80,num27=!random!%%80 ( set /a looptime+=1 if not "%time:~6,2%"=="%sec%" ( set sec=%time:~6,2%title !looptime! loop/1sec" set/a looptime=0 ) set nub1=!a:~-%num1%,1!set nub2=!a:~-%num2%,1!set nub3=!a:~-%num3%,1!set nub4=!a:~-%num4%,1!set nub5=!a:~-%num5%,1!set nub6=!a:~-%num6%,1!set nub7=!a:~-%num7%,1!set nub8=!a:~-%num8%,1!set nub9=!a:~-%num9%,1!set nub10=!a:~-%num10%,1!set nub11=!a:~-%num11%,1!set nub12=!a:~-%num12%,1!set nub13=!a:~-%num13%,1!set nub14=!a:~-%num14%,1!set nub15=!a:~-%num15%,1!set nub16=!a:~-%num16%,1!set nub17=!a:~-%num17%,1!set nub18=!a:~-%num18%,1!set nub19=!a:~-%num19%,1!set nub20=!a:~-%num20%,1!set nub21=!a:~-%num21%,1!set nub22=!a:~-%num22%,1!set nub23=!a:~-%num23%,1!set nub24=!a:~-%num24%,1!set nub25=!a:~-%num25%,1!set nub26=!a:~-%num26%,1!set nub27=!a:~-%num27%,1! set "c1=%nub1% %nub2% %nub3% %nub4% %nub5% %nub6% %nub7% %nub8% %nub9% %nub10% %nub11% %nub12% %nub13% %nub14% %nub15% %nub16% %nub17% %nub18% %nub19% %nub20% %nub21% %nub22% %nub23% %nub24% %nub25% %nub26% %nub27% " )nul clsset/p=!c1!!c2!!c3!!c4!!c5!!c6!!c7!!c8!!c9!!c10!!c11!!c12!!c13!!c14!!c15!!c16!!c17!!c18!!c19!!c20!!c21!!c22!!c23!!c24!!c25!c26!nul ( set c2=%c1%set c3=%c2%set c4=%c3%set c5=%c4%set c6=%c5%set c7=%c6%set c8=%c7%set c9=%c8%set c10=%c9%set c11=%c10%set c12=%c11%set c13=%c12%set c14=%c13%set c15=%c14%set c16=%c15%set c17=%c16%set c18=%c17%set c19=%c18%set c20=%c19%set c21=%c20%set c22=%c21%set c23=%c22%set c24=%c23%set c25=%c24% goto :loop )nul 谁能帮我做一个像黑客帝国里的数据雨的批处理文件?这个真心没有技术含量 无非就是随机数+for 全屏可以用mode con调 不能关掉BAT的话要用命令行工具 @echo off mode con: cols=43 lines=30 setlocal enabledelayedexpansion color 0a :start for %%a in (a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12,a13,a14,a15,a16,a17,a18,a19,a20) do ( set /a %%a=!random!%%2 ) echo %a1% %a2% %a3% %a4% %a5% %a6% %a7% %a8% %a9% %a10% %a11% %a12% %a13% %a14% %a15% %a16% %a17% %a18% %a19% %a20% for /l %%i in (1,1,100) do (echo. nul) goto start (责任编辑:admin) |