Schaublin 125-CNC retrofit.

I am coming to this conclusion as well, that I need to break out the CAD (cardboard a.. D..).

I need to order a second 7i73 for that front rail, sliding pendant as well, as it will be much more than I first envisaged.

this is my temp configuration, x z rapid joystick, x z mog dials, connector for my foot switch for my chuck " i wrote a hal component for this check hal examples" . 

everything else is pretty much dead. I'm not a fan of having turret jog controls, long borings etc will hit stuff. better to write a macro that calls g28 for a tool change and move the carriage somewhere safe

I'm still prototyping my controls layout, but it's going to be a variation of this with some dedicated buttons.

smc.collins wrote:

 I'm not a fan of having turret jog controls, long borings etc will hit stuff. better to write a macro that calls g28 for a tool change and move the carriage somewhere safe

 

Very, very good point.

I get super paranoid with some of my large drill bits, I have a 3 inch drill that is 14 inches long out front of the tool block, and that thing will smash shit. I am working on writing some macros for tool change related stuff. heres my attempt


see post below for edit


and some hal file stuff


net jog-tool-up halui.mdi-command-00 <= your_input_pin_for_tool_up
net jog-tool-down halui.mdi-command-01 <= your_input_pin_for_tool_down

setp halui.mdi-command-00.string "O<jog_tool_up_down> CALL"
setp halui.mdi-command-01.string "O<jog_tool_up_down> CALL"


and more info 

[RS274NGC] ... SUBROUTINE_PATH = /path/to/your/subroutines/directory


I think this will require adding the macros to the INI file as well. I haven't made it that far yet. I started working on a macro to move y Z up and down during toolchanges, because the carousel on my SLV40 only goes left/right or along the X , the bmc20 has the carousel move up and down and the bmc30 is like the slv40, so I started with the carousel I had the most of. 

I scratched this down on some notepad and had chat gpt clean it up, TEST CAREFULLY I HAVE NOT TESTED THIS CODE

I hate to divert Mark's thread on a tangent... but how do you GOTO in LCNC?  I thought that was verboten because reasons.

Or is this for a non-LCNC machine?

I didn't realize that, doh, I had been learning the fanuc code for another project. 




O<jog_tool_up_down> SUB

#<_halui_input1> = #<_ini[halui.jog.tool_up]>
#<_halui_input2> = #<_ini[halui.jog.tool_down]>

(Initialize block numbers)
#100 = 0

WHILE [#100 LT 1]

(If halui input1 is triggered, jog tool up)
IF [#<_halui_input1> EQ 1] AND [#<_halui_input2> EQ 0] THEN
G28 (Move to tool change position)
M6 T[ATC_NEXT]
M61 Q[ATC_CURRENT]
G43 (Load and store the tool offsets)
#100 = 1
ENDIF

(If halui input2 is triggered, jog tool down)
IF [#<_halui_input1> EQ 0] AND [#<_halui_input2> EQ 1] THEN
G28 (Move to tool change position)
M6 T[ATC_PREV]
M61 Q[ATC_CURRENT]
G43 (Load and store the tool offsets)
#100 = 1
ENDIF

ENDWHILE

(Ensure a tool is set in the turret)
IF [ATC_CURRENT GT 0] THEN
M6 T[ATC_CURRENT] (Set the current tool in the turret)
ENDIF

O<jog_tool_up_down> ENDSUB