MC X3增加自動校刀程式

joe0827joe

我想在 "M100", tlngno$,這個地方
# u) v  ~6 {) p8 n增加大直徑的刀子X.Y的偏移量
* L6 U' O) ^7 O) E可是不知道該如何取得直徑還有運算最後結果
% }& D  x0 n& @: x* D那個X.Y偏移量是例如像這樣
" X) z: d7 n4 Z# i- K$ UM100 T6 X20. Y10.
6 j7 v- M' {8 F5 ^9 n- I這樣表示刀子在對刀時偏移X20. Y10.
求助各位大神{:4_108:}
6 b  t5 l5 x/ v9 N
以下為部分代碼:
     if stagetool >= zero, pbld, n$, *t$, "M6", e$
      pbld, n$, "M100", tlngno$, e$ #修改處，新增這一行 多了M100自動校刀
$ ]& D# Y& W8 F( I5 A* O" E      pindex
      if mi1$ > one, absinc$ = zero
      pcan1, pbld, n$, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
2 ~/ r/ v( H( b        pfcout, *speed, *spindle, pgear, strcantext, e$
0 C4 ~+ W  U, l" B3 L$ U      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$
) T$ k$ W' n/ n1 W      absinc$ = sav_absinc
      pcom_movea
      toolchng = zero
      c_msng$ #Single tool subprogram call

若枫

回复 1# joe0827joe

3 W+ P0 a( f% G% f8 O' u2 _
    多大直径的刀具叫大直径？可以直接使用直径判断要不要输出。
if tldia$ > 你的设定直径，你的偏移量。

joe0827joe

" C/ g- x% i/ N& G: T$ @( K
, [4 N8 x1 E. Z9 }; ]回复 2# 若枫
4 S0 d/ X6 Y  T, `7 j
, J/ }7 H1 N7 e$ I大徑刀直徑20以上都是(這個直徑可能要再去量一下)tldia$的參數輸出不是純數字前面還含有TOOL DIA.-的英文字不太會寫if判斷式之後的部分
沒碰過這種的程式語言...
請問可以給個範例嗎?
4 K2 I  e+ N4 w9 @$ h$ T
加入tldia$輸出結果如下

若枫

fmt  X  2   xdia       #X position output
6 O% C7 m/ O1 @fmt  Y  2   ydia        #Y position output
3 y7 }, d" w8 r+ A1 _: J

; N4 [, \& L9 y" H( {, ~6 ?+ ^- dif tldia$ > 你的设定直径，
" G" ?/ Z  ^+ `" T  [
( Y! e! M% r1 ]) }& E' i   xdia = tldia / 2
% e( j, o1 T% r   ydia = tldia / 2
  "M100", *tlngno$, *xdia, *ydia, e$
. v8 e$ @5 u& n% c]

joe0827joe

回复 4# 若枫
: d0 @  P0 z! C
下面是依照若楓大給的照抄，不過還是出錯了我在想是不是那個tldia無法轉數字的關係?
/ D; P0 }: x' O% p      #修改處 以下在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置
      fmt X 2 xdia #X偏移輸出
      fmt Y 2 ydia #Y偏移輸出
1 }  \7 Z: e6 n4 S* G      if tldia$>20,
      [
      xdia=tldia/2
      ydia=tldia/2
% ]: |2 b& f5 l. A; t; b      pbld, n$, "M100", *tlngno$, *xdia,*ydia, e$
      ]
      #修改處 以上在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置


下面是錯誤報告
1 P7 a6 ]; _9 {& `07 Dec 2016 09:08:04 AM - 建立報告
07 Dec 2016 09:08:04 AM - 初始化後處理日誌檔案
07 Dec 2016 09:08:04 AM - 使用 MP 版本執行 19.00 和後處理組件版本 19.00
$ D6 X5 b) p# o/ a& M07 Dec 2016 09:08:04 AM - 初始化開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - C:\Users\Public\Documents\shared Mcam2017\mill\Posts\MPFAN.PST
( Q8 n/ j$ c) \0 \1 A# D- F07 Dec 2016 09:08:04 AM - 已成功開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - 成功初始化預定義的後處理變量、字符串、後處理塊。
07 Dec 2016 09:08:04 AM - 成功搜索定義的後處理變量、字符串、後處理塊。
07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[11]
07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[15]
8 u/ n+ c% l& v4 h, Z3 _2 C07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
; a+ }& v, ?2 k  c; W$ t; P6 h07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗！, , 尚未定義標籤[11]
07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗！, , 尚未定義標籤[15]
07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
: c" m6 m# f$ t3 o1 t5 i; B07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
$ j; F9 T& m9 I$ w/ b07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[35]
. Y; A& U% s' V0 W5 e) f+ A07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[41]
07 Dec 2016 09:08:05 AM - 後處理過程成功完成。

若枫

回复 5# joe0827joe
0 U4 O" O7 u  R5 T$ j* {7 _; ?( \
难道一点后处理知识都没有吗？这么明显的问题，应该一眼就可以看出来吧。
         fmt "X" 2 xdia #X偏移輸出
! u) j, r$ {6 n  I         fmt "Y" 2 ydia #Y偏移輸出

wang1314

只能看看帮不上忙

742698

只能看看帮不上忙

1931062882

学习学习，。。。。。。。。。。