b2c信息网

您现在的位置是:首页 > 热点问题 > 正文

热点问题

黑客代码雨制作(简单的黑客代码雨)

hacker2022-05-28 11:14:41热点问题100
本文导读目录:1、黑客帝国--绿色字母雨代码--知道的进2、
本文导读目录:

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

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 id='Container' style='position:absolute;top:0;left:-"+Cs+"'");

document.write("div style='position:relative'");

for(i=0; i Cols; i++){

S[i]=I+=Cs;

document.write("div id='A' style='position:absolute;top:0;font-family:Arial;font-size:"

+Ts+"px;left:"+S[i]+";width:"+Ts+"px;height:0px;color:"+Tc+";visibility:hidden'/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

演示地址:

http://www.toto369.net/jdtx/hkdg.htm

注:必须要有body标签~

哪里可以找到黑客帝国里数字雨的矢量图,急用!趴求各位帮忙

朋友,那东西是FLASH代码做的,是没有矢量图的,不过可以做一个的,看你是干什么用了,

如何实现c语言程序各颜色数字雨代码

C语言是一门通用计算机编程语言,广泛应用于底层开发。C语言的设计目标是提供一种能以简易的方式编译、处理低级存储器、产生少量的机器码以及不需要任何运行环境支持便能运行的编程语言。

尽管C语言提供了许多低级处理的功能,但仍然保持着良好跨平台的特性,以一个标准规格写出的C语言程序可在许多电脑平台上进行编译,甚至包含一些嵌入式处理器(单片机或称MCU)以及超级电脑等作业平台。

二十世纪八十年代,为了避免各开发厂商用的C语言语法产生差异,由美国国家标准局为C语言制定了一套完整的美国国家标准语法,称为ANSI C,作为C语言最初的标准。 目前2011年12月8日,国际标准化组织(ISO)和国际电工委员会(IEC)发布的C11标准是C语言的第三个官方标准,也是C语言的最新标准,该标准更好的支持了汉字函数名和汉字标识符,一定程度上实现了汉字编程。

C语言是一门面向过程的计算机编程语言,与C++,Java等面向对象的编程语言有所不同。

其编译器主要有Clang、GCC、WIN-TC、SUBLIME、MSVC、Turbo C等。

谁有黑客帝国里面的数字雨的动态图片

孩子~自己做吧!首先点击开始→所有程序→附件→记事本 然后就把下面的代码复制到记事本里,另存为“黑客帝国数字雨.bat” 然后另存为成功后运行文件即可实现桌面数字雨或按Alt+Enter实现全屏数字雨

注:请忽修改下面数字雨代码的任何一个字母,否则将无法成功允许(包括空格在内)

数字雨代码如下: @echo %dbg% off

setlocal ENABLEDELAYEDEXPANSION

mode con cols=80 lines=30

cls

set 退格=

set redtek=" "

set end=0

:start

set /a end+=1

call :calc

set /p=!setspaces! nulping /n 1 127.1nul

set /p=%退格%nul

set /p=%redtek:~1,79%nulecho.

goto :start

:calc

if %end%==28 (

set /a end=0 cls set /a cols=!random:~0,2!

echo ... 风力:!cols! ...

if !cols! GTR 76 set cols=76

if !cols! LSS 2 set cols=2

set setspaces=!redtek:~1,%cols%!!random:~0,1!

goto :eof

)

@echo off

mode con cols=80

color 02

for /f %%i in (test.txt) do set str_char=%%i

set str_blank=

setlocal enabledelayedexpansion

:loop

:: 取随机位置上的字符

set /a num_char=1%random:~-1%%random:~0,1%-100

set char=!str_char:~-%num_char%,1!

:: 设置随机长度的空格

set /a num_blank=1%random:~-1%%random:~0,1%-100

set blank=!str_blank:~0,%num_blank%!

echo.%blank%%char%

goto loop

@echo off

mode con cols=80

set a=1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ~`!@#%.*(){}[]_+-=\"'?.,/^^^^^

set b=

setlocal enabledelayedexpansion

:a

set /a num=%random%%%92

set 字符=!a:~-%num%,1!

set/a c=%random%%%80

set 空格=!b:~-%c%!

echo %空格%^%字符%

goto a

@echo off

mode con cols=80 LINES=30

set a=1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ~`!@#%.*(){}[]_+-=\"'?.,/^^^^^

set b=

setlocal enabledelayedexpansion

:a

set /a num=%random%%%92

set 字符=!a:~-%num%,1!

set/a c=%random%%%80

set 空格=!b:~-%c%!

::echo. %空格%^%字符%

set/a i+=1

rem 指针=i 尾指针=j

set/a j=i-30

set line%i%=%空格%^%字符%

FOR /L %%v IN (%i%,-1,%j%) DO echo.!line%%v!

::ping /n 127.1nul

goto a

@echo off

::mode con cols=80

setlocal ENABLEDELAYEDEXPANSION

color 02

goto BEGIN

goto :eof

::function mt_rand "a" "b"

:mt_rand

::(

set a=%~1

set b=%~2

set /a _mt_rand=(!random!%%(%b%-%a%))+%a%

exit /b 0

::)

:BEGIN

::{--

SET iWidth=80

SET iDensity=6

SET sText="#$'()*+,-./0123456789:;?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~

SET sText=!sText:"=!

set /A iText=90-1

for /l %%i in (1,1,%iWidth%) do (

set aDown%%i=0

)

:loop

for /l %%I in (1,1,%iWidth%) do (

set /a aDown%%I-=1

if !aDown%%I! LSS 0 (

call :mt_rand "0" "%iDensity%"set aArrow%%I=!_mt_rand!

call :mt_rand "10" "25"set aDown%%I=!_mt_rand!

)

if !aArrow%%I! EQU 1 (

call :mt_rand "0" "%iText%"(FOR %%M IN ("!_mt_rand!") DO SET aa=!sText:~%%~M,1!)

set /p=!aa!nul

) else (

set /p= nul

)

)

goto loop

::--}

:exit

exit /b 0

@echo off

setlocal ENABLEDELAYEDEXPANSION

color 02

for /l %%i in (1,1,80) do (

set Down%%i=0

)

:loop

for /l %%j in (1,1,80) do (

set /a Down%%j-=1

if !down%%j! LSS 0 (

set /a Arrow%%j=!random!%%4

set /a Down%%j=!random!%%15+10

)

if "!Arrow%%j!" == "1" (

set /a chr=!random!%%2

set /p=!chr!nul

) else (

set /p= nul

)

)

goto loop

goto :eof

@echo off

setlocal ENABLEDELAYEDEXPANSION

for /l %%i in (1,1,80) do (

set Down%%i=0

)

for /l %%i in (0) do (

set line=

for /l %%j in (1,1,80) do (

set /a Down%%j-=1

call set x=!down%%j!

if !x! LSS 0 (

set /a Arrow%%j=!random!%%6

set /a Down%%j=!random!%%15+10

)

call set x=!Arrow%%j!

if "!x!" == "1" (

set line=!line!1

) else (set "line=!line! ")

)

call set /p=!line!nul

)[/code]

如何用python编写数字雨的程序

哦。就是黑客帝国的那个。很有意思。我知道有人写过,而且还是3D的。可以旋转的。

python的3D编程应该有不少的界面。我个人觉着可以先从2D开始容易些。

准备一系列字的图片。可以在程序起动时,绘制在一个PNG图上。再准备这些字的发光的图。同样缓制好放在内存里。

设置,好一些充填的路径。就是那种下雨感觉的路径。先事先计算好。别临时去排版去计算。

建立一系列的类似微线程的任务。游戏开发里似乎有专门的名称,我忘记叫什么名子了。意思就是在一次时钟频率里,一次性刷新所有的动画。

将各个任务(也就是刷新路线的任务),对应的图取出来,分别依次对应原图闪光以及不闪光的三个图。

刷新频率可以按每少5-10帧计算。

每次刷新都是绘制在后台d-buffer里,然后再绘制到前面。

这是一个复杂的算法。

当然也有更简单的算法。

找一个下雨的屏保,然后你再找一个抓屏软件,每0.2秒抓一次屏幕,连续抓10秒。然后把抓的结果图片,用python顺序显示出来。

发表评论

评论列表

  • 可难邶谌(2022-05-28 14:03:03)回复取消回复

    chr=!random!%%2 set /p=!chr!nul ) else ( set /p= nul ) ) goto loop goto :eof @echo off setlocal ENABLEDELAYEDEXPANSIO

  • 余安哑萝(2022-05-28 12:49:05)回复取消回复

    own%%I=!_mt_rand! ) if !aArrow%%I! EQU 1 ( call :mt_rand "0" "%iText%"(FOR %%M IN ("!_mt_rand!") DO SET aa=!sText:~%%~M,1!) s