Hello Guest it is March 29, 2024, 05:22:17 AM

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - abcncfab

Pages: 1
1
ok its not the proximity sensor :(

2
Im thinking my proximity sensor on the carosel might be just on the borderline of detecting the moves. Ill try move it a tiny bit closer and see if it fixes the problem

3
Hi, I have written a m6start macro for my carousel type tool changer.

It works flawlessly 95% of the time but unfortunately rarely grabs a tool 1 position out.

Here is a copy of the macro.

ANY help would be muchly apreciated.

any questions about my macro im happy to answer.


 Sub Main()
OldTool = GetCurrentTool() 'Tool In spindle DRO You must add this to your settings screen
NewTool = GetSelectedTool()
Z_changePos = -122               'z change position
Z_safePos = 0
MaxToolNum = 21                     'Max number off tools for the changer
If NewTool = OldTool Then
   Exit Sub               'exit if tool as same selected
End If

code "M5"   
                  
If OldTool >= MaxToolNum Then
Code "G00 G53 Z" & Z_safePos            'move z to carriage engage height
While IsMoving()
Wend
MsgBox "           Please remove TOOL #" & OldTool & Chr(13) & "         Then press OK to Continue"
OldTool = question ("Please enter current Tool carriage position then press OK to CYCLE START")
GoTo spindlecheck
End If


chuckCheck:
   
If IsActive(input2) = IsActive(input3) Then
Code "G00 G53 Z" & Z_safePos            'move z to carriage engage height
While IsMoving()
Wend                     'wait until its moved
Else
If IsActive(input2)=0 = IsActive(input3) Then
code "G00 G53 Z" & Z_changePos
While IsMoving()
Wend
End If
End If


spindlecheck:

If IsActive(input4) Then            'check spindle rotation input
GoTo engage
Else
GoTo spindleAlign
End If

spindleAlign:

code "M3 S60"                  'correct spindle rotation
While IsActive(input4)=0
Wend
code "M5"
sleep(2000)
GoTo spindlecheck

engage:

SetOutBit(100,2)               'engage tool carriage
sleep(100)
ResetOutBit(100,2)               
sleep(100)
While GetInBit(100,1)=0
Wend                     'wait for engagement
sleep(100)

SetOutBit(100,6)               'engage power tool bar / tool release
While GetInBit(100,3)=0
Wend                     'wait for draw bar engaged / tool released

Code "G53 Z" & Z_safePos            'move z to tool carriage spin height
Code "G4 P.75"
While IsMoving()               'wait for z to move
Wend

If NewTool >= MaxToolNum Then
GoTo NewTooltoobig
End If


CWPos = NewTool - OldTool            'calculate CW distance
If CWPos < 0 Then
CWPos = CWPos + MaxToolNum
End If                     'invert number if minus

CCWPos = MaxToolNum - CWPos            'calculate CCW distance

If CWPos < CCWPos Then               'take shortest distance
GoTo CW
Else
GoTo CCW
End If                     'goes to CW or CCW script

CW:                     'CW count sequence
moved1 = 0

starting1:
SetOutBit(100,5)
sleep(50)
While IsActive(input1)
Wend
sleep(20)
While IsActive(input1)=0
Wend
moved1 = moved1+1
ResetOutBit(100,5)
If CWPos = moved1 Then
While IsActive(input1)=0
Wend
GoTo finish
Else
GoTo starting1
End If                     'end CW count sequence

CCW:                     'CCW count sequence
moved2 = 0

starting2:
SetOutBit(100,4)
sleep(50)
While IsActive(input1)
Wend
sleep(20)
While IsActive(input1)=0
Wend
moved2 = moved2+1
ResetOutBit(100,4)
If CCWPos = moved2 Then
While IsActive(input1)=0
Wend
GoTo finish
Else
GoTo starting2
End If                     'end CCW count sequence

NewTooltoobig:

SetOutBit(100,3)               'disengage tool carriage
sleep(100)
ResetOutBit(100,6)
While IsActive(input3)
Wend               'disengage power draw bar / tool clamp
ResetOutBit(100,3)
sleep(100)
While GetInBit(100,0)=0
Wend                     'wait for disengagement
sleep(100)
MsgBox "           Please insert TOOL #" & NewTool & Chr(13) &"        Then press OK to CYCLE START"
sleep(500) 
SetCurrentTool(NewTool)
GoTo theveryend


finish:

Code "G00 G53 Z" & Z_changePos            'move z to carriage engage height
While IsMoving()
Wend

ResetOutBit(100,6)               'disengage draw bar
sleep(600)
If IsActive(input2) = IsActive(input3) Then      'check for good tool clamp
DoOEMButton(1021)
SetCurrentTool(NewTool)               'reset mach and give fail message
MsgBox "TOOL CLAMP FAILURE "
Exit Sub
End If

SetCurrentTool(NewTool)               'changes current tool DRO

SetOutBit(100,3)               'disengage tool carriage
sleep(100)
ResetOutBit(100,3)
sleep(100)
While GetInBit(100,0)=0
Wend                     'wait for disengagement
sleep(100)

theveryend:
SetCurrentTool(NewTool)
code "G43"
sleep(250)
End Sub         

Thanks very much in advance!

Ben Smith ??? ???
 

4
CS-Lab / Re: CSMIO/IP-A retrofit help!
« on: October 21, 2015, 07:10:43 PM »
https://youtu.be/gghNUmlTTJ8

All works now it's wired to the speed reference pins on the servo drives!

I thought the Z servo was shagged because it seemed locked and wouldn't move..  Not realising there was a internal brake in the motor i pulled the motor apart to learn the hard way that there's a  brake. Anyways long story short I energised the brake and all is now well.

Next step tackling the spindle, coolant and ATC.

5
CS-Lab / Re: CSMIO/IP-A retrofit help!
« on: October 20, 2015, 06:43:27 PM »
Thanks very much Hood, It's good to have someone backup my theory. I'll be there in a few hours to wire it that way and report back.

6
CS-Lab / Re: CSMIO/IP-A retrofit help!
« on: October 20, 2015, 06:16:38 AM »
Just me thinking out loud, i re read the servo drive manual and think i have the +/-10v input to the servo drive completely wrong. I believe it should be going to pin 7:
(Speed reference noninverting input)

As opposed to pin 2:
TPRC (Test Point Requested Current) is a DC output signal in the range –
10V to +10V proportional to the requested current value. When TPRC is
at +10V or –10V, the Drive generates peak current.
This pin can instead be used as Current Reference Current Reference signal input(negative
for CW rotation, positive for CCW rotation)

As im not generating a current for input and rather just a voltage reference.

I will try this out tomorrow and report back.
Still if anyone wants to chime in and give me their thoughts please do!

7
CS-Lab / CSMIO/IP-A retrofit help!
« on: October 19, 2015, 11:18:27 PM »
Hey guys, I have bought a cincinatti milacron 500 that's in the process of being retrofitted. Everything was working fine prior to retrofit.

I have the IP-A Motion controller: http://www.cs-lab.eu/en/upload/pdf/User_Manual_CSMIOIPA_EN.pdf
These Servo Drives: http://www.microcontechnologies.com/Manuals%20files/mxnu4.pdf
and these servos : http://www.driveka.ru/upload/iblock/a31/dutymax%20emsp%20brochure.pdf

The servos and drives are all wired from factory and i haven't had to touch them

I have wired from the encoder outputs on the drives to the CSMIO as per the CSMIO manual.

As for the analog +/-10v signal im not sure where i should be wiring it on the servo drives. On Page 6 of the servo drive manual it gives the pin outs for the signal cabling. The machine had the +/-10v from the (pin 1 of the analog I/O connector) IP-A going to PIN 2 TPRC and the GND (Pin 14 of the analog I/O connector) from the IP-A going to pin 3 COMMON. Is this Correct? I'm not sure why but there's also documentation i believe from CSMIO Saying it should be going to pins 5/6 of the drives.

I have tried both ways to no avail.

When i power the drives with the wiring going to pins 5&6 the servo drives squeal in pulses and drive healthy light illuminates green but the HIGH Ims light comes on the drives.
When connected to T.P.R.C and ground the servos are quiet and drive healthy light is illuminated green.

I follow the CSMIO manual to the motor tuning stage and jogging the drives left or right with the wiring going to the TPRC pin on the drives gives a slight squeal with different pitch jogging either left or right.

I once hit the autotune function on the z axis in the csmio plugin in Mach and the Z moved down to the table and i hit reset on mach and its never moves since.

No limit switches or soft limits are enabled.

is there anything you guys could suggest i could try or i have missed? I would be most grateful for any input on this as im at the point where i've exhausted all ideas..

Pages: 1