[SUBROUTINE]
name = Ending
type = Ending
icon = icons/lathe-facing.png
image = images/lathe-facing.png
help = Торцевание детали.
order = face_Z0 face_X0 face_safe face_Z1 face_X1 face_rdepth face_rough_feed face_allowance face_pdepth face_fin_feed

[PARAM_face_safe]
name = Safe distance
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Безопасное расстояние
value = 2

[PARAM_face_Z1]
name = Z1
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Конечная координата Z
value = 0

[PARAM_face_Z0]
name = Z0
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Исходная координата Z 
value = 3

[PARAM_face_rdepth]
name = rdepth
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Черновая глубина реза 
value = 0.7


[PARAM_face_fdepth]
name = fdepth
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Чистовая глубина реза 
value = 0.5

[PARAM_face_allowance]
name = Finishing allowance
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Припуск на чистовую обработку 
value = 0.2


[PARAM_face_X0]
name = X start
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Исходный диаметр
value = 11

[PARAM_face_X1]
name = X finish
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Конечный диаметр
value = 0

[PARAM_face_fin_feed]
name = Finishing feed
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Подача резанья при чистовой обработке
value = 100

[PARAM_face_rough_feed]
name = Roughing feed
type = float
icon = icons/line.png
image = images/line.png
tool_tip = Подача резанья при черновой обработке
value = 300



[DEFINITIONS]
content = 

	
[CALL]
content =

        #<fcut> = #param_face_fdepth                            ; Глубина реза при чистовой обработке
        #<allowance> = #param_face_allowance                    ; Припуск на чистовую обработку
        #<zfinish> = #param_face_z1                             ; Чистовая конечная координата по Z
        #<zstart> = #param_face_z0                              ; Начальная координата по Z
        #<zrough> = [#<zfinish> + #<allowance>]                 ; Черновая конечная по Z
        #<rf> = #param_face_rough_feed                          ; Подача при черновой обработке
        #<ff> = #param_face_fin_feed                            ; Подача при чистовой обработке

        #<rcut> = #param_face_rdepth                            ; Глубина реза при черновой обработке
        #<safe> = #param_face_safe                              ; Безопасное расстояние
        ; Расчет толщины торца
        #<d> = ABS[ #param_face_x1 - #param_face_x0 + #<safe>]  ; Ширина торца
        ; Расчет колличества проходов при черновой обработке
 

       #<dzr> = ABS[ #<zfinish> + #<allowance> - #<zstart> ]
       #<nn> =  [[#<dzr> - [#<dzr> mod #<rcut>]] / #<rcut>]         ; Колличество проходов при черновой обработке
       #<pass> = 0      

        G90 G0 X[#param_face_x0 + #<safe>] Z[#param_face_z0 + #<safe>]
        G91 G1 Z-[#<safe>] F[#<rf>]
               X-[#<d>]
               Z[#<safe>] 
            G0 X[#<d>]
               
        o100 do
        G91 G1 Z-[#<safe> + #<rcut>] F[#<rf>]
               X-[#<d>]
               Z[#<safe>] 
            G0 X[#<d>]
        #<pass> = [#<pass>+1]
        o100 while [#<pass> LT [#<nn>]]
        ; Последний черновой проход 
        G90 G1 Z[#<zfinish> + #<allowance> ] F[#<rf>]
        G91 G1 X-[#<d>] F[#<rf>]
               Z[#<safe>] 
            G0 X[#<d>]
        ; Чистовой проход
        o101 if [#<allowance> GT #<fcut>]
        (print,Error: Finish cut leather then allowance for finishing!)
 
        o101 endif
       (print,Info: Finishing!)
        G90 G1 Z[#<zfinish>] F[#<ff>]
        G91 G1 X-[#<d>] F[#<ff>]
               Z[#<safe>] 
            G0 X[#<d>]

[BEFORE]
content = 
		
[AFTER]
content =