y coordinate getting assigned to 0

[kalai]

my coding

 
    (setq   p20(polar p1 A1 6)
       p21(polar p20 A2 6)
       p22(polar p21  A1 (-(/ Dia 2.0)12))
       p23(polar p22 A2 63)
       p24(polar p23 A3 (-(/ Dia 2.0)12)) 

(command "pline" p21 p22 p23 p24 "c")

y coordinate getting assigned to 0
what could be the reason
?

[Tharwat]

It could be the osmode .

Try it this way .

(setq os (getvar 'osmode))
(setvar 'osmode 0)
(command "pline" p21 p22 p23 p24 "c")
(setvar 'osmode os)

Or this .

(command "pline" "_non" p21 "_non" p22 "_non" p23 "_non" p24 "c")

Hope this help .

Tharwat

[kalai]

thanks, i will try and reply.

[pBe]

 
(progn
(command "pline" "_non")
(foreach pt (list (setq p21 (polar p20 A2 6))
                  (setq p22 (polar p21 A1 (- (/ Dia 2.0) 12)))
                  (setq p23 (polar p22 A2 63))
                  (setq p24 (polar p23 A3 (- (/ Dia 2.0) 12))))
      (command pt "_non")
      )
(command "")
)

[Lee Mac]

Kalai,

Please read this regarding posting code.

Lee

[SLW210]

Kalai,

Please read this regarding posting code.

Lee

I took care of it this time, please use "Code Tags" from now on.