Manual Entry Conflict With Sub-program Notes

[PcRobotic]

Hi,

I think my post is nearly perfect as I expected but I have a confliction of "Manual Entry" where as it posts duplicate notes. Please read below at the (****** Note From Programmer ******) section you will see. And another thing is I want to take the note off from

 

O0001

(FACING)

 

......but... i can't please help.

 

Best regards,

Steven.L

 

 

 

********************

%

O0000 (T)

(This Post Is Only For - HAAS)

(Unproven/ Proven By: )

(ALUMINUM INCH - 2024)

 

(***** Posted Date And Time *****)

(JUL.04.2012 @ 5:08PM)

(Source - C:\USERS\MASTER\DOCUMENTS\MY MCAMX5\MCX\T.MCX-5)

(NC - C:\USERS\MASTER\DOCUMENTS\MY MCAMX5\MILL\NC\T.NC)

 

(****** Note From Programmer ******)

(MANUAL ENTRY - MY NOTE HERE FOR THE SETUP-MAN)

(MANUAL ENTRY - MY NOTE HERE FOR THE SETUP-MAN)

(MANUAL ENTRY - MY NOTE HERE FOR THE SETUP-MAN)

(MANUAL ENTRY - MY NOTE HERE FOR THE SETUP-MAN)

(MANUAL ENTRY - MY NOTE HERE FOR THE SETUP-MAN)

 

(********* Tool List Info *********)

