| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Punktkoordinaten (x, y, z) und Bezeichnung exportieren... (2143 mal gelesen)
|
CB_
Mitglied
Bauingenieur
   Beiträge: 163
Registriert: 20.01.2004 ACAD 2002, W2k, P4 1800Mhz, 512 MB RAM, 20GB HD, Matrox, 2 Bildschirme
|
erstellt am: 21. Mrz. 2005 14:47  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, hab mit der Suche leider nichts passendes gefunden.. Wie kann ich die Koordinaten (x,y,z) und den Text von Punkten auslesen? Die Kombination von "zahlen" und "pnt_export" (arx von bruechner) funktioniert ja sehr gut, nur leider werden dabei nicht die z-KOs ausgelesen.
Vielleicht (sogar bestimmt) wisst Ihr Rat?
MfG Christian zahlen an die Punkte schreiben: Code:
(Defun C:ZAHLEN ()
(START)
(prompt "\n\n\nDie aktuelle Texthöhe wird übernommen...")
(Setq A (Getint "\nStartnummer: "))
(Setq E 1)
(Setq I 0)
(Initget 1 "A")
(Setq P1T (Setq P1 (Getpoint"\nEinfuegepunkt oder Abbruch")))
(While(/= P1T "A")
(Setq F (Itoa A))
(Command "Text" "z" P1 "" I F)
(Setq A (+ A E))
(Initget 1 "A")
(Setq P1T (Setq P1 (Getpoint "\nEinfuegepunkt oder A für Abbruch")))
)
(end)
(Princ)
)
(defun *error* (em)
(end)
(princ "\nAbbruch : ")
(princ em)
)
(defun end()
(if clay
(progn
(command "LAYER" "SE" clay "")
(setvar "BLIPMODE" bmod)
(setvar "CMDECHO" 1)
(setvar "MENUECHO" mech)
(setvar "OSMODE" mosm)
(setvar "SNAPMODE" msna)
(setvar "ORTHOMODE" mort)
)
)
(princ)
)
(defun start()
(setq bmod (getvar "BLIPMODE")
mosm (getvar "OSMODE")
msna (getvar "SNAPMODE")
mort (getvar "ORTHOMODE")
clay (getvar "CLAYER")
mech (getvar "MENUECHO")
)
(setvar "BLIPMODE" 0)
(setvar "CMDECHO" 0)
(setvar "MENUECHO" 3)
(setvar "OSMODE" 0)
(setvar "SNAPMODE" 0)
(setvar "ORTHOMODE" 0)
(command "LAYER" "M" "Text" "Fa" "1" "" "")
)
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
AsSchu
Ehrenmitglied
Konstrukteur
Beiträge: 1632
Registriert: 27.06.2003 ACAD 2012
|
erstellt am: 21. Mrz. 2005 14:51 <-- editieren / zitieren --> Unities abgeben: Nur für CB_ 
|
CB_
Mitglied
Bauingenieur
Beiträge: 163
Registriert: 20.01.2004 ACAD 2002, W2k, P4 1800Mhz, 512 MB RAM, 20GB HD, Matrox, 2 Bildschirme
|
erstellt am: 21. Mrz. 2005 15:03 <-- editieren / zitieren --> Unities abgeben:
Stimmt, funktioniert sehr schön, aber nicht schön genug. Ich brauche bei mehreren huindert Punkten schon eine eindeutige Identifikation. Also der Liste sollte enthalten: Nr. x y z und nicht x y z MfG Christian Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bernd P
Ehrenmitglied V.I.P. h.c.
cook-general
Beiträge: 3358
Registriert: 07.06.2001 W10-64bit, AMD Ryzen 7 3700X,32GB RAM, Sapphire Pulse Radeon RX 570 8G G5, Canon TX-3000 MFP, Maus Cherry MW4500, Sub:Infrastructure Design Suite, Office 365
|
erstellt am: 21. Mrz. 2005 15:18 <-- editieren / zitieren --> Unities abgeben: Nur für CB_
Servus Das Prob ist das Punkte keine Nummer haben (oder irre ich). Man sollte schon Blöcke für sowas verwenden, bei dennen würde es mit Attributextraktion funktionieren. ------------------
"Warum Einfach es geht auch kompliziert". Schöne Grüsse aus der Steiermark Bernd P.
Bitte Supportangaben eintragen, warum siehst du hier Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CB_
Mitglied
Bauingenieur
Beiträge: 163
Registriert: 20.01.2004 ACAD 2002, W2k, P4 1800Mhz, 512 MB RAM, 20GB HD, Matrox, 2 Bildschirme
|
erstellt am: 21. Mrz. 2005 15:25 <-- editieren / zitieren --> Unities abgeben:
ALSO............Mit dem o.a. Code "zahlen" schreibt man zahlen an die Punkte und zwar fortlaufend nummeriert. Damit haben die Punkte eine eindeutige Identifikation. Der nächste Schritt wäre es, die Koordinaten PLUS die soeben an die gleichen Koordinaten geschriebenen Zahlen in eine Liste zu exportieren. Funtkioniert sehr gut mit dem Programm "pnt_export". Dies liest aber leider nur die x und y Koordinaten aus (Die Z-Koordinate kann als zusätzlicher Text alllerdings auch ausgelesen werden, aber nur wenn man diesen Wert zu der Nummer mit dranschreibt). Was ich jetzt brauche, ist irgendein schönes, kleines Lisp das so schlau ist, den Punkt zu erkennen, den Text (der ja die gleichen KOOs hat) zu erkennen und dann drei Werte in eine Textdatei schreibt. Holger B. wo bist Du? MfG Christian Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium
Moderator
Maschinenbaukonstrukteur
    
Beiträge: 13508
Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 21. Mrz. 2005 15:46 <-- editieren / zitieren --> Unities abgeben: Nur für CB_
Zitat:
Original erstellt von CB_:
Holger B. wo bist Du?
.. im wohlverdienten Urlaub .. aber da du dich ja hinsichtlich deines Lieblingslisplers schon festgelegt hast ...  ------------------
 - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CB_
Mitglied
Bauingenieur
Beiträge: 163
Registriert: 20.01.2004 ACAD 2002, W2k, P4 1800Mhz, 512 MB RAM, 20GB HD, Matrox, 2 Bildschirme
|
erstellt am: 21. Mrz. 2005 15:56 <-- editieren / zitieren --> Unities abgeben:
|
m-troeger
Mitglied
gel. Bauzeichner; Vermessungszeichner, Vermesser im Außendienst, GIS-Erfassung in PARIS
Beiträge: 295
Registriert: .. ACAD14 und 2005;
MAP4; GeoCAD; PARIS;
( Vermessung )
|
erstellt am: 21. Mrz. 2005 17:53 <-- editieren / zitieren --> Unities abgeben: Nur für CB_
|
Foren auf CAD.de (alle Foren)
| 
