MC X3增加自動校刀程式

joe0827joe

我想在 "M100", tlngno$,這個地方
增加大直徑的刀子X.Y的偏移量
可是不知道該如何取得直徑還有運算最後結果
  t* [( J% \7 c: [( n( a那個X.Y偏移量是例如像這樣
M100 T6 X20. Y10.
5 y" v6 N, w. g& P這樣表示刀子在對刀時偏移X20. Y10.
求助各位大神{:4_108:}
; E8 H3 f2 A0 N/ n3 u7 m
9 U$ `( s8 j% D8 S  K! b6 K以下為部分代碼:
     if stagetool >= zero, pbld, n$, *t$, "M6", e$
1 j* b; d( W5 w4 M      pbld, n$, "M100", tlngno$, e$ #修改處，新增這一行 多了M100自動校刀
      pindex
: ?: }: a/ e) N/ D4 J9 M* }" N9 a      if mi1$ > one, absinc$ = zero
      pcan1, pbld, n$, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
! D1 o6 ^( l* v        pfcout, *speed, *spindle, pgear, strcantext, e$
2 P. ~1 M- b8 _      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$
      absinc$ = sav_absinc
      pcom_movea
      toolchng = zero
      c_msng$ #Single tool subprogram call

若枫

回复 1# joe0827joe
3 x" R6 N! a1 a  _0 |$ ]
6 \. p! Q" `: ~
    多大直径的刀具叫大直径？可以直接使用直径判断要不要输出。
' B8 s. _! L& e4 ?% \* P& \if tldia$ > 你的设定直径，你的偏移量。

joe0827joe

, j9 }" J2 j1 h
4 ^4 P" z  ]" ]" U6 z! L% B回复 2# 若枫
4 S) d  o; x  I4 _
大徑刀直徑20以上都是(這個直徑可能要再去量一下)tldia$的參數輸出不是純數字前面還含有TOOL DIA.-的英文字不太會寫if判斷式之後的部分
沒碰過這種的程式語言...
  Q! ]8 u% |% D( D9 f請問可以給個範例嗎?
2 j0 Y2 R2 `! J( D7 M" k0 P
加入tldia$輸出結果如下

若枫

fmt  X  2   xdia       #X position output
7 Y6 ^4 a- E* Dfmt  Y  2   ydia        #Y position output
4 K- Q4 L* T# c" j9 `! W

if tldia$ > 你的设定直径，
  [
   xdia = tldia / 2
   ydia = tldia / 2
  "M100", *tlngno$, *xdia, *ydia, e$
, l" _: N0 `1 \! i]

joe0827joe

回复 4# 若枫

# ~8 m$ k! @7 f5 S, B下面是依照若楓大給的照抄，不過還是出錯了我在想是不是那個tldia無法轉數字的關係?
      #修改處 以下在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置
7 `  c- C. g! T* g7 O5 ^% a" i$ _      fmt X 2 xdia #X偏移輸出
      fmt Y 2 ydia #Y偏移輸出
      if tldia$>20,
$ z% |- ?# b0 ^4 o8 `. F) t, K/ Y+ I' H      [
      xdia=tldia/2
      ydia=tldia/2
: R3 B( m$ G4 {! F% ~$ W; p      pbld, n$, "M100", *tlngno$, *xdia,*ydia, e$
      ]
      #修改處 以上在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置

0 |4 B/ q/ Y7 r; a0 J) [$ n
8 O+ p1 |3 ^/ X下面是錯誤報告
07 Dec 2016 09:08:04 AM - 建立報告
0 x6 J7 S6 A7 w4 @- ^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 - 初始化開啟後處理程式檔案。
/ f8 \, Z. }6 s( Y07 Dec 2016 09:08:04 AM - C:\Users\Public\Documents\shared Mcam2017\mill\Posts\MPFAN.PST
. N7 v# P* b/ N8 {3 K, @7 F07 Dec 2016 09:08:04 AM - 已成功開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - 成功初始化預定義的後處理變量、字符串、後處理塊。
07 Dec 2016 09:08:04 AM - 成功搜索定義的後處理變量、字符串、後處理塊。
  r. }2 g5 T  |/ p  ~9 o07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
) I$ l' I' M9 ^0 V. q3 [% r# E/ j07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[11]
/ r6 I1 @& a5 \, l# y, a0 p6 K07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[15]
; x: t/ y& ~. K& \' [; J6 m07 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]
, `/ ~1 J( C3 n. Y: t" s$ q07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
; F: ~! Z; s# ^# v07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
2 L& O4 Y  }6 }# d8 H6 ^07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[35]
  ^; z5 o) y, q" x) @07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[41]
07 Dec 2016 09:08:05 AM - 後處理過程成功完成。

若枫

回复 5# joe0827joe
" f) [/ V# B. F8 L- E( {
难道一点后处理知识都没有吗？这么明显的问题，应该一眼就可以看出来吧。
         fmt "X" 2 xdia #X偏移輸出
! a4 R% q. [$ r  u! Q         fmt "Y" 2 ydia #Y偏移輸出

wang1314

只能看看帮不上忙

742698

只能看看帮不上忙

1931062882

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