Lars, about your FA20 post?

[savagkd]

Hi Lars, I just read an old string, You said your FA20 post is set to adjust Epac settings "VG, SA, SB, etc". Are you using the Misc. Regesters to do this? If you wouldn't mind. May I take a look at your post?

It sounds like what I'm trying to get my FX20 to do. "With no luck"

 

Thanx

 

Keith

[d00d]

Are you saying that when you pick your wire size/ depth of cut from library it isn't adding the epack to the post? should have the epack near the top of the NC code. If it is in the post and not loading at the control you need to get the disks and load up the epacks onto your mits machine, or like in my case go through the book with the values and input them due to a lost disk.

[savagkd]

No. My post is good, but limited. I want the ability to change power settings within the epac thru the tape. I would like to use the Misc. Registers. ie. to change wire tension to 8, insert "E8608" on a new line after the epac line.

VG to 45 is "E7045" etc.

 

Thanx

 

Keith

[d00d]

Are these temnsion / voltage gap settings somthing you want to change on the "fly" while the programs are running? or is this some settings you find work better than the factory mits epack settings? All of the epacks are editable(word?) If you are cutting different thicknesses and want them to change during the cut, I suggest using the power master feature on the mits. But enableing the "individual settings of the epack to be edited via MC or the post would be well over my head I'm afraid. Hope this helps.

[savagkd]

I need to be able to adjust these settings in the program. When in taper cuts, you have to tweek the epac. The greater the angle, the greater the adjustment. Also some of the exotics won't run without a tweek. I could edit the epac library and save them as new, but in time the library would be so large as to be unmanagable.

 

Thanx

 

Keith

[Lars Christensen]

savagkd and dOOd,

Yes I am using the Misc. values for different ajustmeants within the E-pack. Power Master is a great function, but it cuts slow, I have onely had one time in 5 years, were Power Master beat me, and that was a part with steps and side throw holes 8" thick.

 

code:

---

#| FEATURES:     |

# ------------------------------------------------------------------------

#Misc. Reals & Misc. Integers:

# mi1-Work coordinate system

# 0 thru 3 = G92 with the X, Y start position.

# 4 thru 9 = The WCS of G54 thru G59 respectively at each contour.

# Subprograms automatically increments WCS starting from the

# initial setting.

# mi2-Sets main program format, 0 = absolute, 1 = incremental.

# The initial setting is effective for the entire program.

# mi3-Sets sub program format, 0 = absolute, 1 = incremental.

# The initial setting is effective for the entire program.

# Mi4-Selects wire feed automatic or manual, 0 = M20, 1 = M00.

#

# Mi5-Selects 4 sec. dwell after Lead-out, to let wire straighten out

#

# Mi6-Selects F2.0 on Lead-out , special for 4 axis

#

# Mr1-Open Voltage value, 0=OFF

#

# Mr2-Power Setting, 0=OFF

#

# Mr3-Stabilizer A, 0=OFF

#

# Mr4-Stabilizer B, 0=OFF

#

# Mr5-Wire Speed, 0=OFF

#

# Mr6-Wire Tension, 0=OFF

#

# Mr7-Voltage Open, 0=OFF

#

# Mr8-Feedrate Ajusment on Lead-in/M00

#

# Mr9-Feedrate Ajustment After Lead-in

#

---

Mi5 = I have found that when you trim in the gap, your wire sometimes will brake when the machine changes from rough to trim, because the wire has not totally straighten out, this function will make a 4 sec. dwell between your G40 and 1st. trim.

 

Mi6 = The machine are going very slow when it is reading G40 in a 4-axis program, this will speed the machine up.

 

Mr8 = Here is a bug I have not found time to look at. It will not do a feedrate ajustment after M00. It will only do it on lead in.

 

code:

---

#############################################################LARS

pxy1a # Linear position absolute

powon

psctypel

n, wtout, e

n, pabsinc, sgcode, sccomp, poffs, xout, yout,pfeedout1, e

powoff

pfrmisc

pcan

if sccomp = sg41,

pfeedrate2

if sccomp = sg42,

pfeedrate2

if sccomp = sg140,

pleaddwell

 

##############################################################LARS

---

code:

---

plinlin      # Linear-linear UV

powon

n, pabsinc, *sg20, sccomp, poffs, *x20, *y20, pg30, puv30, pfeedout1, e

powoff

pfrmisc

pcan

---

code:

---

 pstartpsof1a # Start of file for first tool, start <> thread, absolute

pstartpsofc

n, *sgcode, *xout, *yout, e

pstartthr

n, xout, yout, e

pthread

#[

#if mr1 > 0, n, "", *mr1

#else, n, "G04 X2.0", e

#], e

n, ccode, fr, e

