明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 3000|回复: 24

[LISP群(1)] 2013-05-06 明经 AutoLISP 编程(102918348) 群聊记录:[image={19D73B62-AF38-61EC-B666-093DC6

 关闭 [复制链接]
发表于 2013-5-6 07:13:41 | 显示全部楼层 |阅读模式
[仑通]仑通 07:13:41
[qqimg]oldimg/{19D73B62-AF38-61EC-B666-093DC6F53B62}.GIF[/qqimg]
 楼主| 发表于 2013-5-6 09:52:43 | 显示全部楼层
[ ](car (entsel)) 09:52:43
有用emacs
写lisp代码的吗
有用emacs写lisp代码的吗?或者有用vim写autolisp代码的吗
 楼主| 发表于 2013-5-6 10:09:08 | 显示全部楼层
[yarp]潜水 10:09:08
我用vim写autoLisp代码。
[ ](car (entsel)) 10:15:07
大哥你好,你用了什么vim的插件写lisp的?
[linshiyin2]大地 10:21:43
[qqimg]oldimg/{16C037B6-D25B-D597-CF6A-76A158341E4D}.jpg[/qqimg]
啥玩意啊
[linshiyin2]大地 10:22:39
怎么不能显示啊
 楼主| 发表于 2013-5-6 10:44:24 | 显示全部楼层
[no13bus]13公交车 10:44:24
vim自己就有模版匹配lisp
[ ](car (entsel)) 10:45:45
能够在一对括号()的外面快速插入括号吗
[不死猫][nonsmall]不死猫 10:54:19
括号匹配选择-剪切-插入括号-粘贴
上木下鱼 10:59:07
有没有好的画管线 弯头 插入阀门法兰的程序
 楼主| 发表于 2013-5-6 11:10:34 | 显示全部楼层
[雨的节奏][雨的节奏] 11:10:34
我们一个同事买个iphone5 用了没几天锁屏键不好使了
然后晃动会有声音、、
晕死、、、打算买5的要谨慎啊
[仲文玉]wygjx 11:11:57
中奖了吧
我的木事,蛮好啊。
[不死猫][nonsmall]不死猫 11:12:17
先看看是不是安卓改的系统
[雨的节奏][雨的节奏] 11:12:28
哈哈,用了十多天了啦、、
[tiyi8888]永远痛 11:12:33
我同事摔坏了
呵呵
去修了一下
那个不劳的
[雨的节奏][雨的节奏] 11:12:42
晃动一下,里面会响
[仲文玉]wygjx 11:12:45
用了才知道,木有啥好的,还这么老贵
[雨的节奏][雨的节奏] 11:13:04
是不好,他还买的金色限量版的
[tiyi8888]永远痛 11:13:17
限量说明有钱
人家有钱的主子呀
不要可怜他
[雨的节奏][雨的节奏] 11:13:33
也才4600啊,找朋友拿的
[仲文玉]wygjx 11:13:34
哈哈
[雨的节奏][雨的节奏] 11:13:43
他朋友开手机店的
不是行货,是水的
[tiyi8888]永远痛 11:13:58
朋友赚朋友的钱
[仲文玉]wygjx 11:13:59
哦,我花了4998
[tiyi8888]永远痛 11:13:59
就是这样
[雨的节奏][雨的节奏] 11:14:08
刚才我玩一会机身烫得厉害啊
[tiyi8888]永远痛 11:14:11
4998与4600有什么区别呀
[仲文玉]wygjx 11:14:13
翻版的吧
[雨的节奏][雨的节奏] 11:14:18
机器肯定有问题、、
[tiyi8888]永远痛 11:14:23
我的2600小米,修了一下好了
[雨的节奏][雨的节奏] 11:14:24
才出来一会不可能会有翻新的啊
[tiyi8888]永远痛 11:14:28
换了块电板
呵呵
[仲文玉]wygjx 11:14:40
是的,苹果充电不怎么发热的
木有电板。。
[tiyi8888]永远痛 11:14:49
翻版的吧
肯定 的
[仲文玉]wygjx 11:14:54
内置的
[tiyi8888]永远痛 11:14:57
人家也是象我同事,一摔坏了
去翻版了
[雨的节奏][雨的节奏] 11:15:05
翻新的也不会这么不靠谱吧
也翻得太差了
[tiyi8888]永远痛 11:15:17
谁说的清呢
当然了
[雨的节奏][雨的节奏] 11:15:40
翻新无所谓,好多行货店还卖的是翻新机呢
关键是要好用啊
[仲文玉]wygjx 11:16:02
你让他去买彩票吧
[雨的节奏][雨的节奏] 11:16:26
我百度了一下。好多iphone5晃动都有响声啊
[loveguo]筠筠 11:18:38
如果行货这样的话就危险了
[雨的节奏][雨的节奏] 11:19:52
很多行货都有这样的问题啊,百度不是有人说展示机晃动不响,自己买回去的会有响声、、换了几部都一样
看来苹果要走下坡路了啊
[loveguo]筠筠 11:20:45
不清楚 我这里的同事和朋友没有一个这样的情况
[雨的节奏][雨的节奏] 11:21:23
不清楚啊,个例,我们这也只有他这么倒霉
[loveguo]筠筠 11:22:10
嗯 不过这手机不经摔 一摔就悲催
[雨的节奏][雨的节奏] 11:22:23
黑色还掉漆、、
我当初想分期一款来用用的,拿他的用了一下就没欲望了、、、
[loveguo]筠筠 11:23:04
5S出来就好多了 
不过还是4S好用
[雨的节奏][雨的节奏] 11:23:35
4S确实好用
[loveguo]筠筠 11:23:49
国行的还不胜港版的呢
[雨的节奏][雨的节奏] 11:23:57
我们公司用苹果的不多、、、
[loveguo]筠筠 11:23:59
又贵还不好用
[雨的节奏][雨的节奏] 11:24:08
都觉得容易撞机
他傻XX的说金色的就不会撞机
结果有人说他是山寨的
人们意识里苹果只有黑白两色
[loveguo]筠筠 11:24:43
苹果现在是街机
[夏生生][x_s_s_1]生无可恋 11:24:49
V998+笑而不语
[雨的节奏][雨的节奏] 11:24:59
那些限量版的也不是苹果官方出的嘛、、好像是有家喷漆公司代工的
可以自己去喷,1700块,你想要什么颜色就给你弄什么颜色
[loveguo]筠筠 11:25:13
998老经典了
[夏生生][x_s_s_1]生无可恋 11:25:26
10年了还是那么贴心
[loveguo]筠筠 11:25:32
1700还喷那东西 直接买个小米手机了
[雨的节奏][雨的节奏] 11:26:20
米2很不错啊、、性能不比iphone5差
[no13bus]13公交车 11:26:42
我买了个2A
[EMD][EMD]路人甲 11:27:00
2a用着感觉如何?
[no13bus]13公交车 11:27:59
刚拿到
觉得跟塑料似地
真轻
[仑通]仑通 11:29:21
有没相同图元形成同名块的LSP
[夏生生][x_s_s_1]生无可恋 11:30:24
没有
怎么判断图元相同
[仑通]仑通 11:30:57
根据 属性
[雨的节奏][雨的节奏] 11:31:03
aq
eq
[仑通]仑通 11:31:09
cond = type
cond = type  = type = type = type = type = type = type
[夏生生][x_s_s_1]生无可恋 11:31:32
是相同不
[仑通]仑通 11:31:34
N个type组成
那就忽略掉这个不同
[夏生生][x_s_s_1]生无可恋 11:32:31
那就只有根据自己的需要写了
问题太泛,无法回答
都是圆还好说
[夏生生][x_s_s_1]生无可恋 11:33:33
线段角度不同算不算相同呢
[夏生生][x_s_s_1]生无可恋 11:34:09
属性块,块名相同,属性值不同算不算相同呢
[仑通]仑通 11:34:22
[qqimg]oldimg/{0C482915-7A3D-0F98-8DCE-FB5C1761E52C}.jpg[/qqimg]
就是 这个两桩承台 批量形成同名块
[夏生生][x_s_s_1]生无可恋 11:35:45
就是那个框框加两个圈圈是吧
[仑通]仑通 11:36:23
[夏生生][x_s_s_1]生无可恋 11:40:18
首先选定初始条件,得出矩形框的各个边长,以及圆与四个角点的关系,然后(ssget "x")选满足条件的矩形框,再用矩形框选圆,找到满足条件的圆,找到一个做个块,再删除原图
[夏生生][x_s_s_1]生无可恋 11:42:03
要习惯(defun c:css ( / lst-gz-ct gz_lst ct_lst)
[仑通]仑通 11:43:44
其实判断 四边形内两圆形成组 然后计算 两桩圆心连线中点 形成块就行了
[夏生生][x_s_s_1]生无可恋 11:44:39
ssget "f"好像是
[kwok][kwok]巭隼 11:45:05
怎么加上?加上"c"不行
[夏生生][x_s_s_1]生无可恋 11:50:50
ssget "f" (list pt1 pt2)
[夏生生][x_s_s_1]生无可恋 11:51:28
"c"是窗交,这种都要用ptlst
[仑通]仑通 11:57:11
怎么判断圆在框内
[wkq004]地形图 11:58:50
圆心距四边的垂距小于半径
[仑通]仑通 11:59:18
其实可以 用 四边形的批量框选去选择两个圆并形成组
[wkq004]地形图 12:00:00
ssget不是一个可靠的函数。
[夏生生][x_s_s_1]生无可恋 12:00:14
[夏生生][x_s_s_1]生无可恋 12:01:32
自己看
[wkq004]地形图 12:01:45
圆心在框内
圆心距四边的垂距小于半径
可否?
[仑通]仑通 12:02:12
可以的
[wkq004]地形图 12:02:38
明经快报是机器人吗?
[仑通]仑通 12:02:46
其实 可以这样 承台对角点 框选圆
构成组
[wkq004]地形图 12:11:13
明经快报不是机器人啊。
猫老师好。
[仑通]仑通 12:11:33
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=99390遍历图形,获取矩形角点坐标
[仑通]仑通 12:14:12
[qqimg]oldimg/{59E66428-9F9C-B6A1-0CEC-A5E014572C57}.jpg[/qqimg]批量选择四边形 用四边形框选圆 再计算两圆心中点
构成组 写块
[wkq004]地形图 12:19:48
建立一个选择集,过滤图层和矩形,然后for循环
矩形如何过滤?
四个顶点封闭的多段线,有一直角,两对边长度相等?
[仑通]仑通 12:20:28
不是 最大点和最小点构成 矩形框选
[仑通]仑通 12:21:01
或者 最大点 最小点 +一个便宜量构成矩形框选
[仑通]仑通 12:21:37
得到 矩形 两圆 再计算两圆心连线中点为插入点
[wkq004]地形图 12:23:26
哦,选到的图形,不用判断是否为矩形。
[仑通]仑通 12:23:59
是的
孑孓空灵 12:33:53
能不能给块加扩展属性?
[仑通]仑通 12:35:02
这个不懂
[wkq004]地形图 12:36:48
可以
孑孓空灵 12:37:42
能给个实例吗?
[wkq004]地形图 12:37:45
复杂元素给主图元名上添加即可。
[wkq004]地形图 12:38:24
和给简单实体添加是一样的。
孑孓空灵 12:38:41
谢了。
[仑通]仑通 12:41:45
vlax-curve-getPointAtParam 怎么用这个函数得到矩形线上所有点
[蔡__洛]不快乐 12:42:04
请问下 创建一个图元完成的同时激发的反应器用什么类型的反应器?用:VLR-AcDb-Reactor 还是:VLR-Object-Reactor 还是其他什么反应器呢???
 楼主| 发表于 2013-5-6 13:01:34 | 显示全部楼层
[仑通]仑通 13:01:34
(setq lst (list (vlax-curve-getPointAtDist ssn 1e-5)))
(setq pt_max lst 
      pt_min lst)
(ssget "f" (list pt_max  pt_min) 
'((-4 . "")))
 楼主| 发表于 2013-5-6 13:29:01 | 显示全部楼层
[mitenickevin]kevin 13:29:01
 楼主| 发表于 2013-5-6 13:51:16 | 显示全部楼层
[Gu_xl][Gu_xl] 13:51:16
PS
 楼主| 发表于 2013-5-6 14:06:34 | 显示全部楼层
 楼主| 发表于 2013-5-6 14:29:57 | 显示全部楼层
[雨的节奏][雨的节奏] 14:29:57
上次记得谁说了getstring怎么输入空格的
我忘了,谁懂得教一下
[【KAIXIN】] [【KAIXIN】]炫翔 14:30:58
INEGET
[【KAIXIN】] [【KAIXIN】]炫翔 14:32:58
(getstring msg XX) XX不为空时
[ ](car (entsel)) 14:41:55
autolisp如何自动格式化代码?我说的是缩进?如何让一个没有缩进的程序快速缩进?
[ ](car (entsel)) 14:42:59
autolisp如何自动格式化代码?我说的是缩进,如何让一大片没有缩进的代码快速而准确地缩进呢?
[pzweng]路人 14:45:18
ctrl+atl+f
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-6 07:22 , Processed in 0.189881 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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