per Batch Zeichen in Textzeilen einfügen

Hallo,

ich möchte gerne txt Dateien mit gleichem Aufbau (Satzlänge immer gleich) per Batch wie folgt ändern:


Ursprünglicher Aufbau
43201 10090916150400100002023 4.171117
43201 10090911261700400006320 24.54246666


gewünschter Aufbau
43201 10.09.0916:15:0400100002023 4.171117
43201 10.09.0911:26:1700400006320 24.54246666


Ziel soll es sein, dass an Stelle 13 + 15 ein Punkt (.) und an Stelle 19 + 21 ein Doppelpunkt ( eingesetzt wird.

Hat jemand ein Vorschlag, wie man dies lösen kann? Habe es schon mit dem for-Befehl versucht - leider ohne Erfolg.


Danke im Voraus.

@echo off & setlocal
FOF /F "delims=" %%i in ("D:\EineDatei.txt") do set "line=%%" & call:ProcessLine  
goto :eof

:processline In %line% ist je eine ganze Zeile
Echo %line:~0,12%.%%line:~13,2%.%line:~15,2% usw.
goto :eof

@echo off & setlocal
set "Datei=D:\Dein.txt"  
set "Bak=bak"  

set /p Zeile1=<"%Datei%"  
if "%Zeile1:~8,1%"=="." echo Datei bereits im richtigen Format & goto :eof  

move "%Datei%" "%Datei%.%Bak%">nul  
for /f "usebackq delims=" %%i in ("%Datei%.%Bak%") do set "Zeile=%%i" & call :ProcessLine  
::del "%Datei%.%Bak%" 
goto :eof

:ProcessLine
>>"%Datei%" echo %Zeile:~,8%.%Zeile:~8,2%.%Zeile:~10,4%:%Zeile:~14,2%:%Zeile:~16%  
goto :eof