@echo off
setlocal EnableDelayedExpansion

set "file=C:\Users\pe_ma\Documents\FS\EDDNEDDC_ACARS.txt"
set "search=[OFP]"

set /a "line=0"
set "Dep_Code="
set "Arv_Code="
set "Arrival="
set "Arv_time="

for /f "usebackq tokens=* delims=" %%a in ("%file%") do (
    set /a "line+=1"
    if "!line!" equ "4" (
        set "Dep_Code=%%a"
        set "Dep_Code=!Dep_Code:~20,4!"
    )
    if "!line!" equ "8" (
        set "Arv_Code=%%a"
        set "Arv_Code=!Arv_Code:~25,4!"
    )
    if "!line!" equ "9" (
        set "Arrival=%%a"
        for /f "tokens=2 delims=-" %%b in ("!Arrival!") do (
            set "Arrival=%%b"
        )
        set "Arrival=!Arrival:~1!"
    )
    if "!line!" equ "10" (
        set "Arv_time=%%a"
        set "Arv_time=!Arv_time:~24,4!"
        goto :endloop
    )
    if "%%a"=="!search!" (
        set /a "line+=4"
    )
)

:endloop
set "output=%Dep_Code% %Arv_Code% %Arrival% %Arv_time%"
echo %output% >> Ziel.txt