---

Hallo Forum!

Habe folgendes Problem: Im ACA2008 funktioniert bei mir weder der PLJOIN (alte LISP-Datei) noch der MPEDIT-Befehl (Express-Tools) zum schnellen Verbinden von Linien zu Polylinien. In ADT2007 hat noch alles funktioniert.
Hat jemand das gleiche Problem und eventuell eine Lösung für mich?
Danke!

Gruß
Sebastian

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

---

Das kann man doch seit mindestens AutoCAD 2006 mit dem normalen AutoCAD Befehl PEDIT konfortabel erledigen.

Code:

---

Befehl:  PEDIT Polylinie wählen oder [mehrere Objekte]: Objekte
Objekte wählen: Entgegengesetzte Ecke angeben: 7 gefunden
Objekte wählen:
Linien und Bogen in Polylinien umwandeln? [Ja/Nein]? <J> Ja
Option eingeben [Schließen/Öffnen/Verbinden/BReite/kurve
Angleichen/Kurvenlinie/kurve LÖschen/LInientyp/Zurück]: Verbinden
Verbindungstyp = Dehnen
Fuzzy-Abstand eingeben oder [Verbindungstyp] <0.0000>:
5 Segmente zu 2 Polylinien hinzugefügt.
Option eingeben [Schließen/Öffnen/Verbinden/BReite/kurve
Angleichen/Kurvenlinie/kurve LÖschen/LInientyp/Zurück]:

---

------------------
Mit freundlichem Gruß

Udo Hübner

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

---

Danke, aber den Befehl kenne ich natürlich... mit PLJOIN geht das jedoch wesentlich schneller und komfortabler.

Code:

---

Objekte wählen:
Verbindungstyp = Both (Abrunden und Hinzufügen)
Fuzzy-Abstand eingeben oder [Verbindungstyp] <0>:

Verarbeite Polyliniendaten... Fertig.

---

Das bedeutet nur Objekte auswählen und 2x Return drücken - das hätte ich jetzt gerne auch in ACA2008.

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

---

Bitte schön:

Code:

---

(defun C:PLJOIN2008 ( / ss)
  (if (setq ss (ssget (list (cons 0 "*line,arc"))))
    (progn
      (setvar "peditaccept" 1)
      (command "_pedit" "_multiple" ss "" "_join" 0.0 "")
      (setvar "peditaccept" 0)
      (prin1)
    )
  )
) 

---

Jetzt ist es nur noch Objekte wählen und 1x Return drücken

------------------
Mit freundlichem Gruß

Udo Hübner

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

---

Super!

Vielen Dank!

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

---

moin moin,

ist nen klasse befehl, hab ihn soweit anwenden können.
Nur beim Neustart muss ich die *.lsp immer neu laden.
Kann ich das irgendwie automatisch einstellen???

Und gibts ne Seite wo nochmehr selbst programmierte Befehle sind?
Versuch mich grad erst ganz frisch mit den AutoLISP zu beschäftigen!
Beispiele wie die oben sind sehr hilfreich.

Vielen Dank und Grüße

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

---

Hallo!

Versuch es mal mit dem Befehl appload und füge die pljoin2008.lsp der Startgruppe hinzu.

Gruß

Sebastian

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