[文本处理] 我制作了一个用于编写批处理(bat和vbs)的工具

LTSC1809

使用之前一定看程序附带的帮助！代码如下:

@echo off
title BatchPlus:无任务
color 1f
:start
set /p user_input=键入1新建一个文本;键入2退出编辑器;键入3查看帮助;键入4试运行已有批处理;键入5来启动命令提示符;键入6以文本形式查看已有批处理文件:
if %user_input% equ 1=goto new
if %user_input% equ 2=exit
if %user_input% equ 3=goto help
if %user_input% equ 4=goto run
if %user_input% equ 5=goto cmd
if %user_input% equ 6=goto edit
goto start
:new
title BatchPlus:新建批处理
set /p fillname=为文件命名:
set /p hzx=选择文件的扩展名 1=.vbs 2=.bat:
if %hzx% equ 1=set hz=vbs
if %hzx% equ 2=set hz=bat
:newedit
set /p u=^>
echo %u%>>%cd%\%fillname%.%hz%
goto newedit
:run
title BatchPlus:试运行
set /p user_in=请将文件拖入窗口或手动输入路径(%%cd%%可以表示工具主程序当前路径):
%user_in%
goto start
:cmd
title BatchPlus:命令提示符
:cmdstart
set /p cmdin=^>
%cmdin%
goto cmdstart
:edit
set /p editin=请将文件拖入窗口或手动输入路径(%%cd%%可以表示工具主程序当前路径):
for %%i in (%editin%) do echo "%%i" & type "%%i"
goto start
:help
titile BatchPlus:帮助
set /p a=键入1来查看常见问题，键入2查看本工具主要功能，键入3回到选择页面:
if %a% equ 1=goto help1
if %a% equ 2=goto help2
if %a% equ 3=goto start
goto start
:help1
echo 常见问题
echo 1.如果编写的批处理不能正常运行，例如闪退或缺少某些功能，在保证您的语法正确的情况下，请尝试在标点符号前键入一个转义符^
echo 2.批处理编写完毕最后一行后请换行再关闭工具，否则最后一行将不会被保存
echo 3.本工具尚未完善，如有bug请谅解
echo 特别声明:由于技术原因，大部分返回启动页面的侦测代码会导致工具闪退，因此只得去掉这些部分，现在您需要关闭本工具的窗口然后重新打开才能重新选择功能，给您带来的不便敬请谅解
goto start
:help2
echo 程序主要功能
echo 1.本工具可以自动新建后缀为.bat的文档，无需手动修改，尤其是在没有开启显示文件后缀名的操作系统上，这一点可以方便您的操作
echo 2.避免了保存批处理文件编码选择不正确，导致的乱码问题，使用"BatchPlus"编写的批处理文件统一使用ANSI编码保存
goto start
复制代码

LTSC1809

更新了，新版加入了试运行vbs的功能，因为我的用户组没法发到原创&转载，无奈只能发到这里，往版主包容一下

@echo off
title BatchPlus:无任务
color 0f
:start
set /p user_input=键入1新建一个文本;键入2退出编辑器;键入3查看帮助;键入4试运行已有批处理;键入5来启动命令提示符;键入6以文本形式查看已有批处理文件:
if %user_input% equ 1=goto new
if %user_input% equ 2=exit
if %user_input% equ 3=goto help
if %user_input% equ 4=goto run
if %user_input% equ 5=goto cmd
if %user_input% equ 6=goto edit
goto start
:new
title BatchPlus:新建批处理
set /p fillname=为文件命名:
set /p hzx=选择文件的扩展名 1=.vbs 2=.bat 3=.ps1 4=.py:
if %hzx% equ 1=set hz=vbs
if %hzx% equ 2=set hz=bat
if %hzx% equ 3=set hz=ps1
if %hzx% equ 4=set hz=py
:newedit
set /p u=^>
echo %u%>>%cd%\%fillname%.%hz%
goto newedit
:run
title BatchPlus:试运行
set /p vborcmd=运行bat文件还是以CScript运行vbs文件?:
if %vborcmd% equ bat=goto runcmd
if %vborcmd% equ vbs=goto runvbs
goto run
:runvbs
set /p user_invbs=请将文件拖入窗口或手动输入路径(%%cd%%可以表示工具主程序当前路径):
start CScript %user_invbs%
goto start
:runcmd
set /p user_in=请将文件拖入窗口或手动输入路径(%%cd%%可以表示工具主程序当前路径):
%user_in%
goto start
:cmd
title BatchPlus:命令提示符
:cmdstart
set /p cmdin=^>
%cmdin%
goto cmdstart
:edit
set /p editin=请将文件拖入窗口或手动输入路径(%%cd%%可以表示工具主程序当前路径):
for %%i in (%editin%) do echo "%%i" & type "%%i"
goto start
:help
titile BatchPlus:帮助
set /p a=键入1来查看常见问题，键入2查看本工具主要功能，键入3回到选择页面:
if %a% equ 1=goto help1
if %a% equ 2=goto help2
if %a% equ 3=goto start
goto start
:help1
echo 常见问题
echo 1.如果编写的批处理不能正常运行，例如闪退或缺少某些功能，在保证您的语法正确的情况下，请尝试在标点符号前键入一个转义符^
echo 2.批处理编写完毕最后一行后请换行再关闭工具，否则最后一行将不会被保存
echo 3.本工具尚未完善，如有bug请谅解
echo 特别声明:由于技术原因，大部分返回启动页面的侦测代码会导致工具闪退，因此只得去掉这些部分，现在您需要关闭本工具的窗口然后重新打开才能重新选择功能，给您带来的不便敬请谅解
goto start
:help2
echo 程序主要功能
echo 1.本工具可以自动新建后缀为.bat的文档，无需手动修改，尤其是在没有开启显示文件后缀名的操作系统上，这一点可以方便您的操作
echo 2.避免了保存批处理文件编码选择不正确，导致的乱码问题，使用"BatchPlus"编写的批处理文件统一使用ANSI编码保存
goto start
复制代码