求大神告知Mastercam怎么出宏程序一个程式加工多个坐标程式头尾怎么加变量急急急

LF8

这是程式 我需要加工6个工件 第一个是G54后面五个是56-59
! o& @4 u  G/ s- e
(PROGRAM NAME - 88-88)
(DATE=DD-MM-YY - 27-11-18 TIME=HH:MM - 08:43)
2 p; n$ J7 c( R7 TN100G21
0 y2 b: y, j! P6 IN102G0G17G40G49G80G90
(TOOL - 1 DIA. OFF. - 1 LEN. - 1 DIA. - 10.)
N104T1M6
- o+ P  ~8 {- b7 n2 UN106G0G90G54.X-29.Y17.6S6000M3
$ B; W: [8 W& R, S7 BN108G43H1Z40.
! v( A1 i1 y" N* [- t# N8 q- ^% W- qN110Z1.
N112G1Z0.F2000.
N114X-23.F1500.
N116X23.Z-.515
N118G2X30.1Y10.5Z-.64I0.J-7.1
N120G1Y-10.5Z-.875
/ }0 j4 Y/ h# Y5 d2 `N122G2X23.Y-17.6Z-1.I-7.1J0.
, z4 q4 }) g/ t+ N' M- ^% p3 u1 o! hN124G1X-23.Z-1.515
N126G2X-30.1Y-10.5Z-1.64I0.J7.1
N128G1Y10.5Z-1.875
N130G2X-23.Y17.6Z-2.I7.1J0.
N132G1X23.Z-2.515
; Z6 |# C- V9 Q, S( SN134G2X30.1Y10.5Z-2.64I0.J-7.1
  d- [6 q; L9 CN136G1Y-10.5Z-2.875
N138G2X23.Y-17.6Z-3.I-7.1J0.
N140G1X-23.Z-3.515
N142G2X-30.1Y-10.5Z-3.64I0.J7.1
N144G1Y10.5Z-3.875
N146G2X-23.Y17.6Z-4.I7.1J0.
N148G1X23.Z-4.515
$ U5 P+ e7 U$ w# sN150G2X30.1Y10.5Z-4.64I0.J-7.1
N152G1Y-10.5Z-4.875
N154G2X23.Y-17.6Z-5.I-7.1J0.
$ _* m) L, r+ \" ]N156G1X-23.Z-5.515
N158G2X-30.1Y-10.5Z-5.64I0.J7.1
N160G1Y10.5Z-5.875
N162G2X-23.Y17.6Z-6.I7.1J0.
N164G1X23.Z-6.515
N166G2X30.1Y10.5Z-6.64I0.J-7.1
3 N: C4 E+ d, ?& L! R. pN168G1Y-10.5Z-6.875
: c+ a1 `$ @& u' g1 h6 jN170G2X23.Y-17.6Z-7.I-7.1J0.
N172G1X-23.Z-7.515
. y/ B4 ]& `% q% |7 h* tN174G2X-30.1Y-10.5Z-7.64I0.J7.1
6 k: R: F1 t1 F9 m5 v3 N4 W9 IN176G1Y10.5Z-7.875
N178G2X-23.Y17.6Z-8.I7.1J0.
: D$ W2 W, p) {* n# L0 fN180G1X23.Z-8.515
N182G2X30.1Y10.5Z-8.64I0.J-7.1
# b4 b: b9 \6 e- s1 }4 NN184G1Y-10.5Z-8.875
. G3 Y% A) k; E. ?8 PN186G2X23.Y-17.6Z-9.I-7.1J0.
N188G1X-23.Z-9.515
0 }! [4 Y2 m: l& [: eN190G2X-30.1Y-10.5Z-9.64I0.J7.1
/ e8 d1 @* h3 ~$ cN192G1Y10.5Z-9.875
8 {: }/ X4 y8 i6 u  D) p' H% uN194G2X-23.Y17.6Z-10.I7.1J0.
N196G1X23.
; N3 ^% m8 A$ {% \* qN198G2X30.1Y10.5R7.1
N200G1Y-10.5
  x  o; W- ^2 ~  E& o: s2 VN202G2X23.Y-17.6R7.1
N204G1X-23.
N206G2X-30.1Y-10.5R7.1
: q3 P' M- o- X! o+ O% H5 yN208G1Y10.5
N210G2X-23.Y17.6R7.1
0 a1 {5 G9 T# j3 D2 a* M# H/ qN212G0Z40.
1 ~3 m! ~* a1 Q( F/ M2 U/ ]7 mN214X-29.Y17.5
6 `1 C1 w8 q( V  }. k$ xN216Z1.
1 _. d2 Q9 v/ A, PN218G1Z-10.F2000.
( p/ ?  _& n) i: `8 X; T) H% qN220X-23.F1500.
N222X23.
6 `+ q3 H' O5 G% @. j- lN224G2X30.Y10.5R7.
N226G1Y-10.5
% m" |( L; |1 R0 VN228G2X23.Y-17.5R7.
) X' Z5 J, B# [6 h$ \N230G1X-23.
, K' n; E. c0 M5 I7 m" k+ ]1 bN232G2X-30.Y-10.5R7.
N234G1Y10.5
N236G2X-23.Y17.5R7.
N238G0Z40.
N240M5
5 |3 ]' n; ~" CN242G91G28Z0Y0.
; v' C" O; r0 C7 o" d" C( w, D5 iN244M30
%
; |9 H0 O! _/ m+ ^) a

若枫

: W6 A2 O$ M6 F# Ospartno   : ""       #Q1 defines empty string
4 ^9 E# ^( f  K" tloop_1   : 1
1 v. {* A$ o* n/ ]& N/ \5 b6 \
6 C" q8 ?7 l/ |: h" tfq 1 spartno " 请输入加工的产品个数"

后处理开始位置增加如下代码.
8 M1 D5 {* k+ B6 @1 R, X* e
           q1
          while spartno < 1  | spartno > 6, q1
; j5 L# ~" k8 R& R2 d" K        "#100 =", *spartno, e$
. A. F  K9 K! r& P4 t$ I% R

4 n6 {+ t6 B( s6 c& L       用  "G[#100+53]" 替换  *g_wcs
( V( i' V( G! R2 X  Q7 q
& Q* P+ k) \" K, w1 A/ T9 k程序尾加上一下代码

# W( n, i* S4 R* E       "#100=#100+1",e$
      " if [#100 > 6 ]GOTO 999", e$

2 e9 E' D' N; k% L! R4 G
$ G  m% e' I  n; ~5 _! E以上代码为测试,请自行测试和完善.这只是大概的代码.

! L% S  k, V! k3 e" `
7 a- ^( d' t9 E( g/ ^5 z

5 C) |! d) J# K/ F, h" B

LF8

若枫 发表于 2018-11-27 19:08
spartno   : ""       #Q1 defines empty string
loop_1   : 1

大神能照着我那个程式改一遍吗？我比较笨

腾飞凤舞

改这种都是需要很好的基础的！   估计这样的后处理你也用得少， 还不如自己手动改NC
" U' w/ h5 W% @

LF8

腾飞凤舞 发表于 2018-11-27 21:40
改这种都是需要很好的基础的！   估计这样的后处理你也用得少， 还不如自己手动改NC

. E: [7 {# l1 Z8 |" l) I. x3 R+ _3 P如果刀多的话每次都改很麻烦啊

LF8

有没有大神帮帮忙啊

若枫

LF8 发表于 2018-11-28 09:21
有没有大神帮帮忙啊

如果后处理不会改,建议使用子程序的方式完成,子程序中不需要输出G54,G55Gxx,在主程序中定义变量

LF8

若枫 发表于 2018-11-29 18:24
3 g0 s+ n! N, t# }, Q2 `# x+ J9 M如果后处理不会改,建议使用子程序的方式完成,子程序中不需要输出G54,G55Gxx,在主程序中定义变量

) p2 v* \7 G( x( z2 d怎么定义变量？可以说详细一点吗

若枫

LF8 发表于 2018-12-1 09:22
4 ~. `4 |, s8 O7 T/ K& i. N怎么定义变量？可以说详细一点吗

(PROGRAM NAME - 88-88)
4 M  i( I) k# s6 `* W(DATE=DD-MM-YY - 27-11-18 TIME=HH:MM - 08:43)
, D6 L) B. n, M+ i* I. f! A3 Y. n: HN100G21
N102G0G17G40G49G80G90
- f' C1 G& \8 T(TOOL - 1 DIA. OFF. - 1 LEN. - 1 DIA. - 10.)
$ P3 h7 `" ~& p6 ]9 gN102 #100=54
N102 #101=0.
- P. E, E# ]: |. ?2 \* cN103 WHILE[#101GT5]DO1
& w+ f$ \$ `  e5 KN104T1M6
! e- Z6 ^3 n0 o) o, t+ u6 l5 D; EN106G0G90G#100X-29.Y17.6S6000M3
N108G43H1Z40.
N110Z1.
+ m1 q$ w7 T; J; {3 W5 \N112G1Z0.F2000.
) E, u; J9 S7 N: H4 {, [, q3 |0 iN114X-23.F1500.
3 M5 r2 W; R$ a2 v, mN116X23.Z-.515
N118G2X30.1Y10.5Z-.64I0.J-7.1
N120G1Y-10.5Z-.875
N122G2X23.Y-17.6Z-1.I-7.1J0.
N124G1X-23.Z-1.5151
4 F9 y& n) y$ i, X( p, Q4 z; ?N126G2X-30.1Y-10.5Z-1.64I0.J7.1
5 g' t5 D4 E/ MN128G1Y10.5Z-1.875
N130G2X-23.Y17.6Z-2.I7.1J0.
N132G1X23.Z-2.5157
5 x, Q0 H# k, X  Q* V5 {* dN134G2X30.1Y10.5Z-2.64I0.J-7.1
N136G1Y-10.5Z-2.875
, ]. N7 n) m6 O. K! o! P3 QN138G2X23.Y-17.6Z-3.I-7.1J0.
9 h9 z2 z0 t% }7 I2 [N140G1X-23.Z-3.515
( m5 F5 d: F" q" B1 ]N142G2X-30.1Y-10.5Z-3.64I0.J7.1
* B+ A* U: N. y' bN144G1Y10.5Z-3.8750
/ W% g4 H! R5 C4 ON146G2X-23.Y17.6Z-4.I7.1J0.
* s* C& o* j, E+ S0 d6 PN148G1X23.Z-4.515
N150G2X30.1Y10.5Z-4.64I0.J-7.1
: d/ |+ v- K9 Q/ W7 k: ~N152G1Y-10.5Z-4.875
) i+ @. K: r' g0 }N154G2X23.Y-17.6Z-5.I-7.1J0.
N156G1X-23.Z-5.515
N158G2X-30.1Y-10.5Z-5.64I0.J7.1
# B6 a9 _$ A. g  [; O" mN160G1Y10.5Z-5.875
N162G2X-23.Y17.6Z-6.I7.1J0.
N164G1X23.Z-6.515
9 {0 R/ c" l) a" W# `2 Z+ l! ]9 dN166G2X30.1Y10.5Z-6.64I0.J-7.1
. Y: W% O. {8 M# F% _6 [5 GN168G1Y-10.5Z-6.875
7 X0 U6 i6 M' H- n# qN170G2X23.Y-17.6Z-7.I-7.1J0.2
N172G1X-23.Z-7.515
N174G2X-30.1Y-10.5Z-7.64I0.J7.1
" @2 m. j- t: O4 ]1 V2 G4 d" ~+ FN176G1Y10.5Z-7.875
+ J) a. w' F6 ?, s  d* k: bN178G2X-23.Y17.6Z-8.I7.1J0.
N180G1X23.Z-8.515
8 d4 `# k7 e! d6 p0 hN182G2X30.1Y10.5Z-8.64I0.J-7.1
* o8 z8 ^8 U0 K% y1 s& uN184G1Y-10.5Z-8.875
. u+ l) o3 S# n$ e1 z) s$ ]N186G2X23.Y-17.6Z-9.I-7.1J0.
5 ]/ j4 @; r) t9 D9 ^0 O2 ]N188G1X-23.Z-9.515
7 z5 ?$ J, t: l3 UN190G2X-30.1Y-10.5Z-9.64I0.J7.1
N192G1Y10.5Z-9.875
N194G2X-23.Y17.6Z-10.I7.1J0.
# s+ T1 O4 u+ |6 D8 Z  {1 PN196G1X23.
, u! ]) {: g0 dN198G2X30.1Y10.5R7.1
N200G1Y-10.5
2 P( j5 H5 C. }: ?" NN202G2X23.Y-17.6R7.15
  H& t( p& I6 H: wN204G1X-23.
! Y/ S* Q, v  [) `2 R- E+ kN206G2X-30.1Y-10.5R7.14
' N$ Q* K0 O( oN208G1Y10.5
9 \  t9 B( a$ w6 t1 Z7 J/ Y1 Y* PN210G2X-23.Y17.6R7.1
N212G0Z40.4
' ?9 _  d5 r7 _2 A" ^N214X-29.Y17.5
  [$ Q! J0 @$ ^# y0 L1 l5 ^N216Z1.
N218G1Z-10.F2000.
0 n6 W" ?8 z- x, q+ i  }! _+ C6 JN220X-23.F1500.
N222X23.
, Z1 L% Q" L8 }: L% W; k5 v5 M. L" y5 pN224G2X30.Y10.5R7.
N226G1Y-10.5
N228G2X23.Y-17.5R7.
, ^# ^) [; Q& c& w6 P, UN230G1X-23.
N232G2X-30.Y-10.5R7.
6 F# N# _: D9 U- s$ ZN234G1Y10.5
6 I  Z  I7 t5 ?) VN236G2X-23.Y17.5R7.
N238G0Z40.6
N239#101=#101+1
N239#100=#100+#101  
3 t2 Y6 {2 j% w& p: jN239END1
3 Y1 R% N' a! Z7 \$ YN240M5
N242G91G28Z0Y0.
8 A6 N  m' R0 u1 H1 q# I3 G, AN244M30
( H  K$ |' Q% t, M. R- U%

LF8

若枫 发表于 2018-12-1 16:43
(PROGRAM NAME - 88-88)
(DATE=DD-MM-YY - 27-11-18 TIME=HH:MM - 08:43)
N100G21

* H, _* c4 t9 j, c% Y- @5 O& JN102 #101=0. 这段需要把0改成数量吗？就是做几个工件