明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2721|回复: 25

[LISP群(1)] 2013-05-09 明经 AutoLISP 编程(102918348) 群聊记录:[image={31383FA7-4555-F7F9-0240-55DBC6

 关闭 [复制链接]
发表于 2013-5-9 00:02 | 显示全部楼层 |阅读模式
[weiqi]weiqi 00:02:02
[qqimg]oldimg/{31383FA7-4555-F7F9-0240-55DBC6B1F3CA}.jpg[/qqimg]
[仑通]仑通 00:08:17
这个是 以线上点去获得附件图层图元 ---通用函数 有错吗 希望高手修正 刚刚凑出炉
[仑通]仑通 00:09:24
x_dis 如果是变量 那么就可以用整条直线经过选择附件指定图层图元
[仑通]仑通 00:12:17
附近
 楼主| 发表于 2013-5-9 00:23 | 显示全部楼层
[weiqi]weiqi 00:23:31
还是他们看了你洗澡。。。。。觉得你小。。。
[xiaomm09]江湖 00:23:31
[weiqi]weiqi 00:23:31
兄弟,快出手,别人不介意你小的~~。。。
[xiaomm09]江湖 00:23:31
基因决定路线了。
一看成就是心怀鬼胎。
[alwtyp][alwtyp] 00:23:31
不会吧。不过治安听说倒是很不好
[236004]张牙舞爪 00:25:53
有人在吗?
"拆旧地块139#"

这种字符串怎么把数字提取出来
[236004]张牙舞爪 00:33:41
用多边形去选择多边形中图元

看不懂这意思,
[仑通]仑通 00:34:30
改装ZZXXQQ的 请高手完善下
[236004]张牙舞爪 00:35:18
你是说选择PL闭合线内的东西?
[仑通]仑通 00:35:26
[236004]张牙舞爪 00:35:36
要这么复杂吗?
[仑通]仑通 00:35:52
发个简单的给我
[236004]张牙舞爪 00:36:11
读PL线的顶点坐标,建个表,
再用SSGET
[仑通]仑通 00:36:34
[236004]张牙舞爪 00:36:53
等下,写一个,
[仑通]仑通 00:37:05
[236004]张牙舞爪 00:38:45
你试下,
我没有试的
[LC100]建筑设计 00:40:25
如何检测这个图块已经用了图形裁剪
xclip就这个命令
 楼主| 发表于 2013-5-9 07:41 | 显示全部楼层
[仑通]仑通 07:41:05
群里那个是吴所不及
 楼主| 发表于 2013-5-9 08:33 | 显示全部楼层
[仑通]仑通 08:33:58
[仑通]仑通 08:34:31
ZZXXQQ 师傅帮看下 我贴了几个函数 待完善
 楼主| 发表于 2013-5-9 08:57 | 显示全部楼层
[fsxm]飞诗 08:57:45
[qqimg]oldimg/{BB27B328-70AD-33BF-E585-23605C44E156}.jpg[/qqimg]

如何分别当前在模型空间还是布局空间?
 楼主| 发表于 2013-5-9 09:15 | 显示全部楼层
[fsxm]飞诗 09:15:49
小明被放出来了?
[蔡__洛]不快乐 09:16:20
飞诗兄能给些反应器编程代码么?
都没人用这个东西
[fsxm]飞诗 09:17:18
因为没啥用
[蔡__洛]不快乐 09:18:23
天正好多都是用反应器写的勒
[fsxm]飞诗 09:18:53
lisp用的很少
[蔡__洛]不快乐 09:19:42
嗯是啊 坛子里居然没帖子
[fsxm]飞诗 09:20:00
我发的一个坐标标注
里面有几个反应器~
代码很多,慢慢看
[仑通]仑通 09:20:18
[qqimg]oldimg/{46E3ABEA-F07F-D07F-0873-49B3E26F07F5}.GIF[/qqimg] 不凑了 够用就好
[蔡__洛]不快乐 09:20:28
搜坐标标注能看到么?
上木下鱼 09:21:18
今天明经打不开?
[蔡__洛]不快乐 09:22:33
飞诗哥 回调函数里面能操作 触发对象本身不???
 楼主| 发表于 2013-5-9 09:44 | 显示全部楼层
[Lwcdgl]coming 09:44:44
[qqimg]oldimg/{2C02F238-CDC1-E081-CF78-07E454C10DFC}.jpg[/qqimg]退不出来怎么办
[alexanderlili][alexanderlili]友缘 09:46:20
什么退不出来
[仲文玉][仲文玉]wygjx 09:47:49
[qqimg]oldimg/{2CC22535-F2AF-A93C-442A-AC72C252314B}.jpg[/qqimg]
 楼主| 发表于 2013-5-9 10:13 | 显示全部楼层
[仑通]仑通 10:13:37
(defun box-get-ss ();用多边形去选择多边形中图元
(setq s_lst (ssget "X" '((0 . "LWPOLYLINE"))))
 (if s_lst
   (progn
     (setq n_lst '(lambda  (x) (= (type x) 'ENAME)))
     (vl-remove-if-not n_lst (mapcar 'cadr (ssnamex s_lst)))
   )
 )
 (setq si (lenght n_lst))
(foreach si n_lst
     (setq ent (entget(car n_lst)))
     (= (cdr(assoc 0 ent)) "LWPOLYLINE")
     (= (cdr(assoc 70 ent)) 1)
    ) (progn
 (setq pts '())
 (mapcar '(lambda(x) (if (= (car x) 10)(setq pts (cons (cdr x) pts)))) (entget ename))
 (reverse pts)
 (trans pts 0 1)
 (ucs)
 (setq ss (ssget "WP" pts '((0 . "TEXT"))))
);foreach
(princ)
)
 楼主| 发表于 2013-5-9 10:33 | 显示全部楼层
[198526]DZ 10:33:42
跟各位大师请教一个问题
我用燕秀的文字分解功能把文字分解成多段线,为什么在有的电脑里直接分解成直线了,我电脑分解出来是多段线,这是有系统变量控制的吗?我找了好久也没找到相应的系统变量
[Sign88]宁波标志 10:35:42
[qqimg]oldimg/{BE960CA0-0F7F-8914-02D4-4725720CC9DD}.jpg[/qqimg]
这个炸开就是多段线
[198526]DZ 10:35:46
[仲文玉]wygjx 能帮忙看看吗
我没装那个
因为我是想写外挂给公司用,也不好要大家全部都装
[Sign88]宁波标志 10:37:14
[198526]DZ 10:37:49
应该是有系统变量控制的 同样都08版本有的电脑就是多段线有的就是直线
[仑通]仑通 10:47:09
弃贴了 自己 慢慢揣摩别人写的 好过在群里混
[夏生生][x_s_s_1]生无可恋 10:47:36
就是
[198526]DZ 10:48:13
有知道我问的那系统变量的吗?
一个变量能解决我好多问题
 楼主| 发表于 2013-5-9 11:04 | 显示全部楼层
[Sign88]宁波标志 11:04:49
小明呢
笑对人生 11:10:53
请教大家一个问题,多边形的重心,质心,中心那个心一定在多边形内
[198526]DZ 11:11:17
我自己在网上搜了,没找到相关的变量
笑对人生 11:12:25
怎么求法
[328302216]小莫 11:20:44
看高飞鸟的精华帖就有有关这个的
笑对人生 11:21:42
能给个链接么,小莫
[tiyi8888]永远痛 11:22:08
谁知道那种整石超尺寸的一般是什么价格呢
10个立方呢
二十多吨呢
 运费是否要贵一点呀
 如何计价呢
[328302216]小莫 11:23:32
[328302216]小莫 11:24:15
可能不是你要的那种,不过应该可以参考吧  帖子我也还没细看
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-5-4 11:20 , Processed in 0.313168 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表