CAD Tools

Die meisten der folgenden Tools wurden in Autolisp erstellt. Die Tools sind im Quellcode, so dass Sie selbst Änderungen vornehmen können. Somit können Sie die Tools für Ihre eigenen Anwendungen optimieren.

Auf der Webseite von Stephan Bartl sind gesammelte Links zum Thema Programmieren in Autolisp und auch noch viele weitere Tools.

Vorbereitung:

1. Möglichkeit

Sie kopieren alle Lisp-Dateien in den Ordner "...\SUPPORT" von ACAD

2. Möglichkeit

- Sie legen sich einen eigenen Ordner, z.B. "UTIL", an. - Damit ACAD automatisch auf diesen Ordner zugreift, muss er angegeben werden.
Das geht über:
Werkzeuge --> Optionen -->


Die erste Variante ist einfacher, die zweite erfordert mehr Arbeit. Das aber nur einmal, außerdem schafft sie Ordnung, wenn man mehrere "Fremddateien" benutzt.

Aufrufen und starten
(Beispiel: VERS.LSP)

Von Hand ist in der Befehlszeile einzugeben:



Die Klammern und Anführungszeichen müssen mit eingegeben und jede Zeile mit der Return-Taste bestätigt werden.

Im Menü
- Werkzeuge --> Anwendung --> Dateiname angeben --> laden..
- In der Befehlszeile ist als Befehl: vers einzugeben.

Mit einem Icon
Wer Icons ändern oder selbst erstellen kann, hat die Möglichkeit, eigene Programme über ein Icon aufzurufen und zu starten. Das Makro muss in unserem Beispiel so aussehen:

Menübalken selbst erstellen

Die Tools wurden mit Übungsbeispielen für Einsteiger
und mit zusätzlichen Informationen zum Thema CAD erweitert.

Der Befehl "ABRUNDEN" von ACAD ist bis zur Version ACAD 2002 nicht gerade bedienerfreundlich. Wenn man einen anderen Radius als den zuletzt benutzten eingeben will, muss man zuerst "R", den gewünschten Radius, und dann wieder den Abrunden-Befehl neu starten. Da mich das schon immer gestört hat, habe ich ein eigenes Tool (RADI.LSP) mit Dialog erstellt.
Neu! Jetzt können mit "RADI" nicht nur Linien und Bögen abgerundet werden, sondern auch Ecken von Polylinien und LW-Polylinien.
Beim Abrunden einer Polylinie mit einem einzelnen Element wird das Element mit der Polylinie verbunden.

Ein Bildschirmausdruck von "RADI":

Nachtrag:
Autodesk hat inzwischen das Abrunden benutzerfreundlicher gemacht. Wer aber bei 2007 auf den Dialog bei Radiuseingabe nicht verzichten möchte, kann die Datei "RADI_07.LSP" verwenden, denn das alte Tool "RADI" funktioniert bei ACAD 2007 nicht mehr.

Um eine Mittellinie auf einen Kreis, Linie oder Rechteck zu zeichnen benötigt man mehrere Arbeitsschritte. Das Tool "M_L" erledigt das in einem Schritt.
Die Überstände werden gleich mit gezeichnet und der Kreismittelpunkt ist geschlossen.

Bildschirmausdruck:

Hinweis: Dieses Tool wurde verbessert.

Ein einfaches Tool zum zeichnen von Gewindebohrungen von M3 bis M16. Auch dieses Tool steht im Quelltext zur Verfügung, damit Sie es an die eigenen Bedürfnisse anpassen können.

Bildschirmausdruck:

Der Befehl ist fortlaufend und kann mit einer Taste oder der rechten Maustaste beendet werden.

Das Ergebnis:

Für Senkungen ist das Tool "senk.lsp" vorhanden.

Ein Ausschnitt aus einer Koordinatendatei aus dem eine Zeichnung erstellt werden soll:

1.00000 0.00000 
0.99726 0.00004 
0.98907 0.00019
0.97553 0.00052 
0.95677 0.00114 
0.93301 0.00224 
0.90451 0.00399
0.87157 0.00657
0.83457 0.01008
0.79389 0.01454
0.75000 0.01985
0.70337 0.02583
0.65451 0.03231
0.60396 0.03900
0.55226 0.04557
...
...
...

Das Ergebnis:

Hier ist das genaue Vorgehen beschrieben.

Manchmal, benötigt man ein Tool das Polylinen, LWPolylinen, Splines oder Kreise in Linienstücke zerlegen kann und die Linienstücke zu Schluss in eine Polyline wandelt.
Dafür habe ich das Tool "KONT2LIN.LSP" bereitgestellt.

Manchmal möchte man Zeichnungen nur zur Information weitergeben, z.B. mit einer Mail senden. Der Empfänger kann sie dann mit den richtigen Strichbreiten drucken, aber nicht verändern. Dazu ist das PDF-Format besonders geeignet. Hier möchte ich einen einfachen und "kostenlosen" Weg zeigen:

1. Das Programm PDFCreator installieren. Der Creator ist hier:
http://sector7g.wurzel6.de/index2.htm zu finden.
Es richtet eine Drucker mit dem Namen PDFCreator ein.
2. In ACAD "Plot" anwählen und als Drucker den PDFCreator angeben.

Für Zeichnungen größer als DIN A3, eignet sich das Programm CutePrinter

Wenn man unbenutzte Blöcke, Textstile und Layer bereinigt, wird die Datenmenge einer Zeichnung kleiner. Dafür gibt es in ACAD den Befehl "bereinig". Wenn jedoch Blöcke verschachtelt sind, muss man diesen Befehl mehrmals durchführen, und das ist sehr lästig.
Deshalb hat Herr Heinz Navratil ein Programm erstellt, das diese lästige Arbeit für Sie automatisch erledigt. Es stellt gleichzeitig auch fest, wie oft die Bereinigung zu durchlaufen ist.
Herr Heinz Navratil hat mir erlaubt, dieses nützliche Tool auf meiner Seite zu veröffentlichen. Danke!
Ich habe es "CLEAN.LSP" genannt.

Beim Befehl "BRUCH" von ACAD werden auf einem Element zwei Punkte angewählt, und der Abstand dazwischen wird her ausgebrochen.

Wenn es darum geht, Wandanschlüsse aufzubrechen, ist der Befehl "BRUCH" nicht besonders geeignet.

Der Befehl "Z_BRUCH" macht diese Arbeit einfacher:

- Man wählt z.B. auf einer Linie einen Punkt,
- danach wird die Ausschnittbreite abgefragt,
- die Linie wird aufgebrochen und
- der Ausschnitt ist in der Mitte vom angewählten Punkt.

Bildschirmausdruck:

In ACAD gibt es die Funktion "_convertpoly", damit kann man Polylinien zu LW-Polylinien konvertieren und LW-Polylinien zu Polylinien.
Bei den Programmen: BricsCad, ZWCAD und ProgeCad gibt es diese Funktion nicht. Da muss man - vor dem Zeichnen - den Polylinien-Typ mit der Variablen "PLINETYPE" einstellen..
Eine nachträgliche Änderung geht nur mit "Auflösen", "PLINETYPE" einstellen und danach mit "Pedit" wieder in eine Polylinie wandeln.
Das Tool KONVERTPL.LSP macht diese Arbeit für Sie.

Ein einfaches Tool zum zeichnen und löschen von Konstruktionslinien.
Als Layerfarbe habe ich 1 = rot gewählt. Wenn Ihnen eine andere Farbe besser gefällt, können Sie im Tool K_LINIE.LSP, den Wert 1 durch einen anderen Wert ersetzen.
(command "_LAYER" "_MAKE" "K_Linie" "_COLOR" 1 "" "")
(command "_LAYER" "_SET" "K_Linie" "_COLOR" 1 "" "")

Bildschirmausdruck des Dialogfensters: