Mach3 CNC

[wvs6cpz09]

Béni dolgai

[uph5fcryd]

Nagyon köszönöm a gyors segélyt...

[gp24ssft3]

Stiasztok. Újra telepítettem a Mach3 at a gépemen, mivel folyamatos lépésvesztés volt az egyik tengelyen. Sajnos régen használtam, valamit lehet hogy rosszul állítottam be, a gép most nem mozdul. Előre is köszönöm, ha valaki tud segíteni.

        

[gp24ssft3]

Úgy emlékszem ez volt az:
CurrentFeed = GetOemDRO(818) 'Get the current feedrate to return to later
CurrentAbsInc = GetOemLED(48) 'Get the current G90/G91 state
CurrentGmode = GetOemDRO(819) 'Get the current G0/G1 state

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 P3" ' this delay gives me time to get from computer to hold probe in place
Code "G90 G31Z-4. F4" '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 exact 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, 19.9) ' change .060 to your plate thickness and then adjust for final accuracy
Sleep 200 'Pause for Dro to update.
Code "G1 Z21 F50" 'put the Z retract height you want here, must be greater than the touch plate thickness
While IsMoving ()
Wend
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, check connection and try again)" 'this goes in the status bar if applicable
End If
If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
Code "G91"
End If
If CurrentGMode = 0 Then 'if G0 was in effect before then return to it
Code "G0"
End If

[4a8dg8sxf]

Üdv mindenki!
Segítséget szeretnék kérni a következő megoldására:
A program idításánál a "X" DRO-t szeretném nullára állítani, és a programot így folytatni.
Próbáltam egy makrót írni, de nem működik.
Köszönöm a segítséget.

[3ztiz2p39]

Én ugyan nem tudok segíteni, de ha bemásolod ide a makród tartalmát hamarabb meglátja valaki benne a hibát.

[4a8dg8sxf]

Ebben teljesen igazad van, köszönöm.
A makró, amit próbáltam m33.m1s:

SetOEMDRO(Zaxis - 800, 0)  
GetOEMDRO()

[gsz03b27r]

Elsőnek ellenőrizd a számítógép LPT port beállítás helyes-e
0x378 van beállítva a Win-ben is mint a Mach3-ban?

[7snm9r7t]

Szia Miki!
Az x dro melletti zero gomb nem segít? program indítás előtt?
Valamit trükközöl ...[#eljen]

[4a8dg8sxf]

Szervusz!
Erre nem gondoltam.
A benti gépemen próbáltam, ezen nincs paralel port.
Köszönöm a válaszod, megnézem a kinti működő gépek valamelyikén.

[4a8dg8sxf]

Ez egy olyan megoldás lenne, ahol a program futását mindíg az "X" nulláról kellene kezdeni.

[gp24ssft3]

A Win7 ben is ez a port van. Lehet hogy újra kell telepítenem.

[gp24ssft3]

A Win7 ben is ez a port van. Lehet hogy újra kell telepítenem.

[gfvbk036]

Ennyi elég a makróba, ha más feladata nincs.

SetOEMDRO(800,0)

[4a8dg8sxf]

Köszönöm, így már tökéletesen működik.