Programmierbeispiel

Berechnungszyklus

; creation of return variables

#VAR

V.CYC.SysRetNormalX

V.CYC.SysRetNormalY

V.CYC.SysRetNormalZ

V.CYC.SysRetSupVectorX

V.CYC.SysRetSupVectorY

V.CYC.SysRetSupVectorZ

#ENDVAR

; calculation of the XY-plane

L CYCLE [NAME=SysCalcPlane.ecy \

@P50 = 1 @P60 = 0 @P70 = 0 \

@P51 = 0 @P61 = 1 @P71 = 0 \

@P52 = 1 @P62 = 1 @P72 = 0 ]

; print result

#FILE NAME[MSG="SysCalcPlaneResult.txt" ]

#MSG SAVE ["Normal X = %f", V.CYC.SysRetNormalX ]

#MSG SAVE ["Normal Y = %f", V.CYC.SysRetNormalY ]

#MSG SAVE ["Normal Z = %f", V.CYC.SysRetNormalZ ]

#MSG SAVE ["Point X = %f", V.CYC.SysRetSupVectorX ]

#MSG SAVE ["Point Y = %f", V.CYC.SysRetSupVectorY ]

#MSG SAVE ["Point Z = %f", V.CYC.SysRetSupVectorZ ]

M30