Vytisknout stránku | Zavřít okno

Pomoc s makrem

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: AutoCAD
Popis fóra: Otázky kolem aplikací AutoCAD a AutoCAD LT, AutoCAD web, prohlížečů, DWG a DXF, Design Review, Navisworks, nadstavby, Drive a cloud Autodesk
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=18871
Datum vytištění: 11.čer.2026 v 00:14


Téma: Pomoc s makrem
Odeslal: koblizeek
Předmět: Pomoc s makrem
Datum odeslání: 03.bře.2014 v 15:38
Dobrý den,

potřeboval bych poradit, jak vytvořit makro pro tisk v autocad2013(o makrech nic moc nevím).

Pro Vaší představu co bych vůbec potřeboval. Zmáčknout(kliknout) zkratku pro tisk=>tisk okno, kde bude nastavená mnou zvolená tiskárna,tabulka stylu vykreslování,velikost papíru,centrovat výkres,kreslit okno..

V práci dost tisknu a teď to pořád musím nastavovat ručně. Děkuji za rady a typy. Clap



Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 03.bře.2014 v 15:51
Nadefinujte si uživatelský příkaz/tlačítko, kde napíšete přesně to co byste psal ručně do řádkové verze příkazu PLOT. Příklad a princip je např. ve starším tipu:
http://www.cadforum.cz/cadforum/qaID.asp?tip=2464 - http://www.cadforum.cz/cadforum/qaID.asp?tip=2464


-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz emea.support.arkance.world)


Odeslal: koblizeek
Datum odeslání: 04.bře.2014 v 09:43
Lze zjistit bez VIP co je v tom odkazu?


Odeslal: johny
Datum odeslání: 04.bře.2014 v 15:05
Můžete to udělat třeba přes ten lisp.
ten program pak bude vypadat nějak takle...

(defun c:tiskwoknem ()
(command "-plot" "Y" "" "cdp-01LJ5000HP LaserJet 5000 Series PCL 5e (upstairs).pc3"
"11x17" "Inches" "landscape" "no" "Extents"
"Fit" "C" "y" "Scale 48.ctb" "yes" "no" "no" "no" "no" "y" "y" "")
(princ))

