Grazie
Z Probe Script
-
- Member
- Messaggi: 316
- Iscritto il: lunedì 20 febbraio 2017, 21:51
- Località: Roma-Milano
Z Probe Script
Grazie
Non hai i permessi necessari per visualizzare i file e le foto allegati in questo messaggio. Per visualizzare tali file devi registrarti ed effettuare il Login
-
- Newbie
- Messaggi: 13
- Iscritto il: domenica 9 luglio 2017, 11:50
- Località: Napoli
- Contatta:
Re: Z Probe Script
'Rem Probe Down by PEU (Based on Erniebro Work)
FeedCurrent = GetOemDRO(818) 'Get the current settings
ZCurrent = GetDro(2)
Code "G4 P1" 'Pause 1 second to give time to position probe plate
Code "F1" 'slow feed rate to 10 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 "F1" 'slow feed rate to 10 MM/MIN
GageH = GetUserDRO(1152)
ZNew = ZCurrent - 30 'probe down 30mm
Code "G31 Z" &ZNew
While IsMoving()
Wend
Call SetDro (2,GageH)
FinalMove = GageH * 1
Code "G0 Z" &FinalMove
Code "G0 Z" &30
Code "F" &FeedCurrent 'restore starting
Vivi e lascia vivere!!!