|
Lisp : Gitterkoordinaten
joern bosse am 12.04.2013 um 15:42 Uhr (0)
Hallo Jourjik,ich habe bei mir 2 Fälle1. die aktuelle Schrifthöhe nicht definiert (0.0)Befehl: (command "text" "p" "ml" (0.0 0.0 0.0) 2.0 0.0 "TEST")textAktueller Textstil: "Standard" Texthöhe: 2.5000 Beschriftung: NeinStartpunkt des Texts angeben oder [Position/Stil]: p Option eingeben [Ausrichten/anPassen/Zentrieren/MIttel/Rechts/OL/OZ/OR/ML/MZ/MR/UL/UZ/UR]: mlMittleren/linken Punkt des Texts angeben:Höhe angeben 2.5000: 2.000000000000000Drehwinkel des Texts angeben 0: 0.000000000000000Text eingeben: TES ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Bemassung
joern bosse am 11.05.2005 um 10:55 Uhr (0)
Hallo, ich denke die Variableneinstellung von DIMEXO ist nicht das Problem, den das ist ja nur der Abstand vom zu vermasssenden Objekt zur Hilslinien selbst. Die Hilsfslinie soll aber wohl eine fest Länge bekommen. Ich würde da einfach den Anfangspunkt der ersten und zweiten Hilfslinie um ein variables Maß verschieben, so daß die Hilfslinien immer die gleiche Länge hat. probiert habe ich es mal aber das klappt nur bei gedrehten Bemassungen, ist nur ein Gedankenansatz, mehr nicht. (defun c:test ( / ent def1 ...
|
| In das Form AutoLisp wechseln |
|
Lisp : probleme mit acad startdatei
Bauvermesser am 25.01.2022 um 10:36 Uhr (1)
hallo, erstmal danke für die umfangreiche Unterstützung. Ich habe eine Radikalkur für meine Installation gemacht.Alle Menüs entladen und neu geladen, einschließlich der acad.mns. Die Express-Tools habe ich auf die deutsche Varianteüberspielt und auch neu geladen.Einstellungen wurden nochmals verglichen mit dem alten Rechner und sind wie folgt:acadlspasdoc =1SDI=0NOMUTT=0cmdecho in der startlsp wieder auf 1Die Sicherung der *.BAK wird jetzt so wie vorgegeben in einen extra Ordner verschoben. Der Fehler mit ...
|
| In das Form Lisp wechseln |
|
Lisp : regen läuft zu langsam
cadplayer am 18.01.2013 um 09:23 Uhr (0)
hi danke erstmal fuer eure guten kommentarecadffmZitat:möchte ich auf die Funktion AIDIMTEXTMOVE mit Option 0 , 1 und 2 hinweisenist optimal mit wenig aufwand umsetzbar.meldin Zitat:Vielleicht hift dir da schon entupdentupd in der while schleife arbeite nicht gleich "regen" oder?archtoolsZitat:Da hast in c:mot3 ja das REGEN in der While-Schleife stehen. Kein Wunder, dass Dein Rechner da stehen bleibt ...mein rechner bleibt nicht stehen er läuft nur träge, weil er immer erst regenerieren muss, bevor die tex ...
|
| In das Form Lisp wechseln |
|
Lisp : Insert verschieben in anderen Insert
HPW am 22.08.2017 um 11:38 Uhr (1)
Hallo,Habe nun ein Problem:Code:ent_info1 : ((0 . INSERT) (330 . Objektname: 7efec4d0) (5 . 140D8) (100 . AcDbEntity) (67 . 0) (8 . KCAD) (100 . AcDbBlockReference) (2 . GEN22B0C0ABJVE9) (10 0.0 0.0 0.0) (41 . 1.0) (42 . 1.0) (43 . 1.0) (50 . 0.0) (70 . 0) (71 . 0) (44 . 0.0) (45 . 0.0) (210 0.0 0.0 1.0))ent_info2 : ((0 . INSERT) (330 . Objektname: 7efe0240) (5 . 1433C) (100 . AcDbEntity) (67 . 0) (410 . Model) (8 . kcadsbg) (100 . AcDbBlockReference) (66 . 1) (2 . INT225751_[__200.010]_J5253_DK_1_1_1) (10 ...
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit TRANS
fred_tomke am 20.04.2011 um 10:25 Uhr (0)
Hallo, Jörn,für den Fall, dass Du die Linienendpunkte der Blockdefinition basierend auf den Blockreferenzen incl. Drehung und Skalierung haben willst, wäre das der erste Teil des Auslesens der Punkte unter Anwendung der Beispiele aus dem von Dir angegebenen Link.Code:(defun c:test (/ lstPoints entBlock lstEnt ptBase reaAngle vecNormal vecVector matScale matRotation) (setq lstPoints (list (list 0 10 0) (list 10 0 0) (list 0 -10 0) (list -10 0 0))) (setq entBlock (car (entsel))) (setq lstEnt (entget e ...
|
| In das Form Lisp wechseln |
|
Lisp : Ende für Doslib??
walter.f am 03.04.2006 um 10:48 Uhr (0)
Hallo!Nur der Vollständigkeit halber...Pressemitteilung von McNeel vom 30. März..."DOSLib für AutoCAD 2007 Seattle 30. März 2006 McNeel kündigte heute die Release von DOSLib an, einer Bibliothek mit über LISP aufrufbaren Funktionen, die dem Windows Betriebssystem und DOS die Funktionalität der Befehlszeile in AutoCAD 2000-2007 liefern. DOSLib ist kostenlos.DOSLib erweitert AutoLISP, um die folgenden Funktionen zu bieten: Laufwerke: Überprüfen von Laufwerken, Wechseln zwischen Laufwerken und Überprüfen vo ...
|
| In das Form Lisp wechseln |
|
Lisp : probleme mit acad startdatei
cadffm am 17.01.2022 um 11:32 Uhr (1)
Hallo,"Das Verschieben der Sicherungsdatei mit -savefilepath- wird nicht angenommen, sondern es werden die bak Dateien im Verzeichnis der orig. dwg gespeichert."Die Variable hat auch nichts mit der "händisch" gespeicherten *.bak zutun?"Habe cmdecho extra am Schluss der Startlsp nochmal auf 0 gesetzt, beim Start steht dieser Befehl wieder auf 1."Macht ja wenig Sinn bei einer Voreinstellung =1, welche nicht gespeichert wird."Irgend eine Einstellung scheint hier alles zu überschreiben. Wer hat noch einen Rat? ...
|
| In das Form Lisp wechseln |
|
Lisp : text konstant verschieben
joern bosse am 08.10.2009 um 08:44 Uhr (0)
Hallo CAD-Player,ich würde folgendermaßen beginnen:1. Text und Polylinie auswählen2. Koordinatenliste aus LWPOLYLINE oder POLYLINE3. Basispunkt des Textes (GC 10)4. Koordinatenliste sortieren nach kleinsten Abstand zu Textbasispunkt (so kann es aber auch sein, das der Text an einen Stützpunkt innerhalb der Poly "rangezogen wird"5. Textbasispunkt ändern (1. Punkt der sortierten Koordinatenliste)6. Layer Poly ändernCode:(defun c:test ( / BASIS_TEXT KOORD_POLY OBJ_POLY OBJ_TEXT)(if (and (setq obj_text(car(ent ...
|
| In das Form Lisp wechseln |
|
Lisp : Gruppieren mit AutoLISP
DivePete am 22.02.2017 um 14:26 Uhr (1)
Zitat:Original erstellt von cadffm:Abgesehen davon ob man nicht vielleicht mit dem passenden Programm für diese Aufgabe arbeiten sollte.Dynamische Blöcke sicher zum großen Teil sinnvoll eingesetzt werden könnten.Ein normaler Block mit XY-Skalierung auch eine Kompromisslösung darstellt.So würde ich schon mal eine geschlossene Polylinie + Linie den fünf Einzellinien vorziehen.Ob man dann noch eine Gruppierung der 2 Objekte benötigt?Falls ja: Für die Geometrie ist ja schon kein Lisp notwendig, auch nutzt du z ...
|
| In das Form Lisp wechseln |
|
Lisp : Elemente auf eine definierte Einfügehöhe verschieben
ChristianBermpohl am 18.03.2016 um 16:52 Uhr (1)
Schön das mein Problem jetzt verstanden wurde. Sorry nochmal für meine wohl nicht immer verständliche Formulierung.Da die Daten für einen Circle wohl erst zu einem späteren Zeitpunkt von AutoCAD geliefert werden habe versucht die Logik in den Reaktor :vlr-commandEnded zu implementieren. Hier meine erweiterte Funktion "after"#################################################################################################################################; nach dem Befehl....(defun after(reatyp befname /) (co ...
|
| In das Form Lisp wechseln |
|
Lisp : ACET Expresstoolsfunktionen dokumentation
cadplayer am 30.01.2013 um 17:45 Uhr (0)
Danke, die hatte ich zwar schon entdeckt - dennoch sind da nicht alle Funktionen drin Ich möchte eine Sache checken, und zwar habe ich mir aus der tcircle funktion Teile entnommen, die es mir ermöglichen zu einem gew. Text eine Textfahne zu zeichen.Code:(defun c:xxx ( / *error* na e1 a lobj) (defun *error* (msg) (princ msg) ) (acet-error-init (list (list "cmdecho" 0 "highlight" (getvar "highlight") "limcheck" 0 );list T );list );acet-error-init (setq flt ((-4 . "OR") ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl Zurück (_undo)
Bernd10 am 15.10.2008 um 10:58 Uhr (0)
Hallo Heiko, Zitat:Original erstellt von Dorfy:Dann zeig doch mal ein wenig Code,dann kann man ja mal mitgrübeln...Mfg Heikohier der gewünschte Code eines Befehls, während dessen die Lisp-Ausdrücke in die Liste des Zurück-Befehls eingetragen werden:( defun c:ddzinfo ( / ferrorsav lzinfoangaben ) ; Den Namen der Funktion für den Error-Fall sichern (vl-doc-set *cfunktionsave* "c:ddzinfo") ; Die Fehlerbehandlung vorbereiten (setq ferrorsav *error*) ; bisherigen errorhandler sichern (lok ...
|
| In das Form Lisp wechseln |
