like to hatch with multiple pick internal points.

[patjeacad]

(Defun C:DOORSNEDE0 ()  (command "-hatch" "Properties" "ANSI31" 0.25 0 "CO" 5 "" "" ))

first i do some settings before i use the command hatch. In the command hatch i use pick internal point, i can pick mutiple points. It wil become one hatch. When i use hatch at a lisp file only one time i can use a pick internal point. so i draw more hatches and they are not one hatch.

I saw many hatch files with creating a list of point and working with "while". Many don't work or i can not make them usable for me.

Can someone put me in the right direction to solve this problem?

[BIGAL]

My Bricscad does not have "CO" as option ?

 

(Defun C:DOORSNEDE0 ( / pts)
(setq pts '())
(while (setq pt (getpoint "\nPick hatch points Enter to exit "))
(setq pts (cons pt pts))
)
(command "-hatch" "Properties" "ANSI31" 0.25 0  pts "")
(princ)
)

 

[exceed]

option "CO" is for set hatch Color. and 5 is in ACI color index.

ANSI31 need background color also

so you have to change like this, "." means no background color.

(command "-hatch" "Properties" "ANSI31" 0.25 0 "CO" 5 "." "" "" )

 

 

[BIGAL]

Understand but my V20 Bricscad does not support "CO".