中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-08-29 09:42
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » P处理菜单制作程序 查看 12,954 回复 76
46 发表于 2007-03-23 11:55 ·  中国 北京 昌平区 联通
中级用户
★★
菜鸟总动员
积分 259
发帖 112
注册 2006-08-28 15:53
20年会员
UID 61454
状态 离线
高手 ! 真是太强了~
47 发表于 2007-03-23 23:53 ·  中国 湖北 武汉 电信
初级用户
积分 68
发帖 31
注册 2007-03-23 12:33
19年会员
UID 82670
性别 男
状态 离线
下载了
谢了
48 发表于 2007-03-30 12:53 ·  中国 湖北 武汉 电信
初级用户
积分 76
发帖 38
注册 2007-03-13 02:54
19年会员
UID 81544
性别 男
状态 离线
顶了兄弟
49 发表于 2007-04-14 09:55 ·  中国 广东 深圳 电信
初级用户
★★
积分 135
发帖 61
注册 2007-04-14 09:23
19年会员
UID 85115
性别 男
状态 离线
没看到啊。。。
50 发表于 2007-04-14 10:21 ·  中国 上海 电信
初级用户
积分 25
发帖 12
注册 2007-03-01 04:09
19年会员
UID 80443
性别 男
状态 离线
我怎么看不见在那里下载
51 发表于 2007-04-15 13:01 ·  中国 重庆 沙坪坝区 电信
新手上路
积分 3
发帖 2
注册 2007-04-14 05:16
19年会员
UID 85094
性别 男
状态 离线
看不见
52 发表于 2007-04-15 14:25 ·  中国 浙江 台州 临海市 电信
初级用户
积分 48
发帖 26
注册 2007-04-09 14:14
19年会员
UID 84505
性别 男
状态 离线
好东西 学习中
53 发表于 2007-04-16 02:41 ·  中国 北京 鹏博士BGP
初级用户
积分 26
发帖 11
注册 2007-02-04 03:30
19年会员
UID 78571
性别 男
状态 离线
太厉害了!
54 发表于 2007-04-16 04:27 ·  中国 上海 长宁区 电信
初级用户
积分 38
发帖 15
注册 2007-04-13 20:38
19年会员
UID 85037
性别 男
状态 离线
东西呢 没看到
55 发表于 2007-04-16 04:34 ·  中国 河北 廊坊 三河市 移动
金牌会员
★★★★
积分 2,725
发帖 1,160
注册 2006-09-23 12:00
19年会员
UID 63486
来自 河北廊坊
状态 离线
公布代码:
@echo off&setlocal enabledelayedexpansion&title P处理菜单制作程序
if "%1"=="" (cls&echo/&echo=&set /p nn=请您输入菜单制作的个数:&goto pp) else goto cc

:pp
%~n0 %nn%

:cc
cls&echo/&echo\&echo
echo ------------------------------------------------------------------------------
echo **************************** Code By:XXXXX **********************************
echo ------------------------------------------------------------------------------
for /l %%a in (1=1=%1) do (
set/p= <nul&set/p a%%a=第%%a菜单内容:
set "b=!b! "!a%%a!""
)
cls
set "space= "
set "vol= │ "
:kk
%ww% echo ╭────────╮ %qq%
%ww% echo ╭───────┤ 选项 ├─────────╮ %qq%
%ww% echo │ ╰────────╯ │ %qq%

for %%i in (%b%) do (
set a=%vol%%%~i%space%
%ww% echo !a:~0,63!│%qq%
%ww% echo │ │%qq%
)
%ww% echo │ │%qq%
%ww% echo │ │%qq%
%ww% echo │ │%qq%
%ww% echo ╰──────────────────────────╯%qq%
if defined qq (echo 您的菜单已经生成文件 project.cmd&goto :eof)
echo 请问您,这个菜单您满意吗?
set/p mm=(1:满意 2:重新设计 3:退出) :
if "%mm%"=="1" goto jj
if "%mm%"=="2" %~n0
if "%mm%"=="3" cls&echo/&echo]&echo 程序退出!!!&goto :eof

:jj
set qq=^>^>project.cmd
set ww=echo
echo @echo off>>project.cmd
goto kk
三人行,必有吾师焉。 学然后知不足,教然后知困,然后能自强也。
56 发表于 2007-04-16 06:44 ·  中国 江苏 苏州 电信
中级用户
★★
积分 201
发帖 69
注册 2005-12-07 17:35
20年会员
UID 46678
性别 男
状态 离线
我也来看看哦
57 发表于 2007-04-16 10:04 ·  中国 广东 广州 番禺区 广州海之光通讯技术有限公司
新手上路
积分 10
发帖 5
注册 2006-05-14 23:52
20年会员
UID 55542
状态 离线
我怎么看不见下载?
58 发表于 2007-04-22 01:29 ·  中国 辽宁 大连 教育网
初级用户
积分 45
发帖 25
注册 2007-04-21 13:23
19年会员
UID 85991
性别 男
状态 离线
楼主在说什么呢?
59 发表于 2007-04-22 05:13 ·  中国 江苏 徐州 电信
初级用户
积分 125
发帖 49
注册 2006-12-24 08:33
19年会员
UID 74424
性别 男
状态 离线
不知道是谁惹了9527先生了~~~这么怒啊~~~
60 发表于 2007-04-30 20:23 ·  中国 江苏 苏州 联通
初级用户
积分 98
发帖 34
注册 2007-03-09 08:18
19年会员
UID 81178
性别 男
状态 离线
why
论坛跳转: