中国DOS联盟

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

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

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 求优化代码

nanhui112
初级用户

积分 127
发帖 59
注册 2007-11-13
状态离线

『楼主』: 求优化代码

为拉学习才这样写的  不要骂我哈谢谢:(

@echo off &title  [code by nh..]
mode con cols=30 lines=10
color 0A
set b=4
set t=%time%
setlocal EnableDelayedExpansion
set x=带来不便请谅解
set r=谢谢使用
:nn
ping -n 2 127.1>nul

:QQ
cls
echo===============================
echo+++++需要密码  !x:~0,%n%!
echo 例如当前计算机时间是%t:~0,5%
echo 密码为末位数%t:~4,1%-3的值 !r:~0,%y%!!" ^^_^^

echo===============================

if not "%n%"=="7" set /a n+=1 &goto :nn
set /a y+=1
ping -n 1 127.1>nul
if not "%y%"=="5" goto :QQ
ping -n 1 127.1>nul
:set
set /p QQ=输入对方QQ号码 ||echo.&echo. &set /p q=1退出 2修改其他键+ENTER完成
if %q%==1 goto :eof
if %q%==2 goto :set

:num
for /f "tokens=2 delims=: "  %%i in ("%time%") do (set a=%%i )
set a=%a:~1%
set /a key=%a%-3
echo.
cls
echo 对方 QQ %QQ%
echo.
set /p mm=输入密码
if  %b% equ 0 goto :ef
if not "%mm%" == "%key%" goto :nu

:start
cls
echo 对方 QQ %QQ% &ping -n 2 127.1>nul
start tencent://Message/?Uin=%QQ%
cls
set /p S=Y继续按其他键退出
if /i not %S%==Y goto :eof

:start1
cls
set /p QQ=输入对方QQ号码 &goto :start

:nu
set /a b-=1
cls
echo 你的密码错误,继续吗？
echo.

:ok
echo 当前%b%次有效输入机会！
echo.
set Y/N=
Set /p  Y/N=请输入[Y/N]
if "%Y/N%" =="" goto :err1
if /i  %Y/N%==Y  goto :num
if /i %Y/N%==N  goto :eof
goto :erro

:erro
cls
ping -n 2 127.1>nul
echo  你的输入不正确！
set t=
Set /p t=是否继续 [Y/N]
echo.
if "%T%"=="" goto :erro
if /i %T%==Y goto :ok
if /i %T%==N goto :eof
goto :erro

:err1
cls
echo.
echo 你的输入为空,请等候三秒！
ping -n 3 127.1>nul &cls  &goto :ok

:ef
cls
echo.
@echo 输入超过最大允许次数
echo. &echo 请按任意键退出！
pause>nul

2007-12-16 17:35

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

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

论坛跳转: