---

Hallo zusammen

Ich versuche mittels lisp den Befehl Blockreplace zu verwenden, leider erhalte ich immer folgende Fehler:

-----
Befehl: AUTOBR
-BLOCKREPLACE Unbekannter Befehl "-BLOCKREPLACE". Drücken Sie F1-Taste für Hilfe.

Befehl: Block_1_alt Unbekannter Befehl "BLOCK_1_ALT". Drücken Sie F1-Taste für Hilfe.

Befehl: Block_3_neu Unbekannter Befehl "BLOCK_3_NEU". Drücken Sie F1-Taste für Hilfe.

Befehl: y Unbekannter Befehl "Y". Drücken Sie F1-Taste für Hilfe.
------

Code:

---

(defun C:AUTOBR ()
  (command "-BLOCKREPLACE" "Block_1_alt" "Block_3_neu" "y" "")
(princ)
)

---

Kann mir jemand sagen was ich falsch mache? Besten Dank für eure Unterstützung

------------------
Gruss
redfire

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

---

Zitat:

---

Original erstellt von redfire:
Hallo zusammen

Ich versuche mittels lisp den Befehl Blockreplace zu verwenden, leider erhalte ich immer folgende Fehler:

-----
Befehl: AUTOBR
-BLOCKREPLACE Unbekannter Befehl "-BLOCKREPLACE". Drücken Sie F1-Taste für Hilfe.

Befehl: Block_1_alt Unbekannter Befehl "BLOCK_1_ALT". Drücken Sie F1-Taste für Hilfe.

Befehl: Block_3_neu Unbekannter Befehl "BLOCK_3_NEU". Drücken Sie F1-Taste für Hilfe.

Befehl: y Unbekannter Befehl "Y". Drücken Sie F1-Taste für Hilfe.
------

Code:

---

(defun C:AUTOBR ()
   (command "-BLOCKREPLACE" "Block_1_alt" "Block_3_neu" "y" "")
(princ)
)

---

Kann mir jemand sagen was ich falsch mache? Besten Dank für eure Unterstützung

---

Durchsuche das Forum mal nach "SSMODENT". Damit kannst Du jeden DXF-Gruppencode jedes Entities ändern. Der Blockname einer Blockreferenz steht in Gruppencode 2, also geht das dann so:

(ssmodent <ename> 2 ""Block_3_neu")

Und wenn Du nur Blockreferenzen auf den Namen "Block_1_alt" ändern willst, dann mithilfe der folgenden SS->LIST dann so:

(mapcar '(lambda (en) (ssmodent en 2 ""Block_3_neu")) (ss-list (ssget '((2 . "Block_1_alt")))

Code:

---

(defun ss->list (sset / eset counter)
  (setq counter 0)
  (if (= 'PICKSET (type sset))
    (repeat (sslength sset)
      (setq eset (cons (ssname sset counter) eset)
            counter (1+ counter)
      )
    )
  )
  eset
)

---

Ergänzung: BLOCKREPLACE wird vermutlich kein COMMAND sein, sondern höchstwahrscheinlich auch in Lisp oder C# o.ä geschrieben und wird dann mit (BLOCKREPLACE ...) aufgerufen

[Diese Nachricht wurde von archtools am 07. Mai. 2024 editiert.]

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

---

Ich möchte nicht nur die Namen ändern sondern die Instanz austauschen
Gemäss Hilfe ist es ein Express-Befehl --> -BLOCKREPLACE gibt es als Befehlszeile
Ersetzt alle Instanzen eines bestimmten Blocks durch einen anderen Block.

wie kriegeich das mit einem Lisp hin, dass ich die Blöcke austauschen kann
wie würde der Aufruf mit(BLOCKREPLACE.... funktionieren?

------------------
Gruss
redfire

[Diese Nachricht wurde von redfire am 07. Mai. 2024 editiert.]

[Diese Nachricht wurde von redfire am 07. Mai. 2024 editiert.]

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

---

Zitat:

---

Original erstellt von redfire:
Ich möchte nicht nur die Namen ändern sondern die Instanz austauschen

---

Damit änderst Du nicht den Namen der Blockdefinition, sondern tauschst bei einem Insert die Referenz auf den Block "Ursprungsblock" auf die Referenz auf den Block "NeuerBlock" aus.

Warum probierst Du's nicht erst mal aus?

Zitat:

---

wie kriegeich das mit einem Lisp hin, dass ich die Blöcke austauschen kann
wie würde der Aufruf mit(BLOCKREPLACE.... funktionieren?

---

Indem Du die verschiedenen Varianten ausprobierst.

[Diese Nachricht wurde von archtools am 07. Mai. 2024 editiert.]

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

---

blockreplace ist kein Autocad-Befehl sondern ist innerhalb der Expresstools als LISP-Befehl definiert ( siehe blocktoxref.lsp im Express-Ordner ) ... da kannst du keine Parameter übergeben ... Somit : Schreib dir die Funktion um , oder nutze gleich eine eigene 

------------------
Also ich finde Unities gut ... und andere sicher auch
---------------------------------------
  - 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

---

Wenn der Befehl aus den Expresstools stammt, kannst du ihn auch direkt einsehen.
Die Expresstools sind grösstenteils in LISP geschrieben und in den Dateien offen lesbar.

------------------
Bubi spiele, Bubi glücklich!

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

---

Moin,
schon mal den (neuen) ACAD-Befehl -BLERSETZEN ausprobiert?

AutoCAD 2024 Hilfe | So ersetzen Sie eine Blockreferenz | Autodesk
https://help.autodesk.com/view/ACD/2024/DEU/index.html?guid=GUID-575DBF52-31A3-47C5-9F19-C66854BB2214

------------------
viele Grüße

Mathias

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