|
Lisp : Nach LISP-Durchlauf ACAD beenden
Mixtur244 am 13.07.2021 um 10:56 Uhr (1)
Hallo zusammen!Bin absoluter LISP-Anfänger und stehe vor einem Rätsel: Aus Beiträgen hier im Forum (Dank an alle Uploader!) habe ich beiliegende LISP-Routine gebastelt. Sie renderd automatische alle definierten Ansichten einer DWG und speichert sie ins Quellverzeichnis. Der Teil über den ==== tut genau das. Der Teil darunter soll DANACH die Datei ohne zu speichern verlassen und ACAD schließen. Das tut er auch, aber nicht DANACH, sondern unmittelbar. Ich suche also nach so einer Art Wenn-Dann Schleife, dami ...
|
| In das Form Lisp wechseln |
|
Lisp : Nach LISP-Durchlauf ACAD beenden
CADwiesel am 13.07.2021 um 11:17 Uhr (1)
Willkommen hier im Forum. Im richtigen Forum bist du ja schon mal gelandet... Dann bau doch alle Anweisungen aus dem 2.Progrämmchen in das Erste ein und das Problem mit dem Warten auf das Ende der ersten Funktion ist erledigt.das close muss dann als Letztes rein. Dann könnte es gehen------------------GrußCADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Lisp : Nach LISP-Durchlauf ACAD beenden
cadffm am 13.07.2021 um 11:24 Uhr (1)
ohne Erklärungenlösche alles ab(inkl.) der Zeile "================"Dann packe vor die letzte schließende Klammer von c:b_render folgende Zeile:(if (= (getvar "dbmod") 0) (command "_.QUIT") (command "_.QUIT" "_y"))Wenn es jetzt die einzige offene Datei war, dann sollte AutoCAD schließen.
|
| In das Form Lisp wechseln |
|
Lisp : Nach LISP-Durchlauf ACAD beenden
spider_dd am 13.07.2021 um 11:28 Uhr (1)
Hallo Mixtur, momentan definierts Du eine Funktion raus, die aber nie aufgerufen wird.Dafür steht Deine letzte Zeile (command "_quit") außerhalb aller Funktionen und wird daher beim laden sofort ausgeführt, denke ich mal (jetzt nicht getestet).Alles weitere ist ja schon gesagt.GrußThomas
|
| In das Form Lisp wechseln |
|
Lisp : Nach LISP-Durchlauf ACAD beenden
Mixtur244 am 13.07.2021 um 11:52 Uhr (1)
Dank an alle! Jetzt klappt es! Vielleicht habe ich ja sogar etwas gelernt für den nächsten Versuch...
|
| In das Form Lisp wechseln |
schraffur_notAzz.dwg.txt |
Lisp : Schraffur merkwürdig und neue Umgrenzung nicht assoziativ
tappenbeck am 13.07.2021 um 14:18 Uhr (1)
Moin!ich habe Schraffuren wie die aus der Anlage.Am Schluss muss ich daraus irgendwie ein MPoylgon erstellen.Nun wollte ich die Umgrenzung neu erstellen lassen und dann mit Lisp die Umgrenzungselemente abfragen. Aber bei der Abfrage kommen die Borders nicht mit.Dann habe ich mir das Element etwas näher angesehen und irgendwie wird die Schraffur nicht assoziativ. Auch die "frisch" aus der Schraffur abgeleiteten Border sind nicht assoziativ. Hier vermute ich auch warum ich diese nicht abfragen kann.Dann woll ...
|
| In das Form Lisp wechseln |
|
Lisp : Index automatisieren / Attribut (0 . ATTDEF) in Block (0 . INSERT) Filtern nach Wert
Manuel486 am 14.07.2021 um 08:36 Uhr (1)
Geht leider auch nicht. Code:(LOAD "G:/1000SONS/CAD/Faust/LISP/RRename/V1-3/RRename.VLX")RRENAME "Layouts" "([A-Z][A-Z][A-Z]-[0-9]-.-[A-Z][A-Z]-...-[0-9][0-9][0-9]-)(.)" "$1A"Ergebnis:Befehl: (LOAD "G:/1000SONS/CAD/Faust/LISP/Planstempel-anpassen/KD-Stempel-Index/TEST-RRENAME-Schreibweise-Kopie.lsp")RRename command loaded. (C)2021, CAD Studio - www.cadstudio.cz______ CAD, BIM, GIS/FM custom application development _______ "$1A"------------------________GrußManuel
|
| In das Form Lisp wechseln |
|
Lisp : Index automatisieren / Attribut (0 . ATTDEF) in Block (0 . INSERT) Filtern nach Wert
cadffm am 14.07.2021 um 11:11 Uhr (1)
"Im Script habe ich die Befehle ja zum laufen gebracht."Das hatte Udo sicher beim überfliegen nicht richtig gesehen, daher sein Post - der nicht für die Verwendung in einer Lispdatei gedacht war.Es gibt da immernoch mehrere (andere) Möglichkeiten für dich (Der Fokus ist ab und an eine Scheuklappe die das Sehen behindert )und auch wenn ich dir nichts zu Füßen legen möchte wie andere Tools, Hilfe zur Selbsthilfe immer wieder gern:"muss ich weiter mit meinen 26-Script und 26-Lisp arbeiten."Warum sagt mir me ...
|
| In das Form Lisp wechseln |
|
Lisp : Index automatisieren / Attribut (0 . ATTDEF) in Block (0 . INSERT) Filtern nach Wert
Manuel486 am 15.07.2021 um 08:26 Uhr (1)
"Schau dir vielleicht noch einmal dein SUCH-Muster an, vielleicht wäre es sinnvoller nach einem bestimmten Index zu suchen und diesen zu ersetzen"Wenn man es so hört, dann fragt man sich, warum man es nicht gleich so gemacht hat. Code:(DEFUN COPY-ATT (BLOCKNAME FROMatt TOatt / VALUE i l sset iBLK) (setq sset (ssget "x" (list (cons 2 BLOCKNAME)))) (if (= sset nil)(setq l 0)) (setq l (sslength sset)) (setq i 0) (repeat l (setq iBLK (ssname sset i)) (SETQ VALUE (GET-ATT FROMatt iBLK)) ...
|
| In das Form Lisp wechseln |
|
Lisp : LISP und OLE-Objekt
JotEs am 23.07.2021 um 12:30 Uhr (1)
Hallo zusammen,ich bin ein Anfänger mit LISP, aber trotzdem wollte ich ein Programm Schreiben, dass zwei Rahmen um in der Zeichnung eingebetetes OLE-Objekt (Bild) zeichnet: einen genau an Bildgrenzen und einen mit Abstand von 2 mm. (defun c:retan (/ p1 p2 p3 p4 p5 p6 p7 p8)(setq p1 (getpoint "
Unten Linkss: ")) (setq x1 (car p1)) (setq x1 (- x1 2)) (setq y1 (cadr p1)) (setq y1 (- y1 2))(setq p3 (getpoint "
Oben Rechts: ")) (setq x3 (car p3)) (setq x3 (+ x3 2)) (setq y3 (cadr p3)) (setq y3 (+ y3 2)) ...
|
| In das Form Lisp wechseln |
|
Lisp : LISP und OLE-Objekt
cadffm am 23.07.2021 um 12:49 Uhr (1)
Hi,einmal in der Hilfe zu AutoCAD [KLICK!] und einmal vom FAQ [KLICK!]Hoffe das war es.
|
| In das Form Lisp wechseln |
|
Lisp : LISP und OLE-Objekt
JotEs am 23.07.2021 um 21:40 Uhr (1)
Hallo cadffmdanke sehr für die schnelle Antwort und den richtigen Tipp. Wer hätte das gedacht, dass es einfach OSNAPCOORD 1 ist Noch mal danke.Schöne GrüßeJoachim
|
| In das Form Lisp wechseln |
|
Lisp : LISP und OLE-Objekt
cadffm am 23.07.2021 um 21:54 Uhr (1)
Für diesen Fall kann man es mit osnapcoord 1 regeln,die Erklärung selbst ist aber halt ein paar Worte mehr.Du kümmerst(e) dich nicht um die Objektefänge,weder über osmode noch in deiner (command ... ) Befehlsfolge.Somit hätte es mal funktioniert (wenn der ofang aus ist oder an der Koordinate nichts zu fangen ist mit den aktuellen Einstellungen des Objektfangesund mal nicht (wenn ofang eingeschaltet ist und es etwas zu fangen gibt).Die Voreinstellung osnapcoord ist 2, also Objektfang ignorieren bei (echter) ...
|
| In das Form Lisp wechseln |
