read the value of a variable of a list

[blubossa]

Hi,
i nedd read a value of a variabile for print, export in txt and more
I don't Know the function for rea a variabile.....
Can you help me?

(defun c:test ()
  (setq D1 (strcat "cod1" "*" "10PZ"))
  (setq D2 (strcat "cod2" "*" "8SX"))
  (setq D2 (strcat "cod2" "*" "8DX"))
  (setq lista '(D1 D2 D2))
  (foreach x lista
    (alert x)
  )
);def

[BlackBox]

Hi,
i nedd read a value of a variabile for print, export in txt and more
I don't Know the function for rea a variabile.....
Can you help me?

(defun c:test ()
  (setq D1 (strcat "cod1" "*" "10PZ"))
  (setq D2 (strcat "cod2" "*" "8SX"))
  (setq D2 (strcat "cod2" "*" "8DX"))
  (setq lista '(D1 D2 D2))
  (foreach x lista
    (alert x)
  )
);def

Not sure if I understand what you mean... Something like this, from which you can copy the output from command line?

(defun c:FOO (/ D1 D2 D3)
  (setq D1 (strcat "cod1" "*" "10PZ"))
  (setq D2 (strcat "cod2" "*" "8SX"))
  (setq D3 (strcat "cod2" "*" "8DX"))
  (foreach x (list D1 D2 D3)
    (prompt (strcat "\n" x))
  )
  (textpage)
  (princ)
)

[Edit] - Also, don't forget to localize your variables, unless you need them to be global.

Cheers

[blubossa]

Hi,
is correct.

is correct.
I'm trying to write a routine that allows me to create a list of nomni code according to certain characteristics.
I'll have to think again because it is not yet clear to me how it should work .....

Thanks.
bb