|
Lisp : Insert mit BP-Definition
Dorfy am 02.07.2007 um 11:17 Uhr (0)
Hallo,ich möchte via LISP einen Block einfügen und beim Einfügen den Basispunkt frei wählen.Laut ACAD-Hilfe:Der Block wird vorübergehend an seiner aktuellen Position in der Zeichnung abgelegt, sodass Sie einen neuen Basispunkt für die Blockreferenz angeben können, während Sie diese an die gewünschte Position ziehen. Dies wirkt sich jedoch nicht auf den ursprünglich für die Blockreferenz definierten Basispunkt aus.So weit so gut, nur wird der Block vorübergehend im Weltkoordinatensystem auf 0,0,0 abgelegt u ...
|
| In das Form Lisp wechseln |
|
Lisp : Abrunden mit Command funktioniert nicht
joern bosse am 06.12.2011 um 18:14 Uhr (0)
Hallo,es gab schon mal ein ähnliches Thema: http://ww3.cad.de/foren/ubb/Forum145/HTML/002911.shtml#000006 Mein Problem: in der anhängenden Zeichnung probiere ich die beiden unteren Polylinien mit Abrunden mit dem Radius 25.0 abzurunden.Wenn ich den Befehl ABRUNDEN in der Befehlszeile aufrufe, dann kann ich die unteren beiden Polylinien abrunden.Wenn ich den Command-Aufruf (command "_.fillet" (entsel)(entsel)) verwende, dann geht es nicht (die ungefähren Pickpunkte habe ich versucht, mit den Pfeilen darzust ...
|
| In das Form Lisp wechseln |
|
Lisp : Abrunden mit Command funktioniert nicht
joern bosse am 06.12.2011 um 18:14 Uhr (0)
Hallo,es gab schon mal ein ähnliches Thema: http://ww3.cad.de/foren/ubb/Forum145/HTML/002911.shtml#000006 Mein Problem: in der anhängenden Zeichnung probiere ich die beiden unteren Polylinien mit Abrunden mit dem Radius 25.0 abzurunden.Wenn ich den Befehl ABRUNDEN in der Befehlszeile aufrufe, dann kann ich die unteren beiden Polylinien abrunden.Wenn ich den Command-Aufruf (command "_.fillet" (entsel)(entsel)) verwende, dann geht es nicht (die ungefähren Pickpunkte habe ich versucht, mit den Pfeilen darzust ...
|
| In das Form Lisp wechseln |
|
Lisp : Kranke Polylinien?
alfred neswadba am 25.07.2011 um 13:42 Uhr (0)
Hi,ich bin kein LISPler, aber in Deinem Dump fällt mir auf: ; IAcadLWPolyline: AutoCAD Lightweight Polyline-Schnittstelle (optimierte Polylinie) [...] ; ObjectName (RO) = "AcDb2dPolyline"Wenn man mit der Schnittstelle der LWPoly auf die 2D-Poly hinfährt, dann fährt man mit dem falschen Interface auf das Objekt, oder? Es müsste bei einer LWPoly als ObjectName doch AcDbPolyline herauskommen, oder lieg ich da falsch?Ich nehme an, Du hast vor der Änderung einen Zeiger auf Deine LWPoly gespeichert, dann baust D ...
|
| In das Form Lisp wechseln |
|
Lisp : VRML export
fuchsi am 21.11.2003 um 13:44 Uhr (0)
hallo ich bin gerade dabei einen VRML exporter zu schreibendazu mache ich vom volumenkörper einen 3dsoutimportieren das ganze wieder in eine zeichnung , und habe damit lauter 3ecks-flächen , die ich relativ leicht in eine vrlm-dateials IndexedFaceSet rausschreiben kann.nur gefällt mir die methode mit 3dsout und 3dsin nicht. weiss wer eine andere methode , umd volumenkörper in flächenkörper zu wandeln ?leider sind ja die element-daten von den volumenkörper, regionen und bodys nicht gerade lesbar (verschlüss ...
|
| In das Form Lisp wechseln |
|
Lisp : Mehrere Layer markieren & kopieren
Emu1989 am 16.12.2019 um 12:22 Uhr (1)
Guten Tag alleDa es nicht möglich ist im Layermanager die Layernamen zu markieren und eine dementsprechende Auswahl auf dem Modell zu übertragen, versuche ich dies mit einer lisp zu lösen.Ich habe hier eine lisp zusammen gebastelt, welche jedoch nur funktioniert, wenn man einen Layer auf der Zeichnung auswählt:(defun c:LAW ()(setq auswahl (ssget))(repeat (setq N (sslength auswahl))(setq TargAus (ssname auswahl (setq N (- N 1)))) (setq TargLay (assoc 8 (entget TargAus))) (sssetfirst nil (ssget "_X" (list Ta ...
|
| In das Form Lisp wechseln |
|
AutoLisp : ssget "X" - abfrage mit # im namen
samberger am 15.04.2004 um 14:41 Uhr (0)
für ein kleines lisp-programm (ACAD 2004) verwende ich die abfrage : (ssget X (list (0 . INSERT ) (2 . LA-PL-SCHRIFTKOPF ) (cons 410 NAME)))) wobei name den textwert eines Layouts der aktuellen Zeichnung enthält (z.B. (410 . D2006-0 )). nun zu meinem problem : wenn ich an den layoutnamen eine Raute (#) anhänge - kundenvorgabe - funktioniert die obige abfrage nicht mehr ! und gibt nil zurück obwohl das element vorhanden ist. (entget (car (entsel))) liefert zwar schön : ((-1 . Objektname: 7e289a1 ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Suche nach Farbe 255,255,255 per Lisp oder Befehlsstring
Manuel486 am 12.02.2020 um 16:36 Uhr (1)
Zur Erklärung was ich mache.Ich bereite einen Plan vom Architekten auf.Wir haben einen gewissen Ablauf der zu 90% immer gleich ist.Layer 0 aktuell / Layer Entsperren / Layer Tauen / Layer Ein / Layer Lstärke VorlageLayout löschen / Modell aktuell (bei mehren Layouts können alle raus)5x burst hier bräuchte ich einen Befehl der Burst macht bis er nichts mehr findetLöscht alle Punkte + Abdeckungen in der Zeichnung (für uns unwichtig)Neuer Layer _A-BEMASSUNG + _A-BEMASSUNG-INNEN (hier kommt später die Bemassun ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Inserts in allen Layouts löschen
StefanW am 28.02.2006 um 09:52 Uhr (0)
Hallo !Folgende Situation möchte ich gerne abhandeln:In einer Zeichnung sind auf x Layouts Blöcke (Blockeinfügungen, Inserts) platziert. Diese möchte ich gerne in allen Layouts löschen (wegen Abgabe der Datei an andere).Befehle wie Löschen oder auch eine Konstruktion über entdel versagen hier, da ja die Blockeinfügungen über verschiedene Layouts verteilt sind (Meldung: _erase 39 gefunden 38 befanden sich nicht im aktuellen Bereich).Ich habe mir bis jetzt so geholfen, das ich im Programm eine Layoutliste er ...
|
| In das Form AutoLisp wechseln |
|
Lisp : EXE-Datei in Lisp
Theodor Schoenwald am 27.03.2009 um 20:27 Uhr (0)
Hallo,in einem Lispprogramm wird eine EXE-Datei aufgerufen, die eine Datei mit Namen "DEMO.DXF" erzeugt.Als nächstes wirt mit Findfile geprüft ob die Datei "DEMO.DXF" vorhanden ist.Wenn Ja, wird sie als Block in die aktuelle Zeichnung eingefügt. Wenn nicht, wird die Fehlermeldung ausgegeben, dass die "DEMO.DXF" nicht gefunden wurde.Das Programm habe ich vor ca. 4 Jahren erstellt und es läuft bisher bei verschiedenen Benutzern mit ACAD2000 bis ACAD2009 einwandfrei.Nur bei einem nicht! Da kommt die Meldung, ...
|
| In das Form Lisp wechseln |
|
Lisp : Hyperlink Attribut
Bernd P am 10.02.2011 um 13:30 Uhr (0)
ServusIch hab mehrere Blöcke mit dem Attribut Hyperlink in dem steht das Layout das angezeigt werden soll.Hab im Netz dieses LISP gefunden, es wandelt den Inhalt von Attribut Hyperlink zu einen Hyperlink um.Blöder weise erkennt er nicht das es sich dabei um eine "Ansicht dieser Zeichnung handelt" (AdZh).Hab das (strcat "#," hinzugefügt, jetzt erkennt er nach aufrufen von Hyperlink bei gewählten Objekt das es ein AdZh ist.Code:(defun c:BLK_Attribut2Hyperlink ( / ss ) (vl-load-com);; © JM 2010(if (ssget ((0 ...
|
| In das Form Lisp wechseln |
|
Lisp : AccoreConsole prozess kontrollieren
Meldin am 28.04.2018 um 09:48 Uhr (1)
Hallo Dirk,wie schon von mir angedeutetZitat:Natürlich weiß ich nicht wie umfangreich deine Dateien sind meinte ich auch das ich nicht weiß wo diese gespeichert sind. Aber hier hast du dir doch selber die Antwort gegeben. Das öffnen und speichern ist das Manko. Und so von außen könnte man jetzt nur noch Hinweise geben um den rest zu beschleunigen aber man kennt halt nicht die Zeichnung. Da mir die Bearbeitung des Rest auch lang vorkommt wäre die frage ob der Rahmen den du tauschen möchtest ein Block ist de ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Layer zusammenstellen
CADOpa am 01.11.2005 um 21:28 Uhr (0)
passt zu meinem Problem...ich habe eine interne Layerstruktur aufgebaut, die mit einer unverwechselbaren Zeichenfolge zunächst die Firma und dann den jeweiligen Arbeitsbereich der geplant wird abgrenzt. Diese Struktur binde ich per VBA ein und formatiere sie. dies ist notwendig, da viele Pläne von ausserhalb mit bis zu 350 Layern bei uns ankommen. Allerdings muss bis jetzt in jeder Zeichnung manuell der Eigenschaftenfilter über das Dialogfeld "Layereigenschaften-Manager definiert werden und über das Kontex ...
|
| In das Form AutoLisp wechseln |
