Z sıfırlama prob ve mach3 kart sorunu

[hamsikoli]

Merhaba arkadaşlar
cncrouter mc-14 paralelport mach3 kartım var (en altta resimdeki)

kuontrol eden bilgisayar win xp var ve üzerindeki Mach3 yazılımı R2.63 versiyonu.
şimdi ben bu kartın 13 nolu boştaki input pine ve 12 volt girişinin - ayağına kendi yaptığım prob ayaklarını baglıyorum.
pin ayarlarında auto da goruyor buraya kadar sıkıntı yok.
fakat bu forumdan ve başka yerlerden aldığım porb sıfıtlama scriptlerinin hangisini denersem deniyim
auto tool zero ya bastığım anda z ekseni belirttiğim değer kadar yukarı çıkıyo. yani proba inmiyor direk yukarı çıkıyor.

Az çok araştırmalarımda bunun mach3 versiyonuyla alakalı olabileceğini düşünüyorum.

şimdi aklıma takılan iki sorudan birincisi pc de eski olduğu için
ayrı bir klasore yeni versiyon bir mach3 programı daha kursam eski programla ilgili sıkıntı olurmu. yani son kurduğum mach3 programı kaldırsam eskisiyle devam edebilirmiyim.

ikincisi bu kart çok eski arkadaş yeni bi kart al limit swichleri olsun mach3 programınıda yenile daha rahat edersin. ama mach 3 ayarlarının hepesini yeniden yapmam lazım mı desem.

şimdiden teşekkürler

 

[Yusuf SEYLAN]

1) z ekseni yukarı çıktığında artılı değer mi alıyor yoksa eksili değer mi?
eksili değer alıyorsa home&limit ayarlarına girin z eksenin satırında reverse yi aktif edin sorunuz düzelir.
2) kullandığınız macroyu paylaşırsanız eksiklik var mı yok mu görürüz.

 

[hamsikoli]

kullandığım script aşağıda
auto tool zero ya bastığımda z önce kendini 0 yapıyo sonra 12 ye çıkıyor direk
G31 cod satırını direk çalıştırdım fakat anladımki G31Z-100 F50 çalışmıyor
Port&pind inputta probe emulated tiki aktif edince G31 çalışıyor ama bu seferde prob da durmuyor

son olarak probu bagladığım pin 13 auto da da 13 pinini buluyor burada 5 v. var
bunu deactife edince G31 çalışıyor.


'''**************
PlateThickness = GetUserDRO(1151)
If GetOemLed (825)=0 Then
DoOEMButton (1010)
Code "G4 P1" 'P1 değeriyle oynayabilirsiniz. Amacı auto tool zero tuşuna bastığınızda harekete geçmek için ne kadar süre beklemesi gerektiğidir. Mesela acelem var derseniz 0.25 yapabilirsiniz Yalnız nokta ile virgül değil
Code "G31Z-100 F50" '-142.5 değeri Z eksenininsıfırlama yapmak için en fazla ne kadar ineceğinin sınırıdır. Mesela Auto tool zero dedeniz ve Z inmeye başladı. -40 birimde probu göremezse işlem iptal F500 ise bildiginiz gibi iniş hızınız. Düşürmekte fayda var.
While IsMoving()
Wend
ZProbePos = GetVar(2002)
Code "G0 Z" &ZProbePos
While IsMoving ()
Wend
Call SetDro (2, 70.6) 'Buraya virgülden sonra boşluk bırakarak probunuzun kalınlığını giriniz. Mesela 10.5 gibi. Onluk ayıracının Nokta olmasına dikkat)
Code "G4 P0.25" 'Buradaki P değeri sıfırlama işlemi bittikten sonra Z ekseninin alt satıra yazacağımız değere kalkarak ne kadar süreyle beklemede kalacağıdır.
Code "G53 Z20" '20 değeri Z nin probu gördükten sonra ne kadar yükseğe kalkması gerektiğidir
Code "(Z ekseni sıfırlandı...)" 'Buraya sıfırmala işlemi sonrasında Mach3 Statüs barında yazmasını istediğiniz mesajı yazacaksınız.
Else
Code "(Z Eksen Sıfırlama Hatası... Bağlantıları kontrol ederek tekrar deneyiniz...)" 'Anlaşılacağı üzere hata durumunda mesajınız
Exit Sub
End If

''''''***********'''''''''

 

[Yusuf SEYLAN]

1 numaralı soruma cevap vermemişsiniz yukarıya çıkarken + değer mi - değer mi alıyor?

 

