MC X3增加自動校刀程式

joe0827joe

我想在 "M100", tlngno$,這個地方
增加大直徑的刀子X.Y的偏移量
% o$ X7 X& q5 {8 `+ c" F可是不知道該如何取得直徑還有運算最後結果
7 S1 F( z5 z9 o& n) y& B那個X.Y偏移量是例如像這樣
M100 T6 X20. Y10.
0 N& ?! C' o2 G2 d8 V+ f) b: h這樣表示刀子在對刀時偏移X20. Y10.
* k2 s0 X$ Z8 \/ o$ X( z( {求助各位大神{:4_108:}
4 u8 _7 {$ Y( k( ?$ J. b
' N: G! T# n6 b+ T, E# t以下為部分代碼:
     if stagetool >= zero, pbld, n$, *t$, "M6", e$
+ s" d! m$ D$ G7 }( m      pbld, n$, "M100", tlngno$, e$ #修改處，新增這一行 多了M100自動校刀
      pindex
7 e* {0 y: l# w0 X& @& N! L      if mi1$ > one, absinc$ = zero
# V) D0 \1 r9 E      pcan1, pbld, n$, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
        pfcout, *speed, *spindle, pgear, strcantext, e$
, i. f  Z/ v( K* D0 h0 L      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$
      absinc$ = sav_absinc
      pcom_movea
+ ~. F& w/ z" W6 k      toolchng = zero
, c; g- H- x6 ^' S/ H# Y      c_msng$ #Single tool subprogram call

若枫

回复 1# joe0827joe

0 C, w; X# d4 x/ J% y. y% |- Q# [
    多大直径的刀具叫大直径？可以直接使用直径判断要不要输出。
if tldia$ > 你的设定直径，你的偏移量。

joe0827joe

回复 2# 若枫
2 c% a1 F& U" _1 Y" p
大徑刀直徑20以上都是(這個直徑可能要再去量一下)tldia$的參數輸出不是純數字前面還含有TOOL DIA.-的英文字不太會寫if判斷式之後的部分
5 J. d. u8 N- n1 [3 ^沒碰過這種的程式語言...
請問可以給個範例嗎?

加入tldia$輸出結果如下

若枫

fmt  X  2   xdia       #X position output
fmt  Y  2   ydia        #Y position output
6 a% r" d6 K8 I2 t: `3 V

4 q4 d$ `" v7 D  J" `# lif tldia$ > 你的设定直径，
  [
   xdia = tldia / 2
& D4 n% R! Y; T+ ?7 X" H   ydia = tldia / 2
  "M100", *tlngno$, *xdia, *ydia, e$
]

joe0827joe

回复 4# 若枫

  o7 H/ q" x( u; f- S* W下面是依照若楓大給的照抄，不過還是出錯了我在想是不是那個tldia無法轉數字的關係?
      #修改處 以下在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置
      fmt X 2 xdia #X偏移輸出
1 @- f  t2 r( v& C+ [0 J( s      fmt Y 2 ydia #Y偏移輸出
      if tldia$>20,
+ m0 z9 }. T- Y/ V5 M# y      [
      xdia=tldia/2
; K% T8 u; d3 @$ a- `* ?      ydia=tldia/2
+ {1 ^) q* [/ k6 n      pbld, n$, "M100", *tlngno$, *xdia,*ydia, e$
      ]
# X# W3 [$ f- ^8 {' Q( T3 r" V$ D+ ?      #修改處 以上在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置
9 X3 I' w& I' g6 X: @. g% W

3 H% t2 u2 `; g2 f% Y8 o下面是錯誤報告
07 Dec 2016 09:08:04 AM - 建立報告
5 m1 S; b! t% w8 r7 f* A& ]; ]07 Dec 2016 09:08:04 AM - 初始化後處理日誌檔案
07 Dec 2016 09:08:04 AM - 使用 MP 版本執行 19.00 和後處理組件版本 19.00
07 Dec 2016 09:08:04 AM - 初始化開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - C:\Users\Public\Documents\shared Mcam2017\mill\Posts\MPFAN.PST
) v& Q8 m  E8 e  K2 V) F07 Dec 2016 09:08:04 AM - 已成功開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - 成功初始化預定義的後處理變量、字符串、後處理塊。
07 Dec 2016 09:08:04 AM - 成功搜索定義的後處理變量、字符串、後處理塊。
  k5 g. T/ y: M( }; G, Q! j07 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]
07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
07 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]
3 i1 p2 Z* x2 e1 C5 o+ k07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
: K  B& R" h$ }/ Z/ b; ]07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
' R# Q  u: t, w) ^3 G07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
* C$ w, u9 c' C. `/ s07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[35]
4 J$ `- C9 a9 G) E07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[41]
2 L! {5 o  _; c7 s& X4 O7 T07 Dec 2016 09:08:05 AM - 後處理過程成功完成。

若枫

回复 5# joe0827joe

2 }) g( G& P* y3 T# e3 x+ F7 ]8 ^% w难道一点后处理知识都没有吗？这么明显的问题，应该一眼就可以看出来吧。
8 c8 ^: f% N2 B7 I. S         fmt "X" 2 xdia #X偏移輸出
         fmt "Y" 2 ydia #Y偏移輸出

wang1314

只能看看帮不上忙

742698

只能看看帮不上忙

1931062882

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