I know it's been a while...but do you still have that get hatch fix for that lisp routine?
Thanks.
Hi,
You can downlod it from the developer site: http://www.turvill.com/t2/free_stuff/index.htm
Gaston Nunez
Uh, where does it save the pattern file? Not clearly stated in the code or in the command itself. Help!
This depends on how you started Acad.
Have you started Acad over a DWG (Explorer), then in this folder.
If Acad was started through a desktop shortcut,
Then it depends on what is written in "Run in" is written,
With the original link it would be in "C: \\ Users \\ << User >> \\ Documents \\".
(I have NOT programmed it, I just want to help)
If you do not find it: Open Acad over a DWG in the Explorer, then run the program, the file should then be in the current folder.
Thanks for the reply. Unfortunately that doesn't help very much since I'm accessing via a network license with no local data. I don't think this script is of any use to me then. Does anyone know of another working solution?
And what is the Problem with non-local Data?
Using getpat and type into CommandLine (findfile "<NameOfPattern>.PAT")
Or edit the Lispcode in Notepad 😉
old1:
(setq outf (strcat hnam ".pat"))
new1:
(setq outf (strcat (if (zerop(getvar "DWGTITLED")) "" (getvar "DWGPREFIX")) hnam ".pat"))
old2:
(alert (strcat hnam " pattern definition written to " hnam ".PAT"))
new2:
(alert (strcat hnam " pattern definition written to " (findfile (strcat hnam ".PAT"))))
In named Files, the PAT File should be saved in the DWG-Folder.