久久久国产一区二区_国产精品av电影_日韩精品中文字幕一区二区三区_精品一区二区三区免费毛片爱
機械社區
標題:
請問誰有LANDIS磨床的編程說明或者手冊（計算機語言編程的，如下）
[打印本頁]
作者:
小飛_技術員
時間:
2018-4-26 23:40
標題:
請問誰有LANDIS磨床的編程說明或者手冊（計算機語言編程的，如下）
Start
0 f6 ?2 t* H& Y6 g/ t& Y
Include(variabledefines)
& C+ s P1 m2 L
Include(definedefaults)
* A8 t: y `& x: I" f5 x" ~0 t
RunFunction(shaftdata2)
, q; H3 m3 P0 c/ R; o5 q1 t. C
DefineGaugeAdjustParameters(1,1,2,1)
/ ~3 l" H" T2 Z( t, o
WriteBoolean( PPB_WorkRunOff, 0)
9 g( W- N" v. D; z/ j9 z: I
B_Axis_Angle= 0
6 m2 Z/ T5 T7 z& i
RunPartProgram(testturretmove)
3 B; \4 i. c% a1 k' o: I% j
WaitPartProgram()
1 A1 V9 _; N \" B3 t. b. N/ s
GrindClearanceRadius(1,110.0000)
6 E" d7 o Q* K. Z
'WriteBoolean( PPB_ColdStart, 1)
4 b% @8 V/ j! g1 ^7 [ a `
'ReadBoolean( PPB_ColdStart, ColdStart)
& K% R+ N: O, ^5 P! o
'IF( ColdStart > 0)
+ ]) Z3 B. N* ]& U% D
'StatusMessage(1,"Gauge Calibration")
# z8 D$ I/ U2 f5 G
'MoveAxis(Z2,0.0000,MoveAxis_Set1,2)
! K( Q2 G. A7 c3 t p: Y- b2 A% l
'WriteBoolean( PPB_GageZeroing, 1)
& n) }, J3 F: p8 }3 ]- }
'ReadReal( PPR_CalDiff, CalDiff)
2 j5 I$ t6 N2 v$ s* u6 \% i$ O/ n
'GaugeSize(1,-368.00,0.0000,0.0000,266.725,0,1,1,GaugeSize_Set1,8)
/ V" s! M x- F) N- W' Q* G
'WriteBoolean( PPB_GageZeroing, 0)
8 f& N$ Q2 f# U; a$ F
'DefineGaugeAdjustParameters(1,1,2,1)
' z( m. w$ q4 ^: O7 c
'ENDIF
0 ~! k, H; i: P: O& L
'Print("CalDiff=" , CalDiff)
7 R2 ~0 G# ^. W8 @. Z( ^
MoveAxis(Z2,WhlOffset + WWidth - 20,MoveAxis_Set1,2)
V z d! L# I6 C5 W! r+ G5 `
''
1 {" n+ K. D. R% x
'LatRet= 0
1 J3 E9 `, p" c. e
'LocateLateralReturnMeasurement(2,50,60.0000,0.0000,L0 + LHBody - Facestock,0.0000,LatRet,LateralLocation_Set1,6)
7 A1 H, G* V9 X# g; E/ F# k# V
'Print("Lateral Return =" , LatRet)
. a; b5 K) o x0 k0 i2 B% t
ReadBoolean( SPB_MC_SingStep, SingleStep)
( c* u0 s$ W2 C
IF( SingleStep > 0)
! b3 O) p; J* {" y: }1 c g
MessageBox("STOCK CHECK","Has LH body face already been ground?","If you answer 'yes' stock will be subtracted","from lateral return measurement.","",7,MessageRet)
* X4 I& C3 Y! q' J$ V$ m6 `
IF( MessageRet < 0)
) y# o# R3 h- _$ s- I
Print("No change to lateral return")
% J% u/ b% I1 f: |1 M
ELSE
% |. }3 d- V. _ z4 }
LatRet= LatRet - LHFaceStock
2 o4 n$ `" u% ~+ g
Print("Lateral Return =" , LatRet)
0 J+ Q2 G3 T) j0 l: `! `0 K
ENDIF
1 J4 K1 x+ n; g7 \( m: V$ E# l4 L. A2 V
ENDIF
% C2 b! b1 N8 q
作者:
大禹123
時間:
2018-4-27 11:27
力士樂的系統
作者:
小飛_技術員
時間:
2018-5-17 10:47
大禹123 發表于 2018-4-27 11:27
, _; V3 C0 i2 A7 l( F$ C
力士樂的系統
) G' v5 C! D3 c% M4 O
不對，是CNC6400系統
. r4 G$ X% s K! N" `4 W- p% R
歡迎光臨 機械社區 (http://www.ytsybjq.com/)
Powered by Discuz! X3.5