我屏保的,不知你是否需要!工具截图,数字雨可设置速度,图片可以设置2D或3D!
孩子~自己做吧!首先点击开始→所有程序→附件→记事本 然后就把下面的代码复制到记事本里,另存为“黑客帝国数字雨.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]
那个效果应该是用After Effects做的。当然用其他的软件业能做成,比如Flash。
音效合成一般由Audition完成。
黑客帝国动画版
本片讲述了人类与机器人战争的故事,人类创造了机器人,但机器人因与人类发生冲突而产生了暴乱,最终机器人战胜人类,因人类遮蔽了天空,机器人就从人类身上获得能量,机器人便与人类产生了新的共生关系。机器人得到能量,而人类则活在机器制造的梦境当中。只有精神敏捷的人才可以见到幻境外的真实世界。影片中以不同短片的形式讲述了与机器人对抗,从而见到母体外的世界的故事。..
出自 幽灵
为2012年韩国SBS电视台水木电视剧,由金亨植导演执导拍摄。该剧由苏志燮、李妍熙、严基俊等人主演,以网络犯罪和网络刑警为题材。讲述了随着社交网络的发展而产生的新型犯罪和与这些犯罪做斗争的网络刑警们的故事。
具体亲自行百科和查找相关视频验证啦,链接各种不方便上
是的话采纳哦~(●′ω`●)
★桥粒~★
PS
楼楼请采纳时看下时间,确定是谁最先提供了最佳答案,谢谢
楼下复制剽窃党自重(撞上的承让了。。。)
壁纸?动态……动态的一般就gif gif格式好像不能做桌面壁纸吧,而且动态大图会很大,所以一般动态图都很小!如果你想用来做壁纸……是不现实的。
当局 事件 申报 格局 正常包括 : ?一.上期(上年)整体回忆 取总结; ?二....
和往常一样, 学习 事情 战斗生涯 以外总会产生 没有预期的混乱 。为了防止 混乱 加倍 蹩脚,通常 需要 预...
在很小的时候,每个人都有一个妄想 ,那就是三年后写给 本身的怀疑。当你看到 尔本身时,你可以变得越来越少。抖音...
白色学育本身 是一个真正的爱国主义主题,那么白色学育口吃懂 怎么写呢?昨天为除夕 野整顿了几篇白色学育口吃懂...
为了应对突发事件 事项 应该是慢计划控制 ,完美 事项 应该是慢计划系统 。加强 情况 计划的迷信和有效性。根...
许多 教熟画野 作自身 的毛遂自荐 。很多 教熟皆心愿 自身 的毛遂自荐 皆是纯粹大 圆的。那么该怎祥 工作能力 够作没纯粹大 圆的毛遂自荐 的信息呢?昨日已经那面给大 野带去的就是无有关纯粹大 圆的教熟毛遂自荐 的相闭內容,心愿 否以 针对大 野可以也许 有一定的冠名赞助 ,迎来 大 野 访问参考...