誰能看懂這西門子程序就牛逼了

yanxuan908

菜鳥路過

虛緲

我確實不懂，給我講我也不懂，但我想問一個問題在機床上你SUBPAR這樣的單詞如何讓它組在一起？在FUNUC如果有這樣的它顯示的是S U B P A R都是單個的字母不組成單詞

onelee

類似于C語言,

assd12321

高級編程的內容！一般用不到！

191164729

看不懂，目前還是菜鳥水平

wangice

本人也是自學的840d，其中有可能解釋有誤，僅供參考交流。
# Q! T1 J1 S) ]3 ^; ]$ B1 t6 {
%_N_L9851_SPF
) J/ }+ O2 \9 r- X# y% W
, h. `3 M' @+ _6 S PROC L9851(INT TOOLNO) ：傳遞來自主程序或上一子程序的用戶自定義變量TOOLNO，變量類型INT（INT類型：帶正負號的整數）
/ [* @3 g. v7 i) w" b! b4 ^! a
* L! N/ g, L( \- i" J4 f  l* ^ DEF INT ACT_TOOLNO     ：新增用戶自定義變量一個ACT_TOOLNO，變量類型INT
* M, M2 D/ |8 ~$ C8 [/ E6 O/ e5 ~
$ ^7 G3 l! Y( s: E7 R5 ` DEF REAL ACT_TOOL_LENGTH,W_POS,V_POS  ：新增用戶自定義變量3個ACT_TOOL_LENGTH,W_POS,V_POS，變量類型REAL（REAL類型：實數）
5 R! v# N: H0 ]2 `: D, E5 W7 m; }! g
; O0 u& N4 w% F, P- l IF $P_SUBPAR[1]==TRUE                 ：檢查第一個形式參數是否有效（目的是檢查上一級程序傳遞下來的自定義變量TOOLNO是否有效）

ACT_TOOLNO=TOOLNO                     ：如果有效，ACT_TOOLNO賦值=TOOLNO

ELSE                                             ：否則
1 d5 G5 j  u7 x+ @3 ~) M0 S( Y. h
ACT_TOOLNO=$P_TOOLNO               ：ACT_TOOLNO賦值=當前主軸刀具號碼（這個號碼不等于程序內的T“XXX”的XXX）
* `9 Z4 w6 A  r; k
) s  w5 a  ^& g6 g$ @8 v ENDIF                                            ：結束判斷
9 j3 F! H+ U7 n* j
ACT_TOOLNO_LENGTH=$TC_DP3[ACT_TOOLNO,1]+$TC_DP12[ACT_TOOLNO,1] ：自定義變量ACT_TOOLNO_LENGTH計算賦值=當前刀具第一長度+第一長度磨損量
8 V: e" N1 f$ s+ k: V3 X
W_POS=$AA_IM[W]                       ：自定義變量W_POS賦值=當前W軸在機床坐標系下的位置

6 O, n* w0 T, \) n" A" E V_POS=$AA_IM[V]                         ：自定義變量V_POS賦值=當前V軸在機床坐標系下的位置
; `: e, v. L, p0 }0 T
( @- t5 ~. C$ b: {( k $P_CHBFR[0]=CTRANS(Z,ACT_TOOL_LENGTH-W_POS-V_POS) ：全局框架Z定義：Z=ACT_TOOL_LENGTH-W_POS-V_POS（使所有坐標系做Z的增量）
4 Y& W, b+ x9 B  p& i' u
R0=$P_GG[8]                           ：定義R0，記錄當前所處坐標系
" s2 G+ b/ L) d: z4 i2 F
G[8]=R0                                  ：重新進入坐標系，為R0記錄的坐標系。

' @8 ?/ r, N' ?5 r0 k( E M17                                        ：子程序結束，返回上一級程序

認真便輸了！

我承認，我也看不懂

吃玩樂

我承認，我看不懂

傷情于劍

就算看懂了，也成不了牛逼啊