请问谁有LANDIS磨床的编程说明或者手册（计算机语言编程的，如下）

小飞_技术员

Start
2 T0 u9 Q9 u6 E& M; V; rInclude(variabledefines)
9 b' K7 Y* Q" S7 F6 h  eInclude(definedefaults)
RunFunction(shaftdata2)
7 V+ O1 f4 W- {6 z6 xDefineGaugeAdjustParameters(1,1,2,1)
WriteBoolean( PPB_WorkRunOff, 0)
B_Axis_Angle= 0
) `5 Z; e& {2 J2 z  S: sRunPartProgram(testturretmove)
' F" Q7 p( w" B5 F$ x  `WaitPartProgram()
GrindClearanceRadius(1,110.0000)
'WriteBoolean( PPB_ColdStart, 1)
'ReadBoolean( PPB_ColdStart, ColdStart)
'IF( ColdStart > 0)
'StatusMessage(1,"Gauge Calibration")
% R( x) q0 o, k# L6 V# z& a'MoveAxis(Z2,0.0000,MoveAxis_Set1,2)
2 _& f. S- R/ f9 b4 n9 x0 }'WriteBoolean( PPB_GageZeroing, 1)
'ReadReal( PPR_CalDiff, CalDiff)
'GaugeSize(1,-368.00,0.0000,0.0000,266.725,0,1,1,GaugeSize_Set1,8)
. v# L1 T5 v3 U7 d  t'WriteBoolean( PPB_GageZeroing, 0)
'DefineGaugeAdjustParameters(1,1,2,1)
3 g1 s9 ~! p. u4 Z( z" W: T$ b$ J'ENDIF
'Print("CalDiff=" , CalDiff)
MoveAxis(Z2,WhlOffset + WWidth - 20,MoveAxis_Set1,2)
''
'LatRet= 0
'LocateLateralReturnMeasurement(2,50,60.0000,0.0000,L0 + LHBody - Facestock,0.0000,LatRet,LateralLocation_Set1,6)
4 c& ^4 r% w+ B" {1 ~+ L'Print("Lateral Return =" , LatRet)
. k2 D6 a) _8 ~3 F6 c2 Y. IReadBoolean( SPB_MC_SingStep, SingleStep)
# h. ^  [& C8 S6 CIF( SingleStep > 0)
; O4 S: r$ O& V2 _% D7 yMessageBox("STOCK CHECK","Has LH body face already been ground?","If you answer 'yes' stock will be subtracted","from lateral return measurement.","",7,MessageRet)
IF( MessageRet < 0)
7 M1 |2 P2 L; V. rPrint("No change to lateral return")
, E4 M  D- `1 u( ], oELSE
LatRet= LatRet - LHFaceStock
Print("Lateral Return =" , LatRet)
9 U; l" B3 A1 _/ \ENDIF
ENDIF
; {, e& T# c) [. e: m5 K5 b9 `

小飞_技术员

大禹123 发表于 2018-4-27 11:27
! A: \; M6 v5 n6 r) n( V; Y力士乐的系统

不对，是CNC6400系统
1 ]1 B5 L( m  a$ c

大禹123

力士乐的系统