国产精品乱码一区-性开放网站-少妇又紧又爽视频-西西大胆午夜人体视频-国产极品一区-欧美成人tv-四虎av在线-国产无遮挡无码视频免费软件-中文字幕亚洲乱码熟女一区二区-日产精品一区二区三区在线观看-亚洲国产亚综合在线区-五月婷婷综合色-亚洲日本视频在线观看-97精品人人妻人人-久久久久久一区二区三区四区别墅-www.免费av-波多野结衣绝顶大高潮-日本在线a一区视频高清视频-强美女免费网站在线视频-亚洲永久免费

機械社區

標題: 這個程序誰能看懂？ [打印本頁]
作者: liu65178454    時間: 2010-9-24 20:46
標題: 這個程序誰能看懂？
%_N_L9850_SPF
8 p% \6 k! Q) A' a* m7 k' v( O% OPROC L9850(REAL B_POS,REAL W_POS,REAL  V_POS)1 i) U! ], Y, m% F" S8 \
IF $P_SUBPAR[1]==TRUE AND $AA_IM[B]<>B_POS7 c0 s1 _+ |2 R5 N
G90G00G53Z-500W0V0D04 B1 b/ y" Z+ x$ J
G01 B=B_POS F200* s3 |" |, G$ h* Q
ENDIF- G( x. K( q& \9 h! f
IF $P_SUBPAR[2]==TRUE7 [4 Y1 }: r8 ^, ]/ ?
G90G00G53 W=W_POS1 D3 i3 J% f! H: O3 u) U
ENDIF
# ]3 R7 P; H  nIF $P_SUBPAR[3]==TRUE  O4 g7 |% V: E* i, H5 w/ F( v. O( I
G90G00G53 V=V_POS6 Q  I$ l) c2 H( Q9 K& A
ENDIF" i: y# o/ o+ M% V
M17
作者: 長橋臥波    時間: 2010-9-24 21:27
不是C語言，看不懂。也不像VB.
作者: 亡靈村長    時間: 2010-9-24 22:00
這個有點C語言的成分，又有數控編程語言成分，合起來就不認識了，
作者: 力頂天    時間: 2010-9-24 22:10
是西門子的數控系統宏程序
作者: liu65178454    時間: 2010-9-25 19:32
是西門子宏程序，數控鏜銑床里的B（工作臺） V（鏜桿） W（滑枕）軸的控制，誰能解釋下程序的意思？
作者: liu65178454    時間: 2010-9-25 19:37
像西門子系統840D數控鏜銑它們長度，半徑刀補用么指令？
) d4 K; o, X7 a  v   看別人有時候用D1        有時候用個程序來控制，弄糊涂，請下大俠們？
作者: abcwcf    時間: 2010-9-25 20:10
西門子840D,首先這是一個帶參數傳遞的子程序.+ c5 p, l4 p" B6 \2 \

