AutoCAD Lisp LSP小程序实现面积注记

(defun c:MJZJ()
(if *error*
(command "_boundary" (setq p1 (getpoint "\n点取要标注的封闭区域内部一点:"))  "")
)
(setq EN (entlast))
(command "area" "o" EN)
(setq smj (getvar "area"))
(setq imj smj)
(setq smj (rtos smj 2 3))
(setq smj (strcat "S=" smj "m2"))(if (=  htxt nil)(progn(setq htxt (/ (sqrt imj) 15))))
(setq htxt1 (getdist (strcat "\n输入字体的高度<" (rtos htxt 2 1) ">:")))(if  htxt1 (setq htxt htxt1))
(setq Pt (getpoint "\n 文字标注位置:"))
(command "style" "txt1" "宋体" htxt 0.8 "" "n" "" "")
(command "text" "s" "txt1" "j" "BC" pt "" smj "")
'(COMMAND "TEXT" Pt ffsize 0 smj)
)

common行中输入：APPload>>加载lsp文件代码，输入MJZJ实现注记面积。

AutoCAD Lisp LSP小程序实现面积注记相关推荐

lisp边长注记_小程序cad批量注记建筑物边长
你应该用点击详情.了解更多! 详情史蒂芬孙 2018-12-19 00:54 0评论 0赞同在小程序端不可以,需要在云函数端进行,语法是对的详情庄晋 2019-03-03 15:29 2评论 ...
微信小程序期末大作业记单词小程序适合初学者学习使用
微信小程序期末大作业记单词小程序小程序如下图所示:(下载链接在文末) 点我下载资源 https://download.csdn.net/download/weixin_43474701/59677 ...
【小程序迁移】微信小程序迁移到支付宝记坑
[小程序迁移]微信小程序迁移到支付宝记坑文档控制台网址汇总前言本地区别仅企业可用的功能限制功能插件区别云开发API区别需要做的代码变更 xml部分 CSS部分 JS部分自定义组件比 ...
微信小程序入门踩坑记（妥妥的干货，新手快快看过来）
初次上手微信小程序,各种踩坑各种百度,草草扫过官网的文字,呃....表示记不住不想看,然后看了一本入门基础, 诺,就这本啦(链接:https://pan.baidu.com/s/15hKlDNpowU ...
07图示围墙lisp_大神门有没有CASSlisp程序将房屋注记放在右上角？大神门有没爱问知识人...
绘制地籍图地籍部分的核心是带有宗地属性的界址线,生成界址线有两种方法:可以直接用手工方法绘制,也可以通过生成权属信息数据文件后再利用此文件来绘制.数字地籍图(包括权属图.宗地图.地籍表格)的绘制.2 ...
互联网日报 | 京东健康获批赴港上市；安博凯拟私有化神州租车；百度上线亚马逊海外购智能小程序...
今日看点 ✦ 长安汽车.华为.宁德时代联合打造全新高端智能汽车品牌 ✦ 京东健康已获批赴港上市,平台年活跃用户7250万 ✦ 百度上线亚马逊海外购智能小程序,押注"黑五"跨境电商 ...
微信小程序开发的完整流程介绍，新手必读
自从跳一跳小程序游戏出现后,一夜之间,小程序就变得家喻户晓了,功能开发也越来越丰富,在微信搜一搜就会发现许多大品牌早已有自己的小程序了,越来越多的企业和商家都看中了这个风口,想快速开发出一款属于自己的 ...
如何用微信公众号快速注册小程序
https://jingyan.baidu.com/article/ceb9fb109fab828cad2ba0ca.html 1 2 3 4 5 6 7 分步阅读为方便公众号快捷接入小程序,并在各 ...
Leslie--Chueng项目服务端、小程序的本地部署操作教程
一.解压文件夹 1. 解压文件夹 2. 查看文件夹是否正确二.创建数据库使用Navicat工具(或者任意SQL Server数据库开发管理工具)创建数据库步骤① 步骤② 步骤③ 等待运行完毕刷新 ...

AutoCAD Lisp LSP小程序实现面积注记

AutoCAD Lisp LSP小程序实现面积注记相关推荐

最新文章

热门文章

AutoCAD Lisp LSP小程序 实现面积注记

AutoCAD Lisp LSP小程序 实现面积注记相关推荐

最新文章

热门文章

AutoCAD Lisp LSP小程序实现面积注记

AutoCAD Lisp LSP小程序实现面积注记相关推荐