|
zcydez
初级用户
 
积分 38
发帖 21
注册 2010-2-21 来自 南昌
状态 离线
|
『楼 主』:
批处理屏保
使用 LLM 解释/回答一下
@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 ]
@echo off
title Batch Screen Saver
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. To exit, press 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
Adopts the most CPU-efficient way
The author's CPU usage only徘徊 between 0%-4% during use.
It seems no one is replying???
A bit cold
Last edited by zcydez on 2010-6-6 at 16:56 ]
|
|
2010-6-6 16:47 |
|
|
yiqingnan
初级用户
 
积分 38
发帖 24
注册 2010-3-21
状态 离线
|
『第 2 楼』:
使用 LLM 解释/回答一下
谢谢楼主分享
我也贴一个
@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
自己网上收集的
Thanks to the LZ for sharing.
I'll also post one.
@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
Collected online by myself
|
|
2010-6-6 19:48 |
|
|
flyghost
新手上路

积分 12
发帖 11
注册 2008-10-13
状态 离线
|
|
2010-6-6 23:12 |
|
|
bd123456789
中级用户
  
积分 360
发帖 216
注册 2007-5-29
状态 离线
|
『第 4 楼』:
使用 LLM 解释/回答一下
不错不错
不过,能否达到批处理即时关显示器倡导低碳生活??<img src="images/smilies/face-wink.png" align="absmiddle" border="0">
Last edited by bd123456789 on 2010-6-10 at 06:52 ]
Not bad, not bad. However, can it achieve the batch processing to turn off the monitor immediately to advocate low-carbon life?? ;)
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 楼
使用 LLM 解释/回答一下
google搜索MonitorOff.exe
google search MonitorOff.exe
|

 |
|
2010-6-10 15:16 |
|
|
zcydez
初级用户
 
积分 38
发帖 21
注册 2010-2-21 来自 南昌
状态 离线
|
『第 6 楼』:
使用 LLM 解释/回答一下
搜索MonitorOff.exe干嘛?
What is the purpose of searching for MonitorOff.exe?
|
|
2010-6-10 18:45 |
|
|
smileoa
新手上路

积分 1
发帖 1
注册 2010-7-23
状态 离线
|
『第 7 楼』:
使用 LLM 解释/回答一下
没有实际意义,要是能响应键盘鼠标的动作就好了。比如动下键盘屏保自动退出。
It has no practical meaning. It would be great if it could respond to keyboard and mouse actions. For example, the screen saver automatically exits when you move the keyboard.
|
|
2010-7-29 15:53 |
|
|
defanive
初级用户
 
积分 111
发帖 62
注册 2007-12-31
状态 离线
|
『第 8 楼』:
使用 LLM 解释/回答一下
@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无法全屏,我这里没发测试。。。
@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
Basically achieves closing on key press...
I won't do full screen, Vista and Win7 can't go full screen, I can't test here...
|
|
2010-7-29 16:21 |
|
|
zcydez
初级用户
 
积分 38
发帖 21
注册 2010-2-21 来自 南昌
状态 离线
|
『第 9 楼』:
使用 LLM 解释/回答一下
谢谢5L
原来是关闭显示器
Thanks 5L
It turns out to be turning off the monitor
|
|
2010-8-13 13:40 |
|
|
9096
初级用户
 
积分 45
发帖 27
注册 2010-10-20 来自 广东
状态 离线
|
|
2010-10-29 16:16 |
|
|
517
新手上路

积分 13
发帖 10
注册 2010-12-31
状态 离线
|
|
2010-12-31 18:24 |
|
|
517
新手上路

积分 13
发帖 10
注册 2010-12-31
状态 离线
|
|
2010-12-31 18:24 |
|