lathe post help

[88Matt]

Hey guys,

Need help on a post tweek. Need to add R to my G96 line. The R value is the x position at the first G95.

Ex:

N10 G20 G90 G08 M61

N20 G0 G94 X-10. Z10.

N30 G97 S382 M03

N40 G0 X-2. Z.1 M9

N50 G92 S400

N60 G96 S200 <<<<<<<<< Add R value

N70 /GOTO

N80 G95 G1 Z0. F.01

N90 X0.

N100 Z.1

 

This is a Fanuc 2 axis post updated from v9.1.

Thanks for any help.

[Bryan Johnson]

try adding "pfxout" or "*xout" to the G96 line.

[88Matt]

Thx for the reply Bryan.

 

I tried using pfxout but it only works if it is currently and on the plus side. I need to have it spit out the next x position. It also needs to be absolute since we do alot of work on the neg side.

 

I assume I need an if statement in the pcss for this so it doesn't spit out the R when running straight rpm.

 

code:

---

pcss            #Output Constant surface speed

speed = g_speed

if css_actv$, pbld, n$, *sg9697, *speed, spindle_l, !css_actv$, e$ #lmr

!speed

n$, pbld, "/GOTO ",e$ #drr added line #lmr added "/"

.

.

.

.

pspindle #Spindle speed calculations for RPM

if maxss$ = zero | maxss$ > max_speed, maxss$ = max_speed

if css_actv$,

[

#Spindle speed calculations for strt_spd w/CSS

speedx = abs(xa)

if opcode$ = 104, speedx = abs(c1_x_min)

if opcode$ = 105, speedx = abs(tcr$)

if speedx < 0.001,speedx = 0.001

speedrpm = (conversion * g_speed) / (pi$ * speedx * two)

]

else, speedrpm = g_speed

#zero indicates spindle off (not a mistake)

if speedrpm,

[

if speedrpm > maxss$, speedrpm = maxss$

if speedrpm < min_speed, speedrpm = min_speed

]

---

Thanks again,

[88Matt]

bump