Hallo Forum,
Als Neuling in der Lips-Welt, muss ich mich heute mal an euch wenden, da ich nicht weiter komme.
Ich möchte in jedem Raum einen Block mit dem Raumnamen, der Etage und der Wohnungsnummer, sowie diverse andere Daten einfügen. Das ist auch kein Problem.
In meiner Zeichnung habe ich auch einen Block mit Attributen „Objektdaten“ den es nur einmal in der Zeichnung gibt und einige Grunddaten enthält.
Nun habe ich hier im Forum folgenden Text gefunden
(setq blockname "Objektdaten")
(if (setq aws(ssget "X" (list(cons 0 "INSERT")(cons 2 blockname))))
(progn
(setq liste nil)
(setq obj (ssname aws 0))
(while (and(setq obj (entnext obj))
(/=(cdr(assoc 0(entget obj)))"SEQEND"))
(setq liste (cons (cdr(assoc 1 (entget obj)))liste))))
(alert (strcat"\nEs wurde kein Block \"" blockname"\" gefunden.")))
(cond
((= ebene "-1") (Setq estrich (atof (nth 8 (reverse liste)))))
((= ebene "10") (Setq estrich (atof (nth 9 (reverse liste)))))
((= ebene "12") (Setq estrich (atof (nth 10 (reverse liste)))))
((= ebene "14") (Setq estrich (atof (nth 11 (reverse liste)))))
((= ebene "16") (Setq estrich (atof (nth 12 (reverse liste)))))
((= ebene "18") (Setq estrich (atof (nth 13 (reverse liste)))))
)
(setq Estrich (rtos Estrich 2 3))
So konnte ich die Estrichhöhen in den Einzelenen Ebenen auslesen und weiter verarbeiten.
Im Grunde genau das was ich gesucht habe.
Mein Problem ist es nun als Neuling, dass ich den Block in einem bestimmten Raum mit der Maus auswählen möchte und dann dort die Daten herausnehmen kann. Ich denke das die ersten zwei Zeilen umgeschrieben werden muss. Wie komme ich an die Daten des mit der Maus ausgewählten Block heran.
Einen Hinweis fand ich bisher im Forum nicht, nur immer die Auswahl gleicher Blöcke oder Attribute.
Ich Bedanke mich jetzt schon mal für eure Hilfe und werde mich, dank diesem Forum mit Lisp weiterbilden.
Gruß Detlef
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP