On Sunday 01 November 2015 19:28:20 andy pugh wrote:

> On 2 November 2015 at 00:22, Gene Heskett <[email protected]> wrote:
> > I can see sim>axis>vismach> but vmc_toolchange doesn't appear to be
> > a legit startup option.
>
> There are two sub-configs in there.

Found it!  That is a quite simplified version that assumes some unseen
mechanism to run the drawbar, and a straight out the side of the wheel
exit strategy.  Mine is not going to be that simple.  The drawbar will
be operated, but will use spindle power to loosen or tighten the drawbolt
using spindle power while the drawbolt is held stationary.

So the carousel module will need an extra pin to run the gearshift to
put it in low so the torque will be sufficient, another extra pin to
run the drawbar lock, a port with a programmable by setp means, to issue
probably at least 2, and as high as 4, signed values to be fed to the
spindle motors pwmgen in order for it to function as the air wrench some
use.

It will also need a signed value pin for running the z axis, programmable
by setp statements in the hal file. All at the correct time of course.

It might be better done in ladder logic.  So far its all a "what if".

I did some quick measurements this afternoon, and I don't think there
would be adequate room under the tool wheel for the motor, so it will
have to be on top, probably high enough the head will never hit it.

And offset away from the side of the head with a small set of spur gears
at the wheel.  Or the wheel will need to grow some diameter just to get
the offset from the shaft coming down the side of the head, and still get
the center of the pocket at the center of the spindle, in which case it
may as well grow more tool pockets.  A minimum practical size IOW.

So I need to get that measurement, and add a 1/2" shaft to get the circle
diameter for the pockets.

The head is 4.75" wide, and I figure a 1/2" shaft, so the pocket circle
is then 5.25/2 or 2.625" radius. That gives me room in that circle for
10 pockets. I am also going to need a longer Y bolt unless I cut the
outside off at a radius that still retains a TTS adapter. I think I can.

But the outer, beyond the circle you can see in this code, will exceed
the length of my Y screw by about 1.5" as I have only 5.4719" between
the limits.  Some of that loss I could fix as I added a bellows in front
of the table to keep swarf out of the Y screw as it is exposed when the
table is all the way to the rear.  I can gain a bit of travel there, but
nowhere near enough for this.

The code:
(; carve a wheel to hold TTS tool adapters )

G20 G17 G90
G0 z0.1
g0 x0 y0 ( starter locations, move to suit )
( touch off at safe centers ) 
(Useful subroutine)
o100 sub
( make wherever it is at, home for duration of subroutine )
G92 x0.000000000 y0.0000000
G0 Z0.250000000 (clear workpiece for tool comp moves )
G41
G1 F60 X.30000000
G1 X0
G0 Z 0.025000000 (clear workpiece )
( drill tool counterbore )
#<_z_depth> = 0.00000000 (init it for this subs duration)
( drill halfway thru tool holder plate at tool OD of 1.501" )
G1 F40 Z#<_z_depth>
G1 F40 X#<_pocket_rad>
G3 X#<_pocket_rad> Y-0.00000000 I-#<_pocket_rad> J-0.00000000 Z-0.200000 P10
G3 X#<_pocket_rad> Y-0.00000000 I-#<_pocket_rad> J0.0000000 (for flat bottomed 
recesss )

#<_z_depth> = 0.025000000 ( otherwise first cut on center is brutal )
( now drill the rest of the way thru the plate )
#<_z_depth> = [#<_z_depth> -.0250000000]
G1 F40 Z#<_z_depth>
G1 X#<_grip_rad>
G3 X#<_grip_rad> Y0.00000000 I-#<_grip_rad> J-0.000000000 Z-0.47000000 P 20
G3 X#<_grip_rad> Y0.00000000 I-#<_grip_rad> J-0.000000000 (leave flat bottom )
G1 X0 Y0.3 Z0.1
G40 (turn off tool comp)
G0 Y0
G92.2

o100 endsub

( setup to 10 identical circle carvings at 36 degree intervals )
#<_pocket_rad>  = 0.750500000
#<_grip_rad>    = 0.669000000  (clears the hex collet nut)
#<_circle_rad>  = 2.625000000  (radius of pocket pattern)
#<_angle_inc>   = 36.00000000
#<_this_angle>  = 0.00000000

o200 DO
( position machine to center of pocket )
G1 F40 Z0.10000000
G1 F40 X[sin[#<_this_angle>] * #<_circle_rad>] Y[cos[#<_this_angle>] * 
#<_circle_rad>]
s2500
M6 T1
M3 (start spindle)
M8 (start vacuum)
o100 CALL

G1 F40 Z0.050000000 ( clear workpiece )
( calculate new angle )
#<_this_angle>  = [#<_this_angle> + #<_angle_inc>]
o200 WHILE [#<_this_angle> lt 360.00000000]

G0 Z0.01 ( clear workpiece )
G40
G0 X0.00000 Y0.00000 (make sure centered on original center )
( Now, needs a 1/2" hole for the axle )
G1 X0.12500
( note 0.470 is a piece of plywood, real alu will be 0.5000" thick)
G3 X0.12500 Y0.0000 I-0.12500 J0.0000 Z-0.47000000 P20
G3 X0.12500 Y0.0000 I-0.12500 J0.0000 (last pass for flat bottom! )
G0 Z0.1
G0 X0.0000 Y0.0000

( now, need ratchet catching slots? maybe not )
(#<_ratchet_rad>        =       2.00000000)
(#<_this_angle>         =       36) (space these between tool pockets )

(o300 DO)
(G1 F40 X[SIN[#<_this_angle>] * #<_ratchet_rad>] Y[COS[#<_this_angle>] * 
#<_ratchet_rad>])
(G1 F10 Z-0.470000)
(G0 Z0.05000000)
(#<_this_angle> = [#<_this_angle> + #<_angle_inc>])
(o300 WHILE [#<_this_angle> lt 360.0000000])

G0 X0.00000000 Y0.00000000
#<_cutout_rad> = 2.7300000 (another 1/4" would be very nice)
#<_z_depth> = 0.02500000
G0 X#<_cutout_rad>
G3 F30 X#<_cutout_rad> y0.00000000 I-#<_cutout_rad> J0.00000000 Z-0.4700000 P20
G3 X#<_cutout_rad> y0.00000000 I-#<_cutout_rad> J0.00000000 (leave flat bottom )
G0 Z#<_z_depth>
G0 X0.00000000 Y0.00000000
G0 Z5
M5 M9
M2
%

Thanks Andy.

Cheers, Gene Heskett
-- 
"There are four boxes to be used in defense of liberty:
 soap, ballot, jury, and ammo. Please use in that order."
-Ed Howdershelt (Author)
Genes Web page <http://geneslinuxbox.net:6309/gene>

------------------------------------------------------------------------------
_______________________________________________
Emc-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/emc-users

Reply via email to