|
AutoLisp : Objekt auswählen per Lisp
Brischke am 07.03.2003 um 13:20 Uhr (0)
Nee Walter so geht s nicht. erstelle mal eine Bemaasung, so wie du diese möchtest. Schreibe in die Befehlszeile mit Klammern. (entget(car(entsel))) Wähle die Bem aus und schaue danach ins Textfenster. So sollte in etwa die (enmake ...) Liste aussehen. Bsp.Linie (entmake (list (0 . "LINE") (8 . "0") (10 0.0 0.0 0.0) (11 100.0 100.0 0.0) ;... ) ) Das ist schwer zu erklären. Schau mal in die LISP-Hilfe unter ENTMAKE und in die DXF-Referenz. Da steht dann alles drin. Bei Fragen ... Grüße Holger ----------- ...
|
|
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
|
|
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
|
|
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
|
|
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
|
|
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?
|
|
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?
|
|
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?
|
|
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?
|
|
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?
|
|
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?
|
|
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?
|
|
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?
|
