Message 1 of 7
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
What am I doing wrong here? FC is a global variable from another lisp, with four blocks.
(defun c:wert (/ i e c cl)
(if (= (sslength fc) 4)
(progn
(repeat (setq i (sslength fc))
(setq e (ssname fc (setq i (1- i))))
(setq c (getpropertyvalue e "ELEV2"))
(setq cl (cons (rtos c 2 2) cl))
)
(print cl)
)
(prompt "\nMore than one form selected")
)
(princ)
);end
Solved! Go to Solution.