curious

我这代码效率不高，仅能做对而已

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1-3 delims=--"  %%i in (a.txt) do (
call :aa %%i
call :aa %%j
call :aa %%k
echo !b:~2!
set b=
)
pause>nul
goto :eof
:aa
set a=%1
set a=!a:330=200!
set a1=!a:~0,4!年
set a2=!a:~-2!
if !a2! lss 10 (set a2=!a2:~-1!) else (set a2=!a2:~-2!)
set a=!a1!!a2!月
set b=!b!--!a!COPY