---

hallihallo,
wie fügt man koordinatenpunkte aus einer Exel-datei in eine Zeichnung wo dann auch noch automatisch Kreise um die jeweiligen koordinaten gezeichnet werden???
ich habe rund 100 koordinaten (x und y wert) die in einen plan rein sollen!!!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

per Script.

Könnte so aussehen:
kreis RW,HW radius

------------------
Viele Grüße Lutz

    Glück Auf!

[Diese Nachricht wurde von Dig15 am 16. Nov. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

habe mir eine txt erstellt mit allen koordinaten und daraus dann eine scr-datei gemacht welche ich dann in mein zeichnung hineingeladen habe.
muss ich da in meiner txt-datei vor jede koordinate den acad-befehl hineinschreiben oder geht das einfacher?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ja, der Befehl muss rein. Ist aber aus Excel ja kein Problem.

PS: Willkommen im Forum! 
------------------
Viele Grüße Lutz

    Glück Auf!

[Diese Nachricht wurde von Dig15 am 16. Nov. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi und herzlich willkommen auf cad.de!

Speicher die Koordinaten als csv-File (mit Kommatrenneung zwischen den Punkten) und dann kannst du diese mitels Script einlesen.

Siehe auch: http://ww3.cad.de/foren/ubb/Forum54/HTML/006653.shtml#000007 

------------------
Grüsse

Thomas

Korrekturen zum Kochbuch AutoLISP

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

danke

grüße aus DD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
mit Punkten Funktiouniert es wunderbahr.
aber wie sieht die Lisp datei aus wenn man eine rheihe von Linien Darstellen möchte (ich meine die yxzin.lsp)

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Das hängt davon ab wie deine "Reihe von Linien" aussehen soll...

Da kannst du ja zB den ersten Punkt einlesen und dann alle weiteren Linien von diesem Punkt beginnen lassen. Oder aber zwei Punkte ergeben ein Linie...
Oder ein Punkt gefolgt vom nächsten ergibt eine Linie...

Ohne die Anforderung exakt zu kennen wird es glaub ich sehr schwer werden dir eine prazise Hilfestellung zu geben...

------------------
Grüsse

Thomas

Korrekturen zum Kochbuch AutoLISP

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Thomas,
viellen Dank für Deine mühe
also die datenbank ist eine ganz normele x,x,z Datei wobei die xy-Werte
sind die Position und die Z-wert soll die Länge der Linie darstellen.
(ich möchte einen Längenprofil darstellen) vielleicht habt iher eine bessere Idee.

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Die Länge der Linien in welche Richtung?

Ist diese immer gleich? Und wenn ja - wohin gerichtet?

------------------
Grüsse

Thomas

Korrekturen zum Kochbuch AutoLISP

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Thomas,
Die Länge der Linien varieren sich je nach Geländeoberfläche und sind immer in positiver Richtung.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Und wie definierst du die positive Richtung?

Ist das ein Strich der sozusagen "nach oben geht" (mapcar hätte jetzt mit dieser Bezeichnung seine Freude...)? Oder wohin geht der?

------------------
Grüsse

Thomas

Korrekturen zum Kochbuch AutoLISP

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus!

nach  (command "_.point" (list #X #Y #Z)))
das hier (COMMAND "_.line" (list #X #Y #Z) (list #X #Y 0) "")
einfügen.

Das wird dir aber für deinen Längsschnitt nicht viel nützen da es nur für eine in der Draufsicht gerade verlaufende Gradiente/Achse (und in Abhängigkeit eines richtigen BKS) funktioniert. Für einen Längsschnitt brauchst du immer die richtige Länge in der Lage, sobald aber der Achsverlauf aus zwei nicht parallelen Elementen besteht gibt es kein entsprechendes BKS mehr.

Ciao Georg

------------------
http://www.xx-tausend.info

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Prof.scr.txt

Hallo Thomas,
tut mir leid dass ich mich nicht richtig ausgedrucken habe
am besten schaumal die datei als anhang, (als script)
nach Kommandbefehl erst die position
danach die länge der linie und soweiter...

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Georg,
dein vorschlag ist gut, aber warum als Linie wird nur die erste Zeile abgelesen aber als Punkt alles.

danke

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Entschuldigung, ich hab' eine Klammer übersehen.

das hier (COMMAND "_.line" (list #X #Y #Z) (list #X #Y 0) "")
vor  (command "_.point" (list #X #Y #Z)))
einfügen.

Jetzt müßte es bei jedem Punkt funktionieren.

Ciao Georg

------------------
http://www.xx-tausend.info

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Georg, Hallo Thomas

es hat geklappt
herzlichen Dank und alles Gute

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Georg,

noch eine frage
kannman nun die linienspitzen miteinander verbinden oder ist es sehr aufwendig
(besser gesagt xy nochmal abfragen und die linienenden miteiander verbinden)

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

  (if #FN
    (progn
    >>>>>>>>> (SETQ p1 '(0 0 0)) <<<<<<<<< 
      (setq #FN (open #FN "r"))

---------------------------------------

        #TMP ""))
    >>>>>>>  (COMMAND "_.line" p1 (list #X #Y #Z))  <<<<<<<<<
    >>>>>>>  (SETQ p1 (list #X #Y #Z))  <<<<<<<<<<
        (command "_.point" (list #X #Y #Z)))
      (close #FN)))

Befehle zwischen den >>>>>>  <<<<<<< noch reinkopieren, die erste Linie löschen (geht nach 0,0,0).

Das was du brauchst ist ein Profileprogramm! (...und das kann ich dir aus eigener Erfahrung sagen ist programmiertechnisch "etwas" mehr Aufwand als nur ein paar Punkte einlesen und verbinden).

Ciao Georg

------------------
http://www.xx-tausend.info

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

XyzIn.lsp.txt

Hallo Georg,
es klappt leider nicht
kann sein dass ich etwas falch gemacht habe
schaumal bite die Datei

ich danke Dir im Voraus

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

(COMMAND "_.line" p1 (list #X #Y #Z) "")

die "" fehlen.

hier kannst du noch p1 dazu schreiben.

(defun C:XYZIN (/ #ECHO #OSNP #OLDERR @NEWERR #FN #DL #RES #LN #TMP #CNT #X #Y #Z p1)

Ciao Georg

------------------
http://www.xx-tausend.info

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Georg,

es hat geklappt
ich danke Dir und alles Gute

MfG
Jourjik

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP