[LISP函数]：一个好用的lips程序提供

zzkfq · 发表于 2004-5-16 10:56:34

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

我自己用的，一个好用的lips程序。请各位用用看。

lzy9788 · 发表于 2004-5-16 11:07:12

我也做了个求面积的，我觉得你这个求面积的不太方便。(字高太小)

(defun c:area2 ()
(setvar "cmdecho" 0)
(command "_.undo" "be")
(setq pt (getpoint "\n面积自动计算并标注 VER 1.0---by 罗志勇<Email:lzy9788@126.com>！\n请点取要标注的范围内一点:"))
(command "-boundary" pt "")
(command "area" "o" (entlast))
(command "erase" (entlast) "")
(setq area (getvar "area"))
(command "style" "幼圆" "幼圆" "" "" "" "" "")
(command "text" "j" "c" pt "250" "0" (strcat (rtos (/ area 1000000) 2 3) "M?"))
(princ (strcat "\n该范围的面积为A=" (rtos (/ area 1000000) 2 3) "M?" (strcat "(" (rtos area 2 0) "mm?)。") "\n***面积自动计算并标注--ver 1.0***(2004年2月 by Rokin)!\n"))
(command "_.undo" "e")
(setvar "cmdecho" 1)
(princ))

海豚 · 发表于 2004-5-17 22:54:28

楼主也不说明是什么程序，又要受爱心币，让人怎么下载。

lzy9788 · 发表于 2004-5-18 10:35:50

是个求面积的程序，还要爱心币，不怎么样，我觉得还是我的那个好用(2楼)。
也许是专业不同吧。

PFD8667 · 发表于 2004-7-27 17:57:29

下载了,不知怎么用

rungang2002 · 发表于 2004-10-17 11:19:58

是呀,如何用呢,说明一下吧

xyp1964 · 发表于 2004-10-19 19:57:56

免币！！！
总图面积标注（平方米、亩、公顷）终结版！
根据需要确定面积标注单位：平方米、亩或公顷，并可标注单位名称。
http://www.xdcad.net/forum/showt ... 1379313#post1379313

账号		自动登录	找回密码
密码			立即注册

[LISP函数]：一个好用的lips程序提供

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子