中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-08-01 12:42
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 批处理屏保 查看 2,889 回复 11
楼 主 批处理屏保 发表于 2010-06-06 16:47 ·  中国 江西 南昌 电信
初级用户
积分 38
发帖 21
注册 2010-02-21 18:11
16年会员
UID 160939
性别 男
来自 南昌
状态 离线
@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 ]
2 发表于 2010-06-06 19:48 ·  中国 山东 联通
初级用户
积分 38
发帖 24
注册 2010-03-21 19:42
16年会员
UID 162709
性别 男
状态 离线
谢谢楼主分享
我也贴一个

@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


自己网上收集的
3 发表于 2010-06-06 23:12 ·  中国 浙江 杭州 电信
新手上路
积分 12
发帖 11
注册 2008-10-13 12:17
17年会员
UID 128246
性别 男
状态 离线
win7 CMD下不能运行
4 发表于 2010-06-09 21:09 ·  中国 浙江 嘉兴 电信
中级用户
★★
积分 360
发帖 216
注册 2007-05-29 17:41
19年会员
UID 89677
性别 男
状态 离线
不错不错

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

[ Last edited by bd123456789 on 2010-6-10 at 06:52 ]
5 Re 4 楼 发表于 2010-06-10 15:16 ·  新加坡
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
google搜索MonitorOff.exe
6 发表于 2010-06-10 18:45 ·  中国 江西 南昌 电信
初级用户
积分 38
发帖 21
注册 2010-02-21 18:11
16年会员
UID 160939
性别 男
来自 南昌
状态 离线
搜索MonitorOff.exe干嘛?
7 发表于 2010-07-29 15:53 ·  中国 湖北 武汉 电信
新手上路
积分 1
发帖 1
注册 2010-07-23 17:18
16年会员
UID 171061
性别 女
状态 离线
没有实际意义,要是能响应键盘鼠标的动作就好了。比如动下键盘屏保自动退出。
8 发表于 2010-07-29 16:21 ·  中国 广东 广州 番禺区 电信
初级用户
★★
积分 111
发帖 62
注册 2007-12-31 20:10
18年会员
UID 107336
性别 男
状态 离线
@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无法全屏,我这里没发测试。。。
9 发表于 2010-08-13 13:40 ·  中国 江西 南昌 电信
初级用户
积分 38
发帖 21
注册 2010-02-21 18:11
16年会员
UID 160939
性别 男
来自 南昌
状态 离线
谢谢5L
原来是关闭显示器
10 发表于 2010-10-29 16:16 ·  中国 广东 珠海 电信
初级用户
积分 45
发帖 27
注册 2010-10-20 04:03
15年会员
UID 176155
性别 男
来自 广东
状态 离线
谢谢你能为大众服务
11 发表于 2010-12-31 18:24 ·  中国 广东 汕头 电信
新手上路
积分 13
发帖 10
注册 2010-12-31 01:39
15年会员
UID 180112
性别 男
状态 离线
学习
12 发表于 2010-12-31 18:24 ·  中国 广东 汕头 电信
新手上路
积分 13
发帖 10
注册 2010-12-31 01:39
15年会员
UID 180112
性别 男
状态 离线
2楼好哦
论坛跳转: