设为首页收藏本站 CAD论坛 CAD教程 CAD下载明经币充值

切换到宽版

明经CAD社区»社区 › 开发篇 › AutoLISP/Visual LISP 编程技术 › 计算夹角

发新帖

查看: 594|回复: 1

[经验] 计算夹角

发表于 2024-3-22 12:06:16 | 显示全部楼层 |阅读模式

(setq ang (- (angle pt p3) (angle pt p1)))(if (< ang 0)(setq ang (+ (* 2.0 pi) ang)))(if (> ang pi)(setq ang (- (* 2.0 pi) ang)))ang)

回复

使用道具举报

发表于 2024-3-22 12:21:54 | 显示全部楼层

感谢大佬分享

回复支持反对

使用道具举报

发新帖

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )
©2000-2023 明经通道版权所有本站代码，在未取得本站及作者授权的情况下，不得用于商业用途

GMT+8, 2024-11-25 21:41 , Processed in 0.170448 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表