返回列表 发帖

[其他] 批处理实现动态菜单,支持后台

用批处理也能做大事,借助pmos这个强大的鼠标第三方,批处理也能实现wpf那种分类菜单。以下只是个举例,可以实现非常复杂的动态菜单效果,完全借助鼠标的浮动,无需点击。开启批处理菜单新时代。
演示文件下载链接: https://pan.baidu.com/s/1EWQAerFOb4LslvS271rHLg?pwd=mwb5
@echo off&setlocal enabledelayedexpansion
mode con cols=80 lines=25
::*************************************
REM 设置菜单宽高
set WITH=116
set HIGH=33
REM 开启画质增强
set F1=1
::*************************************
:MENU
echo   __________________                                
echo  ^|     1区域        ^|                              
echo  ^|__________________^|                              
echo;                                                      
echo;                                                      
echo   __________________                              
echo  ^|     2区域        ^|                              
echo  ^|__________________^|                              
echo;                                                      
echo;                                                      
echo   __________________                              
echo  ^|     3区域        ^|                              
echo  ^|__________________^|                              
goto :MAIN
:MENU1
echo   __________________          ________________
echo  ^|     1区域        ^| ==^>    ^|^>^>^>             ^|
echo  ^|__________________^|        ^| 1.1西红柿      ^|
echo                              ^| 1.2黄瓜        ^|
echo                              ^| 1.3白菜        ^|
echo   __________________         ^|________________^|     
echo  ^|     2区域        ^|                                 
echo  ^|__________________^|                                 
echo;                                                         
echo;                                                      
echo   __________________                                    
echo  ^|     3区域        ^|                              
echo  ^|__________________^|                              
goto :EOF
:MENU2
echo   __________________                              
echo  ^|     1区域        ^|                              
echo  ^|__________________^|                              
echo;                                                      
echo;                                                      
echo   __________________          ________________           
echo  ^|     2区域        ^| ==^>    ^|^>^>^>             ^|
echo  ^|__________________^|        ^| 2.1鱼肉        ^|
echo                              ^| 2.2熊掌肉      ^|
echo                              ^| 2.3鸭肉        ^|
echo   __________________         ^|________________^|
echo  ^|     3区域        ^|                                
echo  ^|__________________^|                              
goto :EOF
:MENU3
echo   __________________                              
echo  ^|     1区域        ^|                              
echo  ^|__________________^|                              
echo;                                                      
echo;                                                      
echo   __________________                              
echo  ^|     2区域        ^|                              
echo  ^|__________________^|         ________________  
echo                              ^|^>^>^>             ^|
echo                              ^| 3.1苹果        ^|
echo   __________________         ^| 3.2水蜜桃      ^|
echo  ^|     3区域        ^| ==^>    ^| 3.3橙子        ^|
echo  ^|__________________^|        ^|________________^|
goto :EOF
:MAIN
for /l %%N in (1,1,300 ) do (
set "SPACE=!SPACE!"
)
for /l %%a in () do (
pmos /f 15,17,%WITH%,%HIGH% 15,94,%WITH%,%HIGH% 15,176,%WITH%,%HIGH%
set NowErrorlevel=!errorlevel!
title 鼠标在!NowErrorlevel!区域
if !PreErrorlevel! neq !NowErrorlevel! (
set PreErrorlevel=!NowErrorlevel!
if !F1! equ 1 (
2>NUL echo !SPACE!&set/p=<NUL
) else (
cls
)
call :MENU!NowErrorlevel!
)
)COPY
1

评分人数

厉害!测试了,原来批还可以这样!

TOP

回复 2# 老刘1号
嗯,我已经不再研究批处理和C语言了,转为研究新的更奇异的技术,一种自己能够自我完善的语言,类似人类的新陈代谢。

TOP

回复 3# happy886rr


    渡劫升仙
[url=][/url]

TOP

回复 3# happy886rr


  怎么个思路,老厉害了

TOP

回复 3# happy886rr


    元胞自动机?
去学去写去用才有进步。安装python3代码存为xx.py 双击运行或右键用IDLE打开按F5运行

TOP

返回列表