MC X3增加自動校刀程式

joe0827joe

我想在 "M100", tlngno$,這個地方
增加大直徑的刀子X.Y的偏移量
可是不知道該如何取得直徑還有運算最後結果
那個X.Y偏移量是例如像這樣
; V( _0 W; G) U  }5 yM100 T6 X20. Y10.
這樣表示刀子在對刀時偏移X20. Y10.
2 I4 ]. c) i% T/ O  E# U求助各位大神{:4_108:}

! X+ N% j. l0 @( F$ a, |- W/ l以下為部分代碼:
     if stagetool >= zero, pbld, n$, *t$, "M6", e$
+ C# j( s9 T! \8 P4 C" s      pbld, n$, "M100", tlngno$, e$ #修改處，新增這一行 多了M100自動校刀
      pindex
, o; O& K+ r1 |; _, l      if mi1$ > one, absinc$ = zero
( H+ I9 _: q6 E, [. I      pcan1, pbld, n$, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
        pfcout, *speed, *spindle, pgear, strcantext, e$
. s# E9 O  ?, s' W2 q) a      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$
; j9 r  U$ b" i( b4 t      absinc$ = sav_absinc
      pcom_movea
) @: Z4 ~5 `0 N: C. S( T9 d      toolchng = zero
; k7 x7 J# J% b! C# A: l      c_msng$ #Single tool subprogram call

若枫

回复 1# joe0827joe


    多大直径的刀具叫大直径？可以直接使用直径判断要不要输出。
7 q4 n+ T  r* p+ w) Sif tldia$ > 你的设定直径，你的偏移量。

joe0827joe

0 C0 d9 ?  A: u+ @9 `- c回复 2# 若枫

: G" _+ P3 Q. L% I1 Z8 M大徑刀直徑20以上都是(這個直徑可能要再去量一下)tldia$的參數輸出不是純數字前面還含有TOOL DIA.-的英文字不太會寫if判斷式之後的部分
  l2 u$ O- U' Z3 U: |* ?" A0 D2 o% |9 q沒碰過這種的程式語言...
) j6 h0 \; y0 P2 @( J2 T請問可以給個範例嗎?
& [6 {9 G4 B9 k+ Y
" z, X" I: e6 j" U. f1 ^加入tldia$輸出結果如下
; J# ~* l  D( O* |1 F

若枫

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

: `0 D) z4 Z; Z' Q% d& n) W% l
- f  S9 m; R4 R" Z+ C! Uif tldia$ > 你的设定直径，
  [
; E* j; o) Q7 s0 Y/ H* L   xdia = tldia / 2
   ydia = tldia / 2
  "M100", *tlngno$, *xdia, *ydia, e$
]

joe0827joe

回复 4# 若枫
; B- W, z1 s. g2 {, |7 B
9 M% r% {, X# `$ {/ C$ V4 N3 y下面是依照若楓大給的照抄，不過還是出錯了我在想是不是那個tldia無法轉數字的關係?
2 T2 Y2 w; o/ d# N      #修改處 以下在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置
      fmt X 2 xdia #X偏移輸出
      fmt Y 2 ydia #Y偏移輸出
      if tldia$>20,
      [
      xdia=tldia/2
5 E" h. K( ^" n      ydia=tldia/2
* Y  n9 H; ]& T+ X: e7 B      pbld, n$, "M100", *tlngno$, *xdia,*ydia, e$
9 V' U! n- _5 Z# U. H' W1 s      ]
' O; B5 g3 O- m0 O, W- \! H! c3 [$ E1 ^      #修改處 以上在T?? MO6換刀指令後增加此行，自動校刀長指令(此指令為特殊機能)，大於20之大徑刀會自動偏置

1 U- s- N: L& Y
下面是錯誤報告
6 G5 i5 ]; L, l( A+ V07 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
07 Dec 2016 09:08:04 AM - 初始化開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - C:\Users\Public\Documents\shared Mcam2017\mill\Posts\MPFAN.PST
07 Dec 2016 09:08:04 AM - 已成功開啟後處理程式檔案。
07 Dec 2016 09:08:04 AM - 成功初始化預定義的後處理變量、字符串、後處理塊。
7 a- L1 t) Q% S) z07 Dec 2016 09:08:04 AM - 成功搜索定義的後處理變量、字符串、後處理塊。
07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
. `; o; {2 R) R/ w07 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]
07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 尚未定義標籤[7]
, r! g% S: E: n. p07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗！, , 找不到所需的標籤[11], 出現非法字符
07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[35]
07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗！, , 尚未定義標籤[41]
07 Dec 2016 09:08:05 AM - 後處理過程成功完成。

若枫

回复 5# joe0827joe

难道一点后处理知识都没有吗？这么明显的问题，应该一眼就可以看出来吧。
: K6 l5 _9 m( \2 Z' K         fmt "X" 2 xdia #X偏移輸出
7 W# H  ^& B  _( o' t3 H: V/ X5 Y         fmt "Y" 2 ydia #Y偏移輸出

wang1314

只能看看帮不上忙

742698

只能看看帮不上忙

1931062882

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