---

Hallo CAD'ler,

gibt es schon mal so ein Lisp, mit dem man die Attributen wahlweise benennen / umbenennen kann.

Angenommen ich habe 2 Attributen:

1. Gebiet / 03

2. Hausnummer / 152

Gebiet ändert sich nicht, zumindest selten, also ich brauche nur Attribut Nr.2 beschreiben.

Kann man in diesen Fall die Anfangswert für Attribut 2 setzen, und danach aufsteigend durchnummerieren, durch z.B. Auswählen von Blöcken.

Ich kenne so ein Lisp der funktioniert mit dem Text, aber nicht mit Attributen.

Danke.

Gruß.

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

---

Hallo AutoCAD-Nutzer,

entweder du behilfst dir mit ATTIN/ATTOUT und nimmst die Änderungen in Excel vor, oder du suchst dir jemanden, der dir das programmiert.

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH                              Autodesk User Group Central Europe
Individuelle Lösungen von Heute auf Morgen.              AUGCE Manager Deutschland

[Diese Nachricht wurde von Brischke am 30. Mai. 2005 editiert.]

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

---

Das folgende kleine Lisp ermöglicht ein aufsteigendes Numerieren von Attributen, die durch anklicken zu wählen sind. Zweite Variante absteigend...

(DEFUN C:ATT+  ()
  (SETQ wert (GETINT "Startwert: "))
  (SETQ attribut T)
  (WHILE attribut
    (SETQ attribut (NENTSEL))
    (IF attribut
      (PROGN
(SETQ text (ITOA wert))
(COMMAND "_-attedit" "_Y" "*" "*" "*" attribut "_value" "_replace" text "_Next")
(SETQ wert (1+ wert))))
    )
  )

(DEFUN C:ATT-  ()
  (SETQ wert (GETINT "Startwert: "))
  (SETQ attribut T)
  (WHILE attribut
    (SETQ attribut (NENTSEL))
    (IF attribut
      (PROGN
(SETQ text (ITOA wert))
(COMMAND "_-attedit" "_Y" "*" "*" "*" attribut "_value" "_replace" text "_Next")
(SETQ wert (1- wert))))
    )
  )

------------------
Gruß aus Wien
Bernhard

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

---

Hallo Holger,

danke für den Hinweis.

Gut zuwiesen an wem ich mich für so Sachen wenden kann 

Gruß.

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

---

Hallo Bernhard,

tolle Sache  

Nur sehe ich da 2 Sachen, die die volle Funktionalität, für meine Zwecke, nicht nicht ausnutzen.

1. Beispiel:

Erste Attriebut:

Startwert: AX-100

< Erfordert einen ganzzahligen Wert >

Also akzeptiert nur Zahlen, wenn ich das richtig verstehe. In diesen Fall brauche ich die Buchstaben auch  

2. Wenn ich angenommen "001" eintippe - schreibt er nur "1".

Aber sonst klappt es alles.

Danke dir  

[Diese Nachricht wurde von AutoCAD-Nutzer am 31. Mai. 2005 editiert.]

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

---

Hallo AutoCAD-Nutzer,

ich habe Bernhards lisp mal etwas modifiziert, so dass jetzt auch ein Vortext (z. B: AX-) genommen und die nachfolgende Zahl dreistellig mit Vornullen geschrieben wird. Weiteres kannst Du Dir ja dann noch anpassen.

(DEFUN C:ATT  ()
  (setq vortext (getstring "Vortext: "))
  (SETQ wert (GETINT "Startwert: "))
  (SETQ attribut T)
  (WHILE attribut
    (SETQ attribut (NENTSEL))
    (IF attribut
      (PROGN
(setq werttext (strcat "000" (itoa wert)))
(setq werttext (substr werttext (- (strlen werttext) 2)))
(SETQ text (strcat vortext werttext))
(COMMAND "_-attedit" "_Y" "*" "*" "*" attribut "_value" "_replace" text "_Next")
(SETQ wert (1+ wert))))
    )
  )

Viele Grüße
spider

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

---

Hallo spider_dd,

danke für deine Hilfe.

Funktioniert alles einwandfrei 

Vielen Dank Leute 

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

---

Ich weiss, das Thmea ist asbach, aber irgendwie krieg ich obiges Lisp nicht zum laufen. Ich erhalte diese Fehlermeldungen:

Code:

---

