Vytisknout stránku | Zavřít okno

LISP vložení bloku

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=19916
Datum vytištění: 07.čer.2026 v 04:10


Téma: LISP vložení bloku
Odeslal: Ondřej Urban
Předmět: LISP vložení bloku
Datum odeslání: 16.zář.2014 v 16:22
Dobrý den,
vkladam blok lisp funkcí a nedaří se mě odladit umístění bloku a jeho natočení
 
(defun c:mati ()
(command "_insert" "030370c" "_s" 1 "_r" )
(princ))
toto se mě ptá na natočení a pak teprve umístění - rád bych umístil a pak natočil.
 
jak je to v případě řetězce ? ( různě jsem kombinoval, ale nepovedlo se)
(command "._insert" "030370c" 0 0 0 0 )

děkuji za rady


-------------
Ondřej Kurkan Urban
PERI, spol. s r.o.
http://www.peri.cz" rel="nofollow - http://www.peri.cz

WIN 10, 64GB, RTX A4500, 2x27"
ACA 2023, ntb LENOVO P 16 G1


Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 16.zář.2014 v 16:59
Třeba takto:
 
(defun c:mati ()
 (command "_-insert" "030370c" "_s" 1 pause pause)
 (princ)
)


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

Odeslal: Ondřej Urban
Datum odeslání: 17.zář.2014 v 07:46
Děkuji, funguje jak má ....

-------------
Ondřej Kurkan Urban
PERI, spol. s r.o.
http://www.peri.cz" rel="nofollow - http://www.peri.cz

WIN 10, 64GB, RTX A4500, 2x27"
ACA 2023, ntb LENOVO P 16 G1

Odeslal: Ondřej Urban
Datum odeslání: 17.zář.2014 v 10:35
Přece jen ještě další dotaz.
Vložit z výkresu XX blok YY, jde to na toto poupravit ?
Názvy jsou pevně dané.
děkuji


-------------
Ondřej Kurkan Urban
PERI, spol. s r.o.
http://www.peri.cz" rel="nofollow - http://www.peri.cz

WIN 10, 64GB, RTX A4500, 2x27"
ACA 2023, ntb LENOVO P 16 G1

Odeslal: Vladimír Michl
Datum odeslání: 17.zář.2014 v 13:13
To není moc "poupravení" :-) To příkaz AutoCADu neumí. Ale můžete použít naši utilitu InsertX - viz Download.

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

Odeslal: johny
Datum odeslání: 17.zář.2014 v 17:35
Tohle by mohlo taky pěkně fungovat: http://www.lee-mac.com/steal.html

Jinak to co chcete řeším takovou prasečinkou, že vložím prvně celý výkres jako blok "do nikam" do výkresu, jakože ho jen načtu, a pak teprav vložím ten konkrétní blok. Samozřejmě v tom původním souboru mám jen pár bloků, takže to není moc velké. Jinými slovy - pokud chcete vkládat jen konkrétní blok z jiného místa než aktuálního výkresu pak ho musíte mít uložený jako samostatný výkres.

(if (not (tblsearch "BLOCK" "SklonSipka")) ;když není ve výkresu načtený potřebný blok
      (command "_-insert" "c:\\Users\\cz10077\\Autocad\\Settings\\Support\\VJM 07\\Vysky.dwg") '(0,0))) ;tak vlož celý výkres vč. toho bloku do bodu chybně definovaného... 

(command "_-insert" "SklonSipka" Bod MeritkoX MeritkoY Uhel)  ; no a vlož ten blok


Jinak docela dobře fungujou i palety - dáte si tam blok, pak si můžete nastavit, že při vkládání se vás to ptá na rotaci nebo ne, zda se rozbije nebo ne... na pár často používaných bloků je to super.

Nebo jestli ty soubory ze kterých to taháte nemáte na síti, pak funguje docela rychle novější funkce CONTENTEXPLORER... 

Odeslal: Ondřej Urban
Datum odeslání: 13.říj.2014 v 13:49

Děkuji za tipy,

zkusím to nějak dát dohromady, ale v současné době se nedostává času.

Chci se vyhnout jakémukoliv vybíraní, kromě umístění a natočení.

S tím vložením do nikam, to zní pěkně, zkusím k tomu napasovat vložení konkrétního bloku a vyčištění.

Uvidím (e)  J.

 

Všem pěkný den



-------------
Ondřej Kurkan Urban
PERI, spol. s r.o.
http://www.peri.cz" rel="nofollow - http://www.peri.cz

WIN 10, 64GB, RTX A4500, 2x27"
ACA 2023, ntb LENOVO P 16 G1

Odeslal: Vladimír Michl
Datum odeslání: 13.říj.2014 v 16:01
Utilita InsertX (V1.2) respektuje nastavení proměnných CMDDIA a FILEDIA, takže na jméno externího DWG i na jméno bloku se může zeptat na příkazovém řádku a tím pádem jdou obě jména předdefinovat v menu, ve skriptu, v paletě bloků apod. Viz Download.

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


Vytisknout stránku | Zavřít okno