. h* K! D2 Z/ ~( `8 }$ A! @在不完整的參數傳送時可以通過系統變量) B/ t  o- H9 Z
$P_SUBPAR[i]判別，該子程序的傳送參數是否已經
8 A: g  Q( a( |. u+ H- `9 L( j實際編程。
( b3 n0 I) g" w! g作為自變量(i)，系統變量獲得傳送參數的號。( p$ P) i7 r* |- x' m; w( a
系統變量 $P_SUBPAR 提供：
5 s( u& |& R& D& Y5 ?* u& Y" w( a$ t( L TRUE, 如果已經編程了傳送參數/ a7 P5 Z$ a7 m& i% S
 FALSE, 如果沒有使用值作為傳送參數。% p/ A' V6 C  u+ Z
$ l  U7 e) D/ u6 q- y& T

& x: o* m- n. S$ |) o$AA_IM[軸] 在MKS中讀出實際值 MKS -機床坐標系
作者: abcwcf    時間: 2010-9-25 21:12
%_N_JZKDA_SPF2 h! {5 {4 p, p: r+ |
;$PATH=/_N_SPF_DIR/_N_AT_MPD) c% n6 `' L9 Y2 |$ Z) C4 J
PROC JZKDA(INT ZH,REAL KD1,REAL KD2,REAL KD3,REAL KD4,REAL DW1,REAL GJ,INT GS)
7 {, M  v( S$ G# i6 X  d6 pDEF REAL BL1,BL2,BL3,BL4,BL5,BL6,BL7,BL8,BL9,BL10=13 X( J' B# b* ]4 U
BL1=$P_TOOLNO* S* z' L- c# a: u8 s& \
BL2=$TC_DP6[BL1,1]! B3 X+ z( Y. h6 g
BL3=$TC_DP21[BL1,1]6 ~* p- C" V3 w' ]* N2 t0 ~
BL4=0-(BL2+3)
/ a3 v  I, Z' n' v, m9 ?BL5=2*(BL2+3)+KD1
( Q* k) ?" i: E6 ~G[8]=ZH G90 G00 X=BL4' j0 j7 y. V  x4 o, m7 V" b% T) J
              G91 G01 X=BL5
0 z# w: R) ~: O  Y& Q; z7 e% y% O, p3 o$ [8 K

$ c8 _8 E- A$ M' u! c5 o
- p9 k$ `4 N; _& V8 ~3 w3 A
' l8 _) ]9 ]; J+ f$ X0 B1 a2 R8 [! `* u  y  C
給你看一段常用的參數編程的例子吧,這些參數常常只是 用來作運算用的* a& I6 m$ M2 f) K! R' H2 E" j# J
$TC_DP6[BL1,1]- }7 ~- ~0 ?5 D5 W
$TC_DP21[BL1,1]$ k, t- E: X* l& Y6 _
這兩個很實用
作者: shixukong1985    時間: 2010-9-26 11:56
7樓好厲害呀  不知對發那科B類宏程序怎樣 可以交流交流
作者: liu65178454    時間: 2010-9-26 18:37
回復 7# abcwcf 7 Y1 ]% c4 J( z
! p; u3 V. l: L
- |+ Q& C  B: z. `, `
    佩服，好厲害呀，對了，MKS是么意思啊？還有IF $P_SUBPAR[1]==TRUE 帶AND $AA_IM[B]<>B_POS
