Write list to text file

[Travis.Biddle]

I have a list (1 2 3 4 5 6 7 ) that I am trying to write to a TXT file.  I can get it to write the the first value , but am struggling with getting it to loop through the entire list.  The length of the list changes, so one time it may be (1 2 3) and next time the program is ran on a new drawing it may be (1 2 3 4).

I am trying to get ..

to be this...

[paullimapa]

here's one way to loop through a list:

(setq lst '(1 2 3 4 5 6 7))

(setq indx -1)

(repeat(length lst)(princ(strcat"\nThis is Item #: ["(itoa(nth(setq indx(1+ indx))lst)) "]")))(princ)

[Kent1Cooper · Accepted solution]

Do you know how to (open) such a .txt file for writing to, and (close) it when done?

Between those:

(foreach item nestplot

  (write-line (itoa item) YourFile)

)

[Travis.Biddle]

Perfect!  I had the open/close of the txt file correct but was messing up the foreach item.