Siemens SINUMERIK 840D sl Programmierhandbuch Seite 716

Eigene Abspanprogramme
15.6 Kreisdaten berechnen (CALCDAT)
Beispiel
Von drei Punkten soll ermittelt werden, ob sie auf einem Kreisabschnitt liegen.
Programmcode
N10 DEF REAL PKT[3,2]=(20,50,50,40,65,20)
N20 DEF REAL ERG[3]
N30 DEF BOOL STATUS
N40 STATUS=CALCDAT(PKT,3,ERG)
N50 IF STATUS == FALSE GOTOF ERROR
716
Kommentar
; Variable zur Angabe der
Kreispunkte
; Variable für Ergebnis
; Variable für Status
; Aufruf der ermittelten
Kreisdaten.
; Sprung zu Fehler
Programmierhandbuch, 03/2010, 6FC5398-2BP20-1AA0
Arbeitsvorbereitung