IF (MC_BASE[56] == 0) OR (MC_BASE[56] > (MC_BASE[0] + 1)) OR (MC_BASE[56] < (MC_BASE[0] - 1))
MC_BASE[56] = MC_BASE[0]
ENDIF
IF (B_SOLL > 90) OR (B_SOLL < -115)
SETAL(66116)
STOPRE
ENDIF
IF (S_Drei_WINKEL <> 0) AND (S_Drei_WINKEL <> 180)
SETAL(66116)
STOPRE
ENDIF
IF (Schneide < 0) OR (Schneide > 4)
SETAL(66116)
STOPRE
ENDIF
DIAMOF
M2=150 M4=150 M32 M1=98
M439 M450 M7=161
$TC_CARR1[0] = 0
$P_PFRAME = CROT()
$P_UBFR[X1,TR] = 0
$P_BFRAME=$P_UBFR
REPEAT
FROM_PLC("DB12.DBX45.3", Sonderbetrieb)
IF Sonderbetrieb <> 0
SETAL(67004)
M00
STOPRE
ENDIF
Сабж, не могу понять что за язык