Lathe ATC 8 Position.

Ғылым және технология

8 position Lathe ATC.
How to set up DIY tool changer, how to add buttons to the Mack3 screen set, change settings for the Pokeys57cnc/Pokeys57U boards and mechanical buttons.
it was a 4-1
cnc boards........
Pokeys57cnc www.poscope.com/product/pokey...
Pokeys57u www.poscope.com/product/pokey...
PoExtBusOC16 www.poscope.com/product/poext...
Pokeys downloads www.poscope.com/downloads-man...
Screen editor
Machscreen. Click on Program Downloads
kd-dietz.com/
M6start. Copy and paste into M6start.M1S file.
mach3 directory/macros
Sub Main() 'Definir variables
OldTool = GetOEMDRO (1200)
x = GetToolChangeStart( 0 )
y = GetToolChangeStart( 1 )
z = GetToolChangeStart( 2 )
a = GetToolChangeStart( 3 )
b = GetToolChangeStart( 4 )
c = GetToolChangeStart( 5 )
tool = GetSelectedTool()
NewTool = tool
MaxToolNum = 8
If NewTool = OldTool Then
Exit Sub
End If
While NewTool > MaxToolNum
NewTool = Question ("Place valid tool number (1 to 8)")
Wend
'Call MovePos(OldTool)
'While IsMoving()
'Wend
ActivateSignal(Output4)
Code "G4 P.5"
Call MovePos(NewTool)
While IsMoving()
Wend
DeActivateSignal(Output4)
Code "G4 P.5"
While IsMoving()
Wend
Call SetUserDRO (1200,NewTool)
SetCurrentTool( NewTool )
DeActivateSignal(Output19)
DeActivateSignal(Output18)
DeActivateSignal(Output17)
DeActivateSignal(Output16)
DeActivateSignal(Output15)
DeActivateSignal(Output14)
DeActivateSignal(Output13)
DeActivateSignal(Output12)
Newtool = GetOEMDRO (1200)
If Newtool = 1 Then ActivateSignal(Output19)
If Newtool = 2 Then ActivateSignal(Output18)
If Newtool = 3 Then ActivateSignal(Output17)
If Newtool = 4 Then ActivateSignal(Output16)
If Newtool = 5 Then ActivateSignal(Output15)
If Newtool = 6 Then ActivateSignal(Output14)
If Newtool = 7 Then ActivateSignal(Output13)
If Newtool = 8 Then ActivateSignal(Output12)
End Sub
Sub MovePos(ByVal ToolNumber As Integer)
Select Case ToolNumber
Case Is = 1
Code "G00 A0.0"
Case Is = 2
Code "G00 A45.0"
Case Is = 3
Code "G00 A90.0"
Case Is = 4
Code "G00 A135.0"
Case Is = 5
Code "G00 A180.0"
Case Is = 6
Code "G00 A225.0"
Case Is = 7
Code "G00 A270.0"
Case Is = 8
Code "G00 A315.0"
End select
End Sub

