中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 自制DVD光盘中游戏模块的主循环菜单(批处理)
作者:
标题: 自制DVD光盘中游戏模块的主循环菜单(批处理) 上一主题 | 下一主题
GOTOmsdos
铂金会员

C++启程者


积分 5154
发帖 1827
注册 2003-7-18
状态 离线
『楼 主』:  自制DVD光盘中游戏模块的主循环菜单(批处理)


用批处理为我的系统安装,维护和游戏(按下选项就可玩)三合一综合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

ff
off

:final




[此贴子已经被作者于2005-4-10 1:19:22编辑过]




2005-4-10 00:00
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转: