|
Lisp : layer invertieren
kikaz am 16.03.2007 um 17:25 Uhr (0)
Hallo LisperDa ich in einem Planungsbüro tätig bin, und zZ oft mit Zeichenarbeit konfrontiert werde, möchte ich mir ein paar immer-wieder kehrende Abläufe vereinfachen.z.B.: Alle Layer die gefroren sind einschalten - alle was eingeschalten sind frieren, dann das gezeigte löschen und wieder layer die aktiviert sind frieren und umgekehrt. Dient zur Bereinigung von unseren Architekturplänen, da ich den "gefrorenen Inhalt" nimmer brauche.Ich lese mich gerade in die große Welt der Auto-lisp durch, doch leider f ...
| In das Form Lisp wechseln |
|
Lisp : layer invertieren
kikaz am 21.03.2007 um 21:49 Uhr (0)
Hallo Leute.. hab da ja nun ein "lisp" ( von dem 1 Link)ansich ist das ja genau was ich suche. nur schaltet der die layer aus / ein. ich will das mit frieren. Nun wollt ich in Eigeninitiative das mal umändern.(quelltext)(defun c:swi (/ lay layli) (while (setq lay (tblnext "LAYER" (not lay))) (setq layli (cons (cdr(assoc 2 lay)) layli)) ) (mapcar (lambda (L / ld) (setq ld (entget (tblobjname "LAYER" L))) (entmod (subst (cons 62 (* -1 (cdr(assoc 62 ld)))) (assoc 62 ld) ...
| In das Form Lisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
|