自制DVD光盘中游戏模块的主循环菜单(批处理)

gotomsdos

[这个贴子最后由gotomsdos在 2005/04/10 03:07am 第 2 次编辑]

用批处理为我的多系统安装(XP,2000,98,ME,DOS71),维护和游戏(按下选项就可玩)三合一综合DVD光盘中游戏模块的
主循环菜单:(大家参考)
@ECHO OFF
PROMPT $P$G
:ask
a:
cls
tw32 >nul
echo . .
echo . .
echo . .
echo . . [a] 显示游戏选单
echo . . 现在不想玩了
echo . . 请按选项:
get c ab >nul
if "%get%"=="a" goto list
if "%get%"=="b" goto nogame
:list
echo . . [a] 太空之路
echo . . 赛车追捕
echo . . [c] 刺杀希特勒
echo . . [d] 毁灭战士
echo . . [e] 轩辕剑枫之舞
echo . . [f] 仙剑奇侠传
echo . . [g] 金庸群侠传
echo . . [h] 三国群英传
echo . . 中国传统象棋
echo . . [j] 四国大战
echo . . [k] 手谈围棋
echo . . [l] 华容道
echo . . [m] 知识测验
echo . . [n] 最差的小游戏
echo . . 请按选项:
get c abcdefghijklmn >nul
cls
tw32 /u >nul
set amount=10000
if "%get%"=="e" set amount=40000
if "%get%"=="f" goto pal
if "%get%"=="g" goto playcd
if "%get%"=="i" goto playcd
xmsdsk %amount% z: /t /y
xcopy %romcd%\%get% z:\%get%\ /e /s
z:
cd\%get%
call play.bat
goto ask
:playcd
%romcd%
cd\%get%
call play.bat
goto ask
:pal
set paldir=%get%
tw32 >nul
echo .
echo .
echo .
echo . 要玩这个游戏，必须知道您的电脑的内存大小
echo . 您的电脑的内存容量大约是下面的哪一个(MB,兆)：
echo .
echo .
echo . . 32
echo . . 64
echo . . 96
echo . . 128
echo . . 160
echo . . 192
echo . . 224
echo . . 256
echo . . 288
echo . . 320
echo . . 352
echo . . 384
echo . . 416
echo . . 448
echo . . 480
echo . . 512
echo . . 请输入您的电脑内存容量(以上数字之一),再按回车键:
get s 999 >nul
cls
tw32 /u >nul
if "%get%"=="32" goto 32
strings diskmb=sub %get%, 20
strings diskkb=mul %diskmb%, 1024
xmsdsk %diskkb% z: /t /y
goto playpal
:32
xmsdsk 30000 z: /t /y
:playpal
xcopy %romcd%\%paldir% z:\%paldir%\ /e /s
z:
cd\%paldir%
call play.bat
goto ask
:nogame
echo . .
echo . .
echo . .
echo . . [a] 回到DOS
echo . . 重新启动
echo . . [c] 关机
echo . . 请按选项:
get c abc >nul
cls
tw32 /u >nul
if "%get%"=="a" goto final
if "%get%"=="b" goto reboot
if "%get%"=="c" goto off
:reboot
reboot
:off
off
:final

gmy

最好用WBAT，功能更多一些

gotomsdos

刚下载了很不错!
正在用这个学做
谢谢!

zj9018

#在这里快速回复#这几天都在这里看