Denford Mirac conversion help

[m_c]

Sounds like you've got one of Denford's own DM turrets.
Is it like the diagram in this thread? - http://denfordata.com/bb/viewtopic.php?f=40&t=157
.
Having had a quick look at the wiring diagram and the description in that thread, it seems to be a case of rotate turret clockwise until position matches, then immediately reverse the turret, at which point it should lock.
Depending on how fast the turret spins, you may have a problem, as with the 10Hz macro refresh rate, you have a 100-200ms reaction delay depending on timings. However I can't find any info on the timings required, so it'll have to be a case of try it and see.
.
I've not done any Mach3 macro programming for a long time, so I'm hoping somebody will convert the following to the required Mach3 code-

While (TurretPosition <> CommandedPosition)
  ActivateTurretCW
EndWhile
  DeActivateTurretCW
  (a slight time delay may be needed here?)
  ActivateTurretCCW
While (TurretNotLocked)
  (Do Nothing)
EndWhile
DeActivateTurretCCW

You'll also want to add safety time outs at various places, as if the turret fails to lock, you don't want it to sit spinning endlessly, until you manually stop it running.
One option you do have, due to the turret using a VFD, is you could slow down the rotation to give Mach more time to respond.

[Hellfire]

yes thats the turret, thanks for that.
can i make use of the rotary switch on the turret, each contact = a tool. there is also a separate micro switch to tell its locked

[m_c]

Yes, you could use each contact for individual tools, however if you have the diode block as shown in the Mirac 1996 wiring diagrams, it would half the number of required inputs.
.
The locked switch is also needed to check the tool change has been successful, but it should also be continually monitored to ensure the turret hasn't become unlocked when it shouldn't. In Mach3, you'd normally do that as part of the Macro Pump, but worry about getting the turret working first.

[Hellfire]

Assuming I was to get a plc to run the turret, what would I need.
How are the input and output signals between the bob and plc achieved. I would still need a macro for mach3 wouldn't I ?
then a programme for the plc.
Think I will go sit in the corner now and rock back and forth for a while

[m_c]

Something with enough inputs and outputs!
I used the small Click PLC range from Automation Direct for my turret, but had to buy an additional Input/output module to get enough inputs. They also do a slightly more featured range (DL series?) that might have more inputs/outputs on the base modules.
.
Good thing about the Click range though, is the programming software is free and has no limits. The DL software has a limit on program size, above which you have to buy a license.
.
As for communicating between the PLC and controller, the less complicated option is via Modbus, but that can sometimes be problematic to setup. In my lathe, I use Modbus to transfer the desired position to the PLC, and continually read the actual position back. I then have an output from the KFlop to the PLC telling the PLC if it's ok to change position, and an output from the PLC back to the KFlop telling the KFlop that the tool changer is locked, and on the correct position. The KFlop then monitors that input, and if it deactivates when a change hasn't been requested, it triggers an E-stop.

[Hellfire]

Thanks again for your help, I think I will try it on a macro first. Deserves a try don't you think. Failing that a plc.
spent the last 4 or 5 nights trying to get my head round the macros, safe to say my head is fried.
cheers

[Hellfire]

this is what i ended up with, but it has no safety steps in it. any idea how i can add some
If GetSelectedTool()=GetCurrentTool() Then
End If


If GetSelectedTool =1 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig1)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If







If GetSelectedTool =2 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig2)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If






If GetSelectedTool =3 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig3)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If




If GetSelectedTool =4 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig4)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If




If GetSelectedTool =5 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig5)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If




If GetSelectedTool =6 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig6)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If




If GetSelectedTool =7 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig7)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If




If GetSelectedTool =8 Then
ActivateSignal(Output5)
While Not IsActive(oemtrig8)
Wend
DeactivateSignal(Output5)
ActivateSignal(Output6)
While Not IsActive(oemtrig11)
Wend
Sleep 1000
DeactivateSignal(Output6)
End If
End