|
Rund um AutoCAD : Lisp per Button laden/ausführen
holgerlab am 18.06.2008 um 13:55 Uhr (0)
ein hab ich noch Ich habe ein eigenes Menü gebastelt - damit ich an den Standard Menü nicht rumschrauben muss - da zu gibt es eine meinMenü.mnl (Die MNL muss vor dem Punkt so heißen wie die MNU bzw. CUI -- dann wird die MNL automatisch mit geladen)In der MNL steht nun (if (not C:test) (load "test.lsp")) (princ); testDann braucht im Button nur der Befehl stehen (z.B. ^c^ctest; ) wenn der Befehl noch nicht geladen ist wird er nachgeladen.------------------Gruß Holger[Diese Nachricht wurde von holgerlab am ...
|
| In das Form Rund um AutoCAD wechseln |
|
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 |
|
Rund um Autocad : Menü - Anzeige der Hilfe
holgerlab am 18.04.2005 um 09:09 Uhr (0)
Hallo an Alle, ich habe mir ein eigenes Menü geschrieben - ein paar Lisp-Programme und Scripts die ich immer wieder benutze. Jetzt will ich den Kollegen dies Menü zur Verfügung stellen. Ich kenne alle meine Befehle aber die Kollegen eben nicht. Nur wäre es hilfreich, wenn zu jedem Befehl auch eine Hilfe angezeigt wird. Ich habe meine MNU/MNS um die ***HELPSTRINGS ergänzt - aber angezeigt werden sie nicht. Hat einer eine Idee warum. Das Menü und alle Befehle funktionieren sonst ohne Probleme. ;;;;;;;;; ...
|
| In das Form Rund um Autocad 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 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 : 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 |
