ONE-CLICK commands

tboy · 发表于 2022-7-6 11:01:35

Please post here scripts that can be described as one-click commands.
I hope these commands will be useful, mostly (but not only) while working in XYplane.

For example I'll post first one: 'Rotate90degrees'.
It is made by fixo and posted here as RS:
http://www.cadtutor.net/forum/showthread.php?t=24888&page=2 post #19
I made slight modification to eliminate manual entering the rotation value.

It needs little tuning to work correctly with undo/redo but I don't know how and what to modify.Now I'll ask again fixo to modify above and post here MIRROR-X(about X axis) and MIRROR-Y(about Y axis) using same start point (middle of selection set).

fixo · 发表于 2022-7-6 12:59:50

Instead of this code line to rotate 90 degrees

copy

(vla-rotate a (vlax-3d-point midp) (* 90 (/ PI 180))))))

use the following one

copy

(vla-rotate a (vlax-3d-point midp) (/ PI 2.0))

~'J'~

[编程交流] ONE-CLICK commands

发表回复

精选推荐