|
Lisp : Information aus Xref
archtools am 10.04.2017 um 17:44 Uhr (1)
Zitat:Original erstellt von fmfm:hmm nach langem probieren komme ich leider immer noch nicht auf die Lösung.Weisst du die Lösung?Die habe ich Dir schon in meiner ersten Antwort genannt. Du musst einen Auswahlsatz bilden, alle Elemente dieses Auswahlsatzes durchlaufen, bei jedem prüfen, ob es Deinen Kriterien genügt, und musst es im Falle des Falles dann in einer Liste sammeln.So eine Vorgehensweise nach einem Rezept nennt man Algorithmus. Diesen brauchst Du jetzt nur noch in eine Lisp-Funktion zu übersetze ...
|
| In das Form Lisp wechseln |
|
Lisp : Nach Speichern unter in alter Datei bleiben
archtools am 21.01.2010 um 20:27 Uhr (0)
Zitat:Original erstellt von Musicus:Hallo Forum,ich habe hier ein Lisp (gefunden im Forum und für meine Zwecke angepasst), welches mir Pläne als 2004er Version wegspeichert und dabei den Pfad abfragt (zwecks Planausgabe).Jetzt ist es ja aber so, dass nach der Funktion saveas AutoCAD in die neue, eben gespeicherte Datei wechselt und die Originaldatei verwirft.Kann man AutoCAD noch irgendwie beibringen, dass es zwar die Datei speichert, aber bitte in der Originaldatei verbleibt?Nichts einfach als das: speic ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Bohrungen ändern
archtools am 19.11.2006 um 13:35 Uhr (0)
Zitat:Original erstellt von schecky:Jetzt habe ich z. B. viele Rauten (als Polylinien), die ich verkleinern möchte. Da funktioniert sauswahl nicht, da er mir nur die Fläche und die Position anzeigt.Ich möchte alle rauthenförmigen Polylinien z. B. um 1mm verkleinern,gibt es da eine andere Möglichkeit?Du kannst diese Rauten mit dem VERSETZ Befehl verkleinern oder vergrößern. Das Problem ist, dass Du dabei fürs Verkleinern jedesmal innen in die Raute klicken musst. Mit einem kleinen Lisp-Progrämmchen könnte ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : StartUndoMark EndUndoMark?
archtools am 09.08.2023 um 09:55 Uhr (1)
Zitat:Original erstellt von kadirozen:Nach den lokalen Variablen kommt also das Dokument-Setup und die Startundo-Marke. Dann kommt der Error-Handler mit der Endundomarke und mein Code mit allen möglichen Ergebnissen, der zum Error-Handler führt, der die Endundomarke aktiviert.Für die Fehlersuche würde ich die komplette *error* Definition rauswerfen. Der Fehler tritt ja auf, ohne dass der Code auf einen Fehler stößt. Baue ein einfaches funktionierendes Beispiel auf, und erweitere das dann Schritt für Schrit ...
|
| In das Form Lisp wechseln |
 |
