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

k7403290

4 j& F. H: a, a  Y% ^
正常輸出的程式
- {4 N8 u6 w: A  ^/ c4 s" E: Y" OG0 X-93.634 Y3.509
* f  l! j* i' i! Z- R0 U& pZ25.
Z10.
G1 Z0. F600.
8 `$ Z( F, o) ^9 c# i+ f5 hG41 D3 X-83.634 F120.
Y33.587
X-1.253
+ W4 k% p2 d5 U0 E1 mY-26.569
X-83.634
Y3.509
G40 X-93.634
/ _& H5 G& i# wG0 Z25.

希望修改的格式，G41/G42前一行增加固定文字
G0 X-93.634 Y3.509
Z25.
Z10.
6 h' Y$ Q5 _6 Q; J6 AG1 Z0. F600.
(XXYY)增加註解
G41 X-83.634 F120.不要D
5 v) o. v: d9 {7 }- l! B/ v4 B# AY33.587
X-1.253
Y-26.569
' {, }. o2 B0 Y% ^X-83.634
) |  Q: o& u& J1 u$ G6 PY3.509
1 t! y( E0 a/ I7 v9 M5 XG40 X-93.634
+ G5 U7 |* A* s( j& x; b1 P3 J$ w' l(AABB)增加註解，G40下一行增加文字
G0 Z25.

lyd_2005

有辦法,
: |; v- q! s( A( B" p" b0 S1 ~+ ?不要D，查找pccdia，删除if cc_pos$,后面的东西
( O& d; D0 k' d4 x/ m  [问题不清楚，xxyy，aabb是固定字符，还是任意字符

k7403290

lyd_2005 发表于 2023-11-22 08:24
有辦法,
不要D，查找pccdia，删除if cc_pos$,后面的东西
" r! U( d* n! M4 P问题不清楚，xxyy，aabb是固定字符，还是任意字符 ...

固定字符

k7403290

lyd_2005 发表于 2023-11-22 08:24
  B- b( r& {* u: C3 {有辦法,
& r4 L7 S9 G0 h不要D，查找pccdia，删除if cc_pos$,后面的东西
3 r3 p, @# T3 D% M$ X问题不清楚，xxyy，aabb是固定字符，还是任意字符 ...

不要D，已處理
5 g! \$ Y1 A: c就是程式中只要遇到G41/G42那上面一行就要多一組固定的字
同理，遇到G40，下面一行也是要多一行固定的字

lyd_2005

- w/ E6 W& ?. {
+ s* H- w9 {2 S) [  a. q% T
* g2 q, L+ w# b5 z1 `. ~5 K
#Output to NC of linear movement - feed
+ U; M2 Y8 g" d/ a2 F; s# _& Dcc_pos 1 : 0
plinout
          if prv_ca_pos$ <> ca_pos$ & ca_pos$, prv_tloffno$ - c9k, " (XXYY) ", e$
8 i6 m& m* z/ ?2 y" S0 [- v          if prv_cc pos$ <> cc pos$ & cc pos$ = 0, cc_pos_1 = 1
          pcan1, pbld, [if sgplane <> "G17", sgplane], 'sgcode, sgabsinc, pccdia,
          pxout, pyout, pzout, pcout, 'feed, strcantext, scoolant, e$
          if cc_pos_1 =1, [cc_pos_1 = 0, "(AABB) ", e$]
8 }5 _  y/ b3 e. q& T2 E6 R$ Q3 v
6 I. G  L! w) m0 Q. S- c' _





, `8 F/ F; _8 ~2 b* T