Strona Główna
cnc.info.pl - FORUM CNC
Obsługa, Programowanie i Budowa Maszyn Numerycznych
FAQFAQ  SzukajSzukaj  UżytkownicyUżytkownicy  GrupyGrupy RejestracjaRejestracja  ZalogujZaloguj  AlbumAlbum
cnc.info.pl - FORUM CNC Strona Główna » Tagi » makra
Tematy oznaczone jako makra
Tytuł / treść wątku  Wyświetleń  Odpowiedzi 

moje makra - frezowanie wielu kwadratów...


:: var x, y, z, k, w, r, ox, oy, oxx, oyy, i, j, yz: integer; begin clear; x:= 10; //polozenie pierwszego dolnegio x y:= 10; //polozenie pierwszego dolnegio y k:= 20; //ilosc kolumn w:= 14; //ilosc wierszy ox:= 2; //odleglosc miedzy kwadratami x oy:= 2; //odleglosc miedzy kwadratami y r:= 30; //dlugosc boku kwadratu oxx:= x; yz:=0; ox:=ox+r; oy:=oy+r; for j:=w downto 1 do begin for i:=k downto 1 do begin prostokat (oxx, y+yz, oxx+r, y+r+yz); oxx:= ox+oxx; end; oxx:= x; yz:= yz+oy; end; refresh; selectall end. :: Przydatne przy rysowaniu w moim przypadku zasłon na grzejniki :)
14428 0

moje makra - frezowanie drzwi z łukami z dołu i z góry


14398 2

moje makra - frezowanie wielu okręgów...


:: var x, y, z, k, r, ox, oy, oxx, oyy, i: integer; begin clear; x:= 110;//polozenie pierwszego dolnegio x y:= 100;//polozenie pierwszego dolnegio y k:= 5;//ilosc kolumn ox:= 120; //odleglosc miedzy okregami x oy:= 100; //odleglosc miedzy okregami y r:= 30; //promien // oxx:= x; oyy:= y; for i:=k downto 1 do begin elipsa(oxx,y,r,r,0); oxx:= ox+oxx; end; oxx:= x; for i:=k downto 1 do begin elipsa(oxx,y+oy,r,r,0); oxx:= ox+oxx; end; oxx:= x; for i:=k downto 1 do begin elipsa(oxx,y+oy+oy,r,r,0); oxx:= ox+oxx; end; oxx:= x; for i:=k downto 1 do begin elipsa(oxx,y+oy+oy+oy,r,r,0); oxx:= ox+oxx; end; oxx:= x; for i:=k downto 1 do begin elipsa(oxx,y+oy+oy+oy+oy,r,r,0); oxx:= ox+oxx; end; selectall; refresh; end. :: mi przydało się przy robieniu zasłon na grzejniki :) by zwiększyć ilość wierszy trzeba skopiować kilka linji
14302 5

moje makra - frezowanie ramki z łukami na rogach


kolejne makro przydatne mi i może komuś jeszcze :) rogi zaokrąglone świetnie działają w programie w wersji 2.8 :: // frezowanie ramki drzwiczek z wejsciem freza z boku i okraglymi rogami var x,y,R: integer; margines,marginesprawy,xa,ya,srednica: double; begin clear; x := strtoint( inputbox('Podaj parametr','Szerokosc frontu','300')); y := strtoint( inputbox('Podaj parametr','Wysokosc frontu','300')); margines := strtofloat( inputbox('Podaj parametr','Odleglosc od krawedzi','50')); srednica := strtofloat( inputbox('Podaj parametr','Srednica freza','12')); R := strtofloat( inputbox('Podaj parametr','Promień łuku','16')); begin R := R - srednica; margines:= margines + srednica; Linia (((x-margines)/2)-0.25,margines+15,((x-margines)/2)-0.25,margines); Linia (((x-margines)/2)-0.25,margines, margines+R,margines); //dolny bok arc (margines+R,Margines+R,R,180,270); //lewy dolny łuk Linia (margines,margines+R,margines,y-margines-R); //lewy bok arc (margines+R,y-margines-R,R,90,180); //prawy górny łuk Linia (margines+R,y-margines,x-margines-R,y-margines); //górny bok arc (x-margines-R,y-margines-R,R,0,90); //prawy górny łuk Linia (x-margines,y-margines-R,x-margines,margines+R); //prawy bok arc (x-margines-R,margines+R,R,270,360); //prawy dolny łuk Linia (x-margines-R,margines,(x-margines)/2,margines); //bok dolny polowa prawa Linia ((x-margines)/2,margines,(x-margines)/2,margines+15); //wciecie prawe end; polyline; refresh; selectall; end. ::
14248 0

