找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 845|回复: 8

[求助] MC X3增加自動校刀程式

[复制链接]

2

主题

11

回帖

8

积分

新手上路

积分
8
发表于 2016-12-5 14:34:31 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区

您需要 登录 才可以下载或查看,没有账号?立即注册

×
我想在 "M100", tlngno$,這個地方! \' b) |( O8 G4 k
增加大直徑的刀子X.Y的偏移量# ]; ]& G( V# C+ O, m' |
可是不知道該如何取得直徑還有運算最後結果7 t: O( y7 U6 \! x2 D! V
那個X.Y偏移量是例如像這樣
0 l1 u' H4 _  j$ w. u0 q% ]M100 T6 X20. Y10. " A! Y  @8 [6 N. d" {1 |
這樣表示刀子在對刀時偏移X20. Y10.* ?3 A$ i) ~# Y- E+ ]! \% l) k+ \
求助各位大神{:4_108:}
; |, E+ H. t* g9 \1 p& Z* K) X. e! I% m, L0 z6 @
以下為部分代碼:
1 q/ _+ I, j; r! t8 B     if stagetool >= zero, pbld, n$, *t$, "M6", e$* Z3 _& l( v; F0 b7 T9 A
      pbld, n$, "M100", tlngno$, e$ #修改處,新增這一行 多了M100自動校刀
+ p: P8 s* M) M: K& I5 g8 m      pindex  ?( @& Q5 _" U1 r1 K
      if mi1$ > one, absinc$ = zero3 a6 Y6 u( U7 D+ @5 V0 E$ v( Z7 Y
      pcan1, pbld, n$, *sgcode, *sgabsinc, pwcs, pfxout, pfyout,
+ a+ I+ \; o( e8 k        pfcout, *speed, *spindle, pgear, strcantext, e$
- u) _" B$ r; _  R- G( k      pbld, n$, "G43", *tlngno$, pfzout, scoolant, next_tool$, e$
+ ?9 I$ n4 c, z' J      absinc$ = sav_absinc
3 V$ V- T# H2 h( ]      pcom_movea
" S5 \+ G& w0 K0 |      toolchng = zero
# D" |% @; I  B# @' l% @, m4 j      c_msng$ #Single tool subprogram call

433

主题

5759

回帖

901万

积分

管理员

积分
9014266
发表于 2016-12-5 17:19:26 | 显示全部楼层
回复 1# joe0827joe
  d( s3 L. @0 ?# z/ x$ s, v1 D, ^) W: g) F

: f6 d. _$ Q) g1 Z/ e  c' y' U    多大直径的刀具叫大直径?可以直接使用直径判断要不要输出。
$ t; }$ a: ^. d! Aif tldia$ > 你的设定直径,你的偏移量。
回复

使用道具 举报

2

主题

11

回帖

8

积分

新手上路

积分
8
 楼主| 发表于 2016-12-6 11:49:14 | 显示全部楼层
本帖最后由 joe0827joe 于 2016-12-6 11:58 编辑
  o% q0 l% u+ N( ?
' _1 I/ {4 g  x5 a回复 2# 若枫 : N* |! F- w# c4 C5 @
4 x' m/ a/ u9 i  P1 v  S( j
大徑刀直徑20以上都是(這個直徑可能要再去量一下)tldia$的參數輸出不是純數字前面還含有TOOL DIA.-的英文字不太會寫if判斷式之後的部分8 ?/ c/ ^6 B5 T: d
沒碰過這種的程式語言...# K4 F  J# O8 c& E
請問可以給個範例嗎?. K1 V' U: w  B& y, |/ Q7 O

0 }5 G+ `) t0 z# {6 c; q9 P加入tldia$輸出結果如下) x: z/ G4 J& z3 _. m
未命名.png
回复

使用道具 举报

433

主题

5759

回帖

901万

积分

管理员

积分
9014266
发表于 2016-12-6 20:54:34 | 显示全部楼层
fmt  X  2   xdia       #X position output
8 n3 x% `0 z2 Afmt  Y  2   ydia        #Y position output' J' x2 A1 ^) z& Y2 K* Q! j# W! ~

" l: M& V5 b% T* a# D/ u/ D& A: y9 [1 @( e+ @: a
if tldia$ > 你的设定直径,
" l/ g6 \) p8 k  [
5 f; {- E9 x! t5 @* ]( }   xdia = tldia / 2
- M5 A& l" r4 E   ydia = tldia / 2
2 g6 X# v  U" s1 F4 Y/ d  "M100", *tlngno$, *xdia, *ydia, e$
; ?3 i( N3 x/ C9 c- m# h]
回复

使用道具 举报

2

主题

11

回帖

8

积分

新手上路

积分
8
 楼主| 发表于 2016-12-7 09:11:37 | 显示全部楼层
回复 4# 若枫 2 w2 u2 q$ W7 ?4 p% ]* A: Y

' ^  p! F- o' H% X* B下面是依照若楓大給的照抄,不過還是出錯了我在想是不是那個tldia無法轉數字的關係?
4 @/ J9 K% p5 d      #修改處 以下在T?? MO6換刀指令後增加此行,自動校刀長指令(此指令為特殊機能),大於20之大徑刀會自動偏置
5 B2 @" v) a0 o7 V$ u7 E      fmt X 2 xdia #X偏移輸出( z8 F  h; W1 J- q0 _9 S  \
      fmt Y 2 ydia #Y偏移輸出  l; M& H' {- z! h: b! E& q
      if tldia$>20,
! \5 m3 w: ]& l, L      [
$ b7 }9 U/ O0 `( Q      xdia=tldia/2( v& o6 ^8 [4 R1 U# F% {
      ydia=tldia/27 r- w5 \6 \+ _1 A6 E1 I
      pbld, n$, "M100", *tlngno$, *xdia,*ydia, e$( V& C. p) b! J7 U! f" c
      ]$ F: x' Y( w2 M, `) n3 @( I' y! s$ d- k
      #修改處 以上在T?? MO6換刀指令後增加此行,自動校刀長指令(此指令為特殊機能),大於20之大徑刀會自動偏置3 E* ^- G3 j* O1 [, |# f5 [1 t& i: E
( p7 ?2 F. B8 b' h

- G  k1 V" S' v* n. s3 S下面是錯誤報告% l% f# D( |# T! [2 r: N
07 Dec 2016 09:08:04 AM - 建立報告' s$ m4 D& n) l& z# I
07 Dec 2016 09:08:04 AM - 初始化後處理日誌檔案
, L" ]( O8 B" E- u& [9 A07 Dec 2016 09:08:04 AM - 使用 MP 版本執行 19.00 和後處理組件版本 19.00
5 ^6 j, f( C/ o! o$ Q# v1 n07 Dec 2016 09:08:04 AM - 初始化開啟後處理程式檔案。, T4 Q2 N8 P8 ^& v
07 Dec 2016 09:08:04 AM - C:\Users\Public\Documents\shared Mcam2017\mill\Posts\MPFAN.PST# O: E7 r$ Z0 Q* ]2 F. x* M
07 Dec 2016 09:08:04 AM - 已成功開啟後處理程式檔案。+ @" v$ f5 t* d6 S
07 Dec 2016 09:08:04 AM - 成功初始化預定義的後處理變量、字符串、後處理塊。
1 h$ N9 \1 A1 r9 l+ g, b! E9 X; ?07 Dec 2016 09:08:04 AM - 成功搜索定義的後處理變量、字符串、後處理塊。
* m5 T9 @# J2 L* ~07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗!, , 尚未定義標籤[7]
! H) P( t5 Z* C* k. K/ x* R07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗!, , 尚未定義標籤[11]
8 j9 q& c9 E0 a9 H& W07 Dec 2016 09:08:05 AM - PST 行 (907) - 後處理塊輸出類型失敗!, , 尚未定義標籤[15]* L8 X% ?  v* {$ G+ p+ y
07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗!, , 尚未定義標籤[7], B1 J' ?, `! B* f
07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗!, , 尚未定義標籤[11]" p2 }6 B; ]' B& Z  q
07 Dec 2016 09:08:05 AM - PST 行 (908) - 後處理塊輸出類型失敗!, , 尚未定義標籤[15]8 k& ^& d8 i0 X3 a6 i3 U$ c- d
07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗!, , 尚未定義標籤[7]
1 s% h' Z1 X7 c! j' N07 Dec 2016 09:08:05 AM - PST 行 (911) - 後處理塊輸出類型失敗!, , 找不到所需的標籤[11], 出現非法字符
/ U' |$ v* n% W: R07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗!, , 尚未定義標籤[7]
% p7 H  U" ], y! A" M07 Dec 2016 09:08:05 AM - PST 行 (912) - 後處理塊輸出類型失敗!, , 找不到所需的標籤[11], 出現非法字符* g$ w0 t1 q# a9 p2 r3 W$ z
07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗!, , 尚未定義標籤[35]
2 j$ F# `7 [+ p07 Dec 2016 09:08:05 AM - PST 行 (913) - 後處理塊輸出類型失敗!, , 尚未定義標籤[41]2 b: k4 @% R! c8 E
07 Dec 2016 09:08:05 AM - 後處理過程成功完成。
回复

使用道具 举报

433

主题

5759

回帖

901万

积分

管理员

积分
9014266
发表于 2016-12-7 17:17:48 | 显示全部楼层
回复 5# joe0827joe
# ?2 u) i  A+ w/ u
; ?  {1 V8 A7 ~( K难道一点后处理知识都没有吗?这么明显的问题,应该一眼就可以看出来吧。
& D8 m- f$ M, k9 W; L         fmt "X" 2 xdia #X偏移輸出% V7 O# C/ ~3 F" b( }) i4 q
         fmt "Y" 2 ydia #Y偏移輸出
回复

使用道具 举报

2

主题

54

回帖

31

积分

注册会员

积分
31
发表于 2016-12-22 19:13:52 | 显示全部楼层
只能看看帮不上忙
回复

使用道具 举报

0

主题

25

回帖

26

积分

注册会员

积分
26
发表于 2021-12-3 08:35:27 | 显示全部楼层
只能看看帮不上忙
回复

使用道具 举报

3

主题

168

回帖

218

积分

中级会员

积分
218
QQ
发表于 2022-4-7 22:12:08 来自手机 | 显示全部楼层
学习学习,。。。。。。。。。。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

QQ|Archiver|手机版|小黑屋|若枫后处理论坛 ( 苏ICP备11015087号-1|苏公网安备32059002001368号 )

GMT+8, 2026-8-23 01:08 , Processed in 0.167325 second(s), 28 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表