Пікірлер: 43

  • @tat2joeelliott
    @tat2joeelliott7 ай бұрын

    THAT WAS THE BEST INFO ON THE POKEYS IVE EVER SEEN

  • @AntiVaganza
    @AntiVaganza3 жыл бұрын

    Don't beat yourself up, that presentation was actually really solid! Thanks man.

  • @jaimevillada9150
    @jaimevillada91504 жыл бұрын

    Saludos desde Colombia. Gracias por compartir tus conocimientos. Bendiciones en estos tiempos difíciles.

  • @jasonruch3529
    @jasonruch35293 жыл бұрын

    That was an awesome video! I seriously learned the type of things im looking to learn! Please please dont stop haha i love coding

  • @practicemakesbetter7132
    @practicemakesbetter7132 Жыл бұрын

    Great ideas, I found it very interesting.

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    very nice job sir. cheers

  • @9782ravi
    @9782ravi4 жыл бұрын

    Good explanation

  • @mostafaamin2549
    @mostafaamin25492 жыл бұрын

    Thank you

  • @jeym5948

    @jeym5948

    2 жыл бұрын

    Hllo sir ... can use arduino ?

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    Hi Sir, Just curious how do you keep track of the tool positions ? Are you tracking and homing tool #1 and then proceed with the tool change ? I noticed there is no line of code tracking some sort on tool position. Do you have to manually position to tool one when you first initialize the turret ?

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    Hi Rengan no need for tracking as yet. as the macro just takes the tool number from (1200) and make its calculation from there. as the tool changer is set up to run just like a 4th axis it just moves to a set degree. i.e tool 1 000, tool 2 045, tool 3 090. etc. it doesn't need to know where it is or has been like the (click) type tool changers. as for "Do you have to manually position to tool one when you first initialize the turret ?" when mach is first opened the tool is 0. just manually enter the tool that is in position at that time. I tend to leave it in tool 1 when i shut down mach. But..... I think there may be a problem over time. as if you are using micro stepping and lets say tool 1 is between a full step. when you power off your stepper motor will jump to the nearest step. so when you power back on your stepper wont be in the same place. do this a few times and i think it will eventually be out of line with the locking teeth. when i finally get this on a lathe, I will have to come up with a homing switch and homing macro. so when you press the homing button the Z,X axis will home. The tool changer will open, rotate till it hits some switch. then move the other way "?" amount to line up with tool 1. closes the changer, then puts 1 in (1200). everything should now be homed.

  • @leszekbednarczuk6025
    @leszekbednarczuk6025 Жыл бұрын

    Hello, are there any .dwg drawings of metal elements available?

  • @davidimurray
    @davidimurray3 жыл бұрын

    Fantastic video and very interesting. I'm just embarking on building a similar turret myself. Would you happen to have a link to where you bought the springs form and which ones? Thanks

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    Hi David, thanks for the comment. sorry but i can't give you the exact details you need. but i got the springs from here advanex.co.uk/product/compression-springs/. seems they have changed there website. Have found this place www.leespring.co.uk/compression-springs. just enter what you need. the springs in there at the mo are......12.7mm dia, 63.5mm long, 1.7mm wire. and I used 3 springs not 6. hope this helps.

  • @davidimurray

    @davidimurray

    3 жыл бұрын

    @@blightysbits That's great thanks very much? Hope you don't mind me asking a couple of questions 1) how are you finding the tool changer and what setup have you used for the tool plate? 2) How did you make the curvic coupling? 3) Any mods or changes you would make? Thanks

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    @@davidimurray 1) It works, that's all i can say at the mo, as i haven't built the lathe it goes onto yet. The tool disk has been turned up, but no milling done to it as yet. when i have finished it, it should turn out like the one Tormach has for there lathe. with the coolant holes as well. but will be able to mount the tools face up or face down. 2) curvic coupling, the disk blanks were made on the lathe. then put on a cnc mill to cut the interlocking bits out. there a few ways i have seen this being done. you could put both rings together, drill ream 8 10mm holes and put 10mm dowels on the fixed side. 3) the only thing i would change is how i did the bearing mounts. these i did so they would be screwed to the inside of the box. this means the inside walls have to be machined parallel. this is relay hard to do unless you have a 150mm long end mill, or a shaper. if you look in this video @1:38 you can see what i mean.... just left of the belt. The black bit of delrin on the other side is covering up the other mount on the outside of the box. this was the only way i could get the bushes to line up. if both was on the out side they would be inline and parallel with no alignment needed. hope that made sense.

  • @davidimurray

    @davidimurray

    3 жыл бұрын

    @@blightysbits Thanks very much

  • @tonymagri2846
    @tonymagri28463 жыл бұрын

    Thank you for doing this video has help alot. just one thing when it has past the 360deg mark, how does it reset back to 0 deg (ps great presentation) thanks

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    HI Tony, the tool changer is set up just like a conventional A axis. so the macro just tells the stepper to go to a set degree and i think Mach just works out the rest, as i have DRO mapped to the A axis and it gets up to some silly numbers. if you send it back to tool 1 it goes back to tool 1 but the DRO will read 2340 for e.g. any number it ends up at is a multiple of 45. There is a setting under Mach (General config, Rotational> ROT 360 rollover) This needs be ether checked or unchecked to get this macro to work. not much help i know, but the lathe pc is not up and running at the mo. hope this helped.

  • @tonymagri2846

    @tonymagri2846

    3 жыл бұрын

    ​@@blightysbits Hi that was a great info Thank you

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    Sir, your OEMDRO(1200) is custom defined or mach3 defined ? I searched through Mach3_V3.x_Macro_Prog_Ref.pdf and can only get up to OEM DRO Tool Length (current) 836. Am I referring to an obsolete document ?

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    Hi Rengan, I'm not a 100% on that one. your PDF and everything else i have looked at today says it should be 824. cant find any reference to 1200 apart from its in every tool changer macro i've seen. As you use 24 as the "standard code" i would say its mach defined.

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    @@blightysbits Thank you sir for your reply. is the tool number DRO the original mach3 or you added yourself ? I am in the process to make my own 8 pos tool changer in the concept of pawl/ratchet like Denford, EMCO and boxford. I find your codes very useful. I have some other similar execution in the forums and will try all out accordingly. Anyway once i get it completed i shall post on my channel. Anyway i will keep you updated on my progress. Btw you work is really excellent. Thank you for sharing your knowledge with the public.

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    @@rengankrishnaiyer6912 The tool number is mach3 set. when you select a new DRO in MachScreen click on function codes. tick standard code and in the drop down click DRO. they are the codes for Mach's functions. current tool number is 24.

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    yes, keep us updated.

  • @9782ravi
    @9782ravi3 жыл бұрын

    Will you please share wiring diagram. Thanks

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    Hope all those macros might be helpful to improve your already excellent turret macro. Cheers

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    i use the same two for the Boxford 125 i have. plus some home made Brains to get the lights on the buttons working.

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    @@blightysbits cool!

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    hi sir, just wondering can pokeys board perform mach3 threading?

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    i have seen vids of pokeys do treading with an index pulse on mach3. with mach4 you use an encoder. if your using mach3 i would suggest using G76 for treading and not G32. I have found that G32 tends to go a bit off after a few cuts.

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    @@blightysbits Noted and thank you for the tips. I will definitely look into it. Btw have you heard of a Lathe CAM called Ezilathe ? I am using it it is free and superb for hobbyist. What can software are you using ?

  • @blightysbits

    @blightysbits

    3 жыл бұрын

    @@rengankrishnaiyer6912 not heard of that one. ill look it up later see what its like. I'm using Fusion 360 for mill and lathe.

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    @@blightysbits cool, if you looking it up please check out Ezilathe on cnc zone (www.cnczone.com/forums/uncategorised-cam-discussion/263938-cnc-cam-forum-7.html) and some Ezilathe videos at kzread.info/dash/bejne/aIeW0smjnMjQmcY.html. The current version updated recently 1.7.3 (2020). Credit to the owner/designer/programmer "Stutank" . Very nice chap! Been discussing with him in the forums.

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    I have yet to try Fusion 360, I heard it is really great. I will try soon.

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    Hi Sir 2nd m6start macro Source:-www.machsupport.com/forum/index.php?topic=7727.0 Application:- Boxford turret (stepper based) m6start_andy 'This macro drives an 8 position stepper driven ATC. 'It drives forward past a ratchet, then backwards a little to stall the motor 'The Y axis is setup for 20 steps per mm, my ATC requires 900 steps per index 'of 45 degrees. 'Because of the stall, steps are lost. So, we switch to INC mode for the ATC, 'then back to ABS mode before we exit. 'OEMDRO(1200) is utilized to store the last used tool (OldTool) and is updated 'upon final execution of the macro. This is resorted to as the Txxyy will overwrite 'the "CurrentTool" DRO. 'The Y axis is zeroed if tool is Number1, to prevent an overflow of the DRO after 'multiple changes. 'M6Start.m1s Message ("macro running") OldTool = GetOEMDRO (1200) Tool = GetSelectedTool() MaxToolNum = 8 'Max number of tools for the changer If OldTool = Tool Then Message ("Selected Tool already loaded") Exit Sub End If While Tool > MaxToolNum Tool = Question ("Enter New Tool Number up to " & MaxToolNum) Wend xval= getoemdro(800) 'get x zval= getoemdro(802) 'get z Call Dooembutton(138) While IsMoving() Wend moveto = Tool- OldTool If moveto

  • @jeym5948
    @jeym59482 жыл бұрын

    Mach3 and arduino

  • @rengankrishnaiyer6912
    @rengankrishnaiyer69123 жыл бұрын

    Hi Sir 1st m6start macro Source:-www.denfordata.com/bb/viewtopic.php?t=1464 Application:- Denford Orac/Starturn/Novaturn (DC motor based with 3 bit gray code encoder input) ' This is a VBscript macro for the M6Start file in Mach 3. This macro has been running the turret fine on my lathe. ' Hello I rejoined to share the macro from 2014 for the auto toolchanger in mach3......I thought I had put it here....maybe ' it was the mach support site. ' anyhoo, I have the lathe back for an upgrade to smoothstepper and more IO and thought I'd put it here as well. ' IO will need changing to the ones you are using. Tool = GetSelectedTool() OldTool = GetCurrentTool() NewTool = Tool MaxToolNum = 8 'Max number of tools for the changer While NewTool > MaxToolNum NewTool = Question ("Enter New Tool Number Up To " & MaxToolNum) Wend Call StartTool While SelectedTool NewTool Call CheckPins sleep(20) Wend sleep(400) 'delay in ms to over-run selected tool position SelectedTool = NewTool Call StopTool sleep(400) 'delay to allow turret to lock into position Call CheckPins If SelectedTool NewTool Then 'verify that correct tool has locked in-place. Beep, announce and stop program if not Beep MsgBox ("Did You Select An Existing Tool?") code "M00" End If SetCurrentTool(NewTool ) '//// Subroutines //// Sub StartTool ActivateSignal(Output3) End Sub Sub CheckPins If Not IsActive(Input1) And Not IsActive(Input2) And Not IsActive(Input3) Then SelectedTool = 1 End If If IsActive(Input1) And Not IsActive(Input2) And Not IsActive(Input3) Then SelectedTool = 2 End If If IsActive(Input1) And Not IsActive(Input2) And IsActive(Input3) Then SelectedTool = 3 End If If IsActive(Input1) And IsActive(Input2) And IsActive(Input3) Then SelectedTool = 4 End If If IsActive(Input1) And IsActive(Input2) And Not IsActive(Input3) Then SelectedTool = 5 End If If Not IsActive(Input1) And IsActive(Input2) And Not IsActive(Input3) Then SelectedTool = 6 End If If Not IsActive(Input1) And IsActive(Input2) And IsActive(Input3) Then SelectedTool = 7 End If If Not IsActive(Input1) And Not IsActive(Input2) And IsActive(Input3) Then SelectedTool = 8 End If End Sub Sub Stoptool DeActivateSignal(Output3) End Sub

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    Hi Sir 2nd m6start macro Source:-www.machsupport.com/forum/index.php?topic=36624.0 Application:- Boxford turret (stepper motor based) ' TPS 29.01.2018 Version 1.0 ' BOXFORD 125TCL ' 8 position ATC with A-Axis ' the a axis Needs not to be homed, because it is only doing incremental moves. ' to remember the tool (witch is in front when you shut down the machine), ' Config -> General Config -> right down Corner ->Tool Selection Pesistent ' or just enter the tool number in main Screen by Keyboard. ' 1.put this code in your M6Start macro ' 2.delete all code in M6End macro ' 3.this code Needs A-axis for turn axis of TC ' 4.this code requires that a G91 A360 makes exact one turn on TC ' 5.X/Z axis must be referenced ' 6.X-axis refpos = all way to the right side (away from spindle) ' 7.Z-axis refpos = all way up (away from spindle) Sub Main() Dim newtool As Integer Dim acttool As Integer Dim grad_pro_tool As Integer Dim grad_nach_pin As Integer Dim grad_rueckwaerts as Integer Dim Anzahl_Takte As Integer Dim Dist_schnell As Double Dim F_fast As Integer Dim F_slow As Integer If IsLoading() Then 'do nothing during load GCode ' Exit Sub Else grad_pro_tool = 45 ' distance between TC places grad_nach_pin = 10 ' overtravel pin grad_rueckwaerts = 25 ' trafel back to pin f_fast = 4000 ' Speed turn fast f_slow = 2000 ' Speed slow reverse to pin newtool = GetSelectedTool() ' get the actual tool number acttool = GetCurrentTool() ' get the new tool number 'let's do some basic checks ' new tool and act tool = 0 If ((newtool = 0) and (acttool = 0)) Then message("new and acttool = 0 -> do nothing") Sleep(500) Exit Sub End If ' new tool = 0 If (newtool = 0) Then message("new tool = 0 -> do nothing") Sleep(500) Exit Sub End If ' new tool = act tool If newtool = acttool Then message("new tool = act tool -> do nothing") Sleep(500) Exit Sub End If 'check toolnumber ? If (((newtool > 8) Or (newtool DoButton(3) Sleep(500) Message (" toolnumber " & newtool & " not in range (1-8). Abort ! ") Exit Sub End If 'X-Axis not in reference If GetOEMLED(807) Then DoButton(3) Sleep(500) Message ("X-Axis not referenced -> Abort !!") Exit Sub End If 'Z-Axis not in reference If GetOEMLED(809) Then DoButton(3) Sleep(500) Message ("Z-Axis not referenced -> Abort !!") Exit Sub End If 'let's do something Message "change tool from: " +CStr(acttool) + " to: " + CStr(newtool) 'calculate number of tools between tools If newtool > acttool Then Anzahl_Takte = newtool - acttool If newtool 'number of tool to steps Dist_schnell = (Anzahl_Takte * grad_pro_tool) + grad_nach_pin Message "ATC X-Axis to TC position" Code "G90 G53 G0 X2" While IsMoving() Sleep(15) Wend Message "ATC Z-Axis to TC position" Code "G90 G53 G0 Z2" While IsMoving() Sleep(15) Wend 'set A-Axis zero Code "G92 A0" 'incremental Mode , units per Minute , Exact Stop Code "G91 G94 G61" 'A-Axis plus fast Message "A-Axis plus fast to new tool" Code "G01 A" & Dist_schnell & "F" & f_fast While IsMoving() Sleep(15) Wend 'A-Axis slow back to pin Message "A-Axis slow back to pin" Code "G01 A-" & grad_rueckwaerts & "F" & f_slow While IsMoving() Sleep(15) Wend 'anounce new tool to system SetCurrentTool(newtool) 'back to absolute mode Code "G90" ' back to absolute movement Message "" End If End Sub

  • @rengankrishnaiyer6912

    @rengankrishnaiyer6912

    3 жыл бұрын

    Hi Sir 3rd m6start macro Source:-www.machsupport.com/forum/index.php?topic=7727.0 Application:- Boxford turret (stepper motor based) m6start_andy.txt 'This macro drives an 8 position stepper driven ATC. 'It drives forward past a ratchet, then backwards a little to stall the motor 'The Y axis is setup for 20 steps per mm, my ATC requires 900 steps per index 'of 45 degrees. 'Because of the stall, steps are lost. So, we switch to INC mode for the ATC, 'then back to ABS mode before we exit. 'OEMDRO(1200) is utilized to store the last used tool (OldTool) and is updated 'upon final execution of the macro. This is resorted to as the Txxyy will overwrite 'the "CurrentTool" DRO. 'The Y axis is zeroed if tool is Number1, to prevent an overflow of the DRO after 'multiple changes. 'M6Start.m1s Message ("macro running") OldTool = GetOEMDRO (1200) Tool = GetSelectedTool() MaxToolNum = 8 'Max number of tools for the changer If OldTool = Tool Then Message ("Selected Tool already loaded") Exit Sub End If While Tool > MaxToolNum Tool = Question ("Enter New Tool Number up to " & MaxToolNum) Wend xval= getoemdro(800) 'get x zval= getoemdro(802) 'get z Call Dooembutton(138) While IsMoving() Wend moveto = Tool- OldTool If moveto

Келесі