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. 

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

Lze zjistit bez VIP co je v tom odkazu?

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 ENTERpause - až po vás bude chtít abyste zadal to okno, dejte pause - program vyčká na zadání uživatelejinak program spustíte tím co je za "c:" .. tedy příkazem TISKWOKNEMPak ten kód vezmete, uložíte jako *.lsp a načtete příkazem APPLOAD (a uložíte třeba do schránky)

johny2014-03-04 15:37:07

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.

Chcem vytlacit viac vykresov z modeloveho priestoru.Potreboval by som iba 2xkrat vstupit do procesu tlace1 - vybrat oknom aka oblast sa ma tlacit2 - zadat mierku tlaceTu 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;

PAUSE - vstup uživatelEPří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
johny2014-04-25 11:57:06

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.

Do menu makra se vstup uživatele značí zpětným lomítkem "\".

Vykopirujte sem co Vám hlásí příkazový řádek...

Příkaz: -plotDetailní konfigurace vykreslování? [Ano/Ne] <Ne>: AZadejte název rozvržení nebo [?] <Model>:Zadejte název výstupního zařízení nebo [?] <Žádné>: DWG TO PDF.pc3Zadejte velikost papíru nebo [?] <XXL 2000x1000 MM>: XXL 2000x1000 MMZadejte rozměry papíru [Palce/Milimetry] <Milimetry>: MZadejte orientaci výkresu [na Výšku/na šířKu] <Na šířku>: KKreslit vzhůru nohama? [Ano/Ne] <Ne>: NZadejte vykreslovanou plochu [Displej/Maximálně/meZe/Pohled/Okno] <Displej>: O*****potial to bezi automatickyZadejte levý dolní roh okna <0.000000,0.000000>: CNeplatný 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>: 100Zadejte odsazení vykreslování (x,y) nebo [Centrovat] <11.55,-13.65>: c***** a potom uz nasleduju prompty Autocadu az do ukoncenia prikazu plot

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.

...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
johny2014-04-25 12:48:40

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

[QUOTE=aecman]Nejde zadat mierku skratene? Teraz zadavam napr. "1:100"...[/QUOTE]
.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.