如何修复以使用自定义
你好我的lisp程序有问题。
当我使用世界UCS时，一切都很好，但我经常使用旋转UCS，然后lisp不能正确工作。
可能我需要使用trans函数。我试过了，但没有好结果。
请帮忙
谢谢
克鲁格
Xlinedim。lsp 您需要将用户选择的点从UCS转换为WCS：
(trans <point> 1 0) aaa，太简单了
谢谢李
克鲁格 我注意到一件事。使用此lisp旋转UCS时：
(Defun C:UU ()
(setq osmode_hold (getvar "OSMODE"))
(setvar "OSMODE" 512)
(setq PT1 (getpoint "Select LEFT side of OBJECT which should be horizontal"))
(command "_UCS" "OB" PT1 "PLAN" "CURRENT" "")
(setvar "OSMODE" osmode_hold)
(princ)
);UU
(princ)我尝试使用Xlinedim，然后即使使用trans命令，xline也绘制错误（它们仅适用于定义的UCS东北、西、南）
我能修复什么？
谢谢 我没有正确地查看您的LISP，但您必须通过查看UCS X轴（UCSXDIR）的方向来计算UCS旋转。 太好了谢谢
我需要解决这个问题。
克鲁格
页:
[1]