NVEM V2 Probing
-
- Newbie
- Messaggi: 8
- Iscritto il: domenica 13 ottobre 2019, 21:31
Re: NVEM V2 Probing
- smanetton
- Member
- Messaggi: 370
- Iscritto il: lunedì 10 dicembre 2007, 0:13
- Località: Trani (Bt)
Re: NVEM V2 Probing
ZOffset = 3.80
Questo è lo script modificato che uso io con NVUM
CurrentFeed = GetOemDRO(818)
DoSpinStop()
Code "G49"
ZMove = 30.0
ZOffset = 1.55
ZSal = ZOffset + 18.45
StopZmove = 0
If GetOemLed (825)=0 Then
DoOEMButton (1010)
Code "G4 P2.5"
Code "G31 Z-"& ZMove & "F25"
While IsMoving()
Sleep(200)
Wend
Probepos = GetOemDro(802)
If Probepos = - ZMove Then
responce = MsgBox ("**ERROR** " , 4 , "Probe **ERROR**" )
Code "G0 Z10"
StopZmove = 1
Code "F" &CurrentFeed
End If
If StopZmove = 0 Then
Code "G0 Z" & Probepos
While IsMoving ()
Sleep (200)
Wend
Call SetDro (2, ZOffset)
Code "G4 P1"
Code "G0 Z" & ZSal
Code "(Z zeroed)"
Code "F" &CurrentFeed
End If
Else
Code "(Check Ground Probe)"
End If
Exit Sub
Il mondo è un posto pericoloso, non a causa di quelli che compiono azioni malvagie ma per quelli che osservano senza fare nulla.
Albert Einstein
Albert Einstein