(T1 -2" FACE MILL - H1 - D1)

(T2 - 3/4 FLAT ENDMILL - H2 - D2)

(T4 - 1/2 DRILL - H4 - D4)

(T5 - 3/4-10 TAPRH - H5 - D5)

(T3 - 1/2 FLAT ENDMILL - H3 - D3)

 

(******* Work Offset List *******)

G90 G10 L2 P1 X0 Y0 Z0

G90 G10 L P X0 Y0 Z0 (Optional)

 

N1 ( FACING )

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T1 M06 (2" FACE MILL)

G0 G90 G54 X-7.2 Y-.5001 S5000 M3

G43 H1 Z2. T2 M8

M98 P0001

/ G0 G90 G55 X-7.2 Y-.5001 Z2.

/ M98 P0001

/ G0 G90 G56 X-7.2 Y-.5001 Z2.

/ M98 P0001

/ G0 G90 G57 X-7.2 Y-.5001 Z2.

/ M98 P0001

/ G0 G90 G58 X-7.2 Y-.5001 Z2.

/ M98 P0001

M5

G91 G28 Z0 M9

M1

 

N2(CONTOUR)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T2 M06 ( 3/4 FLAT ENDMILL)

G0 G90 G54 X-3.25 Y1.875 S700 M3

G43 H2 Z2. T4 M8

M98 P0002

/ G0 G90 G55 X-3.25 Y1.875 Z2.

/ M98 P0002

/ G0 G90 G56 X-3.25 Y1.875 Z2.

/ M98 P0002

/ G0 G90 G57 X-3.25 Y1.875 Z2.

/ M98 P0002

/ G0 G90 G58 X-3.25 Y1.875 Z2.

/ M98 P0002

M5

G91 G28 Z0 M9

M1

 

N4(DRILLL)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T4 M06 ( 1/2 DRILL)

G0 G90 G54 X-2.3998 Y-.9136 S2000 M3

G43 H4 Z2. T5 M8

M98 P0003

/ G0 G90 G55 X-2.3998 Y-.9136 Z2.

/ M98 P0003

/ G0 G90 G56 X-2.3998 Y-.9136 Z2.

/ M98 P0003

/ G0 G90 G57 X-2.3998 Y-.9136 Z2.

/ M98 P0003

/ G0 G90 G58 X-2.3998 Y-.9136 Z2.

/ M98 P0003

M5

G91 G28 Z0 M9

M1

 

N5(TAP)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T5 M06 ( 3/4-10 TAPRH)

G0 G90 G54 X-2.3998 Y-.9136

G43 H5 Z2. T3 M8

M98 P0004

/ G0 G90 G55 X-2.3998 Y-.9136 Z2.

/ M98 P0004

/ G0 G90 G56 X-2.3998 Y-.9136 Z2.

/ M98 P0004

/ G0 G90 G57 X-2.3998 Y-.9136 Z2.

/ M98 P0004

/ G0 G90 G58 X-2.3998 Y-.9136 Z2.

/ M98 P0004

M5

G91 G28 Z0 M9

M1

 

N3(OD)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T3 M06 ( 1/2 FLAT ENDMILL)

G0 G90 G54 X-2. Y-3.25 S7000 M3

G43 H3 Z2. T1 M8

M98 P0005

/ G0 G90 G55 X-2. Y-3.25 Z2.

/ M98 P0005

/ G0 G90 G56 X-2. Y-3.25 Z2.

/ M98 P0005

/ G0 G90 G57 X-2. Y-3.25 Z2.

/ M98 P0005

/ G0 G90 G58 X-2. Y-3.25 Z2.

/ M98 P0005

M5

G91 G28 Z0 M9

G28 Y0

M30

 

O0001

(FACING)

Z.2 G1 Z-.0001 F100.

X1.2 F50.

G2 Y-1.4999 I0. J-.4999

G1 X-7.2

G0 Z2. M99

 

O0002

Z.2 G1 Z-1. F100.

G41 D2 Y1.125 F70.

G3 X-2.5 Y.375 I.75 J0.

G1 X0.

G2 X.375 Y0. I0. J-.375

G1 Y-2.

G2 X0. Y-2.375 I-.375 J0.

G1 X-5.

G2 X-5.375 Y-2. I0. J.375

G1 Y0.

G2 X-5. Y.375 I.375 J0.

G1 X-2.5

G3 X-1.75 Y1.125 I0. J.75

G1 G40 Y1.875

Z.2 F6.42

G0 Z2. M99

 

O0003

G98 G83 Z-.75 R.1 Q.1 F20.

M99

 

O0004

M29 S200

G98 G84 Z-1. R.1 F20. P100.

M99

 

O0005

Z.2 G1 Z-2. F6.42

G41 D3 Y-2.75 F40.

G3 X-2.5 Y-2.25 I-.5 J0. F20.

G1 X-5. F40.

G2 X-5.25 Y-2. I0. J.25 F5.

G1 Y0. F40.

G2 X-5. Y.25 I.25 J0. F5.

G1 X0. F40.

G2 X.25 Y0. I0. J-.25 F5.

G1 Y-2. F40.

G2 X0. Y-2.25 I-.25 J0. F5.

G1 X-2.5 F40.

G3 X-3. Y-2.75 I0. J-.5 F20.

G1 G40 Y-3.25 F40.

Z.2 F6.42

G0 Z2. M99

%

[Chris McIntosh]

You likely will need to put in a condition on that output that will only output the comment if the current operation id # doesn't equal the previous (op_id$ <> last_op_id).

 

If you look in mpmaster there is a plast post block that will set last_op_id = op_id$ at the end of every toolchange/null toolchange.

 

Based on your code I'm assuming you're using transforms? When using a transform the value of xform_op_id$ doesn't equal the op_id$ value, when programming without transforms, these two values are equal.

 

HTH

[PcRobotic]

Hi HTH,

Yes, I'm using Transform ToolPath, can you be more pacific about your last statement? Where do I put the value as you suggested exactly? Thank you.

 

"Based on your code I'm assuming you're using transforms? When using a transform the value of xform_op_id$ doesn't equal the op_id$ value, when programming without transforms, these two values are equal.

"

 

 

 

 

 

Best regards,

Steven.L

[PcRobotic]

To make you understand my question, I'm pasting my partcial post and thank you for your time.

 

 

ptlchg0$ #Call from NCI null tool change (tool number repeats)

toolchng0 = one

if op_id$ <> last_op_id,

[

rd_params$ # Read parameters - pparameter

pmisccheck

]

pcuttype

toolcount = toolcount + 1

if toolcountn <= tooltotal, nexttool = rbuf(4,toolcountn)

else, nexttool = first_tool$

retractflg = 0

if (mi10$ & (op_id$ <> last_op_id | (op_id$ = last_op_id & xform_op_id$ <> op_id$)))

| ((tlplnno$ <> last_tlplnno | rotary_type$ <> last_rotary_type) & ret_on_indx),

[

phsm_off

if mi10$,

[

pretract

n$, *sm00, e$

result = force(spdir2,spdir2) #Force spindle output after M00

result = force(speed,speed) #Force speed output after M00

]

else, pretract0

retractflg = 1

]

else,

[

if mr1$ <> last_mr1 | mr2$ <> last_mr2, phsm_off

]

pcom_moveb

pcheckaxis #Check for valid rotary axis

c_mmlt$ #Multiple tool subprogram call

########## Operation Comment - SubProgram ##########

#comment$

########## Operation Comment - SubProgram ##########

pcomment3

pcan

if plane$ < 0 | opcode$ = 3 | opcode$ = 16, plane$ = 0

if op_id$ <> last_op_id, pbld, n$, sgplane, e$

pspindchng

[Chris McIntosh]

You have pounded out the comment$ call, which is where all the comments are output from operations/manual entries. This means if you have two operations using the same tool, and the second operation has an operation comment, it will not be output.

 

If you are using a manual entry, why are you selecting it in the transform operation in the first place if you only want it output once?

 

You can likely restrict the comment output if you really want to by putting the logic in front of the comment$ block call:

 

if op_id$ <> last_op_id, comment$

 

This will only output comments if a new operation is called, which in during a transform doesn't happen.

[PcRobotic]

Because I"m force to use sub-program to save time for machining and we want the manual entry for the programmer to insert notes but not duplicating like the one I showed you. Please help.

[PcRobotic]

oh, I know what you meant. I fixed it. Now I'm having another issue can you help me? I would like to list all of my workoffset but I please see below

 

(******* Work Offset List *******)

G0 G90 G54 (I hand type this in, how do I make them list out for me?)

G0 G90 G55

G0 G90 G56

G0 G90 G57

G0 G90 G58

G0 G90 G59

 

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

 

%

O0000 (TEST PROGRAM)

(This Post Is Only For - HAAS)

(Unproven/ Proven By: )

(ALUMINUM INCH - 2024)

 

(***** Posted Date And Time *****)

(JUL.05.2012 @ 1:21PM)

(Source - C:\USERS\STEVEN\DESKTOP\TEST PROGRAM.MCX-5)

(NC - C:\USERS\STEVEN\DOCUMENTS\MY MCAMX5\MILL\NC\PROGRAM NAME HERE.NC)

 

(****** Note From Programmer ******)

(MANUAL ENTRY AREA FROM PROGRAMMER)

(PROGRAMMER WANTS ABC SETUP)

(SETUP - MAN MUST FOLLOW EDF)

(CONFIRM FIRST ARTICALS TO Q.C)

 

(********* Tool List Info *********)

(T1 -3" FACE MILL - H1 - D1)

(T2 - 1/2 FLAT ENDMILL - H2 - D2)

(T4 - 1/4 DRILL - H4 - D4)

(T3 - 3/8-16 TAPRH - H3 - D3)

(T5 - 3/8 FLAT ENDMILL - H5 - D5 - R0.0500")

 

(******* Work Offset List *******)

G0 G90 G54 (I hand type this in, how do I make them list out for me?)

G0 G90 G55

G0 G90 G56

G0 G90 G57

G0 G90 G58

G0 G90 G59

 

N1 ( CHECK INSERTS BEFORE RUNNING )

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T1 M06 (3" FACE MILL)

G0 G90 G54 X-8.3 Y-.7501 S6000 M3

G43 H1 Z2. T2 M8

M98 P0001

/ G0 G90 G55 X-8.3 Y-.7501 Z2.

/ M98 P0001

/ G0 G90 G56 X-8.3 Y-.7501 Z2.

/ M98 P0001

/ G0 G90 G57 X-8.3 Y-.7501 Z2.

/ M98 P0001

/ G0 G90 G58 X-8.3 Y-.7501 Z2.

/ M98 P0001

M5

G91 G28 Z0 M9

M1

 

N2(USE OLD END MILLS AS POSSIBLE)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T2 M06 ( 1/2 FLAT ENDMILL)

G0 G90 G54 X-3. Y1.25 S8000 M3

G43 H2 Z2. T4 M8

M98 P0002

/ G0 G90 G55 X-3. Y1.25 Z2.

/ M98 P0002

/ G0 G90 G56 X-3. Y1.25 Z2.

/ M98 P0002

/ G0 G90 G57 X-3. Y1.25 Z2.

/ M98 P0002

/ G0 G90 G58 X-3. Y1.25 Z2.

/ M98 P0002

M5

G91 G28 Z0 M9

M1

 

N4(CARBIDE DRILL FOR THIS JOB ONLY)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T4 M06 ( 1/4 DRILL)

G0 G90 G54 X-4.2277 Y-1.4433 S2000 M3

G43 H4 Z2. T3 M8

M98 P0003

/ G0 G90 G55 X-4.2277 Y-1.4433 Z2.

/ M98 P0003

/ G0 G90 G56 X-4.2277 Y-1.4433 Z2.

/ M98 P0003

/ G0 G90 G57 X-4.2277 Y-1.4433 Z2.

/ M98 P0003

/ G0 G90 G58 X-4.2277 Y-1.4433 Z2.

/ M98 P0003

M5

G91 G28 Z0 M9

M1

 

N3(ROLL TAP)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T3 M06 ( 3/8-16 TAPRH)

G0 G90 G54 X-4.2277 Y-1.4433

G43 H3 Z2. T5 M8

M98 P0004

/ G0 G90 G55 X-4.2277 Y-1.4433 Z2.

/ M98 P0004

/ G0 G90 G56 X-4.2277 Y-1.4433 Z2.

/ M98 P0004

/ G0 G90 G57 X-4.2277 Y-1.4433 Z2.

/ M98 P0004

/ G0 G90 G58 X-4.2277 Y-1.4433 Z2.

/ M98 P0004

M5

G91 G28 Z0 M9

M1

 

N5(BRAND NEW TOOL NEEDED)

G91 G28 Z0

G0 G17 G40 G49 G80 G90

T5 M06 ( 3/8 FLAT ENDMILL)

G0 G90 G54 X-2.7157 Y-1.6796 S8000 M3

G43 H5 Z2. T1 M8

M98 P0005

/ G0 G90 G55 X-2.7157 Y-1.6796 Z2.

/ M98 P0005

/ G0 G90 G56 X-2.7157 Y-1.6796 Z2.

/ M98 P0005

/ G0 G90 G57 X-2.7157 Y-1.6796 Z2.

/ M98 P0005

/ G0 G90 G58 X-2.7157 Y-1.6796 Z2.

/ M98 P0005

M5

G91 G28 Z0 M9

G28 Y0

M30

 

O0001

(CHECK INSERTS BEFORE RUNNING)

Z.2 G1 Z-.0001 F100.

X1.8 F50.

Y-2.2499

X-8.3

G0 Z2. M99

 

O0002

Z.2 G1 Z-1. F100.

G41 D2 Y.75 F30.

G3 X-2.5 Y.25 I.5 J0.

G1 X0.

G2 X.25 Y0. I0. J-.25

G1 Y-3.

G2 X0. Y-3.25 I-.25 J0.

G1 X-5.

G2 X-5.25 Y-3. I0. J.25

G1 Y0.

G2 X-5. Y.25 I.25 J0.

G1 X-2.5

G3 X-2. Y.75 I0. J.5

G1 G40 Y1.25

G0 Z2. M99

 

O0003

G98 G83 Z-.5 R.1 Q.1 F10.

X-.6867

M99

 

O0004

M29 S200

G98 G84 Z-.5 R.1 F12.5 P100.

X-.6867

M99

 

O0005

Z.2 G1 Z.1 F5.

G2 X-2.0673 Y-1.3026 Z.0383 I.3242 J.1885 F20.

X-2.7157 Y-1.6796 Z-.0235 I-.3242 J-.1885

X-2.0673 Y-1.3026 Z-.0852 I.3242 J.1885

X-2.7157 Y-1.6796 Z-.147 I-.3242 J-.1885

X-2.0673 Y-1.3026 Z-.2087 I.3242 J.1885

X-2.7157 Y-1.6796 Z-.2705 I-.3242 J-.1885

X-2.0673 Y-1.3026 Z-.3322 I.3242 J.1885

X-2.7157 Y-1.6796 Z-.3939 I-.3242 J-.1885

X-2.0673 Y-1.3026 Z-.4557 I.3242 J.1885

X-2.4505 Y-1.8615 Z-.5 I-.3242 J-.1885

G1 X-2.4795 Y-2.0435

X-2.4585

G3 X-1.9905 Y-1.7673 I-.0105 J.5524

G1 X-2.9475

G2 X-3.0215 Y-1.4911 I.4785 J.2762

G1 X-1.9165

G3 X-1.9905 Y-1.2149 I-.5525 J0.

G1 X-2.9475

G2 X-2.4795 Y-.9387 I.4785 J-.2762

G1 X-2.4585

G0 Z.25 G0 G0 X-2.2815 Y-1.1161

Z.2 G1 Z-.5 F5.

G41 D5 X-2.6565 F20.

G3 X-3.0315 Y-1.4911 I0. J-.375

X-1.9065 I.5625 J0.

X-3.0315 I-.5625 J0.

X-2.6565 Y-1.8661 I.375 J0.

G1 G40 X-2.2815

G0 Z2. M99

%