|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
Brischke am 06.03.2003 um 23:23 Uhr (0)
Hallo Walter, wie meinst du das mit Zitat: Anklicken einer Variablen Schreib mal was passieren soll. Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Wieder 2 neue Tool s im FreeDownload
|
In das Form AutoLisp wechseln |
|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
Brischke am 07.03.2003 um 09:13 Uhr (0)
Hallo Walter, jetzt ist s klarer. Dann geht s so: Code: (defun c:test (/ zoomfak) (setq zoomfak(f:VIEWPORT_zoomfak (car (entsel))));Ansichtsfenster wählen ) (defun f:VIEWPORT_zoomfak ( afel / af w1 w2) (setq w1 (cdr(assoc 41 (setq af (entget afel (list "ACAD"))))) w2 (cdar(cdr (member (assoc 1040 (setq w2 (cdar(cdr (assoc -3 af)))))w2))) ) (/ w1 w2) ) Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Wieder 2 neue Tool s im FreeDownload
|
In das Form AutoLisp wechseln |
|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
Brischke am 07.03.2003 um 10:55 Uhr (0)
Hallo gmk, das kann ich so nicht nachvollziehen. Werden etwa schon die Stellen vor dem Komma gerundet, oder erst nach dem Komma. Ich bin nicht vom Fach, aber was ist das besondere an Gauss-Krüger-Koordinaten? Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Wieder 2 neue Tool s im FreeDownload
|
In das Form AutoLisp wechseln |
|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
Brischke am 07.03.2003 um 13:22 Uhr (0)
Schau mir das am Wochenende mal an. Euch ein schönes davon. Bis später ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Wieder 2 neue Tool s im FreeDownload
|
In das Form AutoLisp wechseln |
|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
Brischke am 10.03.2003 um 08:25 Uhr (0)
Guten Morgen Ernst, da habe ich wieder was gelernt. :-) Mapcar s Hinweis ist richtig. Die angezeigte Genauigkeit ist nicht das, womit AutoCAD intern arbeitet. Intern wird mit einer Genauigkeit von 16 Nachkommastellen gerechnet. Das sollte auch für Dich ausreichend sein, oder? Ergo: Von der Anzeige nicht täuschen lassen! Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
AutoLisp : Skalierungsfaktor eines Ansichtsfensters
Brischke am 10.03.2003 um 09:52 Uhr (0)
Hallo, man muss das einfach wissen, eine Sysvar ist mir nicht bekannt. Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
AutoLisp : elemente aus dem bruch abfragen
Brischke am 10.03.2003 um 15:02 Uhr (0)
Hallo Jan, schau dir mal die folgenden Zeilen an. So hast du beide Elemente. Code: (defun c:br ( / a b) (command "_.break" (setq a (entsel)) (getpoint "
2.Punkt: ")) (setq a (car a) b (entlast) ) (redraw a 3) (redraw b 3) (princ) ) In a ist das erste Element und in b das zweite. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
AutoLisp : Sortieren einer Liste
Brischke am 10.03.2003 um 15:27 Uhr (0)
Hallo Axel, leider schreibst du nicht, mit welcher Acad-Version du arbeitest. Mit den VL-Befehlen, hast du eine solche Funktion zur Verfügung. Code: (setq li (list (list 1 2 D )(list 2 3 Z )(list 5 6 G ))) (vl-sort li (function (lambda (e1 e2) ( (last e1) (last e2))))) Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
AutoLisp : Text in datei schreiben
Brischke am 13.03.2003 um 10:30 Uhr (0)
Hallo CADwiesel, versuch das: (strcat "(if (zerop (getvar "DBMOD"))(command "._OPEN"" item ")(command "._OPEN" "_Y"" item "))") der "" bewirkt, dass das " als String behandelt wird. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
AutoLisp : element drehen
Brischke am 12.03.2003 um 17:46 Uhr (0)
Zitat: Original erstellt von gmk: hi cadwiesel! ...drehung wird dann wohl auf eine transformation rauslaufen). gruss georg Hi Georg, genau so ist das. Willst du das ohne (command ...) hinkriegen ist es ein wenig Koordinatenrechnen. In komplizierten Fällen verschiebe ich dann immer das BKS, damit mir das der (trans ...)-Befehl macht. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
Lisp : Text in Variable
Brischke am 25.03.2003 um 16:57 Uhr (0)
keine Zeit, deshalb ganz kurz:1) (setq textvar (cdr(assoc 1 (entget (car (entsel))))))2) (entmod (subst (cons 1 textvar)(assoc 1 (setq attdata(entget(car (nentsel))))) attdata))Mit der ersten zeile kannst du den Text wählen, die 2. Zeile weist den Text dem Attribut zu.Wenns nicht reicht, dann poste noch mal, schaue nach 20,00Uhr noch mal rein.Bei Fragen ...Grüße Holger------------------Holger BrischkeCADlon - Lisp over night!Neue Tools im Free-&DownloadZugang zum Download schon gesichert?
|
In das Form Lisp wechseln |
|
AutoLisp : AutoLISP - könnte es soetwas?
Brischke am 26.03.2003 um 14:58 Uhr (0)
Hallo Benwisch, Danke für die Blumen! und wie immer: Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Neue Tool s im Free-&Download Zugang zum Download schon gesichert?
|
In das Form AutoLisp wechseln |
|
AutoLisp : initial-value "alle oben" möglich ?
Brischke am 27.03.2003 um 09:53 Uhr (0)
Hallo Michael, auch wenn das Forum hier mit LISP überschrieben ist, und LISP als eigenständige Programmiersprache existiert, wird dieses Forum mehr zur Abhandlung von Themen bzgl. AutoLISP genutzt. Ich weise Dich nur darauf hin, damit Du nicht vergebens auf eine Antwort wartest, da dieses Forum auch mehr von AutoLISPlern besucht wird. Ich kann Dir da jetzt nicht helfen, aber vielleicht findet sich ja jemand. Vielleicht findest Du ja auch ein Forum, in dem die Chancen auf Beantwortung höher sind. Grüße Holg ...
|
In das Form AutoLisp wechseln |