HYPERMILL后处理求多重原点代码
求大神帮忙，跪求HM后处理多重原点代码sri ir3, 1
cvi wait_for_3X
svi wait_for_3X, ir3
cvi splitG0
; ---
cvi workoffset_active
cvi G90_ON
; --- HSC mode ---
cvi HSC_mode_active
; --- inverse time ---
cvf 3Dlength
cvi IT_active
; ---
cvi safePosition
; ---
cvi tool_has_changed
cvi tool_changes
; ---
cvi 1st_move_of_job
sri ir3, 1
cvi 1st_TC
svi 1st_TC, ir3
cvi compTL_active
; ---
cvi remove_file
; ---
cvf surface_z
; -
cvi 2D_drilling_active
; -
xvs blank
jz CREATE_BLANK
jmp END_OF_BLANK
lbl CREATE_BLANK
sri ir1, 16
cvs blank
srs sr1, " "
svs blank, sr1
lbl END_OF_BLANK
; -
sri ir1, 256
cvs S_memo
; ----------------------------------------------------
sri ir3, 0
;sri ir3, 1
cvi dump_current_procedure
svi dump_current_procedure, ir3
页:
[1]