moje makra - frezowanie ramek z wejściem obok...


:: var x,y: integer; margines,marginesprawy,xa,ya,srednica: double; begin x := strtoint( inputbox('Szerokosc','Szerokosc frontu','296')); y := strtoint( inputbox('Wysokosc','Wysokosc frontu','713')); margines := strtofloat( inputbox('Margines','Odleglosc od krawedzi','70')); srednica := strtofloat( inputbox('Średnica freza','Srednica freza','12')); begin xa := x-margines; ya := y-margines; clear; UstawWysokoscStrony(y+50); SetWorkWidth(x+50); SetPenColor (clred); setpointarray(0,margines+20+(srednica/2),margines+20+(srednica/2)); setpointarray(1,margines+(srednica/2),margines+(srednica/2)); setpointarray(2,xa-(srednica/2),margines+(srednica/2)); setpointarray(3,xa-(srednica/2),ya-(srednica/2)); setpointarray(4,margines+(srednica/2),ya-(srednica/2)); setpointarray(5,margines+(srednica/2),margines+(srednica/2)); polyline; refresh; selectall; end end. :: przydatne przy wycinaniu ramek w materiale
13843 2

moje makra - frezowanie wielu prostokątów...


:: var a, b, x, y, z, k, w, r, ox, oy, oxx, oyy, i, j, yz: integer; begin clear; x:= 68; //polozenie pierwszego dolnegio x y:= 70; //polozenie pierwszego dolnegio y k:= 5; //ilosc kolumn w:= 6; //ilosc wierszy ox:= 30; //odleglosc miedzy kwadratami x oy:= 20; //odleglosc miedzy kwadratami y a:= 60; //dlugosc boku a b:= 40; //dlugosc boku b r:=0; oxx:= x; yz:=0; ox:=ox+a; oy:=oy+b; for j:=w downto 1 do begin for i:=k downto 1 do begin prostokat (oxx, y+yz, oxx+a, y+b+yz); oxx:= ox+oxx; end; oxx:= x; yz:= yz+oy; end; refresh; selectall end. :: Może komuś się przyda. rysuje prostokąty wg odległościach od siebie i od początku obszaru rysunkowe podobnie jak z kwadratami czy kołami
13303 0

EC_Freeware_2014_R2 - makra m.in. imadeł, uchwytów itp.


Witam

Do Edgecam 2014 R2 obowiązuje inna instalka EC_Freeware.

W książce znajduje się instalka EC_Freeware do wersji Edgecam 2014 R1.



Pozdrawiam
4123 14

EC_Freeware_2014_R1 - makra


Witam, potrzebuję freewara dla wersji 2014_R1. Wiem, iż można uzyskać freeware w książce „Edgecam. Wieloosiowe frezowanie CNC” na jednej z płyt DVD, aczkolwiek nie mam do niej dostępu. Proszę o pomoc :)
3400 0

Makra do Macha. Kto zrobi komerycjnie?


Czy jest ktoś kto pisze makra pod Macha? Robert
3142 11

Ustawienia Thc g code i makra do cięcia plazmą


Witam panów

Od kilku dni bawie sie z ustawieniem odpowiednich parametrów ciecia raz jest dobrze raz gorzej i na dodatek zuzywaja sie szybko dysze i elektrody do powermaxa 30 i wcale nie sa tanie :P


Mam kilka pytań odnosnie ciecia plazmą powietrzną.

1 Uzywam z edytowanego postprocesora do mach3 oraz makro i niewiem czy działa własciwie: (blacha 2m predkosc 2000 30 amp, cisnienie rozne od 4 do 6 )


Post

N0010 (Filename: t.tap)
N0020 (Post processor: moj.scpost)
N0030 (Date: 2016-05-31)
N0040 G21 (Units: Metric)
N0050 G53 G90 G40
N0060 (Part: t)
N0070 M06 T0 (Plazma, 1 mm szczelina)
N0080 G00 X20.8048 Y8.6198 Z10.0000
N0090 M300
N0100 G00
N0110 M03
N0120 G01 Y5.6198 Z0.0000 F2000
N0130 X24.5000
N0140 ...
2992 39

Prośba o pomoc w napisaniu makra