Rund um AutoCAD : Daten aus Exel Tabelle in Autocad verarbeiten
archtools am 15.10.2025 um 10:14 Uhr (15)
Zitat:Original erstellt von Vino:[EDIT]Ah Sorry, ich hatte überlesen, dass es anscheinend um Schnitte und auch noch um mehrere geht...Da wird das so nicht funktionieren... Das wäre für X-Y-Z-Werte.[/EDIT]Dabei würde die Punktnummer stören, aber man kann ja beim Exportieren in eine CSV Datei diese Spalte weglassen. Dann klappt das auch. Aber vielleicht ist die Höhendifferenz ja immer nur zum vorausgegangenen Punkt angegeben, dann muss man das noch überarbeiten.Und wir wissen ja gar nicht, was da konkret gez ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : Spline schliessen
archtools am 04.09.2022 um 10:08 Uhr (1)
Zitat:Original erstellt von ositodepeluche:Mein eigentliches Problem ist ja aber, dass ich den Befehl _SKETCH nicht mit «ESC» (2*ESC auf der Stifttaste) aus der LISP rauskomme, wenn die Linie nicht abgeschlossen ist. Es wird dann einfach die letzte abgeschlossene Spline geschlossen und die Schlaufe geht weiter. Dies versuchte ich ja mit meinem ersten Versuch zu umgehen. Hat mir da jemand einen Ansatz?Besten Dank und LG ossoDamit geht es. Aufruf mit (mycommand "._SKETCH"):(defun mycommand (cmnd / oldecho) ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Lisp-Prog. ändern und habe keine Ahnung!
archtools am 07.01.2007 um 12:46 Uhr (0)
Zitat:Original erstellt von Burschii:Gewußt wie!!! Klappt Prima.Danke vielmals.Gruß, BurschiiIch weiss, ich mach mich damit immer wieder unbeliebt, aber es ist nun mal ein Fakt: dass Du fremden Quellcode hier veröffentlichst, ohne auf eine ausdrückliche Erlaubnis des Urhebers zu verweisen, kann einerseits als Straftat verfolgt werden und kann andererseits recht drastische zivilrechtliche Folgen für Dich haben, wenn Du so eine Erlaubnis tatsächlich nicht hast.In Zeiten, in denen große Firmen ein gut funkti ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Block um Einfügepunkt drehen
archtools am 16.03.2010 um 22:34 Uhr (0)
Zitat:Original erstellt von Bauvermesser:Hallo,benutze aus diesem Forum eine LSP zum Drehen eines Blockes um den Einfügepunkt.Nimm das hier:Code:(defun modent (ename dxf val / old) (if (setq old (assoc dxf (entget ename))) (entmod (subst (cons dxf val) old (entget ename) ) ) (entmod (cons (cons dxf val) (entget ename))) ))Damit kannst Du fast alles ändern. Den Drehwinkel der Einfügung findest Du in DXF-Gruppencode 50. Um den auf 90° zu bringen, schreibst Du also:Befehl: (modent (car (entsel) ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Alternativen zu AutoCAD
archtools am 07.09.2009 um 09:28 Uhr (0)
Zitat:Original erstellt von SIngo:Nochmals Danke für die Tipps.Wir werden jetzt einmal "ZWCAD 2009i Standard" für einen Monat testen.Der Anfängliche Vorteil ist sicherlich die identische Oberfläche zu ACAD 2009.Weiters ist mir aufgefallen das es für ZWCAD auch Hardwaredongle gibt. Ich vermute, dass damit die SW des öfteren installiert aber immer nur 1x genutzt werden kann.Gibt es für ACAD dasselbe?Aus meiner Sicht als Entwickler hat ZwCAD gegenüber BricsCAD den Nachteil, dass der LISP-Interpreter nicht vo ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : Schraffurbasispunkt
archtools am 10.06.2008 um 14:05 Uhr (0)
Zitat:Code:(defun c:test (/ vlaBound lstIslands oSpace) (setq oSpace (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)))) (setq vlaBound (vla-AddLightWeightPolyline oSpace (list_to_variant (list 0.0 0.0 0.0 200.0 200.0 200.0 200.0 0.0) vlax-vbDouble))) (vla-put-closed vlaBound :vlax-true) (setq lstIslands (list (vla-AddCircle oSpace (vlax-3d-point (list 30.0 30. 0.0)) 20.0) (vla-AddCircle oSpace (vlax-3d-point (list 60.0 60. 0.0)) 20.0))) (schraffbe "ANSI31" 5 0.0 vlaBound lstIslands ...
|
| In das Form Lisp wechseln |
|
Lisp : Eigenes Programm auf fremder HP
archtools am 28.06.2007 um 17:16 Uhr (0)
Zitat:Original erstellt von CADchup:Viel wichtiger ist doch, dass nur noch selten fremder Code hier gepostet wird, und das ist IMHO durchaus auf eine allgemein intensivere Auseinandersetzung mit dem Thema zurückzuführen.Da hast Du recht. Mir ist das auch schon aufgefallen, aber dass das auf mich zurück geht, wage ich dann doch zu bezweifeln :-) Ich vermute eher, dass v.a. wegen VBA und auch wegen des wachsenden Funktionsumfangs von AutoCAD das Interesse an Lisp zurück geht, und dass deshalb weniger als fr ...
|
| In das Form Lisp wechseln |
|
Lisp : Auwahl Blöcke in lsp
archtools am 21.02.2013 um 22:16 Uhr (0)
Zitat:Original erstellt von Bauvermesser:also mit dem Fachsimpel kann ich ja nicht mitreden anbei die lsp welche bei mir geht,Fremden Code sehe ich mir nur an, wenn er leserlich formatiert ist. Als allgemeiner Hinweis: man programmiert in Lisp nicht, indem man für eine Problemlösung alles in eine Funktion packt, sondern man unterteilt sein Problem in eine Reihe kleinerer, möglichst allgemeiner Probleme (diese allgemein verwendbaren Funktionen sammelt man in einer Toolbox). Es kommt nur selten vor, dass Li ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp Station einer Gradiente
archtools am 08.04.2023 um 14:11 Uhr (1)
Zitat:Original erstellt von KlaK:@archtools: Die Begriffe die hier verwendet werden sind spezielle Begriffe aus dem Aufsatz Civil 3D und so eigentlich schon korrekt und eindeutig. Alle Fachbegriffe aller Branchen sind ziemlich eindeutig, aber sie sind eben den Leuten außerhalb dieser Branche fast immer unbekannt. Da erwarte ich schon, dass jemand, der um Hilfe bittet, auf Nachfrage (!) wenigstens klar sagt, um was es sich dabei handelt.Der OP hat sich ja auch auch fachlich und mathematisch falsch ausgedrüc ...
|
| In das Form Lisp wechseln |
