Hatch pattern to layername

[Grrr]

BTW you might find handy the examples about cond in this thread.

 

Incase you wanted to set prefix/suffix for the rest of the hatches, this shall be the last test'n'result inside the cond :

 

(T ; Rest of the hatches
 (setq 
   pref ""
   suf  "Unknown"
 )
); T

[halam]

code updated.

 

I figured it out how to set each individual layercolor.

The transperancy, linewidth for the layer can be added.

And it needs a check that objects both are 'bylayer'

 

Demo of the code sofar, i called it 'GETPATLAYER'. For those struggling AutoRevit, hope you enjoy it