壁纸?动态……动态的一般就gif gif格式好像不能做桌面壁纸吧,而且动态大图会很大,所以一般动态图都很小!如果你想用来做壁纸……是不现实的。
软件名称: WinMatrix XP 2.30
汉化补丁:HA-wmatrix230-NW.zip
完成日期:2003年8月23日
运行环境:Win9x/Me/NT/2000/XP
软件介绍:
这个软件将为你的桌面带来神奇的矩阵效果。什么是矩阵?看过黑客帝国吗?还是请下载看看吧,以壁纸的形式实现动态桌面效果。很酷的!
孩子~自己做吧!首先点击开始→所有程序→附件→记事本 然后就把下面的代码复制到记事本里,另存为“黑客帝国数字雨.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]
你去下载个好桌道美化软件里面就有这个屏保了。而且还有其他一些精品壁纸或者屏保。你可以试试
你可以使用些小工具放在桌面上,比如表啊啥的如果要放个动态的图片那么将非常占内存开机会很慢而且机子运行也会慢很多所有我建议你不要你弄动态图片,在桌面添加几个小工具就好了给你个网站你自己去设计你的个性桌面吧
;imgrefurl=;h=525w=700tbnid=zF_rnF6MIjFafM:docid=qXXowBt1VhUN1Mei=Ju__VbPIF4KY0gT9l47oBgtbm=ischclient=ms-android-lenovoved=0CBoQMygAMABqFQoTCLPzjfeHiMgCFQKMlAod_YsDbQ
汽车的出现 不仅方便 人们的无尽战争连接,而且成为一种社会结构 外弗成 或缺乏丰富多彩的身份。昨天,弗成 否认...
物流 是为各单位 本能功能 运动 一般运行要求的 型物流 。作为物流和医院 物流,我们怎么能不,我们怎么能不总...
许多 病人在治疗后住院 ,他们会读写一个感激 怀疑我们,那些医生 ,它真的写感激 怀疑 ,我们可以 知道 人,...
毛遂自荐 快让吗?别人认识 到自己 ,那么如何在简历外写自己 的毛遂自荐 呢?给除夕带来的是简历外无关毛遂自荐...
亲爱的先生 支到尔写给生写了一篇关于 是否有点奇怪的文章 ,每天平凡 如此光滑 的尔会给你写问题。它真的很多...
每年的行程都会停止 的时刻 ,每当那一刻 长度 经常工作 的时候 ,很多 在职场的人都会写自己 的年底 事情...