Lineer Kızak ve Vidalı Mil Gurubu
Planet Redüktörler, Kremayerleri, Döküm Yataklar ve Lineer Rulmanlar
Otomatik Takım Değiştirici (ATC), CNC makinelerinin üretim süreçlerinde verimliliği ve esnekliği artırmak için kullanılan bir sistemdir. ATC, farklı takımları otomatik olarak değiştirerek manuel müdahaleyi azaltır ve üretim sürelerini kısaltır. Bu makalede, Mach3 yazılımı ile ATC sisteminin nasıl entegre edileceğini ve yapılandırılacağını adım adım inceleyeceğiz.
ATC Mekanizmasının Montajı:
Sensörlerin Bağlantıları:
Motor Sürücülerin Bağlantıları:
Ports & Pins Ayarları:
Motor Ayarları:
Makro Kodları:
Örnek bir makro kod:VBScriptSub Main() 'Takım değişim işlemini başlat Call StartToolChange() 'Mevcut takımı magazinine geri yerleştir Call ReturnCurrentToolToMagazine() 'Yeni takımı seç ve al Call SelectNewTool() 'Yeni takımı iğneye yerleştir Call PlaceNewToolInSpindle() 'Takım değişim işlemini sonlandır Call EndToolChange() End Sub Sub StartToolChange() 'Başlatma kodları buraya End Sub Sub ReturnCurrentToolToMagazine() 'Mevcut takımı magazinine yerleştirme kodları buraya End Sub Sub SelectNewTool() 'Yeni takımı seçme ve alma kodları buraya End Sub Sub PlaceNewToolInSpindle() 'Yeni takımı iğneye yerleştirme kodları buraya End Sub Sub EndToolChange() 'Sonlandırma kodları buraya End Sub
Takım Değişim Konfigürasyonu:
Manuel Test:
Makro Testi:
Kalibrasyon:
Mach3 yazılımı ile ATC (Otomatik Takım Değiştirici) sistemi entegrasyonu, CNC makinelerinin verimliliğini ve esnekliğini önemli ölçüde artırır. Doğru donanım bağlantıları ve yazılım yapılandırması ile bu entegrasyonu başarıyla gerçekleştirebilirsiniz. Mermak CNC olarak, en güncel CNC teknolojileri ve çözümleri hakkında daha fazla bilgi ve teknik destek için her zaman yanınızdayız. Daha fazla bilgi için web sitemizi ziyaret edebilir veya bizimle iletişime geçebilirsiniz.
VBScriptSub Main() ' Takım değişim işlemini başlat StartToolChange() ' Mevcut takımı magazinine geri yerleştir ReturnCurrentToolToMagazine() ' Yeni takımı seç ve al SelectNewTool() ' Yeni takımı iğneye yerleştir PlaceNewToolInSpindle() ' Takım değişim işlemini sonlandır EndToolChange() End Sub Sub StartToolChange() ' ATC sistemi için gerekli başlangıç ayarları Message 'Takım değişimi başlatılıyor...' ' Eksenleri durdur DoOEMButton(1003) ' Stop ' Diğer başlangıç kontrolleri ' Güvenlik kontrolleri ve başlangıç pozisyonları End Sub Sub ReturnCurrentToolToMagazine() ' Mevcut takımın magazinine geri yerleştirilmesi Message 'Mevcut takım magazinine geri yerleştiriliyor...' ' Takım çıkartma işlemi ActivateSignal(Output1) ' Takım tutucu aç Sleep(1000) ' 1 saniye bekle DeactivateSignal(Output1) ' Takım tutucu kapat ' Magazin pozisyonuna dön Code 'G53 G0 Z0' ' İğne yukarı hareket Sleep(1000) Code 'G53 G0 X100 Y100' ' Magazin pozisyonuna git Sleep(1000) End Sub Sub SelectNewTool() ' Yeni takımın seçilmesi ve alınması Dim newTool As Integer newTool = GetSelectedTool() ' Yeni takım numarasını al Message 'Yeni takım alınıyor: ' & newTool ' Magazin pozisyonuna git Code 'G53 G0 X' & (newTool * 50) & ' Y100' ' Yeni takım pozisyonuna git Sleep(1000) ' Takım alma işlemi ActivateSignal(Output1) ' Takım tutucu aç Sleep(1000) DeactivateSignal(Output1) ' Takım tutucu kapat End Sub Sub PlaceNewToolInSpindle() ' Yeni takımın iğneye yerleştirilmesi Message 'Yeni takım iğneye yerleştiriliyor...' ' İğne pozisyonuna dön Code 'G53 G0 X0 Y0' ' İğne pozisyonuna git Sleep(1000) ' Takım yerleştirme işlemi ActivateSignal(Output1) ' Takım tutucu aç Sleep(1000) DeactivateSignal(Output1) ' Takım tutucu kapat End Sub Sub EndToolChange() ' Takım değişim işlemini sonlandırma Message 'Takım değişimi tamamlandı.' ' İğneye geri dön Code 'G53 G0 Z0' ' İğne aşağı hareket Sleep(1000) ' Eksenleri tekrar başlat DoOEMButton(1004) ' Start End Sub Function GetSelectedTool() As Integer ' Seçilen takım numarasını döndüren fonksiyon Dim toolNumber As Integer toolNumber = GetOEMDRO(1004) ' Mevcut takım numarasını al GetSelectedTool = toolNumber End Function