Výměník nástrojů pro Mach3

[armagedon2]

Nazdar borci. chci se zeptat jestli někdo nemáte zkušenosti s výměníkem nástrojů pro frézu fungujícím na machu
Technicky si dokážu představit jak by to asi mělo vypadat krokáč který bude otáčet deštníkem nástrojů a pneumatický přísun deštníku pod vřeteno.
takže ohledně elektroniky to máme motor+driver a píst s tlumiči nárazu pár kontrolních čidel, lineární vedení, pneumaticky upínač ve vřeteni s kontrolním čidlem a zbytek je železo s čímž nemám problém. otázka zní jak to propojit s machem pomocí jaké desky aby měla dostatek vstupů a výstupů. jestli to brát úplně sólo a výměník řídit pomocí nějakého PLC kde bude postprocesor který bude reagovat jen na příkazy T1 až T12 M6 z machu (ale zase jak ho spojit s machem) nebo zvládl by tohle řídit i sám mach? pokud budu mít 4 osy na krokáčích tak na LPT mě moc volných pinu na výměník a jeho řízení nezůstane. tohle je část kde si osobně nevím rady.
další věc která mě zajímá je referování os na krokových motorech (fréza 4osy). jak je to s přesností referování prostě osa jede nějakou rychlostí a směrem až sepne koncové čidlo a tím se zreferuje? jak je to přesné? nebo referujete osy vůbec? nebo je provozujete bez referování
(znám klasicky z Průmyslových cnc postup kdy osa jede směrem na koncák. když se sepne koncák tak osa jede pomale zpátky dokud nenarazí na referenční pulz Z na encoderu) ale jak se toto řeší na hoby strojích netuším
děkuji za rady:-)

[testone]

RaS to má vyřešený s Linuxem a Mesa kartami

[armagedon2]

Nikdo další neporadíte?

[robokop]

vyres to linuxem a mesou
je to fakt jedna z nejlepsich cest

[sechtech]

Moc jsem to nestudoval, ale někde jsem viděl inspiraci: Na kraji stolu držáky na nástroje asi pneumaticky jištěné, upnutí do vřetene zdá se na kužel. Vřeteno najede nad nástroj, sjede Z-kem dolů a připojí si nástroj, vzduch pustí nástroj vřeteno přejede na probe sondu, zreferuje Z a pak už frézuje.
S Machem nevím jak by to šlo, aby to spolupracovalo, ale je dost "programovatelnej", třeba existuje plugin.
Jinak výstupy lze rozšířit dalším LPT portem, to je to nejmenší a reference se nemusí dělat na koncáky, ale můžou se osadit home snímače a nebo společně na probe.

[Pepa Žhář]

Ahoj řeší se to většinou makrem, toto je třeba pro 8 nástrojů 4x2řady ,ale lze to jako-li upravit
vřeteno najede do místa kde by měl být aktuální nástroj co je upnut, sjede dolu uvolní nástroj, vyjede do bezpečné výšky aby se mohl přesouvat na nový nástroj sjede na něj zaklapne vyjede opět do výšky rychloposuvu a najede na souřadnice odkud byla volána výměna nástroje.
ještě lze doplnit že najede na dotykovou plošku a vynuluje se
Otevři toto makro v jakémkoli textovém editoru
je to bez nulování to když tak dohledám
Je to makro od Briana z Machu
M6Start.m1s
A vše co je níže tam překopíruj a co jsou přiložené popisky tak si tam můžeš měnit hodnoty které jsou pro tebe aktuální a nebo ti je upravím

Sub Main()
OldTool = GetOEMDRO (1200) 'Tool In spindle DRO You must add this to your settings screen
x = GetToolChangeStart( 0 )
y = GetToolChangeStart( 1 )
z = GetToolChangeStart( 2 )
a = GetToolChangeStart( 3 )
b = GetToolChangeStart( 4 )
c = GetToolChangeStart( 5 )
tool = GetSelectedTool()
NewTool = tool
'Makro pro výměnu nástroje
MaxToolNum = 8 'Počet nástrojů
ToolDown = -30 'Z hloubka sjetí na výměnu nástroje
ToolUp = 0.0 'Z výška rychloposuvu
If NewTool = OldTool Then
Exit Sub
End If
While NewTool > MaxToolNum
NewTool = Question ("Enter New Tool Number up to " & MaxToolNum)
Wend
Code "G00 G53 Z" & ToolUp
While IsMoving()
Wend
Call MovePos(OldTool)
While IsMoving()
Wend
Code "G53 Z" & ToolDown
Code "G4 P.75"
While IsMoving()
Wend
ActivateSignal(Output1) 'Zapnout táhlo, aby se uvolnil nástroj
Code "G4 P1.0" 'Čekat než se uvolní nástroj
'SystemWaitFor (7) '
Code "G53 Z-2.5" & ToolUp
Call MovePos(NewTool)
While IsMoving()
Wend
Code "G53 Z" & ToolDown
Code "G4 P.75"
While IsMoving()
Wend
DeActivateSignal(Output1) 'Vypnout táhlo, nástroj se upne
Code "G4 P1.0" 'Čekat na než se upne nástroj
While IsMoving()
Wend
Code "G53 Z" & ToolUp
Call SetUserDRO (1200,NewTool)
SetCurrentTool( NewTool )
Code "G00 X" & x & " Y" & y 'Přesun se na místo, kde byla hlášena výměna nástroje
End Sub

Sub MovePos(ByVal ToolNumber As Integer)

Select Case ToolNumber 'Zde zadat přesné pozice nástrojú
Case Is = 1
Xpos = 120.00
YPos = 20.00
Case Is = 2
Xpos = 140.00
YPos = 20.00
Case Is = 3
Xpos = 160.00
YPos = 20.00
Case Is = 4
Xpos = 180.00
YPos = 2O.00
Case Is = 5
Xpos = 120.00
YPos = 40.00
Case Is = 6
Xpos = 140.00
YPos = 40.00
Case Is = 7
Xpos = 16.00
YPos = 4.00
Case Is = 8
Xpos = 180.00
YPos = 40.00
End Select

Code "G53 X" & XPos & " Y" & YPos
End Sub
Main

[sechtech]

Tady je to vidět v akci: http://youtu.be/PGvuUdfm4II?t=5m50s" onclick="window.open(this.href);return false;