Witam czy ktoś z bardziej doświadczonych kolegów mógłby mi pomóc w napisaniu prostego makra. Opiszę o co mi chodzi będzie to lepiej zrozumiałe jak makro ma działać. Wycinam małe aluminiowe ramki z arkuszy blach aluminiowych w tych ramkach są po dwa otwory które trzeba nagwintować, z arkusza wychodzi mi jakieś 60 ramek czyli 120 otworów, ręczne gwintowanie raczej mozolna praca więc skonstruowałem małą przystawkę go gwintowania która posiada własne sterowanie na uC. Zadaniem makra jest wysyłanie sygnału do mikrokontrolera w przystawce wtedy gdy gwintownik znajdzie się na otworem który ma być nagwintowany. Dokładnie ma wyglądać to tak mam gkod z pozycjami otworów maszyna jedzie nad otwór w momencie gdy w gkodzie pojawia się polecenie Z-1 makro wysyła sygnał na port lpt np uruchamia przekaźnik wtedy uruchamia się przystawka gwintuje otwór po zakończeniu gwintowania przystawka wysyła sygnał makro ma go odebrać i maszyna jedzie do następnego otworu i znowu makro wykrywa ...
2716 24

Makra


W czym się pisze macra w Machu? i jak je wstawiać?
2611 1

MAKRA


Witam wszystkich, rzucam taki luźny temat. Może ktoś z kolegów ma jakieś ciekawe makra" własnej roboty" żeby wymienić się z innymi? pozdrawiam
2485 8

Prosba o sprawdzenie makra


Witam serdecznie.
Jest to moje pierwsze podejscie do napisania makra
Makro powinno rozfrezowywac otwor do zadanej srednicy z maksymalnej glebokosci
Maszyna wysypuje sie na 3 linijce makra z komunikatem Invalid Character
Maszyna na której próbuje to odpalic to Hurco VM30i

Czy, ktorys z kolegow moglby rzucic okiem i podpowiedziec co robie nie tak ?

Pozdawiam

kod:

%
G54 G90
T8 M6
G0 X0 Y0 Z100
S6000 M3 M8

G65 P0070 F600 A8.5 B13 C3 D8 E8 F500 H0 I0.5 J9.99 K100
M30

O0070 ( START OF SUBRPOGRAM 0070 )

(A=8.5 -== HOLE DIAMETER ==- )
(B=13 -== HOLE DEPTH ==- )
(C=3 -== RETRACT PLANE ==- )
(D=8 -== RADIUS OFFSET NUMBER ==- )
...
2413 5

Mach3 wywołanie ma makra przyciskiem


W jaki sposób wywołać makro pomiaru długości narzędzia przyciskiem. Mam makro oraz stworzyłem przycisk co mam wpisać w obsłudze przycisku aby wywołać makro M6Start.
2173 1

makra podprogramy skrypty


Witam, czy mógłby mi ktoś wytłumaczyć jak to w Machu 3 r3.043.022 jest z tymi udogodnieniami. dopiero co skonfigurowałem pierwszą maszynkę pod machem, chciałbym frezować gwinty. Znalazłem taki wątek: https://www.cnc.info.pl/topics44/frezowanie-gwintow-z-korekcja-srednicy-narzedzia-vt19549.htm Jak mam dograć takie coś, czy to jest makro, skrypt czy jeszcze coś innego. Czym się różni makro od podprogramu w Mach3, gdzie to wrzucić, z jaką nazwą i jak przypisać pod dany klawisz? pozdrawiam
2056 1

makra i zwłoki czasowe


Witam
Szukam sposobu na przyspieszenie działania macha.
Aplikacja działa w ten sposób:
1. najazd na pozycję X Y
2. uruchomienie makra które wysterowywuje out1 i czeka na potwierdzenie in1
3. najazd na kolejną pozycję X Y

Problemem jest opóźnienie czasowe wejścia macha w makro a następnie wyjścia z tego makra
Chodzi to na sterowniku csmio-s.

Może ktoś miał podobny problem.
1747 5

Makra SolidWorks a język programowania


