DPRNT to Rotary Indexer macro

[EvilScooby]

Hello everyone,
Looked through all posts with DPRNT info but nothing has worked for us.
Any ideas on what might help will be much appreciated

Hardinge VMC 600 II with Fanuc 0M-D and Yukiwa AC4-10 indexer control.

The following code works for us (ex. 90 deg incremental index
RRR is character string, G50 is incremental, A90000 is index
angle- controller needs to see 90000):

POPEN
DPRNT [RRR G50 A90000]
M90 (index command)
M91 (complete signal)
PCLOS

Controller displays angle as 90.000

What we want to do is in the Main program have
a G code call a macro program to control indexer.

Here is what we have tried:

O0001
G15 B90.
M30

O9010:
#2=#2*1000
POPEN
DPRNT [ RRR G50 A#2[60]]
M90
M91
PCLOS
M99

What happens is indexer unclamps but does not move.
Have tried adding a feed rate but has no effect.
Thanks for any help,
Blaine

Similar Threads:

• Need help with making indexer macro.
• Rotary Indexer Help
• Rotary indexer
• Need Help!- Hardinge Indexer Macro
• Macro DPRNT please help

[pfuhlman]

Hi,
Not sure if this will help you directly, but it may give you some ideas.
The following G-code snippet is what I use w/ my Haas MiniMill w/ a Tsudakoma / TPCjr indexer setup:

G103 P1
DPRNT[/MOVA180.]
M21
G04 P1.
G103 P0

G103 P1 <- set look ahead to one line only
DPRNT[/MOVA###] <- cmd to be sent to indexer
M21 <- causes the command to be sent
G04 P1. <- dwell for one second
G103 P0 <- set look ahead back to default

I wrote a standalone program (DprntCvt.exe) so my G-code files can have the regular "N101 A180." blocks so the G-code files work as expected with my PC based verification tools. When I'm ready to take the G-code file to the machine I pass the G-code file through DprntCvt.exe which then translates all of the A-axis blocks to the DPRNT format.

Good luck! Phil(f) in WI

[dcoupar]

Is the CNC waiting for the M90 fin signal?

[firecat69]

We use Haas Indexers on our Machines. We made our own G code (g15) to control indexer through program. We will call G15 A90.0 for a 90 degree rotation. Below is the macro program.

O9015(INDEX MACRO)
POPEN
DPRNT[]
G04P100
IF[#4EQ1]GOTO10
DPRNT[XG090]
GOTO20
N10DPRNT[XG091]
N20G04P100
DPRNT[XS#1[33]]
G04P100
IF[#9EQ0]GOTO30
GOTO40
N30DPRNT[XF#9[33]]
N40G04P100
M91
PCLOS
M99