[hamsikoli]

1 numaralı soruma cevap vermemişsiniz yukarıya çıkarken + değer mi - değer mi alıyor?

yukarı çıkarken + değer alıyor.

 

[yusufkaynar]

13 nolu pinde sürekli sinyal girişi var gibi. Scriptin probe değdikten sonraki kısmı çalışıyor. Bağlantılarını kontrol et

 

[Yusuf SEYLAN]

kullandığım script aşağıda
auto tool zero ya bastığımda z önce kendini 0 yapıyo sonra 12 ye çıkıyor direk
G31 cod satırını direk çalıştırdım fakat anladımki G31Z-100 F50 çalışmıyor
Port&pind inputta probe emulated tiki aktif edince G31 çalışıyor ama bu seferde prob da durmuyor

son olarak probu bagladığım pin 13 auto da da 13 pinini buluyor burada 5 v. var
bunu deactife edince G31 çalışıyor.


'''**************
PlateThickness = GetUserDRO(1151)
If GetOemLed (825)=0 Then
DoOEMButton (1010)
Code "G4 P1" 'P1 değeriyle oynayabilirsiniz. Amacı auto tool zero tuşuna bastığınızda harekete geçmek için ne kadar süre beklemesi gerektiğidir. Mesela acelem var derseniz 0.25 yapabilirsiniz Yalnız nokta ile virgül değil
Code "G31Z-100 F50" '-142.5 değeri Z eksenininsıfırlama yapmak için en fazla ne kadar ineceğinin sınırıdır. Mesela Auto tool zero dedeniz ve Z inmeye başladı. -40 birimde probu göremezse işlem iptal F500 ise bildiginiz gibi iniş hızınız. Düşürmekte fayda var.
While IsMoving()
Wend
ZProbePos = GetVar(2002)
Code "G0 Z" &ZProbePos
While IsMoving ()
Wend
Call SetDro (2, 70.6) 'Buraya virgülden sonra boşluk bırakarak probunuzun kalınlığını giriniz. Mesela 10.5 gibi. Onluk ayıracının Nokta olmasına dikkat)
Code "G4 P0.25" 'Buradaki P değeri sıfırlama işlemi bittikten sonra Z ekseninin alt satıra yazacağımız değere kalkarak ne kadar süreyle beklemede kalacağıdır.
Code "G53 Z20" '20 değeri Z nin probu gördükten sonra ne kadar yükseğe kalkması gerektiğidir
Code "(Z ekseni sıfırlandı...)" 'Buraya sıfırmala işlemi sonrasında Mach3 Statüs barında yazmasını istediğiniz mesajı yazacaksınız.
Else
Code "(Z Eksen Sıfırlama Hatası... Bağlantıları kontrol ederek tekrar deneyiniz...)" 'Anlaşılacağı üzere hata durumunda mesajınız
Exit Sub
End If

''''''***********'''''''''

Bu macroyu deneyin

ProbeMaxDown = -120.00
Retract = 3.00
FirstProbeFeed = 300
SecondProbeFeed = 50
PlateOffset = 5

If GetOemLED(825) <> 0 Then

    MachMsgTypeOk = 0
    MachMsgReturnOk = 1
    DoButton(21)
    Ret = MachMsg("Probe Connection Error!!!","WARNING!!!",MachMsgTypeOk)
    If Ret = MachMsgReturnOK Then
    End If
    Exit Sub

Else

'---1. Fix Probe Run---

    Code "F" & FirstProbeFeed
    Code "G31 Z" & ZFixTCZS

        While IsMoving
        Sleep(100)
        Wend

    ProbeDist = GetVar(2002)
    Code "G01 Z" & ProbeDist + Retract

        While IsMoving
        Sleep(100)
        Wend
    
End If
        
If GetOemLED(825)<>0 Then

    MachMsgTypeOk = 0
    MachMsgReturnOk = 1
    DoButton(21)
    Ret = MachMsg("Probe Connection Error!!!","WARNING!!!",MachMsgTypeOk)
    If Ret = MachMsgReturnOK Then
    End If
    Exit Sub

Else
    

'---2. Fix Probe Run---

    Code "F" & SecondProbeFeed
    ProbeMaxDown2 = GetDRO(2) - 4
    Code "G31 Z" & ProbeMaxDown2

        While IsMoving
        Sleep(100)
        Wend

    Call SetDRO(2, PlateOffset)
    Code "G4 P0.25"
        
End If

End Sub