V tom kódu vás zajímá příkaz command... do něj píšete všechny příkazy stejné jako v příkazovém řádku autocadu (tady je to psane pro ENG autocad, ale pokud máte české prostředí, piště to česky, nebo univerzálně s "_" pak.... (command "_-plot" "_y" atd.)
"" - je ENTER
pause - až po vás bude chtít abyste zadal to okno, dejte pause - program vyčká na zadání uživatele
jinak program spustíte tím co je za "c:" .. tedy příkazem TISKWOKNEM
Pak ten kód vezmete, uložíte jako *.lsp a načtete příkazem APPLOAD (a uložíte třeba do schránky)


Odeslal: Seiner
Datum odeslání: 05.bře.2014 v 07:29

Já jsem si na tomto principu pohrál ještě o trochu dál. Dopracoval jsem se k řešení, které tiskne výkresy téměř bezobslužně. Lispovský program si volí tiskárnu podle formátu (A3 + A4 na laserovku, větší na plotter). Umožňuje i tisk zmenšených výkresů a převod do PDF. Vyžaduje jen, aby výkresy dodržely zásadu, že meze jsou nastaveny na pokreslenou oblast (pokud se tiskne z modelového prostoru) a na výkrese bylo nějaký blok známého jména (razítko), z kterého je možné určit případné měřítko. Hlavní výhoda je, že nadefinovaný příkaz je možné použít v dávce. S generátorem dávek je to pak docela mocný nástroj. Předpokládá ale, že co soubor, to jeden výkres.



-------------
Vítězslav Seiner

Chrudim


Odeslal: aecman
Datum odeslání: 25.dub.2014 v 10:15
Chcem vytlacit viac vykresov z modeloveho priestoru.
Potreboval by som iba 2xkrat vstupit do procesu tlace
1 - vybrat oknom aka oblast sa ma tlacit
2 - zadat mierku tlace

Tu je makro. Co by som tam potreboval doplnit/upravit?

^C^C-plot;A;;DWG TO PDF.pc3;XXL 2000x1000 MM;M;K;N;O;C;A;monochrome.ctb;A;N;N;N;N;A;A;


Odeslal: johny
Datum odeslání: 25.dub.2014 v 11:49
PAUSE - vstup uživatelE

Příklad.. (neznám české příkazy, ale takle by to mohlo nějak PODOBNĚ vypadat..)
...M;K;N;Okno;pause;pause;C;A;...

Tu sekvenci si projeďte v příkazovém řádku a místo vstupu užovatele dejte v makru PAUSE


Odeslal: aecman
Datum odeslání: 25.dub.2014 v 12:00
Dakujem za odpoved ale  nejak to nefunguje dobre. Prompt ma vyzve na zadanie laveho a praveho rohu, potom zadam meritko. Potialto to bezi fajn. Potom ale nasleduju dalsie vyzvy Autocadu (centrovat, styly atd...) ako keby som ich v makre nemal vobec zadefinovane. Potrebujem iba urobit vyber oknom, zadat mierku a ulozit subor.


Odeslal: JindraH
Datum odeslání: 25.dub.2014 v 12:03
Do menu makra se vstup uživatele značí zpětným lomítkem "\".


Odeslal: johny
Datum odeslání: 25.dub.2014 v 12:15
Vykopirujte sem co Vám hlásí příkazový řádek...


Odeslal: aecman
Datum odeslání: 25.dub.2014 v 12:24
Příkaz: -plot
Detailní konfigurace vykreslování? [Ano/Ne] <Ne>: A

Zadejte název rozvržení nebo [?] <Model>:
Zadejte název výstupního zařízení nebo [?] <Žádné>: DWG TO PDF.pc3
Zadejte velikost papíru nebo [?] <XXL 2000x1000 MM>: XXL 2000x1000 MM
Zadejte rozměry papíru [Palce/Milimetry] <Milimetry>: M
Zadejte orientaci výkresu [na Výšku/na šířKu] <Na šířku>: K
Kreslit vzhůru nohama? [Ano/Ne] <Ne>: N
Zadejte vykreslovanou plochu [Displej/Maximálně/meZe/Pohled/Okno] <Displej>: O

*****potial to bezi automaticky

Zadejte levý dolní roh okna <0.000000,0.000000>: C

Neplatný bod.
Zadejte levý dolní roh okna <0.000000,0.000000>: Zadejte horní pravý roh okna <0.000000,0.000000>: Zadejte měřítko vykreslování (Vykreslené Milimetry=Kreslicí jednotky) nebo [Přizpůsobit] <Přizpůsobit>: 100
Zadejte odsazení vykreslování (x,y) nebo [Centrovat] <11.55,-13.65>: c

***** a potom uz nasleduju prompty Autocadu az do ukoncenia prikazu plot



Odeslal: Vladimír Michl
Datum odeslání: 25.dub.2014 v 12:42
Do makra napište přesně to co mačkáte na klávesnici, jen použijte ";" místo <ENTER> a "\" místo odkliknutí bodu nebo zadání údaje.

-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz emea.support.arkance.world)


Odeslal: johny
Datum odeslání: 25.dub.2014 v 12:43
...N;O;PAUSE;PAUSE;PAUSE;C;...
(...Okno,vstup pro 1. bod; vstup pro 2. bod, vstup pro měřítko,Centrovat...)
ňák tak... koukejte co to po Vás chce a co do toho tím makrem hrnete..

To p. Michl: Mám neučené PAUSE... "\" je stejné, nebo je to v něčem jiné?? Díky


Odeslal: aecman
Datum odeslání: 25.dub.2014 v 15:32
Dakujem za odpovede. Funguje mi tato verzia
^C^C-plot;A;;DWG_TO_PDF.pc3;XXL 2000x1000 MM;M;K;N;O;\\\;A;monochrome.ctb;A;Z;\;A;N;A;

Len nerozumiem preco ked zadam za lomitka C ako vycentrovat tak zase sa musim vypisovat ostatne parametre rucne. Ak to dam bez C tak to funguje normalne.

Nejde zadat mierku skratene? Teraz zadavam napr. "1:100" ked napisem iba cislo 100 tak to  program vyhodnoti ako 100:1


Odeslal: johny
Datum odeslání: 25.dub.2014 v 16:24
Původně odeslal(a) aecman aecman napsal(a):


Nejde zadat mierku skratene? Teraz zadavam napr. "1:100"...

.01 ?


Odeslal: Vladimír Michl
Datum odeslání: 25.dub.2014 v 18:01
Funkce "pause" je pro LISP. Pokud chcete použít jinou volbu tisku, např. Centrovat, musíte si přizpůsobit odpovědi makra podle konkrétních dotazů funkce PLOT. Pokud se dotazy (počet, pořadí) liší, nebude stačit menu makro, ale musíte použít LISP.

-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz emea.support.arkance.world)



Vytisknout stránku | Zavřít okno