584.857 aktive Mitglieder*
4.133 Besucher online*
Kostenfrei registrieren
Einloggen Registrieren

Brother TC 211 mit Mach3

Beitrag 01.05.2015, 16:01 Uhr
chaesfuess
chaesfuess
Level 1 = Community-Lehrling
*
Gruppe: Mitglied
Mitglied seit: 17.01.2013
Beiträge: 6

Ich möchte eine Brother TC211 auf Mach 3 Umbauen. (Dies ist nicht mein erster Umbau auf Mach3 Ich habe schon eine Lenz Portalfräse umgebaut, allerdings ohne Wechsler.)

Ich möchte diese Maschine weiterhin mit Wechsler betreiben.
Ist in Mach3 schon ein Makro für diesen Wechslertyp vorhanden oder muss dies selbst gemacht werden?

Theoretisch ist der Wechselprozess dieser Maschine ja einfach.
Z- Achse hoch bis der Schalter ein Signal gibt.
Wechsler dreht sich bis zum richtig Werkzeugplatz.
Die Z-Achse fährt runter.
Aber ich bin mir nicht sicher ob ich selbst so ein Makro machen kann...

Gruss Christian
TOP    
Beitrag 15.05.2015, 08:10 Uhr
cncsteuerung
cncsteuerung
Level 1 = Community-Lehrling
*
Gruppe: Mitglied
Mitglied seit: 15.05.2015
Beiträge: 7

Guten morgen Christian,

in der Mach3 gibt es keinen Werkzeugwechsler den man eben so aktivieren kann. Dazu ist ein in VB geschriebenes M6 Makro notwendig.
Dieses Makro muss dann noch auf die Hardware zugeschnitten sein.
So wie Du den Wechsel beschreibst hört es sich ja erst einmal einfach an, aber im Detail sieht es dann schon komplexer aus.
Wird der Wechsler durch einen Schrittmotor oder Servo gedreht oder über einen Stößel getaktet ?
Welche Hardware verwendest Du ?
Hier mal ein Auszug für ein Wechsler mit unserer IP-Steuerung:

' Digital outputs CONFIG
'------------------------------------------------------------------------------
Const OUT_OPENCOLLET = 4 ' Ausgang der Spindelklemmung
Const OUT_CLEANCONE = 16 ' Ausgang für Konusreinigung
Const OUT_CURTAIN = 15 ' Ausgang für Abzugshaube

'------------------------------------------------------------------------------
' Digital inputs CONFIG
'------------------------------------------------------------------------------
Const IN_COLLETCLOSED = 14 ' Eingang für Spannzange geschlossen
Const IN_COLLETOPENED = 7 ' Eingang für Spannzange geöffnet
Const IN_TOOLINSIDE = 5 ' Eingang für Werkzeug in der Spindel

'------------------------------------------------------------------------------
' variables declaration - don't modify
'------------------------------------------------------------------------------
Dim Z_TOOLGET, Z_LIFT, Z_SAFE, X_FORSLIDE, X_LOCK, Y_BASE, Y_TOOLOFFSET, TOOLCOUNT
Dim ToolNew, ToolOld
Dim SoftLimitsState As Boolean

'------------------------------------------------------------------------------
' CONFIG data
'------------------------------------------------------------------------------
Y_TOOLOFFSET = 90 ' Distanz zwischen den Werkzeugen
Y_BASE = 3.35 ' Position Werkzeug 1 auf Y
Z_TOOLGET = -360.45 ' Z Position Werkzeugaufnahme
Z_SAFE = -100 ' Sicherheitshöhe auf Z
Z_LIFT = 30 ' Rückzugsebene zum Reinigen
X_FORSLIDE = 2462.42 ' X Position für Einschub in Klammer
X_LOCK = 2662.42 ' X Position für Werkzeugablage
TOOLCOUNT = 10 ' Maximale Werkzeugnummer
'------------------------------------------------------------------------------
'------------------------------------------------------------------------------
If GetOEMLed(11) Then
SetCurrentTool( ToolOld )
SetUserLED(1001, 0)
DoOEMButton(1003)
DoOEMButton(1002)
Sleep(150)
Message( "Spindel läuft ! Abbruch" )
Sleep(150)
' restore softlimit
SetSoftLimits(SoftLimitsState)
' curtain down
Call SetCsmioOut (OUT_CURTAIN, false)
End
End If

' Spindle must be turned off for toolchange
If (ToolNew = ToolOld) Then
If (IsToolInside()) Then
SetCurrentTool( ToolOld )
SetUserLED(1001, 0)
Sleep(150)
Message("Werkzeug bereits eingewechselt ")
Sleep(150)
' restore softlimit
SetSoftLimits(SoftLimitsState)
' curtain down
Call SetCsmioOut (OUT_CURTAIN, false)
End
End If
End If

' New tool # must be <= TOOLCOUNT
If (ToolNew > TOOLCOUNT) Then
SetCurrentTool( ToolOld )
SetUserLED(1001, 0)
DoOEMButton(1003)
DoOEMButton(1002)
Sleep(150)
Message("Werkzeugnummer unbekannt ! ")
Sleep(150)
' restore softlimit
SetSoftLimits(SoftLimitsState)
' curtain down
Call SetCsmioOut (OUT_CURTAIN, false)
End
End If

Code("G0G53 Z0") ' Z up to machine '0'
WaitForMove

