廢話少說，直接先上一個特效代碼
@echo offmode con cols=42 lines=20color 02
set m=1set v=1
set code==^^^%%%^:!$#^>^:=~*()@"'`;\|-_+?,.ghijklmnopqrstuvwxyz0123456789abcdef
setlocal enabledelayedexpansion
:begin
set /a num=%random%%%40+1,num1=num,num=200/num
title 亂雨紛飛，當前雨量：%num1%
:lp
set /a a=%random%%%63,b=%random%%%%num%
set a=!code:~%a%,1!
if %b% equ 0 (set "b=!a!") else (set "b= ")
set str%m%=!str%m%!!b!
set /a n+=1
if %n% lss 40 goto lp
set /a x+=1,w+=1
if %x% equ 40 call :lop
clsfor /l %%i in (%m%,-1,%v%) do echo.!str%%i!
set /a m+=1
if %m% geq 20 set /a v+=1
if %w% equ 100 (set w=0goto begin) else (set n=0goto lp)
:lop
set /a a=%random%%%15+1
set a=!code:~-%a%,1!
color 0!a!set x=0
有小伙伴說了，為什么不把它改成下落 101010 的呢？那樣的話不是像黑客帝國里的畫面了碼？？？
好吧，我們來把他實現(xiàn)
@echo offmode con cols=42 lines=20color 02
setlocal enabledelayedexpansion
set code=123456789abcdef
set m=1set v=1
title 黑客帝國數(shù)碼雨 by bat-zw19750516
:begin
set /a a=%random%%%2,b=%random%%%3
if %b% neq 0 (set b=%a%) else (set "b= ")
set str=%str%%b%
set /a n+=1
if %n% lss 40 goto begin
set /a m+=1,x+=1
if %m% geq 20 set /a v+=1
set str%m%=%str%
clsfor /l %%i in (%m%,-1,%v%) do echo.!str%%i!
if %x% equ 20 call :lp
set str=set n=0
goto begin
:lp
set /a a=%random%%%15,x=0
set a=!code:~%a%,1!
color 0%a%
當然上面的是高手寫的，我們來看個新手簡單完成的樣子
@echo off
title 黑客帝國數(shù)碼雨效果
color 02
setlocal ENABLEDELAYEDEXPANSION
for /l %%i in (1,1,80) do (
set Down%%i=0
)
:heike
for /l %%j in (1,1,80) do (
set /a guxing%%j-=1
if !guxing%%j! LSS 0 (
set /a hanye%%j=!random!%%4
set /a guxing%%j=!random!%%15+10
)
if "!hanye%%j!" == "1" (
set /a shu=!random!%%2
set /p=!shu!NUL
) else (
set /p= NUL
)
)
goto heike
是不是對這種特效有了新的認識了呢，是不是立刻就想精通批處理了呢，努力吧，小伙子們。
您可能感興趣的文章:- bat實現(xiàn)的模仿黑客帝國里面的數(shù)碼雨
- 批處理 數(shù)碼雨代碼解釋
- 黑客帝國數(shù)字雨效果VC6源代碼分享
- jQuery模擬黑客帝國矩陣效果實例
- js仿黑客帝國字母掉落效果代碼分享
- JS實現(xiàn)黑客帝國文字下落效果
