BEGIN PGM 480 MM
FN 18: SYSREAD QL0 = ID 990 NR 2 IDX 10
FN 9: IF +QL0 EQU +1 GOTO LBL "END"
FN 18: SYSREAD QL1 = ID 990 NR 2 IDX 16
FN 9: IF +QL1 EQU +0 GOTO LBL "END"
FN 18: SYSREAD QL10 = ID 1000 NR 6562 IDX 0
FN 9: IF +QL10 EQU -1 GOTO LBL "NO_PRE"
M QL10
LBL "NO_PRE"
TCH PROBE 30.0 TT KALIBRIEREN
TCH PROBE 30.1 HOEHE: +Q260
FN 18: SYSREAD QL11 = ID 1000 NR 6562 IDX 1
FN 9: IF +QL11 EQU -1 GOTO LBL "NO_POST"
M QL11
LBL "NO_POST"
LBL "END"
END PGM 480 MM
