https://www.cadforum.cz/forum_en/ Sun, 31 May 2026 20:11:28 +0000 Mon, 29 Nov 2010 16:58:24 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum_en/RSS_post_feed.asp?TID=4862 https://www.cadforum.cz/forum_en/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum_en/ https://www.cadforum.cz/forum_en/forum_posts.asp?TID=4862&PID=12014&title=simple-lisp-problem#12014 Author: jpkibble
Subject: 4862
Posted: 29.Nov.2010 at 16:58

Hi,

The lisp below works great for extracting a list of comma separated values from a csv file. In this case two columns with x coordinates in one and y coords in another.

However when I try and use car and cadr to extract the first column value from the second CAD returns an error.

I'm sure this one's about the data type not being a list.

Can anyone help?




(defun c:csv ()

(setq selfile (getfiled "Select File" "" "csv" 0))

(setq openfile (open selfile "r"))

(while (setq line (read-line openfile))

(defun c:csv ()

(setq selfile (getfiled "Select File" "" "csv" 0))

(setq openfile (open selfile "r"))

(while (setq line (read-line openfile))

(setq linex (car line))
(setq liney (cadr line))

(princ "\n")
(princ line)
(princ "\n")
(princ linex)
(princ "\n")
(princ liney)

)



)

]]> Mon, 29 Nov 2010 16:58:24 +0000 https://www.cadforum.cz/forum_en/forum_posts.asp?TID=4862&PID=12014&title=simple-lisp-problem#12014