Změna měřítka
Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: Mechanical, Electrical
Popis fóra: Otázky ke strojařským verzím AutoCADu - AutoCAD Mechanical, AutoCAD Electrical, ECSCAD a Mechanical Desktop
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=12569
Datum vytištění: 18.kvě.2026 v 23:52
Téma: Změna měřítka
Odeslal: boobs
Předmět: Změna měřítka
Datum odeslání: 29.bře.2011 v 15:53
Potrebuji zmenit meritko jiz hotoveho vykresu z 1:1 na 1:2, aby se vesel na A3, ale aby velikost pisma, sipek u kot zustala stejna. Dekuji predem za odpoved
|
Odpovědi:
Odeslal: flesar
Datum odeslání: 30.bře.2011 v 07:26
|
Předpokládám, že geometrii i popis máte v modelovém prostoru. Zvětšete dvakrát rámeček a upravte celkové měřítko kótovacího stylu Do budoucna zkuste pro výkres použít výkresový prostor. |
Odeslal: Seiner
Datum odeslání: 30.bře.2011 v 08:03
|
Souhlasím, že výkresový prostor je to správné. Ale v praxi se přesto setkávám spíš s tím, že vše je v modelovém prostoru :-)
Kdysi jsem pro změnu měřítka smolil lispík, třeba pomůže.
Kóty je třeba obnovit, existující texty se musí předělat ručně.
Názvy bloků jsou samozřejmě dle zvyklostí.
;NASTAVENÍ MĚŘÍTKA ;******************* (defun c:def() (setq osm (getvar "OSMODE")) (setvar "OSMODE" 0) (setq mer1 (getreal "Urči faktor zmenšení: ")) (setq mer (GETVAR "USERR1")) (if (or (= mer nil)(= mer 0))(setq mer mer1)) (setvar "USERR1" mer1) (setq skup (ssget "X" '((-4 . "<OR")(2 . "RAZKONST")(2 . "RAZPROJ")(2 . "A0")(2 . "A1")(2 . "A2")(2 . "A3")(2 . "A4") (2 . "RAMECEK")(2 . "RAMECEK1")(2 . "RAMECEK2")(2 . "RADEK")(2 . "NADST")(2 . "RADEK1")(2 . "NADST1")(2 . "RAZPOKR")(2 . "RAZEXT")(-4 . "OR>")))) (if (/= skup nil)(progn (command "_scale" skup "" "0,0" (/ mer1 mer)) (command "_limits" (list (* (/ mer1 mer)(car(getvar "limmin"))) (* (/ mer1 mer)(cadr(getvar "limmin")))) (list (* (/ mer1 mer)(car(getvar "limmax"))) (* (/ mer1 mer)(cadr(getvar "limmax")))) ) (SETVAR "TEXTSIZE" (* (/ mer1 mer)(GETVAR "TEXTSIZE"))) (SETVAR "DIMSCALE" mer1) (SETVAR "LTSCALE" (* (/ mer1 mer) (GETVAR "LTSCALE"))) (setq mer mer1) (command "ZOOM" "_all") ) ) (setvar "OSMODE" osm) ) ------------- Vítězslav Seiner Chrudim |
Odeslal: boobs
Datum odeslání: 02.dub.2011 v 20:37
Dekuji 
|