请教下如何实现倾斜效果

bluelover · 发表于 2021-1-12 10:37:00

比如有一个矩形，底边固定不动，垂直边倾斜一个角度变成平行四边形，但各边的长度不变。
如果矩形里面有其它图形，也按照同样的规则倾斜。
好久没有用CAD了，不知道是不是有这样的命令，或者VBA可以怎么实现这样的效果？
烦请高手指教。感谢！

bluelover · 发表于 2021-1-12 11:29:00

简单点说，有点像是将正交系统的图形变成非正交系统的效果，比如X轴与Y轴是75度，而不是90度，图形就相当于“倾斜”15度。
还请高手不吝赐教。

mikewolf2k · 发表于 2021-1-13 09:58:00

如果三角形，如何保持同样规则倾斜？
如果只是纯粹的倾斜坐标系，创建一个倾斜的坐标系，然后矩阵变换。ACAD没坐过，MS做过。

bluelover · 发表于 2021-1-13 15:15:00

我已经思考出一种方法了，有需要的可以一起探讨下。
这种变换主要用在【加工系统具有正交偏差且难以修正的情形】，通过修图进行“预补偿”，就可以得到满足要求的加工精度。

原地踏步 · 发表于 2021-1-18 16:45:00

说一个笨办法。
pt0：原点
pt1：待转换的点
pt2：转换后的点
alpha：增加角度
(setq ang1 (angle pt0 pt1))
(setq dst (distance pt0 pt1))
(setq pt2 (polar pt0 (+ ang1 alpha) dst))
对于圆或弧就得另想办法了，也许可以多点拟合。

请教下如何实现倾斜效果

发表回复

精选推荐