Befehl: att+
Startwert: 2
Objekt wählen: _-attedit
Attribute einzeln editieren? [Ja/Nein] <J>: _Y
Blocknamenspezifikation eingeben <*>: *
Spezifikation für Attributbezeichnung eingeben <*>: *
Spezifikation für Attributwert eingeben <*>: * Attribute wählen:
Befehl: _value Unbekannter Befehl "VALUE". Drücken Sie F1-Taste für Hilfe.
Befehl: _replace Unbekannter Befehl "REPLACE". Drücken Sie F1-Taste für Hilfe.
Befehl: 2 Unbekannter Befehl "2". Drücken Sie F1-Taste für Hilfe.
Befehl: _Next Unbekannter Befehl "NEXT". Drücken Sie F1-Taste für Hilfe.
Befehl:

---

 
Weiss jemand was ich tun muss?

------------------
Du kannst in anderen nur entzünden,
was in Dir selber brennt!  

Wollte noch ein File anhängen, aber habe die Kiste schon heruntergefahren.

[Diese Nachricht wurde von CADuceus am 29. Jan. 2009 editiert.]

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

---

Klickst du bei der Auswahl ein Attribut an?

Ausserdem fehlt in deiner Auflistung eine Textzeile - oder kommt die bei dir nicht vor?

Code:

---

Command: att
Vortext: Meins
Startwert: 1

Select object: _-attedit
Edit attributes one at a time? [Yes/No] <Y>: _Y
Enter block name specification <*>: *
Enter attribute tag specification <*>: *
Enter attribute value specification <*>: * Select Attributes:  1 found

1 attributes selected.
Enter an option [Value/Position/Height/Angle/Style/Layer/Color/Next] <N>:
_value Enter type of value modification [Change/Replace] <R>: _replace Enter
new attribute value: Meins001
Enter an option [Value/Position/Height/Angle/Style/Layer/Color/Next] <N>: _Next
Command:

---

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

Thomas

Korrekturen zum Kochbuch AutoLISP

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

---

  

Zitat:

---

Original erstellt von tunnelbauer:
Klickst du bei der Auswahl ein Attribut an?

[...]

---

Ähm, nein.
Ich klicke einen Block an der ein einziges Attribut enthält.
Geht das nicht?

Zitat:

---

Original erstellt von AutoCAD-Nutzer:
Hallo CAD'ler,
[...]
Kann man in diesen Fall die Anfangswert für Attribut 2 setzen, und danach aufsteigend durchnummerieren, durch z.B. Auswählen von Blöcken.
[...]
Danke.

Gruß.

---

Ein referenziertes Attribut lässt sich doch nicht auswählen ohne dass der ganze Block gewählt wird?!

(Auf die Version mit den Vortext habe ich einfachheitshalber verzichtet, deshalb "fehlt" eine Zeile.)

------------------
Du kannst in anderen nur entzünden,
was in Dir selber brennt!     

Wollte noch ein File anhängen, aber habe die Kiste schon heruntergefahren.

[Diese Nachricht wurde von CADuceus am 29. Jan. 2009 editiert.]

[Diese Nachricht wurde von CADuceus am 29. Jan. 2009 editiert.]

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

---

Zitat:

---

Original erstellt von CADuceus:
  Ähm, nein.
Ich klicke einen Block an der ein einziges Attribut enthält.
Geht das nicht?

---

Nein .. jedenfalls nicht mit dem Code ..

------------------
  - 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

---

Du hast zu schnell geantwortet. 

Ich habe meinen vorherigen Beitrag extra nochmal editiert um zu zitieren, dass auch meine "Vorschreiber" sich auf das Auswählen von Blöcken bezieht.

Item: Kennt denn jemand ein entsprechendes Lisp?
(Das, welches die Blöcke beim einfügen hochzählt kenn' ich schon, doch die Blöcke sind schon bestehend.)

------------------
Du kannst in anderen nur entzünden,
was in Dir selber brennt! 

Wollte noch ein File anhängen, aber habe die Kiste schon heruntergefahren.

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

---

nentsel wählt das angeklickte Unterobjekt bei komplexen Objekten .. hier also das Attribut .. wollst du die Blockreferenz wählen, mußt du entsel nehmen und die via entnext zum Attribut durchhangeln.. beispielcode für ähnliche Aufgabenstellungen sollten im Forum zu finden sein, d.h. JA, ich kenne solche Lisps.

------------------
  - 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