@change_tool
if !first_tool
call @stop_cool
call @stop_tool
{nb,'G0 G91 G28 Z0.0'}
call @machine_opt_stop
endif
{nb,'T',tool_number,'M06' }
{nb, '(N'seq_number' T'tool_number,' ',tool_user_type,'- DIA 'tool_diameter,' - ', tool_message , ')'}
seq_number = seq_number + 1
if last_tool eq true
{''}
else
{nb, 'T'next_tool_number}
endif
first_move = true
endp |