3 K+ k3 a, F. V這段程序，而IF $P_SUBPAR[2]==TRUE不帶那段程序？2 C& m9 P! l* C5 N* r
6 ]  X; U  g. I% y8 Q* x( B
PROC L9850(REAL B_POS,REAL W_POS,REAL  V_POS)是注釋，還是為了運行必須這么寫的？
作者: liu65178454    時間: 2010-9-26 19:50
我接觸西門子840d系統時間不長，
9 c0 e2 C; T. Q+ S- Q  x 有哪位大俠能推薦些書？關于西門子840d像上面的宏程序介紹，講解。
1 M+ ~3 L1 p' ?+ ]& c& p小弟在這先謝了！
作者: abcwcf    時間: 2010-9-26 20:55
本帖最后由 abcwcf 于 2010-9-26 20:59 編輯
# L1 E: F2 ], X
  J+ Q" X6 }$ g" u0 M' n" R, Y其實對于一般性的編程,先看看入門手冊,基礎編程手冊以及循環編程手冊,就已經夠用了.要想提高的話就看看高級編程手冊吧.這些資料或許論壇里都有人發過,你找找看.找不到的話在到西門子的官方網站上下載.        
9 c3 J* s9 G7 X( n2 m
! L' H: S; e5 a9 H# j! n7 J老外做這些基礎性的工作國內沒有什么企業能比得上.   這就是差距.( a+ m- U+ d4 O+ |% p

$ t7 y, B* H* c9 E( T; ?/ C* O( ~) H7 ~# R5 ?; B
另外說一下,對發那克的系統接觸不多,不熟。
作者: 馬斯平    時間: 2010-9-28 09:52
我來補充一點：關于PROC,在宏程序的開頭使用，是切換到西門子語言模式的標志，在宏程序結尾處用M17結束該模式，切換到ISO語言模式。
作者: liu65178454    時間: 2010-9-28 19:45
謝謝您！
; R% L! N% T8 u. t! p& z/ w2 ~& p. P        能還透露些嘛？嘿嘿
作者: 水中弋木    時間: 2010-9-29 12:35
太亂了，兄弟的技術太差了！！！
作者: 螺旋線    時間: 2010-9-29 13:17
啃西門子的標準循環。完全啃完，就會發現可以提刀縱橫天下了。) t9 o# v' Q, z7 P9 U- ]& X
不過俺沒啃過，主要是沒地方用。哈哈。
作者: 大樹上8    時間: 2010-9-29 15:10
就是變量加條件轉換之類的，這種在法那科，三菱的系統上都可以用，不過有可能語句不一樣，我們有時候也用變量編程。
作者: liu65178454    時間: 2010-9-29 21:27
技術好的，兄弟，就多透露些，與大家分享下嘛，不要吝嗇嘛
作者: jaukzhen    時間: 2010-9-30 23:54
我只能看懂事西門子的   沒用過西門子
作者: lxg254    時間: 2010-10-15 01:37
品牌系統間的語言，沒什么值得拽的。
作者: hake4587    時間: 2010-10-26 11:12
給我一本系統說明書我可以玩轉整個系統
作者: 江帆    時間: 2010-10-26 21:52
學習了啊，俺只懂FANUC的A類B 類宏程式, w+ y8 }. n  v4 q) M
西門子不太懂啊
作者: 爽歪歪沙    時間: 2013-11-9 01:30
西門子
作者: wangice    時間: 2013-11-30 11:15
%_N_L9850_SPF% f/ c, q8 C$ ~/ K

) l, C6 L3 C" w7 V6 c/ F# S& Y' G( ]PROC L9850(REAL B_POS,REAL W_POS,REAL  V_POS)0 ?; \( o' W! R" O, ]; y
子程序L9850 ，并接受上級程序建立的自定義變量及變量內設定的數據，變量類型REAL(正負實數)，自定義變量共3個，B_POS,W_POS,V_POS。
$ {3 O' z$ F1 q2 A7 t" x  C' w" [- r- f, W# v! ~8 R( L
IF $P_SUBPAR[1]==TRUE AND $AA_IM[B]<>B_POS
% o1 Z1 k# d$ ~2 H' y判斷檢查傳遞的參數，如果上級程序傳遞下來的第一個自定義變量B_POS有效并且當前B軸的機械坐標與B_POS內所設定的數據不符& h& W! o; s5 y: ?# X. b

" y" S; y- m* f; ]G90G00G53Z-500W0V0D0
& f/ U; U1 F7 u0 Z9 M8 d運行程序G00 Z-500，W、V軸轉至零度，取消刀具長度補償。
4 X6 g, v' y: j5 p# Z9 m6 |  U' d9 o
G01 B=B_POS F200
/ x4 S. h9 o- F0 X( c- x- t4 f4 ]6 TB軸轉至B_POS所設定的角度，工進速度F200。0 i0 [  [" \' ?
- ~. I: R2 Z8 B
ENDIF
) p3 B1 n+ H. Y結束判斷3 D0 w4 Q- G) M! G/ V

