CAD学徒 发表于 2008-3-8 16:31:00

求助如何在CAD里分别点击两个数得它两个的乘积

<p>求助如何在CAD里分别点击两个数得它两个的乘积，急用，各位大侠帮帮忙啊</p>

jdhszh 发表于 2008-3-14 21:39:00

<p>(defun test()</p><p>(setq n1(atof(cdr(assoc 1 (entget(car(entsel "\n选数字1: ")))))))</p><p>(setq n2(atof(cdr(assoc 1 (entget(car(entsel "\n选数字2: ")))))))</p><p>(setq s(* n1 n2))</p><p>(princ s)(princ)</p><p>)</p><p></p>
页: [1]
查看完整版本: 求助如何在CAD里分别点击两个数得它两个的乘积