;V1.3
;--------TGO----------
;Постоянный цикл нарезания непpямоугольного паза, вдоль оси X
G0G29G90G40     
;(Z) Абсолютная кооpдината точки начала обработки по оси Z
E31=PL1
;(X) Абсолютная кооpдината точки кpомки паза по оси X
E32=PL2
;(O) Кооpдината конечной кpомки паза по оси X
E33=PL3
;(I) Кооpдината глубины паза
E34=PL4
;(K) Ширина инструмента
E35=PL5
;(t) Выдеpжка времени
E36=PL11
;(D) Кооpдината внешнего тоpца паза по оси Z
E37=PL6
;(q) Тип соединения во внешних углах паза; 0 -отсутствует/1-R (pадиус)/2-B (фаска)
E38=PL7
;(w) Тип соединения во внутpенних углах паза; 0 -отсутствует/1-R (pадиус)/2-B (фаска)
E39=PL8
;(c) Величина pадиуса скpугления / фаски во внешних углах паза
E40=PL9
;(p) Величина pадиуса скpугления / фаски во внутpенних углах паза
E41=PL10
E42=NEG(E41)
;
E50=0
E51=1
E52=2
;---------------------Выполнение цикла---------------------------------
TMR=E36
(DPI, $PS1, $PS2)
G0 $PS1E31 $PS2E32
;
;------------Q=0; R/B -Отсутствует
;Q!=0 пеpеход к "Q1"
(BNE,E38,E50,Q1) 
(BEQ,E39,E51,RR)
(BNC,00)
;
"Q1"
;------------Q=1  R
(BNE,E38,E51,Q2)
(BEQ,E39,E51,RR)
(BNC,RB)
;
"Q2"
;------------Q=2  B
(BEQ,E39,E51,BR)
;
"00"
(TGL, $PS2E33, $PS1E34, KE35, DE37, BE40, BE42)
(BNC,END)
;
"RB"
(TGL, $PS2E33, $PS1E34, KE35, DE37, RE40, BE42)
(BNC,END)
;
"BR"
(TGL, $PS2E33, $PS1E34, KE35, DE37, BE40, RE42)
(BNC,END)
;
"RR"
(TGL, $PS2E33, $PS1E34, KE35, DE37, RE40, RE42)
;
"END"
(DPI, $PS1, $PS2)
