Lisp routine to draw 3D studwall

Hi,

I have started to write a routine and it models what I wanted so far, except the last entity set to "HdrFtr". When I try to list data on "HdrFtr" I get this ...

h *1410(1 |") (1 . "/061+ {rn rn {rn mhjqggjgoglifmkii rmmfqiimmfmokolgjjj nqj

|") (1 . "/061+ {rn rn {rn mhjqggjgogligjmghl rmmiqnimmfmnkginmin nqj |") (1 .

"1>2:@>++-6=r8:1r>++-6= {rn rn {rn {rn {lg 30,: 30,: >//3&

,(::/@:1;@9><: .>1:r,*-9><:>

Instead of this.....

((-1 . ) (0 . "LWPOLYLINE") (330 .

) (5 . "1AF") (100 . "AcDbEntity") (67 . 0) (410 .

"Model") (8 . "0") (100 . "AcDbPolyline") (90 . 5) (70 . 0) (43 . 0.0) (38 .

0.0) (39 . 0.0) (10 275.886 -229.662) (40 . 0.0) (41 . 0.0) (42 . 0.0) (10

I cannot figure out what I have down wrong. Can anyone help. I will attach routine so far.

Thanks

TESTSTUD3.LSP