---

Hallo zusammen,

wie kann ich einem Layer eine Linienstärke in einem Lisp-Programm zuweisen?

Der nachfolgende Progammausschnitt wurde nicht von mir geschrieben und sollte nun so verändert werden, dass der Layer Text_0.5 die Liniestärke 0.5mm und der Layer schmale Volllinie 0.25mm einnimmt.

Danke Andreas

(defun C:POS_NUM (/ NUM P1 P2 DXX DX DYY DY)

(defun NEUERR (MSG) (R_VAR) (princ MSG) (princ))

(setq ALTERR  *ERROR*
      *ERROR* NEUERR
      C_E    (getvar "CMDECHO")      ; ECHO
      C_L    (getvar "CLAYER")        ; LAYER
      P_M    (getvar "PDMODE")        ; Punktmuster
      P_S    (getvar "PDSIZE")        ; Punktgroesse
)

(setvar "CMDECHO" 0)
(setvar "ATTDIA" 0)
(if (not (tblsearch "LAYER" "schmale Volllinie"))
  (command "LAYER" "MACH" "schmale Volllinie" "FA" "3" "" "") ; Layer und Farbe
  )
  (if (not (tblsearch "LAYER" "Text0.5"))
  (command "LAYER" "MACH" "Text_0.5" "FA" "2" "" "" ) ; Layer und Farbe
  )
(setq NUM NIL)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

(command "LAYER" "MACH" "Text_0.5" "FA" "2" "" "LS" "0.5" "" "")

für den TEXT_0.5 - Layer...

PS.: gebe einfach mal _-layer ein und sehe dir an wie der Dialog verläuft ! die Angabe "" (2x") steht für Return.

Du hast allerdings das Lisp nicht vollständig gepostet !
- das nächste mal bitte komplett, sonst kann man dann evtl nicht weiterhelfen.

------------------
- Sebastian Mattis - Weitere InfoŽs unter F1 !

[Diese Nachricht wurde von cadffm am 19. Nov. 2003 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Sebastian,

danke für Deine sehr gute und schnelle Hilfe.

Gruß Andreas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP