[其他] 求助批处理动态密码问题

@echo off
Setlocal EnableDelayedExpansion
setlocal enableextensions
:lodd

if not exist conf.ini goto hua
if not exist pwd goto hua
set tme=%date:~0,4%%date:~5,2%%date:~8,2%
call :line conf.ini Date tmp
call :line conf.ini MaxER tmp1
call :read2 tmp 
call :read3 err 
call :read1 tmp1 
echo %max% %ec% %wct%
pause
if "%ec%" GEQ "%tme%" set/a %wct%+1=wct
if "%wct%" GTR "%max%" exit
goto main


:main
echo %wct%>err
echo.
echo.
echo 动态密码2022/11/16 失效
echo.
echo.
pause
cls
echo.
set/p ab=密码:
call :pwd %ab% pwd
goto main




:line
(for /f "delims=" %%a in (%1) do (
    set str=%%a
    if "!str:~,1!"=="[" (
        if "%%a"=="[%2]" (
            set n=true
        ) else (
            set n=
        )
    ) else if defined n (
        echo,%%a
    )
))>%3
goto :eof

:hua
if exist pwd del pwd /s /q /f >nul
echo %random%-%random%-%random%>pwd
ECHO 完成.
goto lodd
:pwd
cd /d "%~dp0"
set "return=NotFound"
set "input=Nothing"
set "input=%1"
for /f "delims=:" %%i in ('type "%2" ^| findstr /n /l /x /c:"%input%"') do (
    set "return=%%i"
)
if "%rerurn%"=="NotFound" goto main
if "%input%"=="Nothing" goto main&set /a wct=%wct%+1
call :del %return%
goto install
:del
for /f "delims=" %%i in ('%1') do (
        (set n=0
        for /f "delims=" %%j in ('type "%%i"') do (
                set /a n+=1
                if not "!n!"=="1" echo %%j
        ))>$
        move $ "%%i">nul
)
:read1
for /f "delims=" %%i in (%1) do (
    set max=%%i 
) 
goto :eof

:read2
for /f "delims=" %%m in (%1) do (
    set ec=%%i 
) 
goto :eof

:read3
for /f "delims=" %%b in (%1) do (
    set wct=%%i 
) 
goto :eof

:err
echo.
echo 不能找到文件！
pause>nul
exit
:install
pause
exit
复制代码