现在学习DOS系统简直是一种爱好,实现用处没有多少> - 中国DOS联盟论坛

下面是我给小孩子做的一个练习，在windows下ＬＺ能实现吗
code:
@echo off
setlocal enabledelayedexpansion&title 加减混和
set d="错啦^! 请再来一遍^!"
set g=12345689abcde
set h=20
set i=3
set j= 再见
set k= ^+^-
set e=真棒, 得了两次满分

:allbegin
set allw=0
set allr=0

:more
if !allr!==2 goto end
set /a allr=%allr%+1

:start
cls
mode con cols=18 lines=3
set all=0
set right=0
set wrong=0
echo.

:begin
color 1e
set /a a=%random%%%10+1
set /a b=%random%%%10+1
set /a l=%random%%%2+1
set m=!k:~%l%,1!
set /a c=!a!!m!!b!
if !m!==^+ goto add
if !b! gtr !a! goto begin

:again
if !all!==30 goto ok
set /a all=%all%+1
set /p answer= !a!-!b!^=
if !answer! equ !c! echo ~~ 你好棒 (!all!)&set /a right=%right%+1&goto begin
color fc
::echo %d%
set/p= !d:~1,10!<nul
set /a wrong=%wrong%+1
goto again

:add
if !all!==30 goto ok
set /a all=%all%+1
set /p ans= !a!+!b!^=
if !ans! equ !c! echo ~~ 你好棒 (!all!)&set /a right=%right%+1&goto begin
color fc
::echo %d%
set/p= !d:~1,10!<nul
set /a wrong=%wrong%+1
goto add

:ok
cls
mode con cols=31 lines=7
echo.
set /a df=!right!*100/!all!
echo 你一共做了!all!道题
echo 做对了 !right!道题
echo 做错了 !wrong!道题
echo 得 !df!分
if !df! equ 100 echo 好极了，不要骄傲喔&pause>nul&goto more
echo 成绩不是很好,再来一次,要努力喔
if !allw!==1 goto allbegin
set /a allw=%allw%+1
pause>nul
goto start

:end
cls
mode con cols=18 lines=3
echo.
set /a f=%random%%%13+1
color !g:~%f%,1!c
set /p=!e!<nul
::ping /n 1 127.1>nul
sleep001 200
if !h!==0 goto out
set /a h=%h%-1
goto end

:out
mshta vbscript:CreateObject("SAPI.SpVoice").Speak("Byebye!")(Window.close)

:aot
cls
color 1e
echo.
set /p=!j!<nul
::ping /n 2 127.1>nul
sleep001 1000
if !i!==0 goto bye
set /a i=%i%-1
goto aot

:bye
exit

第16楼　luckyboy8879	发表于 2007-12-29 01:50
初级用户　发帖 10　积分 22
有信心学好DOS 我觉得有用

第17楼　kida	发表于 2007-12-29 15:47
初级用户　发帖 63　积分 139
但是我就是喜欢我们DOS家庭.

第18楼　cash0167	发表于 2008-01-14 11:48
初级用户　发帖 12　积分 23
我不懂，但是我强烈支持dos 喜欢dos

第19楼　xiaochong	发表于 2008-01-14 20:26
初级用户　发帖 15　积分 35
强烈支持DOS，正在努力学习之中，DOS很有用。

第20楼　LCH	发表于 2008-01-15 13:08
初级用户　发帖 17　积分 142
超喜欢很小但很好很强大的东东

第21楼　iwantgo	发表于 2008-01-15 16:47
新手上路　发帖 1　积分 2
DOS做的应急恢复U盘我觉得非常好哇

第22楼　ytapple	发表于 2008-01-16 10:09
新手上路　发帖 1　积分 2
应该用处很大吧,其实很多复杂的问题,DOS下很容易解决的

第23楼　xxxxzzzz	发表于 2008-01-16 18:02
初级用户　发帖 54　积分 138
爱好爱好

第24楼　ngd	发表于 2008-01-22 18:12
中级用户　发帖 108　积分 312
Originally posted by hxwxyz at 2007-12-21 13:45: 一看你就知道没用DOS解决过windows下的问题哦曾用 U盘做的dos启动盘硬盘安装 windows xp和 Linux 只将dos作为辅助工具

第25楼　wcpsky	发表于 2008-01-23 23:11
初级用户　发帖 12　积分 32
dos多学点，用的时候就知道有用了

第26楼　VAF	发表于 2008-01-23 23:21
中级用户　发帖 134　积分 242
我说一句有非DOS莫解的问题, 没遇到且未解决过这样的问题的人是不可能体会到的.

第27楼　long626201	发表于 2008-01-23 23:31
初级用户　发帖 52　积分 100　来自云南
我觉得还不错啊

第28楼　Chinaderek	发表于 2008-02-01 12:58
初级用户　发帖 33　积分 64
是呀,DOS

第29楼　Chinaderek	发表于 2008-02-01 12:59
初级用户　发帖 33　积分 64
是呀,DOS是非常强大的,随着我学习的不断深入,它的用处就越来越大,DOS的作用的大小是根据自身对DOS的掌握来决定的.

第30楼　moniuming	发表于 2008-02-03 00:15
银牌会员　发帖 574　积分 1,335　来自广西
下面是我给小孩子做的一个练习，在windows下ＬＺ能实现吗 code: @echo off setlocal enabledelayedexpansion&title 加减混和 set d="错啦^! 请再来一遍^!" set g=12345689abcde set h=20 set i=3 set j= 再见 set k= ^+^- set e=真棒, 得了两次满分 :allbegin set allw=0 set allr=0 :more if !allr!==2 goto end set /a allr=%allr%+1 :start cls mode con cols=18 lines=3 set all=0 set right=0 set wrong=0 echo. :begin color 1e set /a a=%random%%%10+1 set /a b=%random%%%10+1 set /a l=%random%%%2+1 set m=!k:~%l%,1! set /a c=!a!!m!!b! if !m!==^+ goto add if !b! gtr !a! goto begin :again if !all!==30 goto ok set /a all=%all%+1 set /p answer= !a!-!b!^= if !answer! equ !c! echo ~~ 你好棒 (!all!)&set /a right=%right%+1&goto begin color fc ::echo %d% set/p= !d:~1,10!<nul set /a wrong=%wrong%+1 goto again :add if !all!==30 goto ok set /a all=%all%+1 set /p ans= !a!+!b!^= if !ans! equ !c! echo ~~ 你好棒 (!all!)&set /a right=%right%+1&goto begin color fc ::echo %d% set/p= !d:~1,10!<nul set /a wrong=%wrong%+1 goto add :ok cls mode con cols=31 lines=7 echo. set /a df=!right!*100/!all! echo 你一共做了!all!道题 echo 做对了 !right!道题 echo 做错了 !wrong!道题 echo 得 !df!分 if !df! equ 100 echo 好极了，不要骄傲喔&pause>nul&goto more echo 成绩不是很好,再来一次,要努力喔 if !allw!==1 goto allbegin set /a allw=%allw%+1 pause>nul goto start :end cls mode con cols=18 lines=3 echo. set /a f=%random%%%13+1 color !g:~%f%,1!c set /p=!e!<nul ::ping /n 1 127.1>nul sleep001 200 if !h!==0 goto out set /a h=%h%-1 goto end :out mshta vbscript:CreateObject("SAPI.SpVoice").Speak("Byebye!")(Window.close) :aot cls color 1e echo. set /p=!j!<nul ::ping /n 2 127.1>nul sleep001 1000 if !i!==0 goto bye set /a i=%i%-1 goto aot :bye exit