只需一步，快速开始
求助如何在CAD里分别点击两个数得它两个的乘积，急用，各位大侠帮帮忙啊
使用道具 举报
(defun test()
(setq n1(atof(cdr(assoc 1 (entget(car(entsel "\n选数字1: ")))))))
(setq n2(atof(cdr(assoc 1 (entget(car(entsel "\n选数字2: ")))))))
(setq s(* n1 n2))
(princ s)(princ)
)
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码，在未取得本站及作者授权的情况下，不得用于商业用途
GMT+8, 2024-5-17 18:38 , Processed in 0.296383 second(s), 27 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.
发表于 2008-3-8 16:31
置顶卡
变色卡
显身卡