I've finished building an ATC for my Denford Easimill 3, there are some pictures and info here:
http://coreyrenner.tumblr.com/The macro is where I'm struggling. I was hoping that I could use some of the macro commands in the MDI window to make it go, I discovered that you can't. So, I made a quick fake macro that is intended to just run the changer through all of its movements, but it doesn't seem to do anything. I replaced the M6start.m1a file with the stuff below. I typed M6T1 into the MDI window and hit enter. I was hoping that it would cycle itself. Instead, I got the "Change tool and press cycle start" message. Ok, need to tell Mach it's got an ATC, so in the general config, I changed it from "Stop Spindle and prompt for toolchange" to ATC. Tried again, same message. Just in-case I made a program like this:
N10 M6T1
and ran that. Nada. What am I missing? Here's my crappo macro, the in/out pins are programmed correctly. I'd appreciate any guidance.
ActivateSignal(Output12) 'Deploy Changer Cylinder
While Not IsActive(OEMTRIG3) 'Changer Deployed Switch
sleep(100)
Wend
ActivateSignal(Output13) 'Slide In Cylinder
While Not IsActive(OEMTRIG5) 'Slide In Switch
sleep(100)
Wend
ActivateSignal(Output14) 'Drawbar Release and Proprod
While Not IsActive(OEMTRIG6) 'Drawbar Released
sleep(100)
Wend
ActivateSignal(Output15) 'Toolout Cylinder
While Not IsActive(OEMTRIG8) 'Tool out from Spindle
sleep(100)
Wend
'************************************************
'carousel rotation stuff goes here
sleep(5000)
'************************************************
DeActivateSignal(Output15) 'Tool back into spindle
While Not IsActive(OEMTRIG7) 'Tool back in spindle
sleep(100)
Wend
DeActivateSignal(Output14) 'Drawbar Grabs
While Not IsActive(OEMTRIG6) 'Drawbar has grabbed
sleep(100)
Wend
DeActivateSignal(Output13) 'Slide Out
While Not IsActive(OEMTRIG4) 'Slide is Out
sleep(100)
Wend
DeActivateSignal(Output12) 'ATC Retract
While Not IsActive(OEMTRIG2) 'ATC Retracted
sleep(100)
Wend
'///Subroutines///
'Sub ATCready
'If IsActive(OEMTRIG2) And IsActive(OEMTRIG4) And Not IsActive(OEMTRIG6) And IsActive(OEMTRIG7) And IsActive(OEMTRIG9) Then
'End Sub
'MsgBox ("ATC NOT