日志

分享 两线间拟合多段线

Gu_xl 2012-11-15 11:37

问题来源： http://bbs.mjtd.com/thread-99157-1-1.html 两线间拟合多段线.LSP 本源代码由 Gu_xl 编写！ 联系方式: Email: Gu_xl@sohu.com ( defun c:tt ( / E1 E2 N L1 L2 D1 D2 DD1 DD2 PTS1 PTS2 P1 P2 W1 MP1 P3 P4 W2 MP2 CP cmdecho osmode *error* ) ...

1512 次阅读|0 个评论 热度 4

分享 删除重叠数字，保留较大的数或保留较小的数

Gu_xl 2012-11-15 09:55

问题来源： http://bbs.mjtd.com/thread-99118-1-1.html 删除重叠数字(留大或留小).LSP 本源代码由 Gu_xl 编写！ 联系方式: Email: Gu_xl@sohu.com ;;删除重叠数字，保留较大的数或保留较小的数 ( defun c:tt ( / kd e ll ur n s1 ) ( initget "Big Small" ) ...

2515 次阅读|6 个评论 热度 7

分享 乔布斯

cabinsummer 2012-2-19 12:06

1196 次阅读|3 个评论 热度 11

分享 [自定义函数]给定返回类型(整数或实数)和随机区间，返回一个数值

soly2006 2012-2-7 12:15

;; | --------------------------------------------------------------------------- ;; | jn-rand ;; | --------------------------------------------------------------------------- ;; | Function : 给定返回类型(整数或实数)和随机区间，返回一个数值 ;; | Argument : (jn-rand 1 45.3 46.7)或(jn-rand 0 45.3 ...

1638 次阅读|2 个评论 热度 3

分享 收集的一些国外CAD网站地址

tjuzkj 2012-1-23 08:31

http://www.theswamp.org/ http://forums.autodesk.com/ http://www.cadtutor.net/forum http://forums.augi.com/ http://lee-mac.com/ http://cadtips.cadalyst.com/ http://web2.airmail.net/terrycad/ http://www.4d-technologies.com/techcenter/index.htm http://www.dotsoft.com/ http://www.jt ...

1955 次阅读|3 个评论 热度 7

分享 VL VLA VLX等函数（强）

【KAIXIN】 2011-12-12 19:24

刚刚接触这些函数就别VL类函数迷住了，省去了不少的重复 期待更一步的前进............... 一个简单例子： ;改变对象所属层 作者：KAIXIN (DEFUN C:KK() (princ "\n请选择要改变层的对象:") (setq ss (ssget)) (if (and ss ( (sslength ss) 0));判断最少要选到一个 ...

2007 次阅读|4 个评论 热度 10

分享 模仿动态右键菜单

caoyin 2011-11-30 09:47

;;; 模仿动态右键菜单-----by caoyin 2011.11.29 ;;; ------------------------------------------------------------- ;;; 以前我们实现右键菜单是在菜单文件中编辑好宏，用的时候调用， ;;; 现在可以利用DYN功能和WScript.Shell对象的SendKeys方法随机实现。 ;;; 适用 AutoCAD 2006 及以上版本 ;;; ------------------ ...

2013 次阅读|1 个评论 热度 13

分享 那啥歌

vormittag 2011-11-17 23:20

那啥你干啥要那啥呀！ 你要那啥到啥时候才能不那啥呀？ 你不那啥的话会那啥呀 还是那啥的话就会不那啥呀。

1000 次阅读|1 个评论 热度 5

分享 [写给新手]两种机制让ENTSEL更完美

caoyin 2011-11-15 02:56

;;两种机制让ENTSEL更完美------caoyin 2011.11.14 ;;本文从以前的程序中整理出来，希望能给新手一些启示。 ;;entsel函数在执行过程中会出现3中可能 ;;1.选择为空，返回nil，退出。 ;;2.用户右击鼠标，返回nil，退出。 ;;3.选中对象，返回一个包含点和图元名的表。但有时候对象的类型并不是自己想要的 ...

3150 次阅读|1 个评论 热度 14

本页有 1 篇日志因作者的隐私设置或未通过审核而隐藏