---

Hallo,

ich weiß nicht so genau, ob ich hier richtig bin, aber ich versuche es einfach mal und hoffe auf eine Rückmeldung. Da ich nicht so der AutoCad-König bin, bin ich für eine detaillierte Hilfestellung um so dankbarer. 

Mit AutoCAD Map 3d 2008 muss ich folgendes realisieren - möglichst automatisiert.

- DWG-Datei öffnen
- einfache Linien in Polylinien umwandeln (Map-Funktionalität: Zeichnungsbereinigung)
- Polylinien von Layer1 und Layer 2 die globale Breite 0.05 zuweisen
- Polylinien von Layer3 und Layer 4 die globale Breite 0.15 zuweisen
- abspeichern als DWG im Format 2004 (oder als DWF)

Hört sich eigentlich ganz einfach an, aber ich weiß nicht wie ich das bewerkstelligen soll.

Wie gesagt, ich bin mir nicht sicher, ob ich hier richtig bin. Vielleicht gehört der Beitrag ja eher ins Map- oder sogar LISP-Forum. Sollte das so sein, könnt Ihr mir das auch gerne sagen.

Ich bin für jeden Hinweis dankbar, denn i.M. stehe ich ziemlich auf dem Schlauch.

Viele Grüße

  vokamale

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

---

Wenn ich "massenhaft" lese und mir deine Anforderungen so angucke, würde ich dir zu einer Programmierung raten die intern ein SCRIPT aufruft. Prinzipiell sollte es, wenn es nur um Modellbereich und keine in Blöcken verschachtelten Objekte geht auch nur mit einem SCRIPT "pur" gehen. Nutz mal die Forensuche und die ACAD-Hilfe zu dem Thema.

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

---

So könnte es gehen (Quick & Dirty):

Code:

---

(defun c:wandeln(/ aw)
  (setvar "PEDITACCEPT" 1)
  (if (setq aw (ssget "_X"))
    (command "_pedit" "_multiple" aw "" "")
  )
  (if (setq aw (ssget "_X" (list (cons 8 "Layer1,Layer2"))))
    (command "_pedit" "_multiple" aw "" "_width" 0.05 "")
  )
  (if (setq aw (ssget "_X" (list (cons 8 "Layer3,Layer4"))))
    (command "_pedit" "_multiple" aw "" "_width" 0.15 "")
  )
)
 

---

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

Udo Hübner
www.CAD-Huebner.de

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

---

hallo

habe das gleiche problem!

habe die werte layer1, layer2, usw. geändert.

passiert aber nichts! was mache ich falsch?

danke im vorraus!

tobias

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

---

Hi und herzlich willkommen auf cad.de!

Beschreibe doch bitte ausführlicher was du machst und was du als Grundlagen(elemente) in deiner Zeichnung hast. Danke.

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

Thomas

Korrekturen zum Kochbuch AutoLISP

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

---

hallo und danke für die schnelle antwort!!!

habe das oben gepostete script in ein txt-datei kopiert und als scr gespeichert.

(layer angaben natürlich auf meine werte angepasst...)

dann den befehl script eingegeben und die datei ausgwählt.

danach erhielt ich in der befehlszeile (_> ). anschließend enter aber nichts hat sich geändert!

gruß

tobias

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

---

Das ist ein LSP und keine SCR-Datei.

Somit gilt: http://ww3.cad.de/foren/ubb/Forum54/HTML/007058.shtml 

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

Thomas

Korrekturen zum Kochbuch AutoLISP

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

---

BestandStromGis_Ursprung.DWG.txt

Hier mal die Datei...

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

---

Und was soll ich (wir) damit?

Wir sprechen von einer Linienbreite wie sie bei Polylinien vorkommt - nicht von einer Linienstärke!?

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

Thomas

Korrekturen zum Kochbuch AutoLISP

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

---

Hallo tojak,

ich bin bei meinem Problem noch nicht wirklich weiter gekommen. Wenn Du eine Lösung hast kannst Du Dich ja mal melden....

vokamale

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

---

@vokamale:

Bist du nicht? Und was ist dann mit dem Tool von Udo? Und wenn das nicht deinen Vorstellungen entspricht, warum sagst du das nicht? Und was heisst du bist nicht weitergekommen? Kannst du das spezifizieren?

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

Thomas

Korrekturen zum Kochbuch AutoLISP

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

---

hallo tunnelbauer!

hat geklappt! danke für deinen link! klasse sache!!! 

noch ne frage: kennst du irgendeine seite im netz oder literatur, wo man sich über lsp usw. schlau machen kann? oder ist das zu kompliziert?

danke nochmal!

gruß

tobias

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

---

Was meinst du mit "über lisp schlau machen"? Willst du die Programmierung lernen?

Dann schau mal in meine Signatur - da gibts schon 'nen weiterführenden Link...

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

Thomas

Korrekturen zum Kochbuch AutoLISP

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

---

klar! hätte ich auch selber drauf kommen können! danke!

gruß

tobias

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