设为首页收藏本站 CAD论坛 CAD教程 CAD下载明经币充值

切换到宽版

明经CAD社区 › 日志

日志

最新发表的日志| 推荐阅读的日志 | 应用 | 开发 | 插件 | 电脑 | 知识 | 资讯 | 心情 | 生活 | 文学

分享多选物体绘制包围框: Gu_xl 2014-5-13 09:17; MBox.LSP MBox.LSP 本源代码由 Gu_xl 编写发布！联系方式: Email: Gu_xl@sohu.com ;;框选物体画框 By Gu_xl 明经通道 2014.05.12 ( defun c:mBox ( / BOX INTERSECT RECTANG SS N L A L1 FLAG B C ) ( defun box ( e / p1 p2 p3 p4 obj ) ...; 3673 次阅读|5 个评论热度 16

分享用arx方法创建南方CASS的高程点: Gu_xl 2014-4-15 09:06; //By Gu_xl // AcGePoint3d insPt 插入点 // double scale 图块比例，1:1000比例尺 scale = 1.0 // AcDbObjectId objId 返回的高程点ID // double height 标注的高程值，默认 = -9999.0，高程值采用insPt的Z值 Acad::ErrorStatus CreateGC200(AcDbDatabase *pDb,AcGePoint3d insPt,double scale,AcDbObjectId ...; 2885 次阅读|1 个评论热度 6

分享按弦高限差值回返曲线拟合样本点: Gu_xl 2014-3-12 10:04; Gxl-GetSamplet.LSP Gxl-GetSamplet.LSP 本源代码由 Gu_xl 编写发布！联系方式: Email: Gu_xl@sohu.com ;;(gxl-GetSamplet CURVE d) 按弦高返回曲线拟合样本点 ;;参数 curve = 曲线图元名/对象名 ;; d = 弦高限差值 ;; By Gu_xl 明经通道，2015.04.01修正了SPLIN ...; 5130 次阅读|7 个评论热度 19

分享 text文字头尾除空格，文字位置保持不动: Gu_xl 2014-3-4 14:13; ;;text文字头尾除空格，文字位置保持不动 (defun c:tt (/ LLPT SC P1 P2 DOC E) (defun llpt (E / ENX B R L N M P) (setq enx (entget e)) (setq b (cdr (assoc 10 enx)) r (cdr (assoc 50 enx)) l (textbox enx) ...; 1788 次阅读|1 个评论热度 6

分享绘制三通: Gu_xl 2013-4-12 13:41; 问题来源： http://bbs.mjtd.com/thread-100892-1-1.html 绘制三通.LSP 绘制三通.LSP 本源代码由 Gu_xl 编写发布！联系方式: Email: Gu_xl@sohu.com ;;绘制三通 By Gu_xl 2013.04.12 (c:tt) ( defun c:tt ( / DXF UPD REVLINE PERTOLINE S0 ...; 2487 次阅读|2 个评论热度 4

分享插入文件并更新已有图块定义: Gu_xl 2013-4-2 15:58; 问题来源： http://bbs.mjtd.com/thread-100770-1-1.html 解决方案代码： ;;选择文件插入，同时更新本图的图块 By Gu_xl 2013.04.02 (defun c:ins (/ DWGNAME DBXDOC ACVER & ...; 2597 次阅读|2 个评论热度 4

分享从CASS中提取高程点坐标输出到文本: skg123 2012-12-17 11:42; CASS中高程点坐标提取，CASS自带的高程提取是整体（全部）高程点提取，当用户需要选择性的提取时就不方便了，本程序针对该问题进行了修改。命令：gcdtq ;By 2012-12-17 宜昌 (defun c:gcdtq() (setvar "cmdecho" 0) ;指令执行过程不响应 (setq ff (open (getfiled "文件保存为" "f:/" "dat" 1) "a")) (se ...; 2906 次阅读|1 个评论热度 5

分享世界末日到了: cabinsummer 2012-12-13 20:46; 很久没有编程，几个月前的一次Ghost，竟然把以前的不少心血都付诸东流了。以后再也不把程序放到C盘了。悲夫！哀哉！苦矣！痛也！; 1891 次阅读|6 个评论热度 12

分享画线打断于交点处: Gu_xl 2012-12-11 18:29; 画线打断于交点处.lsp 问题来源： http://bbs.mjtd.com/thread-99481-1-1.html 画线打断于交点处.lsp 本源代码由 Gu_xl 编写发布！联系方式: Email: Gu_xl@sohu.com ;;画线打断于交点处 By Gu_xl 2012.12.11 ( defun c:tt ( / LA P0 PT S PL A d ) ( if ( n ...; 2569 次阅读|2 个评论热度 8

分享点在封闭曲线内外判断: Gu_xl 2012-12-11 09:08; 点在曲线内外判断.LSP 本源代码由 Gu_xl 编写发布！联系方式: Email: Gu_xl@sohu.com ;;功能：判断点在封闭曲线内外，自交曲线不适用 By Gu_xl 2012.07.31 ;;返回: 点在封闭曲线上或曲线内，返回T，否则返回nil ;;测试: (gxl-PtInCurveP (car(entsel "\n选择曲线:")) (getpo ...; 3482 次阅读|1 个评论热度 14

123 4 5 / 5 页下一页

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )
©2000-2023 明经通道版权所有本站代码，在未取得本站及作者授权的情况下，不得用于商业用途

GMT+8, 2024-5-16 04:48 , Processed in 0.154615 second(s), 8 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

返回顶部