
求高手帮我做一个批处理...
我想做一个批处理文件来做屏保...求高手成全...想要的效果如下:1全屏运行..2画面中有文字或者字母或乱码不停的滚动.滑动.流动(像是下雨的流动或者像方格填充的效果.....
我想做一个批处理文件来做屏保...求高手成全...
想要的效果如下:
1全屏运行..
2画面中有文字或者字母或乱码不停的滚动.滑动.流动(像是下雨的流动或者像方格填充的效果..类似黑客帝国片头那样的画面)
2能改变字体的颜色...
或者说你有更好的提议..
在线等...
二楼的大哥...
你可真的不够有厚道...
什么东东嘛,搞得差点死机....
我要的类似下面的批处理,效果和这个差不多,但这个流动的字符只显示半个屏屏,我想要全屏都有这种流动的字符,该怎么搞...
@ echo off
title 黑客帝国数码雨DOS版
@ echo off
setlocal enabledelayedexpansion
color 02
set /p sudu=设置速度,输入0-n的数字(最好大于50):100
:start
for %%i in (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t) do (set /a %%i=!random!%%2)
echo %a% %b% %c% %d% %e% %f% %g% %h% %i% %j% %k% %l% %m% %n% %o% %p% %q% %r% %s% %t%
for /l %%i in (1,1,%sudu%) do (echo. >nul)
set /a b=%random%%%40
if %b% equ 10 goto :wenzi1
if %b% equ 150 goto :wenzi
goto :start
:wenzi
echo 数 码 雨
goto :start
:wenzi1
echo 黑 客 帝 国
goto :start 展开
想要的效果如下:
1全屏运行..
2画面中有文字或者字母或乱码不停的滚动.滑动.流动(像是下雨的流动或者像方格填充的效果..类似黑客帝国片头那样的画面)
2能改变字体的颜色...
或者说你有更好的提议..
在线等...
二楼的大哥...
你可真的不够有厚道...
什么东东嘛,搞得差点死机....
我要的类似下面的批处理,效果和这个差不多,但这个流动的字符只显示半个屏屏,我想要全屏都有这种流动的字符,该怎么搞...
@ echo off
title 黑客帝国数码雨DOS版
@ echo off
setlocal enabledelayedexpansion
color 02
set /p sudu=设置速度,输入0-n的数字(最好大于50):100
:start
for %%i in (a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t) do (set /a %%i=!random!%%2)
echo %a% %b% %c% %d% %e% %f% %g% %h% %i% %j% %k% %l% %m% %n% %o% %p% %q% %r% %s% %t%
for /l %%i in (1,1,%sudu%) do (echo. >nul)
set /a b=%random%%%40
if %b% equ 10 goto :wenzi1
if %b% equ 150 goto :wenzi
goto :start
:wenzi
echo 数 码 雨
goto :start
:wenzi1
echo 黑 客 帝 国
goto :start 展开
2个回答
展开全部
你的计算机配置跟不上,没办法,至少程序在我这里的是正常运行的。
跟你讲过了,该程序比较消耗CPU,找台处理器好的电脑看看吧。
批处理就是这样的问题,要实现高级效果就要牺牲性能。
-------------------------------------------
写得累,麻烦!!! 注意CPU占用,P处理程序运行此类程序比较耗CPU。
使用Ctrl + c结束进程。
------------------复制以下代码------------------
@echo off
echo exit ¦%ComSpec% /k prompt e 100 B4 00 B0 12 CD 10 B0 03 CD 10 CD 20 $_g$_q$_ ¦debug >nul
chcp 437 >nul
graftabl 936 >nul
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!%%6
set /a Down%%j=!random!%%15+12
)
if "!Arrow%%j!" == "1" (
set /a chr=!random!%%2
set /p=!chr!<nul
) else (
set /p= <nul
)
)
goto loop
goto :eof
跟你讲过了,该程序比较消耗CPU,找台处理器好的电脑看看吧。
批处理就是这样的问题,要实现高级效果就要牺牲性能。
-------------------------------------------
写得累,麻烦!!! 注意CPU占用,P处理程序运行此类程序比较耗CPU。
使用Ctrl + c结束进程。
------------------复制以下代码------------------
@echo off
echo exit ¦%ComSpec% /k prompt e 100 B4 00 B0 12 CD 10 B0 03 CD 10 CD 20 $_g$_q$_ ¦debug >nul
chcp 437 >nul
graftabl 936 >nul
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!%%6
set /a Down%%j=!random!%%15+12
)
if "!Arrow%%j!" == "1" (
set /a chr=!random!%%2
set /p=!chr!<nul
) else (
set /p= <nul
)
)
goto loop
goto :eof
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询