" z+ ]2 |; x. t: ?* j" J! ^IF $P_SUBPAR[2]==TRUE
0 v9 @* a9 R# f0 |判斷檢查傳遞的參數，如果上級程序傳遞下來的第二個自定義變量W_POS有效。. ^0 v# _$ D3 D% \, b
7 N. p" E' C: _2 r4 U, d, K
G90G00G53 W=W_POS' d) d, e+ X5 R9 c% x7 \6 Z+ U
運行程序，W軸轉至W_POS所設定的角度。
- g& L* V6 l' j6 m! [8 y3 U7 N
* G$ f3 y% `4 a+ FENDIF
5 ~) @' s5 S6 k; a' [  u/ `! A* l結束判斷/ z  M% d5 d* c# ~2 k5 |' ^
( {9 U/ d6 J. M
IF $P_SUBPAR[3]==TRUE
# l/ I% s4 [. ?6 J% O7 q判斷檢查傳遞的參數，如果上級程序傳遞下來的第三個自定義變量V_POS有效。
' |4 }- J; F% Q  s" k
" _$ o( p$ T# j" j- [$ {& W3 BG90G00G53 V=V_POS  u$ _* ~0 k% \: D8 S/ ]
運行程序，V軸轉至V_POS所設定的角度。) R  f- x; Q$ C1 o

! t: N' W0 K# a4 lENDIF$ N) |5 z0 ]. @  S
結束判斷。5 z5 ~( L: w3 s% {4 Z6 V

% D4 E' [7 Z' B0 k; bM17: M% `7 e$ }3 J, t
返回上一級程序。
作者: wangice    時間: 2013-11-30 11:32
%_N_JZKDA_SPF
) c# r% g+ f4 h% o5 \+ y7 w' N" H
;$PATH=/_N_SPF_DIR/_N_AT_MPD5 w8 G& |+ g# e% m/ T& U
程序路徑說明9 b3 Q9 b, k! ?% J9 Z/ g3 P
7 _( i+ R, P+ [# A7 x: t# m9 _
PROC JZKDA(INT ZH,REAL KD1,REAL KD2,REAL KD3,REAL KD4,REAL DW1,REAL GJ,INT GS) 4 T. |% g9 Q7 ]4 }0 |) G
子程序JZKDA，接受上級程序傳遞的自定義變量，變量類型INT，REAL兩種，INT-帶正負號的整數，REAL-正負實數- G+ j& o  G4 j  v

! @% U- B8 \& ]/ C# \4 k2 Y% @$ P; _2 EDEF REAL BL1,BL2,BL3,BL4,BL5,BL6,BL7,BL8,BL9,BL10=1' r; ]$ @' ~4 g! I" C  x  J" ^+ y
新建自定義變量BL1、BL2、BL3、......， 變量類型REAl。
) Z! t5 F5 S6 e4 q; @0 z: A
6 J* c5 B* ^: {9 [3 s' UBL1=$P_TOOLNO
: g( R5 {) {8 [2 e0 [5 G7 F3 X; z/ S7 P% h定義自定義變量BL1，等于當前主軸刀具號。
2 w! p' I3 v  h$ s* J$ w& F
0 p$ n2 b9 I0 Z" nBL2=$TC_DP6[BL1,1]
4 M# ^# h2 }0 V定義自定義變量BL2，等于BL1刀具號所設定的半徑值。
) F+ x3 K; Z1 }5 m  H$ N; q) c* v* A5 x2 F" U  W0 _
BL3=$TC_DP21[BL1,1]! `/ V$ k% J8 M; h
定義自定義變量BL3，等于BL1刀具號所設定的基本尺寸的第一長度補償。
( c2 H+ R* \9 W, G3 E+ \5 V! D$ M* F! A' }+ W# E" |$ \6 @
BL4=0-(BL2+3)
6 g: T: ]3 D) l計算BL4
- r* P, y* v) V) D0 h$ b  B, e2 f8 Z
BL5=2*(BL2+3)+KD1
" i. e$ x4 d% f7 g! x# K計算BL5
4 Z2 k7 o" d: H8 b. }
% ~. G" _( b) N  h) o& V$ B! HG[8]=ZH G90 G00 X=BL4
$ Z9 l- ^" B. W進入ZH所要求的坐標系(G[8]=1=G53，G[8]=2=G54，G[8]=3=G55，以此類推)，移動X軸2 J" e2 B: P) B

4 w8 Q& a( s1 P! y              G91 G01 X=BL5
/ ~3 X+ F8 J2 v% b6 \1 R移動X軸
作者: 夜總是要來的    時間: 2013-11-30 16:36
wangice 發表于 2013-11-30 11:32
9 |$ ~7 t- l$ ?%_N_JZKDA_SPF' f- `+ A% P) ?4 r% A

! p0 O# ?) w$ U5 W;$PATH=/_N_SPF_DIR/_N_AT_MPD

; w' S; \8 j4 m/ _3 D王斌？
! E& f+ u6 K/ Z3 \: k! g* @
作者: 爽歪歪沙    時間: 2013-11-30 18:30
作者: 吃玩樂    時間: 2013-12-2 21:50
不是C語言，看不懂。也不像VB.
作者: 亡の調律    時間: 2013-12-2 22:31
在我眼里都是亂碼啊
作者: 謝池春    時間: 2014-1-6 11:12
PROC L9850(REAL B_POS,REAL W_POS,REAL  V_POS)是定義帶參數傳輸的子程序。L9850是子程序名，括號里的是要傳輸的三個變量。但是L子程序是不能傳送變量的，這里我也不懂。IF $P_SUBPAR[1]==TRUE 帶AND $AA_IM[B]<>B_POS9 y- v0 f9 Y2 \& z! O7 ]5 c# w
是說當$P_SUBPAR[1]==TRUE 并B軸機床坐標系不等于B_POS值時，下面怎么樣。
作者: 虛緲    時間: 2014-1-10 09:54
這個還真的看不懂9 I7 [' ^3 X+ ^" E; k




歡迎光臨 機械社區 (http://m.whclglass.com.cn/) Powered by Discuz! X3.5