請問，G41/G42有辦法改成以下的格式嗎?謝謝

k7403290

2 i/ B, v" N# b0 Z. Z. R正常輸出的程式
6 b, O3 U( ]0 D+ {" s) E3 }G0 X-93.634 Y3.509
Z25.
8 C; x: v5 m' g1 I) o; @Z10.
3 v5 O9 s8 a* [8 ~G1 Z0. F600.
2 T# h3 M9 |  cG41 D3 X-83.634 F120.
Y33.587
/ G! Q# o2 j# l  B5 N7 j# UX-1.253
7 Z* F4 l$ H, G, e7 vY-26.569
1 Y$ q" l1 I) S% K# _) bX-83.634
Y3.509
G40 X-93.634
( k1 T; D! i  {: L/ {" yG0 Z25.
9 N: f. S+ L" C, {/ l# O
& u$ n5 G# t3 h) r+ ^5 q  P6 c希望修改的格式，G41/G42前一行增加固定文字
G0 X-93.634 Y3.509
Z25.
Z10.
; E1 F2 F: s' d% A5 d" J3 T+ TG1 Z0. F600.
(XXYY)增加註解
6 U! c0 t. s  s: v3 k$ kG41 X-83.634 F120.不要D
Y33.587
X-1.253
( T# j* V6 t8 X& y( D* \Y-26.569
X-83.634
Y3.509
$ P9 |9 Y- G1 l9 q; S2 c" D1 nG40 X-93.634
(AABB)增加註解，G40下一行增加文字
8 d% b7 i& b7 U4 z8 G& {G0 Z25.

lyd_2005

有辦法,
6 d( k/ F8 D7 ^: o不要D，查找pccdia，删除if cc_pos$,后面的东西
问题不清楚，xxyy，aabb是固定字符，还是任意字符

k7403290

lyd_2005 发表于 2023-11-22 08:24
0 I& R  `- R% c# e有辦法,
不要D，查找pccdia，删除if cc_pos$,后面的东西
' Y6 U& [5 k- Q# h9 L2 ?问题不清楚，xxyy，aabb是固定字符，还是任意字符 ...

+ ^6 _" C# j2 K6 c固定字符

k7403290

lyd_2005 发表于 2023-11-22 08:24
有辦法,
不要D，查找pccdia，删除if cc_pos$,后面的东西
% d; q( b! `+ E3 N+ s1 ~( L问题不清楚，xxyy，aabb是固定字符，还是任意字符 ...

; V1 V/ O- ?3 k0 a" O9 q不要D，已處理
就是程式中只要遇到G41/G42那上面一行就要多一組固定的字
同理，遇到G40，下面一行也是要多一行固定的字

lyd_2005

1 l5 u; Y, j- J4 ]+ p
  v% c2 N# e" s& z& N: d
4 B( T# \5 r, o% i% i  P% v
#Output to NC of linear movement - feed
* E) {. ]  d1 X' ~6 ycc_pos 1 : 0
1 X  b, B: {- F. m) B, }plinout
          if prv_ca_pos$ <> ca_pos$ & ca_pos$, prv_tloffno$ - c9k, " (XXYY) ", e$
          if prv_cc pos$ <> cc pos$ & cc pos$ = 0, cc_pos_1 = 1
          pcan1, pbld, [if sgplane <> "G17", sgplane], 'sgcode, sgabsinc, pccdia,
2 g+ _( z  ?- ]          pxout, pyout, pzout, pcout, 'feed, strcantext, scoolant, e$
/ M5 D. _/ W5 r- J0 J          if cc_pos_1 =1, [cc_pos_1 = 0, "(AABB) ", e$]



0 R' A& J& X/ f/ ]
+ g4 V, L- t3 `( m8 k  ~/ R


) C5 {& u3 j: `  }