 |
Lisp : Hilfestellung bei DXF-Wblock
tappenbeck am 28.03.2018 um 13:41 Uhr (15)
Moin!ich möchte einen Zeichnungsteil als Wblock rausschreiben (in Map2015) und dabei die Version auf R2000 festlegen.Es gibt ein Stück Code das an anderer Stelle schon einmal funktioniert hat.Code:(command "_-wblock" DxfFileName ;; Name neuer DWG y ;; Anzahl Dezimalstellen "" ;; neue Zeichnung (list 0 0 0) ;; Einfügepunkt aws ;; Objekte "" ;;Bestätigen "_n" ;; nur bei Map )Das klappt aber nicht - es wird unter anderem die Anzahl der Nachkommastellen a ...
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
AutoCADuser am 02.04.2008 um 16:08 Uhr (0)
heiko, ist klar...is halt bissal kürzer. Aber der selbe Ablauf. Wenn ich jetzt deinen code aus meiner Haupt-Lisp starten will, funktionierts nicht.code der Haupt-Lisp:(defun c:B ( / )(command "_.zoom" "_extents") (command "_.xref" "_detach" "*") (command "_.layer" "_unlock" "*" "") (command "_audit" "j") ;-----------------Starten von A---------------------(defun c:A () (Print "A läuft") (c:B) ; hier aufruf von B (print "wieder in A"))(defun c:B () (Print "B läuft"));-----------------Ende von A--- ...
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit TRANS
joern bosse am 24.03.2011 um 21:04 Uhr (0)
Einmal heute noch,kann ich ein Userkoordinatensystem ohne Namen erstellen?Wenn ich die mit Namen erstelle, dann muss ich im Schleifenablauf das vorher erstellte immer wieder löschen und dann wieder ein neues erstellen, und das geht stark an die Performance (unten links erscheint ständig der ACAD-Fortschrittsbalken (sucht in Zeichnung).Anders nochmal gefragt, die Variable USCORG, UCSXDIR und UCSYDIR sind schreibgeschützt, stellen aber das aktuelle Koordinatensystem dar. Aber dann ist das UCS ja nicht mit Na ...
|
| In das Form Lisp wechseln |
|
Lisp : Koordinaten einlesen
Marjo am 14.07.2023 um 09:50 Uhr (1)
Hallo zusammen, ich hoffe ihr könnt mir helfen. Ich arbeite mit AutoCAD und nutze hier und da auch AutoLisp. Bei uns kommt es oft vor, dass wir einen ganzen Satz an Koordinatenpunkten (X,Y und Z) bekommen und in einer Zeichnung entsprechende Blöcke an die Koordinaten setzen müssen. Bisher habe ich das mit einer LISP und der Funktion (command "._insert" "Blockname" "x,y,z" ...) gemacht, doch der Aufwand ist schon recht hoch, das für jedes Koordinatenpaar zu machen. Gibt es hier vielleicht die Möglichkeit d ...
|
| In das Form Lisp wechseln |
TestEntmod.dwg.txt |
Lisp : entmod / Objekt DIMENSION
Bernd10 am 10.05.2011 um 15:44 Uhr (0)
Hallo,ich habe ein Problem, wenn ich das Objekt DIMENSION mit der Funktion entmod ändern möchte. Ich möchte dabei die Linien, die zu den Punkten der Gruppencodes 13 und 14 führen verkürzen. Mit der Funktion entmod werden diese beiden Punkte zwar wie gewünscht geändert, aber die Linien bleiben trotzdem so lang wie vor dem Aufruf von entmod. Zum besseren Verständnis habe ich noch eine Beispiel-Zeichnung und Test-Lisp beigelegt.Was muss ich noch tun, damit die Linien zu den Punkten der Gruppencodes 13 und 14 ...
|
| In das Form Lisp wechseln |
|
Lisp : Liste der aktuell geöffneten Zeichnungen
Bernd10 am 08.10.2012 um 15:31 Uhr (0)
Hallo Thomas,danke für die schnelle Antwort.Zitat:Original erstellt von CADmium:(vl-load-com)(setq LISTE nil)(vlax-for I (vla-get-documents(vlax-get-acad-object)) (setq LISTE(cons(vla-get-fullname I)LISTE)))Es hat so funktioniert. Nur für die neue und noch nicht gespeicherte Zeichnung (z.B. Zeichnung1.dwg) bekomme ich nicht den Namen in der Liste, sondern nur den Wert "". Somit müsste ich statt vla-get-fullname wohl vla-get-name verwenden, wobei dann wieder das Verzeichnis für die bereits gespeicherten Ze ...
|
| In das Form Lisp wechseln |
|
Lisp : Mehrere Blöcke bearbeiten
joern bosse am 07.09.2015 um 10:33 Uhr (1)
Hallo Silcono,du könntest in einer Schleife alle Blocknamen der Zeichnung durchlaufen lassen und die Command-Befehle ausführen lassen:Code:(defun C:blockschr ( / ) (vl-load-com) (vlax-for ITEM (vla-get-blocks(vla-get-activedocument (vlax-get-acad-object))) (if (/=(substr(vla-get-Name ITEM)1 1)"*") (progn (command "-BBEARB" (vla-get-Name ITEM) "") (command "SCHRAFF" "SOLID" "F" "-500,-500" "500,500" "") (command "_BCLOSE" ""))) ) )WICHTIG: vorher alles speichern, denn ob AutoCAD ...
|
| In das Form Lisp wechseln |
|
Lisp : Layerstruktur bearbeiten
Geos am 11.04.2008 um 07:20 Uhr (0)
Zitat:Mehrere LISP-Programme in einer Zeichnung?Das sowieso!Aber auch mehrere Programme in einer LSP-Datei:(defun c:befehl (/...) code)(defun funktion (parameter / )code)Du kannst auch andere LSP-Dateien laden:(load "abc.lsp" "Meldung im Fehlerfall")Aufruf:(c:befehl) oder(funktion parameter)Du könntest sogar per Lisp andere LSP-Dateien (Programme) schreiben (print file),die Du dann laden und aufrufen kannst.------------------Schöne GrüßeErnst www.geopaint.at
|
| In das Form Lisp wechseln |
|
Lisp : Mit Lisp externes Programm starten
CADmium am 10.10.2008 um 09:06 Uhr (0)
einen Befehl ersetzen geht so(command "_undefine" "_close") ;; Befehl "löschen"(defun c:_close() ;; Befehl neu definieren (startapp "notepad") ;; z.b. Notpad atarten)(defun c:schliessen() (startapp "notepad")).. jetzt gibts den Befehl nicht mehr ( außer als _.close)(rückgängig gehts mit _redefine)besser ist jedoch der Aufruf in einem Reaktor, der dann gestartet wird , wenn die Zeichnung geschlossen werden soll.. das ist aber etwas tiefgehender und nicht unbedingt was für Anfänger ..----------- ...
|
| In das Form Lisp wechseln |
|
Lisp : Zweites Layer-Problem
Erich Klein am 17.07.2008 um 20:50 Uhr (0)
Hi,gerade habt Ihr mir geholfen mein Layer-Problem zu beseitigen, schon entstand das nächste Problem.In einer Zeichnung existieren 20 Layer. Ca. 8 oder 9 Layer sind ausgeschaltet. In einer Lisp-Routine von mir entsteht die Notwendigkeit, den Befehl "alle Layer ausschalten" einzusetzen und nur einen bestimmten Layer wieder einzuschalten. Nach Ablauf der Routine muss ich die Layer wieder einschalten. Die Layer, die vorher abgeschaltet waren, müssen aber abgeschaltet bleiben.Hat einer von Euch einen Tip für e ...
|
| In das Form Lisp wechseln |
|
Lisp : Objektwahl mit ssget
cm Zeichner am 14.05.2009 um 09:32 Uhr (0)
Hallo,bitte um Hilfe für folgendes Problem:Möchte eine Objektauswahl in einer Zeichnung treffen, wobei ich vorher durch Eingabe eines "Musterobjektes" einen Filter setzen möchte.(setq WAS_TYP (cons 0 WAS_TYP))Da kommt dann in meinem Beispiel (0 . "TEXT") raus(setq WAS_LAY (cons 8 WAS_LAY))Da kommt dann in meinem Beispiel (8 . "SI_DETAILPUNKT_NR") raus(setq SS (ssget (WAS_TYP WAS_LAY)))Da kommt dann beim MirFehler: Fehlerhaftes Punktargument Was ist falsch?Grüße Bernd
|
| In das Form Lisp wechseln |
|
AutoLisp : Voreinstellen von Eingaben
CADmium am 15.03.2006 um 13:08 Uhr (0)
für eine ACAD-Sitzung sollte der Ansatz über das BLACKBOARD ( gemeinsamer Variablenraum von ACAD) genügen ... ansonsten gibs als Speicherort noch die Registry oder - wie schon erwähnt- eine externe Datei(if(numberp(setq ABSTAND(vl-bb-ref BB-ABSTAND))) (progn (or(setq ABSTAND(getreal (strcat"
Abstand von Text"(rtos ABSTAND 2)":"))) (setq ABSTAND (vl-bb-ref BB-ABSTAND)) ) (vl-bb-set BB-ABSTAND ABSTAND) ) (progn (or(setq abstand(getreal "
Abstand von Text5.7:")) (setq abstand 5.7) ) (vl-b ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Warum funkt dieses lisp nicht in Briscad?
CAD-Huebner am 05.09.2011 um 10:29 Uhr (0)
Zuerst einmal gehört noch die Datei "kantopt.dcl" mit ins ZIP Archiv, sonst feht die Dialogsteuerdatei und das Programm läuft gar nicht.in dem Programm sind keine Kommentare enthalten, dafür eine etwas ungewöhnliche Art der Punkterstellung (als Zeichenketten) - warum - genialer Trick oder Unkenntniss? Es is der größte Aufwand, zuerst den genauen Zweck des Programmes zu verstehen bzw. wie die Ausgangsdaten aussehen könnten, dabei kannst du helfen - lege doch mal eine Zeichnung mit Vorher - Nachher dabei.--- ...
|
| In das Form Lisp wechseln |
