Alpha harrison post

[hopscotch]

This is a work in progress. These alpha controls are dumbed down fanuc 21t controls for teach harrison lathes pre 1999. They accept G code no problem however they need sets of information in the correct order to operate, ( the sets - 2 per tool change)

I have got the post to a level where I can operate single tool programs with very little editing but it still needs work.

For example 

#509=   1 value must increment +1 every time #509 is encountered

 

IF[531EQ1]GOTO502 must change to IF[531EQ2]GOTO503 at end of each set.(2 sets per tool change) needs to update EQ and GOTO by one each time

 

I would appreciate any help with this

O0001

(AZ T001)

IF[#530EQ1]GOTO#529

IF[#1000EQ1]GOTO[#509*10]

IF[#1001EQ1]GOTO[#509*10]

N10

#501=1   1st set

#502=12 tool number - works ok

#503= X20.   xh$ must not show X just 20. 

#504= Z60.   zh$ must not show Y just 60. 

#507=1

#509=1 increments each set by one (not each tool change)

#510=F must show just .2 etc- not F... can only get rapid feed here with fr$ must not be reading 1001 yet?

M50

IF[#531EQ1] GOTO502  

M10

N502

N20

#500=1  second set

#501=1

#502=12 Tool 12 works OK

#503=  X20. xh$ must not show X just 20. 

#504=  Z60. zh$ must not show Y just 60.

#505= 1000

#506= -1000

#507= 1    

#508= 1    

#509= 2 increments each set ( not each tool change)

#510=F must show just .2- no F can only get rapid feed here with fr$

M50

IF[#531EQ2] GOTO 503

M10

M11

G1 X20. Z2.

M12

M13

Z0. F.2

Z-15.

X24.4

G3 X30. Z-17.8 I0. K-2.8

G1 Z-25.

X32.828 Z-23.586

M14

M11

G0 X40. Z60.

M12

M15

N30

N503

#501=1 toolchange (third set)

#502=7 toolnumber

#503= X20.

#504= Z60.

#507=1

#509=3 incremented to 3 (third set)

#510=F

M50

IF[#531EQ3] GOTO504

M10

N504

N40

#500=1

#501=1

#502=7

#503=  X20.

#504=  Z60.

#505= 1

#506= 1

#507= 1

#508= 1

#509= 4

#510=F 

M50

IF[#531EQ4] GOTO 505

M10

M11

G1 X10. Z2.

M12

M13

Z0. 

Z-25.005

X7.172 Z-23.591

G0 Z-13.965

M14

M11

G0 X40. Z60.

M12

M15

N505

M16

%

[crazy^millman]

You need to create a variable that represent your 509 value and then increment it with a math equation in the post and should be good for that. All the others could be handled the same way you just need to define them.

 

You are really close and nice work getting as far as you did.