pfeedrate1 #Feedrate Ajustment

popenvoltage #Open Voltage

ppowersetting #Power Setting

pstaba #Stabilizer A

pstabb #Stabilizer B

pwirespeed #Wire Speed

pwiretension #Wire Tension

pvoltagegap #Voltage Gap

 

 

###################################################################-Lars

pstartpsof0a # Start of file for first tool, start = thread, absolute

pstartpsofc

n, *sgcode, *xout, *yout, e

pstartthr

pthread

#[

#if mr1 > 0, n, "G04", *mr1

#else, n, "G04 X2.0", e

#], e

n, ccode, fr, e

pfeedrate1 #Feedrate Ajustment

popenvoltage #Open Voltage

ppowersetting #Power Setting

pstaba #Stabilizer A

pstabb #Stabilizer B

pwirespeed #Wire Speed

pwiretension #Wire Tension

pvoltagegap #Voltage Gap

 

#####################################################################-LARS

 

pstartpsof1i # Start of file for first tool, start <> thread, incremental

pstartpsofc

#n, *sgcode, *xi, *yi, e

pstartthr

n, *xi, *yi, e

pthread

[

if mr1 > 0, n, "G04", *mr1

else, n, "G04 X2.0", e

], e

n, ccode, fr, e

 

pstartpsof0i # Start of file for first tool, start = thread, incremental

pstartpsofc

#n, *sgcode, *xi, *yi, e

pstartthr

pthread

[

if mr1 > 0, n, "G04", *mr1

else, n, "G04 X2.0", e

], e

n, ccode, fr, e

 

pstartpsofa # Start of file for first tool, absolute

if strtflag = zero, pstartpsof0a

if strtflag = one, pstartpsof1a

 

pstartpsofi # Start of file for first tool, incremental

if strtflag = zero, pstartpsof0i

if strtflag = one, pstartpsof1i

 

pstartposc # Position to start common call

pbreak

pxyout

gcode = zero

 

pstartpos1a # Position to start, start <> thread, absolute

pstartposc

if reposflag = one, n, pabsinc, *sgcode, *xout, *yout, e

if g92delt = one, pupddelta

if g92outf = one, pstartg92

pstartg54

pstartthr

if reposflag = one, n, xout, yout, e

pthread

#[

#if mr1 > 0, n, "G04", *mr1

#else, n, "G04 X2.0", e

#], e

n, ccode, fr, e

########################################################################-LARS

pstartpos0a # Position to thread, start = thread, absolute

pstartposc

if reposflag = one, n, pabsinc, *sgcode, *xout, *yout, e

if g92delt = one, pupddelta

if g92outf = one, pstartg92

pstartg54

pstartthr

pthread

#[

#if mr1 > 0, n, "G04", *mr1

#else, n, "G04 X2.0", e

#], e

n, ccode, fr, e

pfeedrate1 #Feedrate Ajustment

popenvoltage #Open Voltage

ppowersetting #Power Setting

pstaba #Stabilizer A

pstabb #Stabilizer B

pwirespeed #Wire Speed

pwiretension #Wire Tension

pvoltagegap #Voltage Gap

 

 

########################################################################-LARS

 

pstartpos1i # Position to start, start <> thread, incremental

pstartposc

if reposflag = one, n, pabsinc, *sgcode, *xi, *yi, e

if g92delt = one, pupddelta

if g92outf = one, pstartg92

pstartg54

pstartthr

if reposflag = one, n, xi, yi, e

pthread

[

if mr1 > 0, n, "G04", *mr1

else, n, "G04 X2.0", e

], e

n, ccode, fr, e

 

pstartpos0i # Position to thread, start = thread, incremental

pstartposc

if reposflag = one, n, pabsinc, *sgcode, *xi, *yi, e

if g92delt = one, pupddelta

if g92outf = one, pstartg92

pstartg54

pstartthr

pthread

[

if mr1 > 0, n, "G04", *mr1

else, n, "G04 X2.0", e

], e

n, ccode, fr, e

 

pstartposa # Start of file for first tool, absolute

if strtflag = zero, pstartpos0a

if strtflag = one, pstartpos1a

 

pstartposi # Start of file for first tool, incremental

if strtflag = zero, pstartpos0i

if strtflag = one, pstartpos1i

---

code:

---

# Tooltable calls

# --------------------------------------------------------------------------

ptprlist # List of taper angles

 

fmt 12 "H1="tlrad #wire diameter

fmt 8 mr1 #Open Voltage

fmt 8 mr2 #Power Setting

fmt 8 mr3 #Stabilizer A

fmt 8 mr4 #Stabilizer B

fmt 8 mr5 #Wire Speed

fmt 8 mr6 #Wire Tension

fmt 8 mr7 # Voltage Gap

fmt 8 mr8 #Feedrate1 Ajustment

fmt 8 mr9 #Feedrate2 Ajustment

 

pradlist # List of wire radii

# tooldia = tlrad * 2

#*offset, "=", tlrad, e

 

 

pwrtt # Write tool table, scans entire file, null tools are negative

if xr <> prv_xr, test = one

if yr <> prv_yr, test = one

if passcnt = zero, test = zero

passcnt = passcnt + one

if test = one, wirethd2 = one

if thd_wire = one, wirethd2 = one

 

#---------------------------------------------------------------------------

#LARS

#---------------------------------------------------------------------------

pleaddwell # Dwell after lead-out

if mi5 = one,

[

n, "G04 X4.0", e

]

##############################################

pfeedout1 # F2.0 in G40

if sccomp = sg140,

pfeedout2

pfeedout2 #

if mi6 = one,

[

"F2.0"

prv_fr = 2

]

 

###############################################

popenvoltage #Change of Openvoltage

if mr1 > zero, popen

popen

if mr1 <= 9, popenlow

if mr1 > 9, popenhigh

popenhigh

[

n, "E80", *mr1," (Open Voltage)", e

]

popenlow

[

n, "E800", *mr1," (Open Voltage)",e

]

###################################################

ppowersetting #Changes of Power setting

if mr2 > zero, ppower

ppower

if mr2 <= 9, ppowerlow

if mr2 > 9, ppowerhigh

ppowerhigh

[

n, "E81", *mr2," (IP)", e

]

ppowerlow

[

n, "E810", *mr2," (IP)", e

]

###################################################

pstaba #Changes Stabilizer A

if mr3 > zero, pstabaa

pstabaa

if mr3 <= 9, pstabalow

if mr3 > 9, pstabahigh

pstabahigh

[

n, "E83", *mr3," (Stabilizer A)", e

]

pstabalow

[

n, "E830", *mr3," (Stabilizer A)", e

]

########################################################

pstabb #Changes Stabilizer B

if mr4 > zero, pstabbb

pstabbb

if mr4 <= 9, pstabblow

if mr4 > 9, pstabbhigh

pstabbhigh

[

n, "E84", *mr4," (Stabilizer

", e

]

pstabblow

[

n, "E840", *mr4," (Stabilizer

", e

]

#######################################################

pwirespeed #Changes Wire Speed

if mr5 > zero, pwspeed

pwspeed

if mr5 <= 9, pwspeedlow

if mr5 > 9, pwspeedhigh

pwspeedhigh

[

n, "E85", *mr5," (Wire Speed)", e

]

pwspeedlow

[

n, "E850", *mr5," (Wire Speed)", e

]

#######################################################

pwiretension #Changes Wire Tension

if mr6 > zero, ptension

ptension

if mr6 <= 9, ptensionlow

if mr6 > 9, ptensionhigh

ptensionhigh

[

n, "E86", *mr6," (Wire Tension)", e

]

ptensionlow

[

n, "E860", *mr6," (Wire Tension)", e

]

#######################################################

pvoltagegap #Changes Voltage Gap (VG)

if mr7 > zero, pvoltage

pvoltage

if mr7 <= 9, pvoltagelow

if mr7 > 9, pvoltagesplit

pvoltagesplit

if mr7 >= 100, pvoltagehighh

if mr7 < 100, pvoltagehigh

pvoltagehigh

[

n, "E70", *mr7," (VG)", e

]

pvoltagelow

[

n, "E700", *mr7," (VG)", e

]

pvoltagehighh

[

n, "E7", *mr7," (VG)", e

]

#######################################################

pfeedrate1 #Feedrate ajustment

if mr8 < zero,

n, "M106 Q", *mr8, e

#######################################################

pfeedrate2 #

if mr9 < zero,

n, "M106 Q", *mr9, e

 

 

 

# --------------------------------------------------------------------------

# Numbered questions for Mastercam Wire

---

I am far from a post guru, and any change to you post should only be done after you have backed up your org. post. Also I do not take any responsabiliti for scraped parts, you got to take that one with the bossman himself. I did these changes to my post from time to time, and kind of lost track one were I modifyed stuff, frankley I am amasted that I got it to work.

 

Side note:

I would like to thank Rekd and Millman(Ron)+ others for all support, and believe that I could modify my post, man this have made my life easyer and fun.

 

thanks

Lars

[savagkd]

You the man Lars!!!

 

As soon as I get some chair time between parts, I'll give it a try.

 

Thanx!!!

 

Keith

[crazy^millman]

Very Cool Lars. I copied that to my book never know if I might need that one day or not.

[Lars Christensen]

After all the help I have recieved on this forum

 

You are more than welcome

 

 

Lars