批量编译lua源码为lua字节码

@echo off
if exist out rd /s /q out
mkdir out

setlocal enabledelayedexpansion

cls
:input
set input=:
set /p input= “源码文件夹:”
if “%input%”==":" goto input
if not exist “%input%” goto input
set “input=%input:”=%"

:output
set output=:
set /p output= “输出文件夹:”

if “%output%”==":" goto output
if not exist “%output%” goto output

for %%i in ("%input%") do if /i “%%~di”==%%i goto input
pushd %cd%
cd /d “%input%”>nul 2>nul || echo cmd was runing error
set cur_dir=%cd%
popd
set /a num = 0
echo 请等待 正在创建目录结构:
for /r %input% %%a in () do xcopy %%a %output% /t /s
echo 创建完成,开始编译lua代码:
for /f “delims=” %%i in (‘dir /b /a-d /s “%input%”’) do (set /a num += 1
set pt=%%~fi & set “pt=!pt:%input%=%output%!”
luac -o !pt! %%~fi
echo 编译后: %%~fi !pt!)
echo 编译脚本数量：%num%
ATTRIB %output%/.* +R
echo 编译完成,开始删除空白文件夹 一共6次:
for /f “delims=” %%i in (‘dir /b /ad /s “%output%”’) do (echo 删除空白目录信息: %%i & rd %%i /q)
for /f “delims=” %%i in (‘dir /b /ad /s “%output%”’) do (echo 删除空白目录信息: %%i & rd %%i /q)
for /f “delims=” %%i in (‘dir /b /ad /s “%output%”’) do (echo 删除空白目录信息: %%i & rd %%i /q)
for /f “delims=” %%i in (‘dir /b /ad /s “%output%”’) do (echo 删除空白目录信息: %%i & rd %%i /q)
for /f “delims=” %%i in (‘dir /b /ad /s “%output%”’) do (echo 删除空白目录信息: %%i & rd %%i /q)
for /f “delims=” %%i in (‘dir /b /ad /s “%output%”’) do (echo 删除空白目录信息: %%i & rd %%i /q)
pause