MC X3增加自動校刀程式

joe0827joe

我想在 "M100", tlngno$,這個地方
增加大直徑的刀子X.Y的偏移量
) W+ }0 @# r1 B' M+ f可是不知道該如何取得直徑還有運算最後結果
那個X.Y偏移量是例如像這樣
M100 T6 X20. Y10.
這樣表示刀子在對刀時偏移X20. Y10.
求助各位大神{:4_108:}

5 M! J5 q" |) A, P& y6 @以下為部分代碼:
     if stagetool >= zero, pbld, n$, *t$, "M6", e$
& l) V7 ?5 Q* O+ ^' R& l& Z      pbld, n$, "M100", tlngno$, e$ #修改處，新增這一行 多了M100自動校刀
      pindex
5 s  r& y& N! d% c5 v      if mi1$ > one, absinc$ = zero
      pcan1, pbld, n$, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
        pfcout, *speed, *spindle, pgear, strcantext, e$
      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$
& |; t6 p& P% E$ q      absinc$ = sav_absinc
      pcom_movea
' T, M* O2 B( u  t      toolchng = zero
      c_msng$ #Single tool subprogram call

若枫

回复 1# joe0827joe
' Y" I5 U; h) w  H

6 L7 f* S$ J; f    多大直径的刀具叫大直径？可以直接使用直径判断要不要输出。
if tldia$ > 你的设定直径，你的偏移量。

joe0827joe

+ k3 d5 A: N0 x& ^* C
回复 2# 若枫

大徑刀直徑20以上都是(這個直徑可能要再去量一下)tldia$的參數輸出不是純數字前面還含有TOOL DIA.-的英文字不太會寫if判斷式之後的部分
' s  ]/ q* I: J沒碰過這種的程式語言...
: `: t: a' i1 e  A( d4 j9 e. J請問可以給個範例嗎?

加入tldia$輸出結果如下

若枫

fmt  X  2   xdia       #X position output
fmt  Y  2   ydia        #Y position output

6 o* |$ F# [; N& @. t
% v8 j2 `, V. J- s2 mif tldia$ > 你的设定直径，
  [
) p& b2 P, H- y! o$ e   xdia = tldia / 2
! e& f. B# `* o& w0 \   ydia = tldia / 2
  "M100", *tlngno$, *xdia, *ydia, e$
]

joe0827joe

回复 4# 若枫

下面是依照若楓大給的照抄，不過還是出錯了我在想是不是那個tldia無法轉數字的關係?
      #修改處 以下在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置
% J! n+ b1 }8 F5 X: t: x      fmt X 2 xdia #X偏移輸出
7 k* K7 |* L0 \* W3 B      fmt Y 2 ydia #Y偏移輸出
      if tldia$>20,
- n) S6 c) v* U# Y" l: O/ `      [
      xdia=tldia/2
& u9 j" F" U4 \8 v      ydia=tldia/2
      pbld, n$, "M100", *tlngno$, *xdia,*ydia, e$
+ r8 N0 P& |% a7 \  }' U      ]
      #修改處 以上在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置

& W2 |, [% g8 t2 c# e/ X
下面是錯誤報告
07 Dec 2016 09:08:04 AM - 建立報告
" l5 o  g2 `, p# x( B07 Dec 2016 09:08:04 AM - 初始化後處理日誌檔案
' `9 l6 t1 ^% f! _/ G/ p( Y07 Dec 2016 09:08:04 AM - 使用 MP 版本執行 19.00 和後處理組件版本 19.00
07 Dec 2016 09:08:04 AM - 初始化開啟後處理程式檔案。
" ]$ H  v; i& b( K07 Dec 2016 09:08:04 AM - C:\Users\Public\Documents\shared Mcam2017\mill\Posts\MPFAN.PST
& S9 {  `2 J% K* U07 Dec 2016 09:08:04 AM - 已成功開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - 成功初始化預定義的後處理變量、字符串、後處理塊。
  J+ E- S! I0 _9 I07 Dec 2016 09:08:04 AM - 成功搜索定義的後處理變量、字符串、後處理塊。
! c0 R1 P7 Z" n9 U07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
( X* b: z- S) u( ~07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[11]
07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[15]
# i% S( k) W2 g" @' k7 {2 c& R; W07 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]
: y! \3 U) e7 F8 `& m! P+ g* x07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
% g6 ^: A1 P1 ?/ q/ S07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
1 r+ A  {4 Z# m" }07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
3 S# A) o9 Y/ {$ ^( x# e07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
+ x3 b5 j, w" \& I. _7 I. i, ^: u07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[35]
2 {! C: Q2 l8 J+ i9 K07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[41]
' ]$ |! [8 U; Y1 e% t& R) k07 Dec 2016 09:08:05 AM - 後處理過程成功完成。

若枫

回复 5# joe0827joe
1 b6 Y3 j* K  }/ e. u  C& X
5 e/ D& Y4 }  d, Z0 F4 e) ~; I难道一点后处理知识都没有吗？这么明显的问题，应该一眼就可以看出来吧。
1 y7 U3 ]  d: s2 ^; Y& u         fmt "X" 2 xdia #X偏移輸出
         fmt "Y" 2 ydia #Y偏移輸出

wang1314

只能看看帮不上忙

742698

只能看看帮不上忙

1931062882

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