下面是代码
(代码开始)
@璐村惂鐢ㄦ埛_000076K馃惥 off
title 打地鼠3×3^|Made by 晃就左扔【SDS】1.0
color 1F
set score=0
set line0=┌─┐┌─┐┌─┐
set line4=└─┘└─┘└─┘
mode con:cols=50 lines=20
for %%i in (●10%% ●●20%% ●●●30%% ●●●●40%% ●●●●●50%% ●●●●●●60%% ●●●●●●●70%% ●●●●●●●●80%% ●●●●●●●●●90%% ●●●●●●●●●●OK) do (
cls
echo %%i
timeout /t 1 /nobreak>nul
)
:kcdh
cls
rem 设置地鼠位置
echo Loading......
:xh
set ds=%random%
if %ds% GTR 9 goto xh
if %ds% EQU 0 goto xh
if %ds% == 1 goto ds1
if %ds% == 2 goto ds2
if %ds% == 3 goto ds3
if %ds% == 4 goto ds4
if %ds% == 5 goto ds5
if %ds% == 6 goto ds6
if %ds% == 7 goto ds7
if %ds% == 8 goto ds8
if %ds% == 9 goto ds9
:ds1
set line1=│●││○││○│
set line2=│○││○││○│
set line3=│○││○││○│
goto play
:ds2
set line1=│○││●││○│
set line2=│○││○││○│
set line3=│○││○││○│
goto play
:ds3
set line1=│○││○││●│
set line2=│○││○││○│
set line3=│○││○││○│
goto play
:ds4
set line1=│○││○││○│
set line2=│●││○││○│
set line3=│○││○││○│
goto play
:ds5
set line1=│○││○││○│
set line2=│○││●││○│
set line3=│○││○││○│
goto play
:ds6
set line1=│○││○││○│
set line2=│○││○││●│
set line3=│○││○││○│
goto play
:ds7
set line1=│○││○││○│
set line2=│○││○││○│
set line3=│●││○││○│
goto play
:ds8
set line1=│○││○││○│
set line2=│○││○││○│
set line3=│○││●││○│
goto play
:ds9
set line1=│○││○││○│
set line2=│○││○││○│
set line3=│○││○││●│
goto play
:play
cls
echo 得分:%score%
echo %line0%
echo %line1%
echo %line2%
echo %line3%
echo %line4%
set /p input=请输入地鼠位置(从左到右,从上到下依次为0-9)
if %input% EQU %ds% goto dui
if %input% NEQ %ds% goto cuo
:dui
set /a score=%score%+1
echo 你猜对了!地鼠就在第%ds%格!
echo 2秒后继续。
timeout /t 2 /nobreak>nul
goto kcdh
:cuo
echo 你猜错了!地鼠在第%ds%格!
echo 2秒后继续。
timeout /t 2 /nobreak>nul
goto kcdh
(代码结束)
这个程序还有许多需要修补的地方,比如生成随机数好像可以用%random%%%什么什么的方法(具体的忘了,这个bug会导致Loading时间延长)
(代码开始)
@璐村惂鐢ㄦ埛_000076K馃惥 off
title 打地鼠3×3^|Made by 晃就左扔【SDS】1.0
color 1F
set score=0
set line0=┌─┐┌─┐┌─┐
set line4=└─┘└─┘└─┘
mode con:cols=50 lines=20
for %%i in (●10%% ●●20%% ●●●30%% ●●●●40%% ●●●●●50%% ●●●●●●60%% ●●●●●●●70%% ●●●●●●●●80%% ●●●●●●●●●90%% ●●●●●●●●●●OK) do (
cls
echo %%i
timeout /t 1 /nobreak>nul
)
:kcdh
cls
rem 设置地鼠位置
echo Loading......
:xh
set ds=%random%
if %ds% GTR 9 goto xh
if %ds% EQU 0 goto xh
if %ds% == 1 goto ds1
if %ds% == 2 goto ds2
if %ds% == 3 goto ds3
if %ds% == 4 goto ds4
if %ds% == 5 goto ds5
if %ds% == 6 goto ds6
if %ds% == 7 goto ds7
if %ds% == 8 goto ds8
if %ds% == 9 goto ds9
:ds1
set line1=│●││○││○│
set line2=│○││○││○│
set line3=│○││○││○│
goto play
:ds2
set line1=│○││●││○│
set line2=│○││○││○│
set line3=│○││○││○│
goto play
:ds3
set line1=│○││○││●│
set line2=│○││○││○│
set line3=│○││○││○│
goto play
:ds4
set line1=│○││○││○│
set line2=│●││○││○│
set line3=│○││○││○│
goto play
:ds5
set line1=│○││○││○│
set line2=│○││●││○│
set line3=│○││○││○│
goto play
:ds6
set line1=│○││○││○│
set line2=│○││○││●│
set line3=│○││○││○│
goto play
:ds7
set line1=│○││○││○│
set line2=│○││○││○│
set line3=│●││○││○│
goto play
:ds8
set line1=│○││○││○│
set line2=│○││○││○│
set line3=│○││●││○│
goto play
:ds9
set line1=│○││○││○│
set line2=│○││○││○│
set line3=│○││○││●│
goto play
:play
cls
echo 得分:%score%
echo %line0%
echo %line1%
echo %line2%
echo %line3%
echo %line4%
set /p input=请输入地鼠位置(从左到右,从上到下依次为0-9)
if %input% EQU %ds% goto dui
if %input% NEQ %ds% goto cuo
:dui
set /a score=%score%+1
echo 你猜对了!地鼠就在第%ds%格!
echo 2秒后继续。
timeout /t 2 /nobreak>nul
goto kcdh
:cuo
echo 你猜错了!地鼠在第%ds%格!
echo 2秒后继续。
timeout /t 2 /nobreak>nul
goto kcdh
(代码结束)
这个程序还有许多需要修补的地方,比如生成随机数好像可以用%random%%%什么什么的方法(具体的忘了,这个bug会导致Loading时间延长)