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

k7403290

0 c4 B& u* k2 x$ k
正常輸出的程式
% ?8 |1 C1 \, UG0 X-93.634 Y3.509
) \) r) S$ P# H/ V# q9 g5 ZZ25.
8 o6 y1 T2 y  j0 Y5 UZ10.
G1 Z0. F600.
G41 D3 X-83.634 F120.
Y33.587
X-1.253
Y-26.569
X-83.634
Y3.509
9 ?: Z- u: o! |, RG40 X-93.634
2 H: V! |7 _; X, G0 r1 \* ?G0 Z25.

" k! g; B2 v5 M2 \" n希望修改的格式，G41/G42前一行增加固定文字
G0 X-93.634 Y3.509
# Q: f2 d" l: o; G- }9 Z4 NZ25.
5 h: _2 g& Y: s; S: }. I! [Z10.
3 i) Q9 S( C, h) V7 QG1 Z0. F600.
(XXYY)增加註解
2 w$ ?" ]* Q- }G41 X-83.634 F120.不要D
1 T- g9 @6 G# Q9 LY33.587
X-1.253
1 Y8 z5 }3 p- e5 c8 e; v$ P8 oY-26.569
1 t9 T* V" c/ i. a8 o( \X-83.634
Y3.509
$ e! }( K6 w. a. ^( W' GG40 X-93.634
4 \  {5 C# g' o' \$ t(AABB)增加註解，G40下一行增加文字
: O" b4 f3 l4 YG0 Z25.

lyd_2005

有辦法,
$ D% S5 I0 d! {; e% c* z$ ]$ k+ ^不要D，查找pccdia，删除if cc_pos$,后面的东西
问题不清楚，xxyy，aabb是固定字符，还是任意字符

k7403290

lyd_2005 发表于 2023-11-22 08:24
* ]" q, |+ X# g6 f1 U有辦法,
7 m' x/ W% d2 i" c- y3 x) w不要D，查找pccdia，删除if cc_pos$,后面的东西
" G7 c- i" a: Y7 {% o6 O问题不清楚，xxyy，aabb是固定字符，还是任意字符 ...

6 a3 i1 e# Q8 |1 J固定字符

k7403290

lyd_2005 发表于 2023-11-22 08:24
  y  H/ ^" N, D4 @+ T+ c+ L1 H有辦法,
不要D，查找pccdia，删除if cc_pos$,后面的东西
问题不清楚，xxyy，aabb是固定字符，还是任意字符 ...

不要D，已處理
: t, y  N+ P8 g; O. ^) N$ t8 k) l就是程式中只要遇到G41/G42那上面一行就要多一組固定的字
同理，遇到G40，下面一行也是要多一行固定的字

lyd_2005

' j% h$ W' z! [/ f1 W

#Output to NC of linear movement - feed
% ^; C% l" {% D4 ]7 c( P5 ecc_pos 1 : 0
: D1 e* v* ~" W; \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
4 C/ Q; k6 A# `$ w          pcan1, pbld, [if sgplane <> "G17", sgplane], 'sgcode, sgabsinc, pccdia,
" f; f$ P8 B6 g) O" G          pxout, pyout, pzout, pcout, 'feed, strcantext, scoolant, e$
          if cc_pos_1 =1, [cc_pos_1 = 0, "(AABB) ", e$]
5 @7 u3 Z, h5 M# y2 q9 D



6 ^9 L$ B  |. S* e) @9 K, h, D