Vypis souradnic do vykresu
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=1544
Datum vytištění: 03.čvc.2026 v 04:42
Téma: Vypis souradnic do vykresu
Odeslal: Kroupík
Předmět: Vypis souradnic do vykresu
Datum odeslání: 21.říj.2005 v 10:42
|
Nemate nekdo nejakou pomucku ci radu jak vkladat souradnice bodu primo do vykresu? V Microstionu staci kliknout na bod a do vykresu se umisti vypis souradnic. Kopirovani z prikazoveho radku mi moc nevyhovuje. ------------- Kroupík |
Odpovědi:
Odeslal: Machacek
Datum odeslání: 21.říj.2005 v 10:46
|
třeba AAC LT Extension ------------- Jiří Macháček BricsCAD, Cadkon MEP |
Odeslal: musil
Datum odeslání: 21.říj.2005 v 10:49
| ^C^C_id;\_setenv;x1;$M=$(rtos,$(index,0,$(getvar,lastpoint)) );_setenv;y1;$M=$(rtos,$(index,1,$(getvar,lastpoint)));_lead er;@;\;"$M=$(getenv,x1)","""$M=$(getenv,y1)""";; |
Odeslal: Kamil Hronovský
Datum odeslání: 21.říj.2005 v 10:55
| Co třeba staniční kóta |
Odeslal: Mantlík
Datum odeslání: 21.říj.2005 v 11:55
|
Pošlete mi adresu, pošlu Vám lispík, bez kterého se neobejdu můj mail: doprava@ppu-babtie.cz ------------- J. Mantlík |
Odeslal: Vladimír Michl
Datum odeslání: 21.říj.2005 v 12:09
|
V AutoCADu 2005/2006 lze snadno do atributu bloku nebo do prostého textu vložit dynamické pole automaticky zobrazující aktuální hodnotu X a Y (umístění.X, umístění.Y) ------------- Vladimír Michl (moderátor) ARKANCE CZ - https://arkance.world - arkance.world (podpora viz emea.support.arkance.world) |
Odeslal: Kroupík
Datum odeslání: 21.říj.2005 v 12:17
|
To mi bohuzel v mem ADT2005 nefunguje, pise to neznamy prikazy _lead, er, @ ------------- Kroupík |
musil napsal(a):Odeslal: Pepa
Datum odeslání: 21.říj.2005 v 12:43
protože to má být _LEADER
|
Odeslal: Radim Cech
Datum odeslání: 21.říj.2005 v 13:03
|
Pošlete mi Váš mail a pošlu Vám LISP, který mi kdysi dělal Ing.Michl Bez něj bych nebyl schopen udělat jediný vytyčovák. Popíše souřadnici v závislosti na hodnote USERR1 pro příslušné měřítko, tzn. že velikost odkazu a textu se řídí touto proměnnou.
------------- R.C. OSTRAVA |
Odeslal: musil
Datum odeslání: 21.říj.2005 v 13:12
|
omluvám se tohle bylo na ltecko,a má to být na jednom řádku.
|
Odeslal: Mantlík
Datum odeslání: 21.říj.2005 v 15:15
|
Protože se objevilo několik žádostí, přikládám http://www.cadforum.cz/forum/uploads/Mantlk/2005-10-21_151005_JTSK.LSP - 2005-10-21_151005_JTSK.LSP Protože byl dělán (tedy přesněji řečeno upraven - z volného zdroje) především pro vytyčováky v JTSK, je tam pro převod na Spolehlivě slouží už 8 let ------------- J. Mantlík |
Odeslal: musil
Datum odeslání: 22.říj.2005 v 08:37
|
^C^C_id;\_USERS1;$M=$(rtos,$(index,0,$(getvar,lastpoint)));_ USERS2;$M=$(rtos,$(index,1,$(getvar,lastpoint)));_leader;@;\ ;"$M=$(getvar,USERS1)","""$M=$(getvar,USERS2)""";; Zdravim a mám tady ještě jedno tlačítko ted jsem ho dodelal funguje na acad2005 cz tak snad bude i jinde fungovat . Mohl by mě někdo říct co je náročnější jestli diesl nebo lips(s lipsem ještě nekamarádim) |
Odeslal: Kroupík
Datum odeslání: 24.říj.2005 v 09:19
|
Dekuji vsem za pomoc! ------------- Kroupík |
Odeslal: orlik
Datum odeslání: 24.říj.2005 v 13:18
|
Je pro zajimavost, lze to upravovat podle potreby a je to v LISPu
(defun c:uu ( / pt1 pt2 ori osmod) (SETQ osmod (GETVAR "OSMODE")) (setq px1 0.0 py1 0.0 pz1 0.0 pts "" pt1 (list 0.0 0.0 0.0)) (setq ori (getpoint "\n Nulovy bod : ")) (while (/= pt1 nil) (setq pt1 (getpoint "\n Bod pro info : ")) (if (= pt1 nil) () (progn (setq pt2 (getpoint "\n Bod textu : ")) (SETQ px1 (- (CAR pt1) (car ori)) py1 (- (CADR pt1) (cadr ori))) (setq pts (strcat "X" (rtos px1 2 2) ",Y" (rtos py1 2 2))) (SETVAR "OSMODE" 0) (command "_qleader" pt1 pt2 "" "2" pts "") ) ) (SETVAR "OSMODE" osmod) ) ) |