Siemens SINUMERIK 840Di sl Funktionshandbuch Seite 141

Anfang:
R1=0
R2=0
R3=0
R4=0
R5=0
R6=1
R7=1
M_ZAEHNE=ZAEHNEZAHL*2
Z_MW=0
Z_RW=2
R13=HYS_POS_FLANKE
R14=HYS_NEG_FLANKE
;*** Achse fahren, messen, rechnen ***
N100 MEAC[BACH]=(0)
;Rücksetzen der FIFO1[4] Variablen und Sicherstellen eines definierten Messtrace
N105 $AC_FIFO1[4]=0
STOPRE
; *** FIFO auslesen bis Zähnezahl erreicht ***
; wenn FIFO1 nicht leer und noch nicht alle Zähne gemessen, Messwert aus FIFO-
; Synchronaktionsparameter umspeichern und Zähler Messwerte erhöhen
ID=1 WHENEVER ($AC_FIFO1[4]>=1) AND (Z_MW<M_ZAEHNE)
;wenn 2 Messwerte vorhanden sind, anfangen zu rechnen, NUR Lückenmaß
;rechnen und Lückensumme, Rechenwertzähler um 2 erhöhen
ID=2 WHENEVER (Z_MW>=Z_RW) AND (Z_RW<M_ZAEHNE)
;*** Einschalten der Achse BACH als endlos drehende Rundachse mit MOV ***
WAITP(BACH)
ID=3 EVERY $R6==1 DO MOV[BACH]=1
FA[BACH]=1000
ID=4 EVERY $R6==0 und
($AA_STAT[BACH]==1) DO MOV[BACH]=0
; Messen nacheinander, Ablegen in FIFO 1, MT2 neg, MT2 pos Flanke
;gemessen wird der Abstand zwischen 2 Zähnen
;fallende Flanke-...-steigende Flanke, Taster 2
N310 ID=5 WHEN $R7==1 DO MEAC[BACH]=(2, 1, -2, 2)
N320 ID=6 WHEN (Z_MW>=M_ZAEHNE) DO
MEAC[BACH]=(0)
M00
STOPRE
Synchronaktionen
Funktionshandbuch, 11/2006, 6FC5397-5BP10-2AA0
Variable in
DO $AC_PARAM[0+Z_MW]=$AC_FIFO1[0] Z_MW=Z_MW+1
DO $R1=($AC_PARAM[-1+Z_RW]-$R13)-($AC_PARAM[-2+Z_RW]-$R14) Z_RW=Z_RW+2
$R2=$R2+$R1
5.6 "Einmitten" mit kontinuierlichem Messen
; *** Variablen zuweisen ***
; ID2 Rechenergebnis Lückenmaß
; ID2 Rechenergebnis Addition aller Lücken
; Inhalt des zuerst eingelesenen Elements
; R4 Entspricht einem Zahnabstand
; Lückenposition errechnet, Endergebnis
; ID 3 BACH mit MOV einschalten
; ID 5 MEAC einschalten
; ID rechnen neg./pos. Flanke je Zahn
; ID Zähler MW FIFO auslesen bis Zähnezahl
; ID Zähler Rechnen Differenz Zahnlücke
; Hysterese in Rechenregister
; Hysterese in Rechenregister
; Messauftrag rücksetzen
; FIFO1 rücksetzen
; einschalten
; ausschalten
; Messung abbrechen
Beispiele
5-11