|
AutoLisp : verunsichert über (ssget _p)
fuchsi am 08.09.2005 um 13:02 Uhr (0)
Zitat:(defun fnkSset (Slist / i Sset) (setq i 0 Sset (ssget)) (while ( i (length Slist)) (setq Sset (ssadd (nth i Slist) Sset)) (setq i (1+ i)) ) Sset );defunich versteh jetzt zwar nicht, warum du da ein ssget drin hast (laut deiner beschreibung soll lediglich einem liste mit enames zu einem Auswahlsatz werden), aber egal.Warum willst du diesen Auswahlsatz mit (ssget "_p") ansprechen ? Wir arbeiten in Lisp, da gibt es doch bekanntlich Variablen. Wenn du diesen erstellten Auswahlsatz brauchst, da ...
|
| In das Form AutoLisp wechseln |
|
Lisp : DeepSeek als Lisp-Code-Generator
archtools am 01.02.2025 um 10:11 Uhr (1)
Zitat:Original erstellt von archtools:Zunächst habe ich mich vergewissert, dass DeepSeek weiß, was ein Lindenmayer-System ist, habe nach der grundsätzlichen Formulierung einer Eiche als L-System gefragt, und dann um die Umsetzung als AutoLisp Code gebeten. Es kam ein vernünftig aussehendes Programm zustande.Die exakt gleiche Frage habe ich ChatGPT gestellt. Das gelieferte Programm hatte ganz deutlich schlechtere Qualität als das von DeepSeek. Es fehlten alle lokalen Variablendeklarationen, es wurden Lisp-F ...
|
| In das Form Lisp wechseln |
|
Lisp : Kann man ein einzelnes Objekt regenerieren?
autocart am 07.11.2006 um 12:19 Uhr (0)
Guten Tag!Mit redraw kann man ja einzelne Elemente neuzeichnen.Kann man irgentwie eigentlich auch einzelne Elemente (mehrere ausgewählte oder wirklich nur eines) regenerieren? Wäre super.Aktueller Fall: Ich ändere die Eigenschaften von einem Objekt oder verschiebe es oder so. Dadurch wird die Darstellung der Anzeigereihenfolge verändert (Objekt wird in den Vordergrund geschoben), obwohl in der Datenbank die richtige Reihenfolge gespeichert bleibt. Mit redraw wird die Anzeigereihenfolge nicht aktualisiert. ...
|
| In das Form Lisp wechseln |
|
Lisp : dynamische Anzeige am Fadenkreuz
cadplayer am 14.03.2012 um 14:07 Uhr (0)
Hi!Ich möchte gern Höhen von einem Bezugstext aus setzen. Mich würde interessieren, ob es in Lisp eine Möglichkeit gibt: bevor der neue Text gesetzt wird, anzuzeigen welchen berechneten Wert der Text ergibt.Mir also gleich am Fadenkreuz angezeigt wird, welche neue Höhe kommt nach Position des Fadenkreuzes.Code:(defun c:znh () (setq obj (entget (car (entsel "
Wähle Textobjekt ! "))) p1 (cdr (assoc 10 obj)) ha (atof (cdr (assoc 1 obj))) pro (getreal "
Prozent ! ") ) (while (setq p2 (getpoint "
Zielpunkt ...
|
| In das Form Lisp wechseln |
|
Lisp : Blöcke durchnummerieren
joern bosse am 10.06.2007 um 08:49 Uhr (0)
Hallo Hein,na das hast Du aber eine ziemlich lange Liste mit Forderungen, soetwas bekomme ich von meinen Kunden auch öfters, aber die beauftragen mich ja dann auch, die Programmierung zu machen.Anbei ein Code, mit dem Du genau das 5te Attribut von ausgewählten Blöcken hochzählen kannst. Weil Du verschiedene Blockname hast, solltes Du bei der Objektauswahl den Befehl "FILTER" verwenden und die verschiedenen Blöcke in mehreren Arbeitsgängen bearbeiten.Code:(defun c:att5_nr ( / AWS M N NEXT_OBJ NR) (princ "
B ...
|
| In das Form Lisp wechseln |
|
Lisp : set_tile für text in DCL: Leerstellenproblem
Peter2 am 23.10.2009 um 17:30 Uhr (0)
Ein nicht so wichtiges, aber anscheinend seltsames Problem:Standard:Ich habe im DCL ein Feld als ":text { " definiert und spreche es über Lisp mit set_tile an.Das funktioniert alles gut; Leerstellen werden angezeigt.Weil der Text sehr lang werden kann, habe ich einen Textkürzer eingebaut - die Textvariable schaut dann so aus:Code:"c:datenlibla1libla2l......a34libla35mein_langer_test.xls"Das funktioniert alles gut, solange es keine Leerstellen gibt.Problem:Befinden sich in dem abgekürzten Text Leerstell ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Höhenkote Lisp Code 3 Fragen
Theodor Schoenwald am 13.02.2005 um 09:16 Uhr (0)
Hallo Werner, @Alle Durch das schlau-dapige (Dialektwort) Verhalten, des ABDN wurde diese interessesante Diskusion angestoßen. Zum Thema: Etwas wollen, aber seinen Namen nicht nennen habe ich schon einmal geschrieben. Das Einzige was gegen die Unverschämtheit helfen würde, wäre - keine Antwort auf solche Beiträge - Aber im ersten Moment sieht man nur, dass jemand Hilfe sucht und man ihm helfen kann und übersieht dabei, dass es sich wieder um einen Schlaudapigen ohne Anstand handelt. @Werne ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Grenze des internen Stapels erreicht (simuliert)
tappenbeck am 11.05.2015 um 09:55 Uhr (1)
Moin !ich habe folgende Lisp-Funktion:Code:(defun EBLib_String_FunctionHeader ( EBLib_String_FunctionHeader#str EBLib_String_FunctionHeader#letter / anzahl result kette ) (setq result "" kette "") (if EBLib_String_FunctionHeader#str (progn (setq anzahl (strlen EBLib_Strin(EBLib_String_FunctionHeader "otto" "#")g_FunctionHeader#str)) (if ( anzahl 0)(EBLib_String_FunctionHeader "otto" "#") (progn (repeat (+ anzahl 4) (setq kette (strcat kette EBLib_String_FunctionHead ...
|
| In das Form Lisp wechseln |
|
Lisp : WKS / BKS einstellen
ReneReichel am 08.09.2022 um 07:57 Uhr (1)
Hallo cadffm,manchmal sieht man den Wald vor lauter Bäumen nicht... Zitat:Original erstellt von cadffm:Hi,1. Ja2. Warum nicht einfach den vorhandenen Befehl BKS verwenden? BKS welt setzen, machwasduwillst, BKS vorher setzenDanke für die Anregung, funktioniert natürlich...Zitat:Original erstellt von cadffm:3. Du könntest ja auch die Koordinaten umrechnen..!? (mit dem "ich benötige WKS" hast du indirekt schon gesagt das du den nativen Befehl VERSETZ per command steuern möchtest, denn nur dann ist das nöti ...
|
| In das Form Lisp wechseln |
|
Lisp : Umbenennen von Blöcken!
CADmium am 15.05.2004 um 09:50 Uhr (0)
... Kritik ist ja berechtigt. Und auch ein cdate-vergleich bis eine entsprechende differenz auftritt ist möglich, aber letztendlich ist es doch egal, mit was ich den Prozessor beschäftige, oder ? .. und (repeat 10000 nil) .. passt in eine kurze Zeile @Axel.. oder kennst du eine Möglichkeit, mit Lisp einen Windows-Task für eine bestimmte Zeit zu stoppen, so daß sich der Rechner anderen (meist nicht vorhandenen Aufgaben) zuwenden kann ? - das wäre ökonomisch !Und Zufallszahlen .. die auch nur von cdate ab ...
|
| In das Form Lisp wechseln |
|
Lisp : Bemaßung in Blöcken
hfranke am 01.08.2006 um 16:45 Uhr (0)
Hallo,hier mein Problem: Ich füge mittels Lisp aus einer Vielzahl von dynamischen Blöcken Zeichnungen zusammen. Diese Blöcke enthalten auch Bemaßungen, die alle einem Bemaßungsstil zugeordnet sind. Da ich nun die erstellten Zeichnungen in verschiedenen Größen plotten möchte, wäre es schön, auch die Größe der Bemaßung (Text und Pfeile) anzupassen.Da die Bemaßungen innehalb der Blöcke sind, kann ich diese Anpassung entweder über den Skalierfaktor des Bemaßungsstiles oder über die Änderung der Größe des Bemaß ...
|
| In das Form Lisp wechseln |
knr.dwg.txt |
Lisp : Dynamischen Block via Lisp steuern
cadplayer am 12.06.2013 um 11:31 Uhr (0)
Mein Visualkenntnisse steigen zwar allmählich, aber stehe ich hier vor einer neuen Tür.Code:;; From: "Tony Tanzillo" ;; Newsgroups: autodesk.autocad.customization;; Sent: Friday, May 13, 2005 6:37 AM;; Subject: Re: DynamicBlock method;; Get a single dynamic block property object by name(defun dyGet (DynBlockRef Name) (vl-some (function (lambda (property) (if (eq (vlax-get-property property PropertyName) Name) property ) ) ) (vlax-safearray-list (vlax-variant-value ...
|
| In das Form Lisp wechseln |
|
Lisp : Überprüfung von Elementwahl
ryfCAD am 23.08.2019 um 16:05 Uhr (1)
Hallo und besten Dank!Habe die Lösung von Spider_DD mal integriert und funktioniert:@cadffm: die Formatierung geht mit copy-paste irgendwie verloren, kopiere aus Notepad++, die Einrückungen mache ich mit Tabscode:(defun c:rC-Messen_Winkel-Prozent( / sli li x1 x2 y1 y2 proz Prozentstr winkel Winkelstr) ;Meldung (princ " ") (princ "
rC © ryfB FUNKTION: misst Neigung einer Linie in Grad und %") (princ) ;Linie wählen: (while (not (and (setq sli (entsel "
Linie wählen ")) (= (cdr (asso ...
|
| In das Form Lisp wechseln |
