0 Members and 1 Guest are viewing this topic.
hi freind i am difficult in my work that is hatch lispi want 200 * 400 size and other size in hatch linei can't find good lisp can you help me some
(if (setq pline (car (entsel "\nSelect a closed contour: ")))(progn(setvar "HPNAME" "ANSI31")(setvar "HPANG" 45)(command "_.-bhatch" "_S" pline "" "_P" "ANSI31" 64 45.0 "") (setvar "HPSCALE" 2) (setvar "HPANG" -45) (command "_.-bhatch" "_S" pline "" "_P" "ANSI31" 128 -45.0 "")) )