一个在CAD中标注坐标的LISP

使用方法:先把下面的代码复制,再打开CAD,工具-AutoLIST-VISUAL LISP编辑器-新建-粘贴-保存-退出

再之就工具-AutoLIST-加载应用程序,找到你保存的那个东东,加载,关闭退出,输入ZBBZ就可以啦!!!!!

[复制到剪切板][ - ]代码:

(defun C:zbbz( / zb gd cld osm )

(setq osm (getvar"osmode"))

(setvar "osmode" 33)

(setq gd (getreal "指定标注文字高度:>"))

(if (= gd nil) (setq gd 0.5))

(while (setq zb (getpoint "指定坐标点:"))

(setq cld(getpoint zb "指定文字插入点:"))

(entmake (list

'(0 . "LINE")

'(67 . 0)

'(8 . "0")

(list 10 (car zb) (cadr zb) 0)

(list 11 (car cld) (cadr cld) 0)

'(210 0.0 0.0 1.0)

)

)

(entmake (list

'(0 . "text")

(list 10 (+ (car cld) gd) (car(cdr cld)) )

(cons 40 gd)

(cons 1 ( strcat "X=" (rtos (cadr zb) 2 3)))

'(50 . 0)

)

)

(entmake (list

'(0 . "text")

(list 10 (+ (car cld) gd)

(- (car(cdr cld)) (+ gd (/ gd 3)) )

)

(cons 40 gd)

(cons 1 (strcat "Y="(rtos (car zb) 2 3)))

'(50 . 0)

)

cadlisp点选面积标注_一个在CAD中标注坐标的LISP相关推荐

  1. CAD连续标注怎么操作?CAD连续标注尺寸命令使用技巧

    CAD标注工具可以在图形中创建多种标注,并可对标注样式进行修改或编辑.但是有些新手设计师在绘图过程中,不知道CAD连续标注怎么操作,其实很简单,本节内容就给大家分享一下浩辰CAD软件中CAD连续标注尺 ...

  2. 怎么让热图显示基因名_在热图中标注出特定基因名称

    原标题:在热图中标注出特定基因名称 对于基因的差异表达谱,常用热图作为展示.但有时差异基因可能非常的多,热图中不可能将所有基因的名称标注出来.那么此时不妨选择一些比较重要的基因(比方说p值最显著的那些 ...

  3. mysql中标记某条数据库_一个关系数据库表中的各条记录可以什么

    一个关系数据库表中的各条记录前后顺序可以任意颠倒,不影响数据库中数据的实际意义.一个关系数据库的表中有多条记录,记录之间的前后顺序并不会对库中的数据关系产生影响,所以行的顺序是无所谓的,可以任意颠倒. ...

  4. 一个java源文件允许_一个Java源文件中最多只能有一个class定义

    一个Java源文件中最多只能有一个class定义 答:× 确诊甲状腺功能紊乱的常规指标是 答:FT3和FT4 I will not let my children in that way. 答:be ...

  5. java 两个url对比_一个URL模式中的两个slu ..

    如何将两个slu in放在一个url模式中?我有一个与模型类别有多对一关系的模型链接 . url( regex=r'^(?P[\w-]+)/(?P\d+)(?:/(?P[\w\d-]+))?/$', ...

  6. Java main方法_解释Java中的main方法,及其作用_一个java文件中可包含多个main方法

    public static void main(String[] args) {} 或者 public static void main(String args[]) {} main方法是我们学习Ja ...

  7. ai中如何插入签名_怎么将CAD中插入图片的多余部分抠掉?如何设置透明效果?...

    下面是本公众号文章分类目录,点击标题文字可打开分类文章列表: CAD安装卸载  异常.退出  文件及输入输出  基本操作技巧  各种设置及相关问题  界面和显示相关问题  快捷键  视图设置和调整   ...

  8. 励遍图块中的实体_如何删除CAD中的顽固图层?【AutoCAD教程】

    点击蓝色字关注我哟 ☀每天推送CAD软件安装及下载.CAD工具应用.CAD技巧.CAD教程.CAD素材.CAD疑难问题解答等文章 ☀想认识志同道合的朋友一起学习CAD?请加入我们的QQ群 369845 ...

  9. 标注界址点号lisp_CAD工程图中标注序号的LISP程序

    在工程设计工作中,经常要对设备.零件等标注序号.根据标准化要求,在标注点处要加上实心小圆点,然后引出直线 ;在另一端画出一个8-10mm的圆 ;在圆中写上所标注的序号文字.用AutoCAD基本命令完成 ...

  10. cad画圆如何确定圆心_原来在CAD中画个圆也有这么多学问!你知道这些画圆的技巧吗?...

    阅读本文前,请您先点击上面的"蓝色字体",再点击"关注",这样您就可以继续免费收到文章了.如果喜欢就关注订阅吧!也不要忘记点赞哦~亲,看的开心可以点个好看 . ...

最新文章

  1. 【Todo】Java的JIT机制
  2. php 输出函数结果,PHP向浏览器输出内容的4个函数总结
  3. LeetCode Reconstruct Original Digits from English
  4. 【哈利波特】Sherbert Lemon对HP的解读之六
  5. PAT甲级1120 Friend Numbers:[C++题解]set去重且有序
  6. java的多线程实现方式_java 多线程实现方式
  7. 重要接口—Cloneable接口
  8. JavaScript全面学习(中阶)
  9. NSIS学习笔记(转)
  10. Oozie自带MapReduce示例的运行
  11. 用VB轻松调用其他程序
  12. 微软提高 Microsoft 365 的漏洞奖励
  13. c语言命令行参数怎么输入_C语言程序设计——这个函数原型你看懂了吗
  14. Javascript语法基础 - Javascript核心(一)
  15. Hibernate【2】——封装工具、HibernateUtil类以及DAO层的BaseDAO类
  16. 计算机Excel电子表格处理文件,#excel2016打不开已恢复的文件#所有表格打不开怎么办...
  17. 人机交互及用户体验、GUI思考
  18. 大气的品牌化妆品官网模板
  19. python保存图片
  20. vi 编辑器的使用 笔记

热门文章

  1. 2022软工K班个人编程任务
  2. 毕业5年,我把前后端好的书籍整理了一下,希望能帮到你(建议收藏)
  3. ​​​​​​​sokit v1.3抓手机应用socket数据包: Socket是传输控制层协议,WebSocket是应用层协议。
  4. 费率转换成利率的计算器_存款利率计算器
  5. 宠物管理系统CLI版本(Python实现/内附完整代码)
  6. CMD启动MySQL常用命令
  7. 硬盘安装工具cgi_PE系统(U盘安装)
  8. python做鼠标自动移动_Python实现鼠标自动在屏幕上随机移动功能
  9. css 面试题画三角
  10. android 动态壁纸 时钟,Android自定义动态壁纸开发(时钟)