|
AutoLisp : viel Blöcke ersetzten durch einen
holgerlab am 01.02.2005 um 10:55 Uhr (0)
Also versuche ich es hier noch mal. Suche ein LISP zu Austauschen von Blöcken. Ich habe von extren eine 37MB Zeichnung mit einer viel von Blöcken bekommen. Aber auch für absolut gleiche Blöcke (gleicher Layer, gleiche Skalierung) wurden mit eigenem Blöckenamen angelegt. z.B. AcDbProxyEntity_557 der nächste Block heißt dann eben AcDbProxyEntity_558 Jetzt hatte ich mir, dass so gedacht. ersetzte Blöcke A + B + ... (Wahl durch zeigen) durch C (Wahl durch zeigen) Gibt es so was? ------------------ Gruß Holg ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
holgerlab am 01.02.2005 um 16:35 Uhr (0)
Danke Jörn, der Befehl funktionier prima, aber nicht in dieser Zeichung. Alle gewählten Blöcke verschwinden scheinbar. Die Blöcke aus getauscht werden sollen, sind nicht mehr an ihrem alten Einfügepunkt sondern am Einfügepunkt des Blocks der als Muster gedient hat. d.h. alle Blöcke sind deckungsgleich. Irgendwie haben die Blöcke keinen wählbaren Basispunkt. Gibt es nciht dachte ich!? Jetzt gebe ich es auf mit dem Schrott. Habe angefangen die Zeichung neu zu erstellen. Denke das ist einfachen. Dein LISP wer ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
holgerlab am 01.02.2005 um 18:28 Uhr (0)
Danke Carsten, für Hinweis. Austauschen der Blöcke geht auch schon mit dem LISP von Jörn prima. Aber da alle Blöcke ihren Basispunkt in 0,0,0 haben, verändert der ausgetauschte Block seine Lage. Wie gesagt ist das jetzt schneller neugezeichnet, wie noch lange rum gebastelt. Würde nur gern wissen warum der Plan so aussieht?????? ------------------ Gruß Holger
|
| In das Form AutoLisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
holgerlab am 02.02.2005 um 07:43 Uhr (0)
Danke Holger, für das LISP, ich mach da wohl was falsch?! Da kommt diese Meldung. BLOCK_NEW_BASISPUNKT: no function definition: BAU_ELEMLI muss ich erst was definieren? Leider verstehe ich nur sehr wenig von LISP, Sorry. Gebe mir zwar Mühe, und verstehe aber nur einzelne Zeilen. ------------------ Gruß Holger
|
| In das Form AutoLisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
holgerlab am 02.02.2005 um 10:19 Uhr (0)
das LISP läuft, kann jetzt allen Blöcken einen neuen Basispunk zuordnen. Aber alle Blöcke haben immer nur den einen Basispunkt. Erst haben alle ihren Basispunkt in 0,0,0 und dann kann man ihn beliebig ändern. Damit man aber im zweien Schritt die Blöcke austauschen kann, müssen aber die Blöcke unterschiedliche Basispunkte haben. Versuch es mal mit der Zeichung die ich oben eingestellt habe. Ich glaube das ist echt vermurgst und es gibt keine globale Lösung. Selbst wenn man für das Beispiel eine Lösung fin ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Flächenberechnung
holgerlab am 23.02.2005 um 15:08 Uhr (0)
Ich weis nicht ob das hilft. Wir zeichnen im mm und Fläschenangaben machen wir aber in m². So habe ich mir das Lisp eine Berechung für Fläche und Umfang eingafügt. (defun c:uf ( / obj flae umfa) (setq filename flae.dat ) (setq trenn ; ) (setq nachkomma 1) (Setq BLIALT (getvar blipmode )) (Setq CMDALT (getvar cmdecho )) (Setq OSMALT (getvar osmode )) (setvar blipmode 0) (setvar cmdecho 0) (setvar OSMODE 0) (terpri) (SETQ obj (getpoint Punkt in der Fläche )) (command _.boundary o ...
|
| In das Form Lisp wechseln |
|
Lisp : Flächenberechnung
holgerlab am 25.02.2005 um 08:11 Uhr (0)
Zitat: Original erstellt von Kodat: @ holgerlab Hi. Lies mal meinen Kommentar vorher. Das wäre toll wenn das damit auch geht. Zusätzlichh müsste man noch einen Layer wählen könne auf den das ganze geschrieben wird. Jeder ANwender arbeitet ja mit einer anderen Belegung. Ach ja. Und wenns dann ganz anschaulich wäre mit einem schönen Fenster. Was wären denn die Anwender Glücklich. Ja ist denn scho Weihnachten Gruß Carsten Hallo Carsten, ich bin ganz stoltz auf mich, dass ich mein erstes Lisp-Prog ...
|
| In das Form Lisp wechseln |
|
Lisp : Abrunden
holgerlab am 20.07.2007 um 14:08 Uhr (0)
Hallo, (defun c:am ()(command "_fillet" "r" "0" "meh" ));amin meiner mini LISP hier ist was falsch - und ich komme nicht drauf. Als Anwort bekomme ist: am Unbekannter Befehl "ABRUNDEN". Drücken Sie F1-Taste für Hilfe. .....Habe es auch schon auf deutsch probiert (defun c:am ()(command "abrunden" "r" "0" "meh" ));ammit dem selben Ergebniss. Wenn ist aber ABRUNDEN in der Befehlszeile eingebe geht es ------------------Gruß Holger[Diese Nachricht wurde von holgerlab am 20. Jul. 2007 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Abrunden
holgerlab am 23.07.2007 um 21:35 Uhr (0)
Danke Theodor, wie gesagt ich kenne das Tool. Ist wirklich gut - aber mein Mini-Lisp, dass jetzt dank Henning auch läuft, macht genau das was ich will. zu b) ich könnte Dein Tool anpassen, wenn ich mehr verstehen würde da von. Bin immer schon froh, wenn meine keinen Werkzeuge laufen. Ideen hätte ich schon. ------------------Gruß Holger
|
| In das Form Lisp wechseln |
|
Lisp : Lisp - Routinen für Ausschnitt-Anzeige transparent möglich ??
holgerlab am 25.07.2007 um 08:55 Uhr (0)
das sind Befehle die ausgeführt werden können während ein andere Befehl noch aktiv ist. z.B. Zeichnen eine Linie und vor anklinken des nächsten Punkt kann Du den Befehl ZOOM oder PAN ausführen und dann den Befehl LINIE weiter ausführen. Siehe ACAD-Hilfe "Transparente Befehle" hier noch mal ausführlich. ------------------Gruß Holger[Diese Nachricht wurde von holgerlab am 25. Jul. 2007 editiert.]
|
| In das Form Lisp wechseln |
