|
因应Z轴方向,改了+-负号
FeedCurrent = GetOemDRO(818) 'Get the current settings
ZCurrent = GetDro(2)
Code "G4 P1" 'Pause 1 second to give time to position probe plate
Code "F100" 'slow feed rate to 100 MM/MIN
GageH = GetOEMDRO (1002)
Rem Probe Down by PEU (Based On Erniebro Work)
FeedCurrent = GetOemDRO(818) 'Get the current settings
ZCurrent = GetOemDro(802)
Code "G4 P1" 'Pause 1 second to give time to position probe plate
Code "F100" 'slow feed rate to 100 MM/MIN
GageH = GetUserDRO(1152)
ZNew = ZCurrent + 30 'probe down 20 mm
Code "G31 Z" &ZNew
While IsMoving()
Wend
Call SetDro (2,GageH)
FinalMove = GageH * 1
Code "G0 Z" &FinalMove
Code "G0 Z" & -20
Code "F" &FeedCurrent 'restore starting feed rate
最后高度=对刀块高度+20mm ,但实际显示 20mm
请问如何修改显示: 最后高度=对刀块高度+20mm
|
|