Hírek:

Fontos tudnivalók a migrációval kapcsolatban, Kérlek nézd meg a Régi fórumról új fórumra való költözés

Main Menu

Mach3 CNC

Indította gaben, 2024 április 09, 16:55

Előző téma - Következő téma

svejk

No igen de ha csak kiadom az M2001-et akkor hogy konfigurálom a bemérő helyét?
Értem én hogy a P változókkal, meg hogy "(Változók magyarázata a makróban)", de ugye most nálam nem nyílik meg a makro.

svejk

Közben most TotalCommanderrel F3-al belenézve az m1s fájlba megfejtem a működését.
 
Azt hittem ez az m1s valami bonyolultabb fájl rendszer. :)

Béni

Operator -> VB Script Editor
Megnyitod a makrót és már nincs is több kérdésed ...  :)
 
(Valami ilyesmi ...)
 
'Szerszámhossz bemérés kézi szerszámcseréhez, mm verzió (Robroy007)
'A bemért szerszám hossza T0 szerszám hosszához viszonyított
 
Sub Main  
 
Dim Xp As Double  'Mérési hely 'X' koordinátája (gépi koordináta-rendszerben!)
Dim Yp As Double  'Mérési hely 'Y' koordinátája (gépi koordináta-rendszerben!)
Dim Zs As Double  'Mérési hely megközelítés 'Z' bizt. magasság (gépi koordináta-rendszerben!)
Dim Zmin As Double 'Eddig menet le a beméréskor gépi koordináta-rendszerben!)
Dim Pp As Double  'Szerszám-hosszmérő kapcsolási pozíciója (gépi koordináta-rendszerben)
Dim ToGo As Double
 
Xp=13.5
Yp=-22.7
Zs=-5
Zmin=-110
 
Pp=-100  
 
 
If IsSuchSignal(22)=0 Then  'Probe bemenet engedélyezésének ellenőrzése
  Code "(Nincs Bemérő bemenet definiálva!)"
  Exit Sub
End If  
 
 
If GetOemLed (825)=0 Then 'Ha a tapintó még nem aktív
 
  SetScale(2,1) 'Z scale legyen 1
  Code "G90"
  Code "G0 G49 G53 Z" & Zs 'Biztonsági szintre áll
  Wait
  Code "G0 G53 X" & Xp & "Y" & Yp  'Mérés helyére áll
  Wait
   
  ToGo = GetOEMDRO(180)+Zmin-GetABSPosition(2)
   
  Code "G31 Z" & ToGo & "F400" 'Durva bemérés
 
    Wait
 
  Code "G91 G1 Z5 F800"  ' Tapintótól elemelés
  Wait
  Code "G90 G31 Z" & ToGo & "F25" 'Finom  bemérés
 
    Wait
 
  ZProbePos = GetVar(2002) 'Mért koordináta kiolvasása
  Code "G1 Z" & ZProbePos  'Vissza a mért pontra
   
    Wait
   
  Code "G0 G53 Z" & Zs 'Z biztonsági magasságba áll
 
   
  If ZProbePos <> ToGo Then
 
     SetToolParam(GetCurrentTool(),2,GetABSPosition(2)-Pp) 'Szerszámhossz beírása a szerszámtárba
     
     Code "(T" & GetOEMDRO(824) & " hossza bemérve!)"
  Else
     Code "( Szerszám nincs bemérve! )"
  End If
   
       
Else
  Code "(Bemérő már aktív! Ellenőrizd és próbáld újra!)"
  Exit Sub
   
End If
 
End Sub
 
Sub Wait
 
  While IsMoving ()
    Sleep(100)
  Wend
 
End Sub

 

svejk

Megelőztelek a TC-vel :)

VViktor

Szia.Érdekes és igazad van.Valóban nem megy így vissza fele.
De amit írtam én cnc lángvágónál használtam,és ott ugye nincs szerszám behívás.

krnj79r9n

Szia svejk,
 
Raktam fel képeket az elektronika topikba, az átépítésről. Még is inkább oda tartozik.
 
Bár a képeket elb*tam. Véletlenül nem a kisméretű BB linkeket tettem be. :-)

5bzs27u7

Valaki tudna segíteni hogyan kell a mach3-at beállítani lézerhez?
 
Előre is köszönet.

000000000

Ha esetleg,te segítessz lézert beszerezni.

5bzs27u7

Én az ebay-en vettem.

xfg6v697j

Nhem igazán van mit beálítani,csak be/ki kel kapcsolatni.
Gondolom lézerdióda.http://hobbycncart.com/publ/cikkek/mach3_temaju_cikkek/switching_a_laser_under_mach_control/8-1-0-29" TARGET=_fnew>Tweakie írt egy jó kis cikkek erről a kéken.

PSoft

 
Tweakie honlapja...
 http://www.cooperman.talktalk.net/files/27.htm" TARGET=_fnew>ITT az eredeti leírás,az oldaláról.
A  
http://www.cooperman.talktalk.net/files/27_files/Page652.htm" TARGET=_fnew>harmadik lapon a MACH-lézer kapcsolatról ír,a http://www.cooperman.talktalk.net/files/27_files/Page867.htm" TARGET=_fnew>negyedik lapon a plugin leírása http://www.cooperman.talktalk.net/Engraving.pdf" TARGET=_fnew>.pdf
 
A plugint http://www.machsupport.com/software/plugins/" TARGET=_fnew>ITT találod.
 

5bzs27u7

Köszöntem!
Átnézem, és kipróbálom.

000000000

Sziasztok!
Mi lehet az oka annak, hogy ugyanaz a marógép az egyik PC-n hibátlanul működik, szépen simán fut, a másikon meg épp csak megindul a stepper, és rögtön letilt a vezérlő? Ha egész lecsökkentem a motor sebességét, akkor megy, de nem egyenletesen, ronda hurutos a hangja, mintha csupa rozsda lenne.
A két gép biosában az LPT-k beállítása megegyezik.  
A Driver Test nem mutat semmi különöset. Mindkét gépben 3GHz-es körüli CPU-van. A csúnya hangúba beraktam egy új HDD-t, arra egy vacsi új XP-t, se vírusvédő, se semmi, rá a weboldalról a legfrissebb MACH3 demót, port config, motor tuning, ezek után ugyanolyan rosszul működik.  
Mindkét gépben ASUS alaplap (nem egyformák), és alaplapi LPT port. A vezérlő 'gyári' Klavio, lépésvesztés érzékelős. A vezérlő vonalakon kb. ugyanaz a fesz. mérhető alaphelyzetben, olyan 5V/1,6V szintekkel.
A bekötés pozitív logikás.

Miki2

Próbáld ki egy másik LPT kártyával.
Szerintem az alaplapi LPT lesz a bűnös.
 

hostya

Csak egy tipp...
 
Ellenőrizd le hogy a két szgépen hogy van beállítva az LPT "üzemmódja" a setupban. (SPP, EPP, ECP)
Az, hogy ugyanazon a címen van (0x378) nem elég...