OK, I'm using LISP to do all this so I hope this is the best forum to post in.
First, thanks to the mighty Lee Mac who helped me a great deal with this initially.
Anyway,
I have hatches set up using LISP in acaddoc.lsp. Here's an example of one:
Code:
;Aggregate
(defun AGGREGATE ( / TMP CAS NHS)
(setvar "CMDECHO" 0)
(setq TMP (getvar 'clayer))
(setq CAS (getvar 'cannoscalevalue))
(setq NHS (/ 0.4300 CAS))
(command
"_.-layer" "_m" "L-HTCH-THIN" "_c" "1" "L-HTCH-THIN" ""
"_.-hatch" "_p" "AGGREGAT" NHS "0" "_a" "_a" "_y" "" ""
"cmdecho" "1"
"_.-hatch"
)
(while (= 1 (logand 1 (getvar 'cmdactive))) (vl-cmdf "\\"))
(setvar 'clayer tmp)
(princ)
)
I then call that hatch from the tool palette thusly:
Code:
^C^C(if AGGREGATE (AGGREGATE) (princ "Aggregate not loaded."))
This was working fine untill some kind of server "issue" last week. IT is not being forthcomming but suffice it to say that that AGGREGAT pattern and a few others went missing.
No problem, I restored them from my "personal backup"
Now however, those five patterns that were deleted (and ONLY THOSE) are comming in at 1/12th their expected size!!!.
Same LISP code, same PAT file, but 1/12th the size.
So aggregate used to look right at 0.430 (times cannoscalevalue) now needs to be set to 4.800 (times cannoscalevalue). I'm stumped.
Its almost as if the PAT file had been changed, but as far as I can tell, it's identical. I'm going wacko!!!
Any guidance at all is greatly appreciated.