Zobrazit plnou verzi příspěvku: nové hladiny

Ferdinand
05.06.2008, 15:50
Tvoří novou sadu 24 hladin - při 5. hladině se mi to zasekne... a nelíbí se mu, že chci nastavit ctab na pův. další hodnotu. Je to součást dalšího lispu, ve kterém jsou nadef. další věci.
;;subrutina pro nakresleni car v nove sade hladin - v novem rozvrzeni;;(aby se hladiny nesmazaly pri automatickem cisteni)(defun nsh_e (/ DX DY1 DY2)
  (command "_layout" "_N" "nsh" "_layout" "_S" "nsh")  (command "_erase" "_All" "" "_delay" 500)  (if (not (tblsearch "LAYER" "0-ROZVRZENI"))    (command "_-layer"   "_N"        "0-ROZVRZENI"      "_C"   5        "0-ROZVRZENI"      "_P"   "_N"        "0-ROZVRZENI"      ""     )  )  (command "_rectang" "0,0" "4500,2000")  (command "_change" "_L" "" "_P" "LA" "0-ROZVRZENI" "")  (command "_zoom" "_E")
  (setq DX 150)  (setq DY1 250)  (setq DY2 1750)
  (setq i 0)  (while (< i (length SH0))    (setvar "clayer" (nth i SH0))    (setq B1 (list DX DY1))    (setq B2 (list DX DY2))    (command "_line" B1 B2 "")    (setq i (1+ i))    (setq DX (+ 150 DX))  )  (setvar "ctab" ACTLT)  (princ)  (nsh_e))
 
ED: Přesné znění hlášky je:
Command: ; error: AutoCAD variable setting rejected: "clayer" nil
 Ferdinand2008-06-10 14:27:17

Ferdinand
10.06.2008, 14:26
Pro upřesnění:
lisp ze zasekne až po vytvoření nové sady hladin při kreslení čáry v pořadí 5. hladině s názvem "PREDP_koty"
PREDP...zadaná předpona pro sadu hladin
SH0...seznam názvů nové sady hladin
(setq ACTLT (getvar "ctab"))