Well...I might not be a programmer...but it will get done (with a little help ;) )
Yes....the capturing of the M-Code works just fine.
What I want to do is add the following textcluster at the end of each output file. This textcluster is not linked to any M-Code and should just be printed "as is".
Of course I could just manually copy&paste thist cluster, but...you know...that would be unacceptable ;)
DEF laser_on()
;FOLD OUT 13 'Laser bereit (standby)' State=TRUE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:13, 3:Laser bereit (standby), 5:TRUE, 6:
$OUT[13]=TRUE
;ENDFOLD
;FOLD OUT 14 'Laser (Steuerung) ein' State=TRUE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:14, 3:Laser (Steuerung) ein, 5:TRUE, 6:
$OUT[14]=TRUE
;ENDFOLD
;FOLD OUT 267 'Absaugung ein' State=TRUE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:267, 3:Absaugung ein, 5:TRUE, 6:
$OUT[267]=TRUE
;ENDFOLD
;FOLD OUT 266 'Sauerstoff' State=TRUE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:266, 3:Sauerstoff, 5:TRUE, 6:
$OUT[266]=TRUE
;ENDFOLD
laser_ein(3,800,#schneiden)
;FOLD WAIT Time=3 sec;%{PE}%R 8.3.38,%MKUKATPBASIS,%CWAIT,%VWAIT,%P 3:3
WAIT SEC 3
;ENDFOLD
laser_aus()
laser_ein(1,1000,#schneiden)
END
DEF laser_off()
;FOLD OUT 266 'Sauerstoff' State=FALSE CONT;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:266, 3:Sauerstoff, 5:FALSE, 6:CONTINUE
CONTINUE
$OUT[266]=FALSE
;ENDFOLD
;FOLD OUT 267 'Absaugung ein' State=FALSE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:267, 3:Absaugung ein, 5:FALSE, 6:
$OUT[267]=FALSE
;ENDFOLD
;FOLD OUT 14 'Laser (Steuerung) ein' State=FALSE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:14, 3:Laser (Steuerung) ein, 5:FALSE, 6:
$OUT[14]=FALSE
;ENDFOLD
;FOLD OUT 13 'Laser bereit (standby)' State=FALSE ;%{PE}%R 8.3.38,%MKUKATPBASIS,%COUT,%VOUTX,%P 2:13, 3:Laser bereit (standby), 5:FALSE, 6:
$OUT[13]=FALSE
;ENDFOLD
;FOLD LIN P13 Vel=0.5 m/s CPDAT10 Tool[2]:Schneidkopf Base[0];%{PE}%R 8.3.38,%MKUKATPBASIS,%CMOVE,%VLIN,%P 1:LIN, 2:P13, 3:, 5:0.5, 7:CPDAT10
$BWDSTART=FALSE
LDAT_ACT=LCPDAT10
FDAT_ACT=FP13
BAS(#CP_PARAMS,0.5)
LIN XP13
;ENDFOLD
pv_korrektur=false
END