AlignH - Align hatch on curved path

[dlanorh]

Progress.

 

Autocad has probably updated something that now breaks the lisp.

[BIGAL]

Worked for me but very much hatch pattern dependant some worked others did not.

 

tile pattern ok

 

*HT600x3003ET,600x300mm 3mm Free patterns from www.AUTOCADhatch.com
0,3,0,    0,603,    300,-3.0
0,3,3,    0,603,    300,-3.0
90,3,3,    0,303,    600,-3.0
90,0,3,    0,303,    600,-3.0

 

 

[trytoh]

This is a very impressive lisp , thanks a lot , I never imagine that Autocad can do something like this , everything is wonderful except it didn't work for me in Autocad 2022 ,as I understand it doesn't work for version more than 2018 , so could you please update it and thank you so much

[GP_]

On 8/14/2022 at 1:32 PM, trytoh said:

I understand it doesn't work for version more than 2018...

it's working fine for me in AutoCAD 2021

Are you doing the correct procedure? (source lines only)

[trytoh]

Thank you so much for your response, but it gave me this error ... (

Command: ALH
Select First Source Line
Select First Target Curve
Select Second Source Line
Error: no function definition: C:CAL
Cannot invoke (command) from *error* without prior call to (*push-error-using-command*).
Converting (command) calls to (command-s) is recommended.
)

, am I doing something wrong ?

[GP_]

23 hours ago, trytoh said:

Error: no function definition: C:CAL

 

Type: (or cal (arxload "geomcal"))

 

then try ALH

[trytoh]

Thank you but unfortunately I am not a lisp man , just a user so where should I put this ...

1 hour ago, GP_ said:

 (or cal (arxload "geomcal"))

  inside the lisp ?

your help is so appreciated

[GP_]

4 hours ago, trytoh said:

your help is so appreciated

 

Load the autoCAD Geometric Calculator to use the lisp

 

Solution 1 - in the Command Line
type: (or cal (arxload "geomcal"))
press: ENTER
type: ALH

 

Solution 2 - in the code
change: (if (not (member "geomcal.arx" (arx))) (arxload "geomcal"))
to: (or cal (arxload "geomcal"))
NOTE: from AutoCAD 2013 geomcal.arx it has become geomcal.crx

Solution 3 (DEFINITIVE) - in the ACADDOC.LSP 
add: (or cal (arxload "geomcal"))
NOTE: for ACADDOC.LSP see

https://www.cadtutor.net/forum/topic/66304-acaddoclsp-question/
https://www.cadtutor.net/forum/topic/56401-2016-and-acaddoclsp/
https://www.cadtutor.net/forum/topic/44940-rules-for-acaddoclsp/
https://jtbworld.com/acaddoc-lsp

[trytoh]

Thank you soooo much , it is working now , magnificent !

[mmxxzz]

Currently getting this error (AutoCAD for Mac 2022)

[BIGAL]

"error: Vl-load-com not supported on MAC" is your problem if I remember correct the VL functions do not work on the Mac version. So sorry code will not work.

 

Edited September 13, 2022 by BIGAL

[JerryFiedler]

Thank you so very much GP_ and Gu_xl for sharing a fantastic program.  Sorry my "thanks" are 10 years late but I didn't see this the first time around.  Truly great programming!  I have already added to my toolbox.

 

[GP_]

On 9/14/2022 at 11:38 PM, JerryFiedler said:

...Sorry my "thanks" are 10 years late..

 

"Thanks" are valid forever... 

[Guest]

Nice code but, there is a problem with this code.Convert the hatch to block and if toy explode it the hatch is not a hatch any more . So you can not change the scale ore the pattern type

[JerryFiedler]

It didn't solve world hunger either!

[Guest]

JerryFiedler, thanks for the irony

[eldon]

15 hours ago, prodromosm said:

Nice code but, there is a problem with this code.............

 

It is always a pity when negative feedback is posted about something that was given freely. The phrase 'looking a gift horse in the mouth' springs to mind.

 

Did you read the working parameters at the beginning of the lisp file? Just open the file in a text reader, and you will see that the outcome is not a hatch. So how can you think that the scale can be altered?

 

Perhaps you are voicing your discontent that the lisp does not do what you think it ought to do!

[Guest]

Hi eldon. I didn't  do a negative post. I said that is a nice code. Just said that it will be better if is not a block but hatch. Nothing more. The code is perfect if you don't want to change the hatch pattern or the scale again.

[tombu]

27 minutes ago, prodromosm said:

Hi eldon. I didn't  do a negative post. I said that is a nice code. Just said that it will be better if is not a block but hatch. Nothing more. The code is perfect if you don't want to change the hatch pattern or the scale again.

You do realize the reason for the lisp is because it isn't possible to create a hatch like this?

[Guest]

hI tombu. Yes i understand that