@echo off
setlocal DisableDelayedExpansion EnableExtensions

cd C:\imagick
set _path=C:\lp\img
set imagepath=%_path%\raw

<nul (set/p z=) > %_path%\text.txt
IF NOT EXIST %imagepath%\ocr mkdir %imagepath%\ocr

set builtlines=
FOR %%f IN (%_path%\raw\*.png) DO (
    convert -crop 724x121+112+380 -negate -threshold 50%% %%f %imagepath%\ocr\%%~nf.pnm
    gocr049 -d 0 -a 99 -f UTF8 -m 386 -p %imagepath%\ocr\ -i %imagepath%\ocr\%%~nf.pnm > %_path%\text.temp
    set builtlines=
    for /f "tokens=* delims=" %%x in (%_path%\text.temp) do (
        setlocal DisableDelayedExpansion
        set "line=%%x"
        setlocal EnableDelayedExpansion
        set "builtlines=!builtlines! !line!"
    )
    setlocal EnableDelayedExpansion
    set builtlines=!builtlines!
    echo !builtlines:~1,-1!>>%_path%\text.txt
    del %imagepath%\ocr\%%~nf.pnm
)
del %_path%\text.temp