|
AutoLisp : Texte mit Leerzeichen finden
flaschenpost am 07.01.2005 um 15:39 Uhr (0)
Das IST : Bei einem Forumsmitglied haben sich alle Texte in der Zeichnung in Buchstaben aufgelöst. Das SOLL : Ist auch schon fertig - eine Routine, die seine Buchstaben zusammensucht und wieder Texte draus macht. Hatte ich ihm gestern ins Blaue hinein gemacht und funktioniert auch ganz gut. An Dummies hatte ich auch schon gedacht, z.B. Tilde, aber ich wollte gar nicht groß an der Lisp ändern, weil ich die genauen Details in seinen Zeichnungen gar nicht kenne. Was mich vor allem gewundert hatte, dass ssget ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Layout-Modus die Layer gefroren oder getaut
Nano am 13.06.2010 um 09:19 Uhr (0)
HalloMit diesem Lisp kann ich feststelle ob ein Layerein- oder aus-geblendet ist.(SETQ mf026dump (tblnext "LAYER" T)) (WHILE (/= mf026dump nil) (SETQ mf026-an-aus (cdr (assoc 62 mf026dump))) (SETQ mf026dump (tblnext "layer")) ))bei "assoc 62" Farbe ob negativ oder positiv istAusgaben: ((0 . "LAYER") (2 . "0") (70 . 0) (62 . 7) (6 . "Continuous"))EINGEBLENDETAusgaben: ((0 . "LAYER") (2 . "0") (70 . 0) (62 . -7) (6 . "Continuous"))AUSGEBLENDETWie kann ich feststellen ob im MansFenster "Layout-Modus" die L ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
Paulchen am 13.09.2006 um 10:18 Uhr (0)
Hallo Beate,die Sache mit _appload kann ich leider nicht nachvollziehen. Wenn ich bei mir diesenCode:(defun testauswahl (/ auswahl obj);lokale Variablen!(setq auswahl (ssget "X" (list (cons 0 "INSERT")(cons 2 "tesblock"))))(repeat(sslength AUSWAHL) (command "_explode" (setq OBJ(ssname AUSWAHL 0))) (ssdel OBJ AUSWAHL)))eingebe, so löst er alle Blöcke mit dem Namen "testblock" auf.Die "" in der 5. Zeile habe ich entfernt, da ACAD sonst den letzten Befehl erneut aufruft (entspricht [Enter] oder [Leertaste]). ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Zeichnungs-Objekte filtern
accs am 20.08.2003 um 09:56 Uhr (0)
Hallo Profis, bin noch etwas unerfahren mit Lisp, würde aber gerne was zum Befehl ssget wissen. Mit dem Befehl in der Form (setq objekte (ssget x ((0 . point )))) kann ich ja die Geometriedatenbank auf Punkte ausfiltern. Jetzt hätte ich gerne gewusst wie ich das, was hinter 0. steht, in diesem Fall point ändern kann. Ist das ein String? Wie kann ich den durch einen Variablennamen ersetzen? Habe folgendes probiert: setq a point , ssget x ((0 . a)))). da tut sich aber nix. wie muss ich die variab ...
|
| In das Form AutoLisp wechseln |
|
Lisp : amsetup in LISp Datei
CADmium am 05.11.2008 um 14:58 Uhr (0)
amconvdwg ruft intern die Dateiauswahl auf ( ohne sich um Filedia oder Expert zu scheren .. ist so programmiert) Vefolge deshalb mal die Programmierunegn von - (genconvert) - (gencnvrt-start)(defun gencnvrt-start(/ foo olderr) (setq foo(getfiled(genmsg"gencvt"1)"""ccf"2)))in der Datei gencnvrt.lspdieses ersetzt du am besten durch(defun gencnvrt-start(/ foo olderr) (if(or(setq foo(findfile "D:PROGSMEINE.CCF")) (setq foo(getfiled(genmsg"gencvt"1)"""ccf"2)) ) foo ))Nur irgendwelchen Code kopieren reic ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Text-Justify
Proxy am 02.03.2004 um 10:11 Uhr (0)
Habe ein kleines Problem. Versuche die Lisp und die DCL-Datei einzubinden jedoch bekomme ich die Fehlermeldung Abbruch : Ungeeignetes Objekt zum Binden: T bereits schon bei Start. Kann mir da einer auf die Sprünge helfen Code: ;//Elise Moss ;//Moss Designs ;//12/30/98 ;//www.mossdesigns.com ;// ; *** JUSTIFY.LSP *** ; ; Changes the justification of text to:- ; Left, Center, Right, Aligned, Middle, Fit, ; Bottom left, center or right, ; Middle left, center o ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Pedit / Verbinden
vision am 09.12.2003 um 12:22 Uhr (0)
AutoCAD 2002 Hallo, wer hatt noch Ressourcen frei und kann mir den Befehlsablauf zum verbinden von 2DPolylinien, wie unten aufgeführt, als Button-Befehl oder Lisp-Prg. erstellen? Befehl PEDIT: _pedit Polylinie wählen oder [mehrere Objekte]: o Objekte wählen: Option eingeben [Schließen/Öffnen/Verbinden/BReite/kurve Angleichen/Kurvenlinie/kurve LÖschen/LInientyp/Zurück]: v Fuzzy-Abstand eingeben oder [Verbindungstyp] 0.0000 : v Verbindungstyp eingeben [Dehnen/Hinzufügen/Beides] Hinzufügen : h Fuzzy-Absta ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Errorhander und DCL
marc.scherer am 30.01.2006 um 11:31 Uhr (0)
Zitat:Original erstellt von Kenny1:Ich habe die Vermutung, das dies mit DCL eh sehr schwierig ist.Hmm,nö.Wenn das mit dem Errorhandler und DCL nicht klappt würde ich sagen das es am Design Deiner Funktionen liegt.Wenn Du im Errorhandler beim Start das Undo Flag setzen läßt und Deine Funktion verursacht einen Fehler (im Sinne eines *error*, nicht was Dir vielleicht sinnlos erscheint, für Lisp aber KEINEN Fehler darstellt) sollte alles bis zu dem Zeitpunkt VOR dem Start Deiner Funktion zurückgesetzt werden, ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Falscher Block durch Lisp eingefügt
wronzky am 13.08.2008 um 16:15 Uhr (0)
Hi Robert,das liegt daran, dass Du die Definition der Funktion HK-SETZEN (und auch alle anderen) mit jedem Laden neu setzt. Dann ist immer die zuletzt definierte Funktion gültig.Verschiedene Möglichkeiten der Lösung:- Du benennst nicht nur die C:... Funktion um, sondern auch alle zugehörigen und erzeugst so eindeutige Namen.- Du schreibst die (Defun...)-Funktionen IN die (defun C:...) hinein, und definierst sie jedesmal beim Aufruf neu.- Du definierst die HK-SETZ-Funktion mit Übergabeparameter (= Blockname ...
|
| In das Form Lisp wechseln |
|
Lisp : Werte von Attributen in Blöcken ändern
Bernd P am 20.01.2021 um 11:35 Uhr (1)
Servus,hab mir das LISP angepasst, es wird kein Block eingefügt sondern es muss einer ausgewählt werden.Hab 3 Fragen dazu.1. Die Auswahl von dynamischen Blöcken funktioniert mit "(setq obj_ename (car(entsel "
Block wählen: ")))" nicht. mit "(setq obj_ename (vlax-ename-vla-object (car (entsel))))" bekomme ich "Fehlerhafter Argumenttyp: lentityp #VLA-OBJECT IAcadBlockReference 00000173bd877d88"2. Wenn die Attribute einen Mehrzeiligen Inhalt hatten funktioniert es auch nicht mehr. 3. Kann man den Inhalt aus e ...
|
| In das Form Lisp wechseln |
|
Lisp : lisp code?
chris888 am 02.02.2011 um 14:58 Uhr (0)
sooooohabs jetzt mal ausprobiert und1. die eingaben mit (0."line") also die . eingabe funktioniert iwie nicht kommt immer in der befehlszeile "fehlerhafte punktbezeichnung"[ich habs zumindest jetzt hinbekommen den befehl mit (cons 0 "line") hinzubekommen]2. alles toll was ihr mir da gezeigt habt aber ich will aus einem schon bestehenden auswahlsatz ausschliessen so wie wenn man die "shift" taste drückt.Problem: Ich hab objekte in einem bestimmten bereich die ich markieren will aber auf dem gleichen eigensc ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Linien-Bruch
vision am 09.12.2003 um 13:25 Uhr (0)
AutoCAD 2002 Hallo, ich möchte auf Linien (2DPolylinien mit einer Breite 0) die sich horizontal u. vertikal kreuzen, einen Bruch auf der horizontalen Linie mit dem Bruchabstand von jeweils 0,75 mm links u. rechts vom Schnittpunkt der vertikalen Linie einfügen. Ich habe dazu schon einige Tools ohne Erfolg ausprobiert. Auch verstehe ich nicht den Aufwand, den einige Prg. zum Brechen betreiben (z. B. _CIRCLE _TRIM _.ERASE KR _ZOOM ...). Ist es denn nicht möglich, den AutoCAD Bruchbefehl per LISP ...
|
| In das Form AutoLisp wechseln |
|
Lisp : LISP (ACAD2008) in ACAD2010 und höher
rswit am 23.04.2014 um 17:28 Uhr (1)
HalloIch verwende einige LISP Files in ACAD2008. Leider funktioniern diese nicht mehr im ACAD2010 und höher. Wie kann ich die Files umschreiben, damit diese wieder benutz werden können. Vielen Dank für eure Hilfe.Anwendung: Punktliste erstellenLSP: Punktliste.lspDCL: Punktliste.dcl (weiter unten)*****LSP****(prompt "PKT zum Starten")(defun C:pkt (/) (setq MD_ERR *ERROR* *ERROR* M:FEHLER ) ;_ end of setq ;;Marke für Zurück nach Abbruch setzen (command "_UNDO" "_MARK") ;Fangfunktion (set ...
|
| In das Form Lisp wechseln |
