Witam Proszę o pomoc w konfiguracji Mach-a
Wykonałem procedure zgodnie z tym opisem
jednak gdy wykonuję pomiar oś "Z" zgodnie z poleceniem zaczyna wykonywać pomiar, Jednak gdy narzędzie dojedzie do czujnika zatrzymuje się. i pozostaje w tej pozycji.
Przy starcie pomiaru oś "Z" sie zeruje a po dotknięciu sondy licznik osi "Z" pokazuje jaki dystans pokonało narzędzie od startu pomiaru do czujnika.
Moje pytanie czy ten config mogę jeszcze jakoś do konfigurować ?
obecna grubość czujnika to 1,5mm
Za wszelkie pomocne uwagi bardzo dziękuje.
'VB Code Start
'-------------------
CurrentFeed = GetOemDRO(818)
DoSpinStop()
ZMove = 20.00 'Total lenght of Probe to move before Stop or no Contact Made.
ZOffset = 1.60 ' Plate Hight
ZSal = ZOffset + 2.00 '+ Free Hight, Will possition the Proble 2 MM over the Material.
StopZmove = 0
If GetOemLed (825)=0 Then
DoOEMButton (1010)
Code "G4 P2.5"
Code "G31 Z-"& ZMove & "F25"
While IsMoving()
Sleep(200)
Wend
Probepos = GetVar(2002)
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
'-------------------
'VB Code Stop
MACH 3 konfiguracja pomiaru narzędzia
-
- Czytelnik forum poziom 3 (min. 30)
- Posty w temacie: 1
- Posty: 39
- Rejestracja: 30 wrz 2013, 23:04
- Lokalizacja: Polska Łomża
Re: MACH 3 konfiguracja pomiaru narzędzia
witam wysyłam swój listing pliku konfiguracyjnego może pomoże
CurrentFeed = GetOemDRO(818) 'Get the current feedrate to return to later
PlateThickness = 45.07 'Z-plate thickness DRO
If GetOemLed (825)=0 Then 'Check to see if the probe is already grounded or faulty
DoOEMButton (1010) 'zero the Z axis so the probe move will start from here
Code "G4 P0" ' this delay gives me time to get from computer to hold probe in place
Code "G31Z-10 F50" 'probing move, can set the feed rate here as well as how far to move
While IsMoving() 'wait while it happens
Wend
ZProbePos = GetVar(2002) 'get the axact point the probe was hit
Code "G0 Z" &ZProbePos 'go back to that point, always a very small amount of overrun
While IsMoving ()
Wend
Call SetDro (2, PlateThickness) 'set the Z axis DRO to whatever is set as plate thickness
Code "G4 P0.25" 'Pause for Dro to update.
Code "G0 Z51" 'put the Z retract height you want here {to może być to}
Code "(Z axis is now zeroed)" 'puts this message in the status bar
Code "F" &CurrentFeed 'Returns to prior feed rate
Else
Code "(Z-Plate is grounded!) " 'this goes in the status bar if aplicable
Exit Sub
End If
CurrentFeed = GetOemDRO(818) 'Get the current feedrate to return to later
PlateThickness = 45.07 'Z-plate thickness DRO
If GetOemLed (825)=0 Then 'Check to see if the probe is already grounded or faulty
DoOEMButton (1010) 'zero the Z axis so the probe move will start from here
Code "G4 P0" ' this delay gives me time to get from computer to hold probe in place
Code "G31Z-10 F50" 'probing move, can set the feed rate here as well as how far to move
While IsMoving() 'wait while it happens
Wend
ZProbePos = GetVar(2002) 'get the axact point the probe was hit
Code "G0 Z" &ZProbePos 'go back to that point, always a very small amount of overrun
While IsMoving ()
Wend
Call SetDro (2, PlateThickness) 'set the Z axis DRO to whatever is set as plate thickness
Code "G4 P0.25" 'Pause for Dro to update.
Code "G0 Z51" 'put the Z retract height you want here {to może być to}
Code "(Z axis is now zeroed)" 'puts this message in the status bar
Code "F" &CurrentFeed 'Returns to prior feed rate
Else
Code "(Z-Plate is grounded!) " 'this goes in the status bar if aplicable
Exit Sub
End If
audiomid
[email protected]
[email protected]