BEGINPGM204MM
Q295=Q297
Q297=0
FN9:IF+Q295EQU+1GOTOLBL200
Q200=ABSQ200
Q204=ABSQ204
Q214=ABSQ214
Q250=ABSQ250
Q251=ABSQ251
Q252=ABSQ252
LBL200
FN17:SYSWRITEID212=+3
FN18:SYSREADQ0=ID1000NR7441
Q0=2*FRAC(Q0/2)
FN9:IF+Q0EQU+1GOTOLBL199
FN9:IF+Q110EQU+0GOTOLBL199
FN9:IF+Q110EQU+1GOTOLBL199
FN14:ERROR=1000
LBL199
FN10:IF+Q109NE-1GOTOLBL198
FN14:ERROR=1001
LBL198
FN9:IF+Q249EQU+0GOTOLBL189
FN12:IF+Q249LT+0GOTOLBL197
FN0:Q58=+1
FN9:IF+0EQU+0GOTOLBL194
LBL197
FN0:Q58=-1
LBL194
FN9:IF+Q295EQU+1GOTOLBL193
CALLLBL99
LBL193
FN10:IF+Q214NE+0GOTOLBL192
FN14:ERROR=1041
LBL192
FN0:Q61=+Q110
FN0:Q62=+Q111
FN18:SYSREADQ299=ID210NR3
FN17:SYSWRITEID210NR3=+0
LBL100
FN1:Q19=+Q203++Q200
Q51=ABSQ200
Q52=ABSQ204
FN11:IF+Q51GT+Q52GOTOLBL12
FN1:Q19=+Q203++Q204
FN1:Q20=+Q203++Q200
LBL12
Q31=Q203-Q250-Q252-Q200
Q32=Q31+Q200+Q249
FN0:Q25=+Q253
FN10:IF+Q253NE+0GOTOLBL14
FN0:Q25=+Q254
LBL14
LZ+Q20R0FMAX
FN18:SYSREADQ1=ID20NR5
FN9:IF+Q1EQU+0GOTOLBL201
FN9:IF+Q1EQU+1GOTOLBL201
FN9:IF+Q0EQU+1GOTOLBL183
LBL201
FN18:SYSREADQ36=ID210NR1
FN18:SYSREADQ37=ID210NR2
Q36=Q36+Q37
CYCLDEF13.0ORIENTIERUNG
CYCLDEF13.1WINKELQ36
LM19
LBL183
FN10:IF+Q214NE+0GOTOLBLQ214
FN9:IF+0EQU+0GOTOLBL99
LBL1
LIX-Q251R0FQ25
LZ+Q31R0FQ25
LIX+Q251R0FQ25
CALLLBL10
LZ+Q32R0FQ254
CYCLDEF9.0VERWEILZEIT
CYCLDEF9.1V.ZEITQ255
LZ+Q31R0FQ25
FN18:SYSREADQ1=ID20NR5
FN9:IF+Q1EQU+0GOTOLBL202
FN9:IF+Q1EQU+1GOTOLBL202
FN9:IF+Q0EQU+1GOTOLBL184
LBL202
CYCLDEF13.0ORIENTIERUNG
CYCLDEF13.1WINKELQ36
LM19
LBL184
LIX-Q251R0FQ25
LZ+Q20R0FQ25
LZ+Q19R0FMAX
LIX+Q251R0FQ25
FN9:IF+0EQU+0GOTOLBL99
LBL2
LIY-Q251R0FQ25
LZ+Q31R0FQ25
LIY+Q251R0FQ25
CALLLBL10
LZ+Q32R0FQ254
CYCLDEF9.0VERWEILZEIT
CYCLDEF9.1V.ZEITQ255
LZ+Q31R0FQ25
FN18:SYSREADQ1=ID20NR5
FN9:IF+Q1EQU+0GOTOLBL203
FN9:IF+Q1EQU+1GOTOLBL203
FN9:IF+Q0EQU+1GOTOLBL185
LBL203
CYCLDEF13.0ORIENTIERUNG
CYCLDEF13.1WINKELQ36
LM19
LBL185
LIY-Q251R0FQ25
LZ+Q20R0FQ25
LZ+Q19R0FMAX
LIY+Q251R0FQ25
FN9:IF+0EQU+0GOTOLBL99
LBL3
LIX+Q251R0FQ25
LZ+Q31R0FQ25
LIX-Q251R0FQ25
CALLLBL10
LZ+Q32R0FQ254
CYCLDEF9.0VERWEILZEIT
CYCLDEF9.1V.ZEITQ255
LZ+Q31R0FQ25
FN18:SYSREADQ1=ID20NR5
FN9:IF+Q1EQU+0GOTOLBL204
FN9:IF+Q1EQU+1GOTOLBL204
FN9:IF+Q0EQU+1GOTOLBL186
LBL204
CYCLDEF13.0ORIENTIERUNG
CYCLDEF13.1WINKELQ36
LM19
LBL186
LIX+Q251R0FQ25
LZ+Q20R0FQ25
LZ+Q19R0FMAX
LIX-Q251R0FQ25
FN9:IF+0EQU+0GOTOLBL99
LBL4
LIY+Q251R0FQ25
LZ+Q31R0FQ25
LIY-Q251R0FQ25
CALLLBL10
LZ+Q32R0FQ254
CYCLDEF9.0VERWEILZEIT
CYCLDEF9.1V.ZEITQ255
LZ+Q31R0FQ25
FN9:IF+Q1EQU+0GOTOLBL205
FN9:IF+Q1EQU+1GOTOLBL205
FN9:IF+Q0EQU+1GOTOLBL188
LBL205
CYCLDEF13.0ORIENTIERUNG
CYCLDEF13.1WINKELQ36
LM19
LBL188
LIY+Q251R0FQ25
LZ+Q20R0FQ25
LZ+Q19R0FMAX
LIY-Q251R0FQ25
LBL99
FN9:IF+Q295EQU+1GOTOLBL187
FN3:Q200=+Q200*+Q58
FN3:Q204=+Q204*+Q58
FN3:Q252=+Q252*+Q58
FN3:Q250=+Q250*+Q58
LBL0
LBL187
FN17:SYSWRITEID210NR3=+Q299
LBL10
FN10:IF+Q62NE+1GOTOLBL191
LM8
LBL191
FN10:IF+Q61NE+0GOTOLBL190
LM3
FN9:IF+0EQU+0GOTOLBL189
LBL190
LM4
LBL189
LBL0
ENDPGM204MM
