|
AutoLisp : GC 62
mapcar am 12.02.2003 um 10:28 Uhr (0)
Lisp hat immer nur einen Zeiger auf den Anfang einer Liste. Bei einem Append muss also (n - 1) mal der Zeiger auf das nächste Listenelement umgesetzt werden, um auf das letzte Element zu kommen (n ist die Länge der Liste). Dann erst hat der Interpreter das Ende gefunden, und es kommt noch eine Operation hinzu, um das neue Element anzuhängen. Es spielt keine Rolle, ob das anzuhängende Element ein Atom oder eine Liste ist. Also: Ein Append bei Länge n benötigt genau n Operationen. Ein Reverse ist komplexer: ...
|
|
AutoLisp : INITDIA / ATTDIA
marvin101010 am 17.02.2003 um 13:30 Uhr (0)
hallo...ne schöne neue woche erstma bin mal wieder total ratlos... habe eine lisp von mir 1:1 für einen anderen kundenstandard übernommen, mit der ich unter anderem attributblöcke einfüge. ursprünglich ging bei diesem vorgang die dialogbox zur attributsabfrage auf...und jetzt nix...nich mal in der commando zeile :-(( ich setz euch mal nen ausschnitt rein, wäre schön, wenn jemand ne idee hat...beide variationen funzen nicht (defun c:hp_ohne_symbol (/ pkt aktlay aktcol) (setvar "cmdecho" 0) (setq pkt (g ...
|
|
AutoLisp : ansichtsfenster koordianten
gmk am 17.02.2003 um 15:28 Uhr (0)
Hallo Axel! Im Anhang befindet sich eine lisp und dwg. Bei Punktwahl im layoutbereich erhalte ich als Ergebnis der Transformation immer die layout-Koordinate zurück. Was läuft da falsch?? Ciao Georg
|
|
AutoLisp : ansichtsfenster koordianten
gmk am 19.02.2003 um 14:14 Uhr (0)
Hi Axel! Bei Reini Urban habe ich folgende lisp gefunden. Wie schon vermutet und von Dir auch angesprochen befinden sich die Transformations-parameter im EED-Bereich des viewports. Bis zu ca. 5 Vorkommastellen funktioniert das ganze ohne Probleme. Ab 6-7 Vorkommastellen wird das Ergebnis jedoch sehr unscharf. (arbeite hauptsächlich mit Gauss-Krüger-Koordinaten, 7 Vorkommast. siehe auch Anhang) Kennst Du das Probl.? Wie kann ich die Genauigkeit in diesem Bereich erhöhen? (DEFUN C:ele () ; (defun #VPT_BOX ( ...
|
|
AutoLisp : Zahl Hochzählen
Dober Heinz am 20.02.2003 um 12:49 Uhr (0)
Danke Cad-lisp Aber so habe ich das nicht gemeint, das ich nach jeder Zahl ein Objekt anklicken muß, um den Layer festzulegen. Ich den Layer nur einmal festlegen und die Nummern einfügen. Danke Heinz
|
|
AutoLisp : Zahl Hochzählen
Dober Heinz am 20.02.2003 um 13:31 Uhr (0)
Danke cad-lisp war nicht so gemeint dafür gibts ein paar dance:
|
|
AutoLisp : Platzbedarf (Kontur) von AutoCAD-Objekten
cad-lisp am 27.02.2003 um 21:25 Uhr (0)
Hallo Axel, die Größe kannst du mit der Funktion vla-getboundingbox ermitteln. Hier ein keines Beispiel. (defun c:ufr ( / ELE LL P0 P1 UR ) ;Funktion gibt Punkte für umfassendes Rechteck zurück (vl-load-com) (setq ele(entsel
Bitte Element wählen: )) (vla-getboundingbox (vlax-ename- vla-object (car ele)) ll ur) (setq p0 (vlax-safearray- list ll));Punkt links unten (setq p1 (vlax-safearray- list ur));Punkt rechts oben (list p0 p1) ) hoffe es hilft dir weiter Gruß cad-lisp
|
|
AutoLisp : lisp-editor
gmk am 26.11.2002 um 14:01 Uhr (0)
Hi! Bin auf der Suche nach einem lisp-editor bei dem man sich schrittweise durch das programm debuggen kann. (Ähnlich F7/F8 in Turbo Pascal 5.5). Gibt s so einen?? Mille Gracie Georg
|
|
AutoLisp : lisp-editor
CADwiesel am 22.01.2003 um 21:12 Uhr (0)
Ich hab dir mal was rausgesucht: Punkte 3, 4 und 6 http://xarch.tu-graz.ac.at/autocad/news/faq/autolisp.html.de#2_2 hier: http://rzhome.rrze.uni-erlangen.de/~gsrs01/schulen/codegenie/codegenie.htm hier: http://www.caelink.com/lisplink.htm Vielleicht ist ja was für dich dabei ------------------ Gruß CADwiesel
|
|
AutoLisp : Gleiche Punkte oder doch nicht!?
cad-lisp am 13.02.2003 um 13:00 Uhr (0)
Hallo CADwiesel, hab es gerade einmal ausprobiert, bei mir klapp es mit equal. Kann es sein, das mit der Punktliste etwas nicht stimmt? (setq li ((-41.1235 -34.1954) (-41.1235 -34.1954) (-41.1235 -34.1954))) (= (car LI) (cadr LI)) ;= ergibt nil (eq (car LI) (cadr LI)) ;= ergibt nil (equal (car LI) (cadr LI)) ;= ergibt T Gruß cad-lisp
|
|
AutoLisp : Objekt auswählen per Lisp
Walter Zettlitzer am 07.03.2003 um 08:57 Uhr (0)
Hallo Holger, danke für die Tips, ich bin etwas weiter, aber es funktioniert noch nicht ganz. ICh habe ein Bogenlängenlisp für den Modellbereich, das funktioniert durch Anklicken des Bogens, Winkelbemaßung und anschließender Textüberschreibung. Das ganze will ich nun in abgewandelter Form auch für den Papierbeich machen. Dazu soll der Bogen nachgezeichnet werden (das funktioniert auch, der gezeichnete Bogen wird zum SChluß wieder gelöscht) und das Ansichtsfenster angeklickt werden wegen dem Skalierfaktor ( ...
|
|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
gmk am 10.03.2003 um 09:37 Uhr (0)
morgen axel, holger, geos, walter! also da muß man erst mal draufkommen, daß zwischen interner rechengenauigkeit und anzeigegenauigkeit ein unterschied ist. ist mir ehrlich gesagt so in anderen prog.sprachen noch nie untergekommen. was mich aber doch wundert, ist daß lisp hier schon im vorkommabereich das runden anfängt: 4400069.0971 -- in der anzeige 4.40007e+006. (ziehe ich übrigens 4400000 von den 4.40007e+006 ab bekomme ich als ergebnis 69.0971, was mich doch einigermaßen beruhigt). kann ich die an ...
|
|
AutoLisp : elemente aus dem bruch abfragen
cad-lisp am 10.03.2003 um 14:55 Uhr (0)
Hallo Jan, hier ein kleines Beispiel wie es gehen könnte. (defun c:test (/ le le1 aw) (setq le (entlast)) (princ "
Bruchstelle wählen") (command "bruch" pause pause) (setq le1 le) (setq aw (ssadd)) (while le1 (if (and (member (cdr (assoc 0 (entget le1)))(list "POLYLINE" "LWPOLYLINE")) (/= le1 le)) (setq aw (ssadd le1 aw)) ) (setq le1 (entnext le1)) ) aw ) Ich hoffe es hilft dir weiter Gruß cad-lisp
|