Witam wszystkich.
Od jakiegoś czasu zacząłem uczyć się języka programowania (Visual Basic), głównie z myślą o pisaniu makr dla SW i Catii (kilka już nawet pracuje:) )oraz aplikacji wspomagających pracę inżyniera.
Moje pytanie brzmi. Czy na dłuższą metę język Visual Basic jest językiem z którym można wiązać przyszłość. Czy nie lepiej skierować się w stronę języków C ( C++ lub C#) lub Javy???
Jakie wy macie doświadczenia i przemyślenia na ten temat.
1681 1

makra w machu


chciał bym by mnie ktoś nauczył od podstaw pisać makra do macha3
1609 0

Makra


Czy ktos z was kiedys spotkal sie z odobnym problemem?
SW sie wysypuje podczas klikniecia 'nowe makro', 'edycja', 'uruchom'.
Po kliknieciu na powyzsze SW sie wylacza z komunikatem 'program napotkal problem i nastapi jego zamkniecie'.


Mam SW2013 SP3.0, system operacyjny Windows 8.1 [ Dodano: 2015-08-11, 19:34 ] Poradzilem sobie z tym problemem,

W tym wypadku wysypywanie SW bylo powodowane tym, ze nie uruchomilem programu jako administrator.
1609 1

Edgecam 2012 R1 makra


Witam użytkowników. Czy istnieją jakieś makra do Edgecam 2012 R1 tak jak to miało miejsce w wersji 2011?Dotyczy to dodatku Edgecam freeware w wersji 2011.Instalacja nie jest kompatybilna do wydania programu Edgecam 2012..rozumiem ,że do każdej wersji jest inny freeware.Rozchodzi się o wstawienie imadła z tego własnie makra..lub może jest jakiś inny plugin?Pozdrawiam serdecznie.
1516 2

Drukowanie formularza makra do pliku


Witam.
Tworzę makro VBA w którym wykorzystuje formularze. Po zakończeniu uzupełniania formularza i naciśnięciu odpowiedniego przycisku chciałbym zapisać jego widok jako dowolny plik (może być PDF, jpg, bmp). Próbowałem komendy form.PrintForm. Ale do tego musiałbym wykorzystać zewnętrzny kreator PDF. Czy ktoś może mi pomóc? Z góry dziękuję!
1471 0

problem z wczytaniem makra - NIEAKTUALNE


Witam Od pewnego czasu walcze z problemem wczytywania makra tzn. podczas włączenia nx, przechodze do modelingu tam ctrl+shift+s i wczytuje makro. Wszystko pięknie gada. Koncze prace z plikiem zapisuje i zaczynam nowy. Daje nowy, znowu modeling ctrl+shift+s i zawiecha. I tak za każdym razem. Sprawdzałem macro na innych kompach -gada bez problemu Zrobiłem nowe makro - to samo zawiecha Odpalilem poprzednie wersje nx`a tzn 6.04 - to samo Dadam ze na tym samym kompie pare miesięcy temu wszystko było ok. Koledzy ze wsparcia tech. nie wiedza co jest grane i chcą system od nowa stawiać? Mozliwe że cos z systemem (XP)? Czy komp nie wyrabia z pamięcią? Co radzicie?
1408 2

opóźnienie wprowadzane przez makra


Witam, Mam pytanie, dlaczego nawet puste makro (mKod) wprowadza opóźnienie ? chciałbym napisać makro które jeśli będzie wstawione np pomiędzy G1 X100 a G1 x200 nie wywoła zatrzymania posuwu X (makro ma jedynie załączyć przekaźnik w połowie drogi).
757 2

Mazak SG 48mk2- Wybor elementu z makra


Witam wszystkich,
Mam problem z wyborem elementu z posrod makra a konkretnie , programista w naszej firmie pisze pod MK2 program w Sicamie . Powiedzmy ze program sklada sie z 100 elementow , czasem zdarza sie tak ,że nie mam odpowiedniej formatki (idalny wymiar arkusza) i chcialbym pominac gory rzad elementow zaczynajac od np. elementu nr 20 . Tutaj nasuwa sie pytanie gdzie w wygenerowanym kodzie pod Mazaka moge to znaleźć i jakie parametry wklepac , żebym mogl zaczac palic od danego detalu .
Z gory dziekuje za odpowiedzi.
Pozdrawiam.
727 8


Powered by phpBB modified by Przemo © 2003 phpBB Group


sponsorem forum jest www.akcesoria.cnc.info.pl
Informacje na witrynie cnc.info.pl są podawane tylko w celach edukacyjnych oraz hobbystycznych. Jedynie użytkownik wysyłający wiadomość lub plik ponosi pełnoprawną odpowiedzialność za ich treść. Jeżeli wynikną z tego konsekwencje prawne, cnc.info.pl może przekazać wszelkie informacje właściwym organom państwowym na temat danego użytkownika oraz pomóc w jego zlokalizowaniu. Zgodnie z ustawą o ochronie danych osobowych cnc.info.pl nie przekazuje informacji odnośnie użytkowników firmom i osobom prywatnym. Hasła, adresy e-mail oraz numery IP są szyfrowane w bazie danych i jedynie administrator jest w stanie odczytać te informacje. Cnc.info.pl jest przeciwna łamaniu zabezpieczeń oraz łamaniu praw autorskich, jednak niektóre osoby nie przestrzegają naszego regulaminu.
Kontakt z administratorem forum admin@cnc.info.pl
www.akcesoria.cnc.info.plsilniki krokoweŁożyska linioweśruby trapezowe i kulowewww.EBMiA.pl - Elementy Budowy Maszyn i AutomatykiTworzywa sztuczneNarzędzia skrawająceWyposażenie Warsztatów i Narzędziowni