Modification to Replace Block by Patrick_35
Anyone able to have a look see if this Replace Block LISP can be modified?
It was created by Patrick_35 who's passed away, some years ago.
I'd like to have it ignore the current UCS, so maybe a check box in the DCL could work:
Use current UCS (unchecked will ignore UCS and use WCS)
or could be the opposite check box:
Use WCS (unchecked uses UCS)
Reason is, when replacing blocks with a UCS set, the replaced blocks go flying out in space, user has to undo go back to the WCS re run and replace the blocks, kind inconvenient in 3D space.
Practically, it should just be using the original insert point, but I suppose if a UCS is set then the original insert point co-ordinate values are different than when the insertion point was WCS co-ordinate values.
The dude was French, comments are in French but the code looks to be English.
