一个用bat写的扫雷游戏，物喜勿喷

新建文件改名为扫雷.bat即可

代码如下：

rem 转载请说明原作者：bat吧明月嫣然若夕
@echo off
setlocal enabledelayedexpansion
mode con: cols=25 lines=15
title mine clearance
color 3f

set cheat=0
set die=1
set s=0
for /l %%b in (1,1,5) do (
set /a x=1+!random!%%5
set /a y=1+!random!%%5
set bomb%%b=!x!!y!
)

:scans
for /l %%a in (1,1,4) do (
set /a A+=1
for /l %%k in (!A!,1,5) do (
if !bomb%%a!==!bomb%%k! (
    set /a x=1+!random!%%5
    set /a y=1+!random!%%5
    set bomb%%a=!x!!y!
    goto scans
)
)
)

for /l %%x in (1,1,5) do (
for /l %%y in (1,1,5) do (
set x%%xy%%y=?
)
)

:game
if !s!==20 goto win
call :display
call :input

:display
if !cheat!==1 (
    for /l %%f in (1,1,5) do set bombc%%f=!bomb%%f!
) else (
    for /l %%f in (1,1,5) do set bombc%%f=
)
cls
echo.