网络安全检测|网络安全服务|网络安全扫描-香港墨客投资移动版

主页 > 业界资讯 > 网络渗透测试

黑客帝国代码雨源代码vbs(黑客帝国代码雨动态壁纸)

黑客帝国--绿色字母雨代码--知道的进

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)