Creating The User Cycle File - Siemens SINUMERIK 808D Function Manual

23.7.4

Creating the user cycle file

You can create a user cycle file according to different machining functions. It is a subroutine program that can be used at
calling a cycle.
Naming rule
CYCLExxx.SPF
Here "xxx" refers to the cycle number. It must not exceed four digits..
Note
The name of a user cycle must not be same with that of a standard Siemens cycle. It is recommend to use a cycle number
with the range of 100 to 800.
Programming example
Create the program with a wordpad or notepad.
As a cycle screen always also transfers values as call parameters to the user cycle, the transfer interface is defined as
follows.
PROC CYCLE100(REAL DIA,REAL DIAF,REAL STAP,REAL ENDP,REAL MID,REAL UX,INT MACH,REAL VRT)
SAVE SBLOF DISPLOF
PROC is a keyword followed by the cycle name with the cycle number. All the transfer parameters for the screen are
contained within brackets with the data type and name separated by commas.
PROC CYCLE100(REAL DIA,REAL DIAF,REAL STAP,REAL ENDP,REAL MID,REAL UX,INT MACH,REAL VRT)
SAVE SBLOF DISPLOF
DEF REAL VAR1
IF $P_EP[X]<DIA GOTOF LL1
LL3:
IF DIAF>DIA GOTOF END2
START:
IF MACH==0 GOTOF ROUGHING1
IF MACH==1 GOTOF FINISHING
IF MACH==2 GOTOF ROUGHING1
DEF REAL VAR1
ROUGHING1:
R101=(DIA-DIAF)/2-UX
R102=R101/MID
R103=TRUNC(R102)
R104=0
VAR1=DIA
IF R103<=1 GOTOF ROUGHING2
LL2:
SBLON
G90 G0 X=VAR1 Z=STAP+2
G1 Z=ENDP
G91 X=MID
G0 G91 X=VRT Z=VRT
G90 G0 Z=STAP+2
SBLOF
VAR1=VAR1-2*MID
R104=R104+1
IF R104<=R103 GOTOB LL2
IF R104>R103 GOTOF ROUGHING2
Function Manual
216
01/2017