中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net  论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 批处理屏保
作者:
标题: 批处理屏保 上一主题 | 下一主题
zcydez
初级用户





积分 38
发帖 21
注册 2010-2-21
来自 南昌
状态 离线
『楼 主』:  批处理屏保


@echo off
title 批处理屏保
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
:a
set /a l=%random%%%24
cls
for /l %%i in (1 1 %l%) do (echo.)
echo.                              要退出，请按Ctrl+c。
ping -n 3 127.0.1>nul
set /a c=%random%%%16
if %c%==10 set c=a
if %c%==11 set c=b
if %c%==12 set c=c
if %c%==13 set c=d
if %c%==14 set c=e
if %c%==15 set c=f
color %c%0
goto a
采用了最省Cpu的方式
笔者用时Cpu只在0%-4%之间徘徊。



好像没人回帖？？？
有点冷啊

[ Last edited by zcydez on 2010-6-6 at 16:56 ]

2010-6-6 16:47
查看资料  发送邮件  发短消息 网志  OICQ (1061159532)  编辑帖子  回复  引用回复
yiqingnan
初级用户





积分 38
发帖 24
注册 2010-3-21
状态 离线
『第 2 楼』:  

谢谢楼主分享
我也贴一个

@echo off
:begin
set /a a=%random%/3640&set /a b=%random%/3640
:1
set /a c=%random%/328
if %c% leq 13 goto 1
:2
set /a d=%random%/1092
if %d% leq 1 goto 2
title 哈哈！无穷变幻的窗口哦&color %a%%b%&mode con cols=%c% lines=%d%&ping/n 1 127.1>nul&cls&echo.&echo.&echo.&echo.&goto begin


自己网上收集的

2010-6-6 19:48
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
flyghost
新手上路





积分 12
发帖 11
注册 2008-10-13
状态 离线
『第 3 楼』:  

win7 CMD下不能运行

2010-6-6 23:12
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bd123456789
中级用户





积分 360
发帖 216
注册 2007-5-29
状态 离线
『第 4 楼』:  

不错不错

不过，能否达到批处理即时关显示器倡导低碳生活？？

[ Last edited by bd123456789 on 2010-6-10 at 06:52 ]

2010-6-9 21:09
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 5 楼』:  Re 4 楼

google搜索MonitorOff.exe



2010-6-10 15:16
查看资料  发短消息 网志   编辑帖子  回复  引用回复
zcydez
初级用户





积分 38
发帖 21
注册 2010-2-21
来自 南昌
状态 离线
『第 6 楼』:  

搜索MonitorOff.exe干嘛？

2010-6-10 18:45
查看资料  发送邮件  发短消息 网志  OICQ (1061159532)  编辑帖子  回复  引用回复
smileoa
新手上路





积分 1
发帖 1
注册 2010-7-23
状态 离线
『第 7 楼』:  

没有实际意义，要是能响应键盘鼠标的动作就好了。比如动下键盘屏保自动退出。

2010-7-29 15:53
查看资料  发短消息 网志   编辑帖子  回复  引用回复
defanive
初级用户





积分 111
发帖 62
注册 2007-12-31
状态 离线
『第 8 楼』:  


@echo off&setlocal enabledelayedexpansion
if "%~1"=="" (
start /b "" cmd /c "%~f0" 123
for /l %%a in (0,0,0) do (
cls
echo !time! !date!
ping -n 1 127.0.0.1 >nul
)
)
pause>nul
taskkill /f /fi "windowtitle eq %comspec%" /im cmd.exe
基本实现了按键就关闭。。。
全屏我就不搞了，vista和win7无法全屏，我这里没发测试。。。

2010-7-29 16:21
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zcydez
初级用户





积分 38
发帖 21
注册 2010-2-21
来自 南昌
状态 离线
『第 9 楼』:  

谢谢5L
原来是关闭显示器

2010-8-13 13:40
查看资料  发送邮件  发短消息 网志  OICQ (1061159532)  编辑帖子  回复  引用回复
9096
初级用户





积分 45
发帖 27
注册 2010-10-20
来自 广东
状态 离线
『第 10 楼』:  

谢谢你能为大众服务

2010-10-29 16:16
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
517
新手上路





积分 13
发帖 10
注册 2010-12-31
状态 离线
『第 11 楼』:  

学习

2010-12-31 18:24
查看资料  发短消息 网志   编辑帖子  回复  引用回复
517
新手上路





积分 13
发帖 10
注册 2010-12-31
状态 离线
『第 12 楼』:  

2楼好哦

2010-12-31 18:24
查看资料  发短消息 网志   编辑帖子  回复  引用回复

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023