Kontur mit R-Parametern oder GUDs erstellen?

Moin,

hab versucht, eine Drehkontur mit Parametern zu programmieren. Leider ohne Erfolg. Nun habe ich gemischte Dinge hierzu im Forum gelesen.
Die einen sagen es geht nicht, andere sagen wiederum es geht doch aber sehr umständlich. Die Beispiele, die dabei gezeigt wurden, waren bedauerlicherweise nicht so ganz aufschlussreich.
Kann mir jemand sagen, ob und wie man das ganze umsetzen kann? Vielen Dank im Voraus für jegliche Hilfe.

Moin Paddy,

doch... sogar ganz Einfach:

In dem Fall ist die Kontur in einem Unterprogramm abgelegt und wird im Zyklus Aufgerufen.

Läuft so auf einer Montforts RNC 700 mit 840D:

Hauptprogramm:

%_N_1234567_MPF
;$PATH=/_N_WKS_DIR/_N_BSP_WPD

N10 G54
N20 M42
N30 G26 S800
N40 G00 X500 Z500 D0
STOPRE
N50 R01=90 ; ROH-DIA INNEN
N60 R03=200 ; AUSSEN-DIA
N70 R04=300 ; AUSSEN-DIA ROH
N80 R05=25 ; LAENGE AUSSEN
N130 R45=5 ; PLAN UEBERMASS
STOPRE

N140 R888=0
N150 ; PLAN-DREHM.
N150 MSG(" PLAN-DREHM. ")
N160 LIMS=800
N170 M42
N175 M66
N180 G18 G96 T01 D1 S200 M04
N190 G00 X=15+R04 Z=10+R45
N210 G01 F.3 M08
;NCG#CYC95#\CST.DIR\DREHEN.COM#NC1#3#*NCG;*RO*;*HD*
;#4####"ohne Nachziehen"#1#4#1#1#3#3#1#1#1#1#3##1#3#0#0#*NCG;*RO*;*HD*
N210 CYCLE95("L200",2,5,0,0,0,0.3,0.3,0,202,0,0,1)
;#END#*NCG;*RO*;*HD*
N220 G00 Z100 M09
N230 G00 G40 X500 Z500 D0 M09

N240 ; LAENGS-DREHM.
N240 MSG(" LAENGS-DREHM. ")
N250 LIMS=800
N260 M42

N270 G18 G96 T03 D1 S200 M04
N280 G00 X=4+R04 Z10
N290 STOPRE
/N300 X=4+R04 Z5.15
/N310 MSG(" ABSTAND 5MM ")
/N310 M00 ; ABSTAND 5MM
/N320 STOPRE
/N330 G00 X=-2+R04 Z1 M04
/N340 G01 Z-10 F.25 M08
/N350 G00 X=4+R04 Z10 M09
/N360 X=20+R04 Z250
/N370 MSG(" MESSEN DIA- R04-2 ")
/N370 M00 ; MESSEN DIA- R04-2
/N380 STOPRE
N390 G00 G96 X=2+R04 Z5 S200 M04
N410 G01 F.25 M08
;NCG#CYC95#\CST.DIR\DREHEN.COM#NC1#3#*NCG;*RO*;*HD*
;#4####"ohne Nachziehen"#1#4#4#1#4#4#5#1#1#1#3##1##0#0#*NCG;*RO*;*HD*
N410 CYCLE95("L100",5,0.15,0.25,0,0.25,0.25,0,201,0,0,1)
;#END#*NCG;*RO*;*HD*
N420 G00 Z100 M09
N430 G00 X500 Z500 D0
M30

Hier die Unterprogramme:
Planschruppen:

%_N_L200_SPF
;$PATH=/_N_SPF_DIR
PROC L200 SAVE
N10 X=20+R04 Z0
N15 X=-5+R01
N20 Z=R45
M17

Längsschruppen:
%_N_L100_SPF
;$PATH=/_N_SPF_DIR
N10 PROC L100 SAVE
N15 G1 X=R03-4 Z1
N20 X=R03 Z-1
N25 Z=-R05
N30 X=R04
N35 M17

Der Fantasie sind da fast keine Grenzen gesetzt...