Using variables in setting XData DXF Code in AutoLISP

[oarrow]

I'm adding XData to user drawn lines utilizing AutoLISP. The following code works fine:

 

(setq CLoop "CIRC1")
 (if (not (tblsearch "APPID" CLoop))
   (regapp CLoop)
 );end if
(setq xdList '((-3 ("CIRC1" (1000 . "Circuit 1") (1000 . "Reactor Effluent")))))

 

I'm having trouble substituting variables for "CIRC1", "Circuit 1" and "Reactor Effluent"... I've tried:

(setq LNo "Circuit 1"
       desc "Reactor Effluent"
 )
(setq xdList '((-3 ("CIRC1" (cons 1000 LNo) (cons 1000 desc)))))

I would also like to replace "CIRC1" with a variable as well.

 

This gives me a bad DXF Group Code error. I've tried various combinations of List and Cons and Quote but can't seem to get it!

 

Please help - thanks!

Edited January 18, 2013 by SLW210
add code tags

[MSasu]

By usign quote you are preventing the list to be evaluated; please try this instead:

(setq xdList ([color=red]list[/color] ([color=red]list[/color] -3 ([color=red]list[/color] "CIRC1" (cons 1000 LNo) (cons 1000 desc)))))

[SLW210]

Please read the CODE POSTING GUIDELINES and add Code Tags to your code.

[oarrow]

I was lost in "lists"...

 

That solved my problem - thank you!

[oarrow]

I apologize and will follow the code posting guidelines in the future - thank you.