Witam,
chcialbym ograniczyc predkosci posuwow osi X Y i Z w przypadku podniesienia oslon frezarki.
Mam zainstalowane krancowki oslon podlaczone do pinu E-STOP oraz zwieracz krancowek oslon za pomoca przelacznika z kluczem.Gdy klucz jest w pozycji OFF podniesienie oslon wyzwala E-STOP, w przypadku gdy jest w pozycji ON blokuje krancowke oslon i mozliwa jest praca z uniesiona oslona.Dodatkowo mam zainstalowany przekaznik podlaczony do klucza - chce wykorzystac styki tego przekaznika do podania impulsu na wejscie MACH-a by zredukowac posuwy. Pytanie jak to wykonac?
Oczywiscie po przekreceniu klucza w pozycje OFF - predkosc maksymalna posuwow wraca do wartosci ustawczych.
Pozdrawiam,Michal.
Redukcja posuwow osi
-
k-m-r1
- ELITA FORUM (min. 1000)
- Posty w temacie: 1
- Posty: 1417
- Rejestracja: 23 cze 2008, 10:38
- Lokalizacja: OOL lub DW
- Kontakt:
sam niewiem ale trzeba by pokąbinowac
chodzi mi po głowie że podac impulc na port tak by mach odebrał go a w machu uruchomiony musi byc skrypt który zwolni predkosc każdej osi
narazie nic niezdziałam remont mam i do drugiego kompa dostępu brak tak bym może cośnapisał
chodzi mi po głowie że podac impulc na port tak by mach odebrał go a w machu uruchomiony musi byc skrypt który zwolni predkosc każdej osi
narazie nic niezdziałam remont mam i do drugiego kompa dostępu brak tak bym może cośnapisał
[b]MACH3 cnc[/b]Tworzenie Makr do palników magazynków THC OHC inne[b]EKRANY dla firm producentów maszyn[/b] Budowa sprzedaż wypalarki plazma gaz obrotnice Elektrodrążarki Frezarki Tokarki Giętarki3D inne wg zlecenia 888 708 196 Tomek Komor [email protected]
-
Michal_T
Autor tematu - Nowy użytkownik, używaj wyszukiwarki
- Posty w temacie: 2
- Posty: 3
- Rejestracja: 03 maja 2009, 11:08
- Lokalizacja: Gdansk
Umiescilem w macropump.m1s:k-m-r1 pisze:sam niewiem ale trzeba by pokąbinowac
chodzi mi po głowie że podac impulc na port tak by mach odebrał go a w machu uruchomiony musi byc skrypt który zwolni predkosc każdej osi
narazie nic niezdziałam remont mam i do drugiego kompa dostępu brak tak bym może cośnapisał
If IsActive(Input1) Then
Call SetParam("VelocitiesX",1.5)
Call SetParam("VelocitiesY",1.5)
Call SetParam("VelocitiesZ",1.5)
Else
Call SetParam("VelocitiesX",20)
Call SetParam("VelocitiesY",20)
Call SetParam("VelocitiesZ",20)
End If
i zadzialalo. Musze to jeszcze potestowac na maszynie.
Temat zamykam.
Pozdr/M.
-
krzysiekgrab
- Specjalista poziom 3 (min. 600)
- Posty w temacie: 1
- Posty: 741
- Rejestracja: 16 lip 2008, 15:07
- Lokalizacja: Polska, Augustow
Działa Twoje makro?? Pozwolę sobie zamieścić swoje makro:).
Dim x,y,z,i,d
a:
d=getoemled(821)
If d=-1 Then
Do While i<7
i=i+1
dooembutton(109)
Loop
message("Praca przy ograniczonej prędkości")
Else
If i=7 Then
dooembutton(1014)
i=0
message("Praca przy normalnej prędkości")
Else
End If
End If
GoTo a
Dim x,y,z,i,d
a:
d=getoemled(821)
If d=-1 Then
Do While i<7
i=i+1
dooembutton(109)
Loop
message("Praca przy ograniczonej prędkości")
Else
If i=7 Then
dooembutton(1014)
i=0
message("Praca przy normalnej prędkości")
Else
End If
End If
GoTo a
„Jeżeli nie znasz portu do którego płyniesz,
to żadne wiatry nie będą Ci sprzyjać”
Programowanie sterowników PLC Fatek, HMI Weintek, sterowniki maszyn CNC, Mach3;
to żadne wiatry nie będą Ci sprzyjać”
Programowanie sterowników PLC Fatek, HMI Weintek, sterowniki maszyn CNC, Mach3;