' if current tool > 0 put it first into the holder
If (ToolOld > 0) Then
' if there is no tool in spindle, skip this part
If (IsToolInside()) Then
' move to the toolholder
Code("G0G53 X"& X_FORSLIDE &" Y" & (Y_BASE + (Y_TOOLOFFSET * (ToolOld-1))))
WaitForMove
Code("G0G53 Z" & Z_TOOLGET)
WaitForMove
Code("G0G53 X" & X_LOCK)
WaitForMove
ColletOpen
CleanConeOn
Sleep(1000)
' is collet opened?
If (Not IsColletOpened()) Then
ColletClose
CleanConeOff
Sleep(1000)
Code("G0G53 X"& X_FORSLIDE)
WaitForMove
Code("G0G53 Z0")
Code("G0G53 X500Y0")
WaitForMove
SetCurrentTool( ToolOld )
SetUserLED(1001, 0)
DoOEMButton(1021)
DoOEMButton(1002)
Sleep(150)
Message("Klemmung öffnet nicht ! Abbruch ")
Sleep(150)
' restore softlimit
SetSoftLimits(SoftLimitsState)
' curtain down
Call SetCsmioOut (OUT_CURTAIN, false)
End
End If
Code("G0G53 Z" & Z_SAFE)
WaitForMove
CleanConeOff
ColletClose
End If
End If

' If newtool = 0, there is no need to get new tool
If (ToolNew = 0) Then
Code("G0G53 Z-5")
WaitForMove
Code("G0G53 X500Y0")
WaitForMove
SetCurrentTool( ToolNew )
Message("Tool loaded : " & ToolNew)
Code("G43T" & ToolNew) ' G43 to sync tool length in system
Code("G43H" & ToolNew) ' G43 to sync tool length in system
WaitForMove
SetUserLED(1001, 0)
' restore softlimits
SetSoftLimits(SoftLimitsState)
' curtain down
Call SetCsmioOut (OUT_CURTAIN, false)
End
End If

' Is there no tool in the spindle?
If (IsToolInside()) Then
Code("G0G53 Z0")
Code("G0G53 X500Y0")
WaitForMove
SetCurrentTool( ToolOld )
SetUserLED(1001, 0)
WaitForMove
DoOEMButton(1021)
DoOEMButton(1002)
Sleep(150)
Message("Achtung in der Spindel befindet sich ein Werkzeug? Überprüfen Sie die Eingabe!")
Sleep(150)
' restore softlimits
SetSoftLimits(SoftLimitsState)
' curtain down
Call SetCsmioOut (OUT_CURTAIN, false)
End
End If


Ich hoffe das gibt Dir einen Überblick

Mit freundlichen Grüssen
Stefan Büdding
TOP    
Beitrag 15.05.2015, 13:20 Uhr
MikeE25
MikeE25
Level 7 = Community-Professor
*******
Gruppe: Mitglied
Mitglied seit: 14.01.2011
Beiträge: 1.708

QUOTE (chaesfuess @ 01.05.2015, 17:01 Uhr) *
Ich möchte eine Brother TC211 auf Mach 3 Umbauen. (Dies ist nicht mein erster Umbau auf Mach3 Ich habe schon eine Lenz Portalfräse umgebaut, allerdings ohne Wechsler.)

Ich möchte diese Maschine weiterhin mit Wechsler betreiben.
Ist in Mach3 schon ein Makro für diesen Wechslertyp vorhanden oder muss dies selbst gemacht werden?

Theoretisch ist der Wechselprozess dieser Maschine ja einfach.
Z- Achse hoch bis der Schalter ein Signal gibt.
Wechsler dreht sich bis zum richtig Werkzeugplatz.
Die Z-Achse fährt runter.
Aber ich bin mir nicht sicher ob ich selbst so ein Makro machen kann...

Gruss Christian


Schau dir mal das neue Mach4 an. Das soll deutlich umfangreicher sein und auch einfacher mit Wechslern zurechtkommen.
Ich habe im Netz aber auch schon Mach3 Versionen mit Wechseler gesehen. Muss also auch irgendwie gehen.
TOP    
Beitrag 17.05.2015, 09:57 Uhr
cncsteuerung
cncsteuerung
Level 1 = Community-Lehrling
*
Gruppe: Mitglied
Mitglied seit: 15.05.2015
Beiträge: 7

Guten morgen,

ja die Mach 4 wird schneller besser und umfangreicher werden als die Mach 3 je war.
Das was man sieht ist aus unserer Sicht um Längen besser, ich rate zumindest bis Ende des Jahres zu warten.
Aber auch in der Mach4 ein Script benötigt der Programmiert werden muss. Allerdings würde ich sagen das die Mach 3 zum derzeitigen Stand "noch" das bessere
System ist. Es sei denn man möchte Experimentieren und ständig Updates fahren. Darum heißt Sie ja auch noch Hobby ;-)

Mit freundlichen Grüssen
Stefan Büdding
TOP    
Beitrag 28.05.2015, 21:29 Uhr
Guest_guest_*
Themenstarter

Gast



QUOTE
Darum heißt Sie ja auch noch Hobby ;-)


... oder "Bananaware" (reift beim Kunden) wink.gif
TOP    



1 Besucher lesen dieses Thema (Gäste: 1)
0 Mitglieder: