明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1698|回复: 6

[LISP群(1)] 2013-05-08 明经 AutoLISP 编程(102918348) 群聊记录:[face98.gif]

 关闭 [复制链接]
发表于 2013-5-8 16:45:05 | 显示全部楼层 |阅读模式
[【KAIXIN】] [【KAIXIN】]炫翔 16:45:05
[夏生生][x_s_s_1]生无可恋 16:51:45
[qqimg]oldimg/{E65ABF20-DF50-09D0-8FD4-EAE836A6B723}.jpg[/qqimg]
谢谢路人,谢谢桔子
[夏生生][x_s_s_1]生无可恋 16:53:52
[qqimg]oldimg/{29AC96DE-6270-55D2-0888-F85DBC35C69A}.jpg[/qqimg]再研究研究就差不多了
[vormittag]桔子 16:54:40
很帅!
[夏生生][x_s_s_1]生无可恋 16:54:58
(setq a    1
      b    2
      c    3
)
(setq v1    (/ 0.8 100)
      u1    (/ (* 2 pi) 180)
      m    0
      n    0
)
(while (
[vormittag]桔子 16:55:26
你打点做的?
[夏生生][x_s_s_1]生无可恋 16:55:32
先看看效果,再连线
[夏生生][x_s_s_1]生无可恋 16:57:24
[qqimg]oldimg/{742DE93B-6F9A-C199-4CFA-D832C33C68F9}.jpg[/qqimg]
[vormittag]桔子 16:57:54
再做个变换,就可以在任意坐标系里了。
[夏生生][x_s_s_1]生无可恋 16:58:16
请指教
wzl_00 wzl 16:58:56
请教一下,如何让CAD中XY平面转一个角度?
[雨的节奏][雨的节奏] 16:59:11
ucs  plan
[vormittag]桔子 17:00:18
对每个点用一个变换矩阵变换。
[夏生生][x_s_s_1]生无可恋 17:01:15
好的,我再研究研究,非常感谢
wzl_00 wzl 17:01:41
谢谢[雨的节奏]
[vormittag]桔子 17:01:59
[qqimg]oldimg/{6A47B084-C650-9C35-3CD3-F3B2BDA6D423}.gif[/qqimg]
就像这种
[vormittag]桔子 17:04:47
图片来自论坛,好像是Gu版的帖子。
[夏生生][x_s_s_1]生无可恋 17:06:30
鸟版的吧,我找找
[vormittag]桔子 17:07:33
这个图片好像是G版的,鸟版对变换的原理讲得更多一些。
[不死猫][nonsmall]不死猫 17:15:32
[qqimg]oldimg/{74CF3E8A-9190-D1C4-321F-B892E2630E12}.gif[/qqimg]
[不死猫][nonsmall]不死猫 17:16:28
论坛哪里贴的图?
[vormittag]桔子 17:17:14
那是猫贴的,我记错了
[夏生生][x_s_s_1]生无可恋 17:17:39
[不死猫][nonsmall]不死猫 17:17:50
不是我贴的  好像是有人求过这个程序吧
我只在群里发过
[vormittag]桔子 17:18:27
这个转换矩阵是怎么构造的?
[VBALISPER]恐龙 17:18:30
扇形图片那个吗?
[vormittag]桔子 17:19:09
扇形那个容易,矩形变换成任意四边形。
[夏生生][x_s_s_1]生无可恋 17:19:31
平面转球面有点难度
[VBALISPER]恐龙 17:20:08
[fsxm]飞诗 17:22:09
 矩形变换成任意四边形,画个网格,按点计算,曲线全转成细直线
[vormittag]桔子 17:23:10
这也是办法,我的想法这应该是一个线性变换,应该可以写出变换矩阵来。
[fsxm]飞诗 17:24:08
cad不支持这种矩阵的
[vormittag]桔子 17:24:20
[qqimg]oldimg/{153B5D32-983B-CD67-CF71-BDE4BF4EA75D}.jpg[/qqimg]
[vormittag]桔子 17:24:58
数学上应该能求解这样的矩阵,只要变换各多段线的顶点就行了。
[vormittag]桔子 17:26:19
应该是锥体黄色底面->锥体某一红色截面 的变换。
[vormittag]桔子 17:27:25
变换点直接用变换矩阵进行代数运算就行了。
[fsxm]飞诗 17:27:51
不是这种
[fsxm]飞诗 17:29:32
先从田字变四边形算起吧
就按比例
[fsxm]飞诗 17:30:29
变按后中点还是中点
[vormittag]桔子 17:32:16
数学上对于任意两个四边形是否存在那种空间射影变换?
[fsxm]飞诗 17:32:33
不存在
[vormittag]桔子 17:32:45
有证明么?
[fsxm]飞诗 17:33:06
能变个凹的吗
反证
[vormittag]桔子 17:33:32
任意两个凸四边形
[pzweng]路人 17:33:32
肯定能
任意曲面
[fsxm]飞诗 17:34:45
这个矩形空间变换永远没有凹的
water_system 17:36:19
如果颜色是随层 62就没有了什么好的办法去颜色
[fsxm]飞诗 17:36:51
四边形直接按比例算坐标就行了
[vormittag]桔子 17:40:02
我总是感觉能直接构造变换矩阵,当然是凸四边形向凸四边形的变换。
[夏生生][x_s_s_1]生无可恋 17:40:18
(if(null (assoc 62 ent)(reverse(append (cons 62 你要的颜色)(reverse ent)))))
就是那么个意思
 楼主| 发表于 2013-5-8 17:58:48 | 显示全部楼层
[夏生生][x_s_s_1]生无可恋 17:58:48
[qqimg]oldimg/{64760187-B19A-044A-A3E9-5349CAB14801}.jpg[/qqimg]
[vormittag]桔子 18:01:34
开画莫比乌斯环了?
[夏生生][x_s_s_1]生无可恋 18:01:57
练习一下参数方程的写法
[fsxm]飞诗 18:03:12
芒果logo
[vormittag]桔子 18:04:14
接下来就是克莱因瓶了。
[fsxm]飞诗 18:05:05
画完芒果画桔子
[vormittag]桔子 18:05:05
我只会画莱洛三角形。
[vormittag]桔子 18:05:55
木有桔子台啊。
 楼主| 发表于 2013-5-8 18:47:47 | 显示全部楼层
[dcl1214]昌立 18:47:47
[qqimg]oldimg/{A3F78EE4-F706-B642-EAA4-726A5C8B2FB9}.jpg[/qqimg]
[dcl1214]昌立 18:48:34
这位高人是谁
 楼主| 发表于 2013-5-8 20:44:31 | 显示全部楼层
[mccad][MCCAD] 20:44:31
吹吧
我帮小明交了保护费
TX就是要收保护费,不然小明就不断的掉线
[q530496591][q530496591]小菜鸟 20:44:56
什么意思?
小明不太智能啊
[mccad][MCCAD] 20:45:39
当然要慢慢来,智能聊天功能我已经关了,只留下与论坛搜索有关的东西
其它功能需求慢慢再做吧
[q530496591][q530496591]小菜鸟 20:46:19
嗯。只要学习有关的。其它无关的关了它
[mccad][MCCAD] 20:48:09
哎,还是有部分被TX给拦下
[q530496591][q530496591]小菜鸟 20:48:39
。。。老马。。
无语!
[雨的节奏][雨的节奏] 20:49:33
天气
机票
这两个很实用啊
[mccad][MCCAD] 20:50:08
因为是在智能聊天里,你可以私聊
[雨的节奏][雨的节奏] 20:50:29
私聊有天气
[mccad][MCCAD] 20:50:31
不过这个功能要将小明加为好友才行
[雨的节奏][雨的节奏] 20:50:39
我已经加了、、
微信也加了
[mccad][MCCAD] 20:50:51
私聊的智能聊天功能还开着
[雨的节奏][雨的节奏] 20:50:54
我经常问他天气还有机票车票之类的问题
[雨的节奏][雨的节奏] 20:52:15
为什么有时候(cadr (grread 1))返回0呢?
[雨的节奏][雨的节奏] 20:54:43
bpoly跟boundary有什么区别吗?
[仑通]仑通 20:55:09
没用过 而且电子书好像没这个函数
[雨的节奏][雨的节奏] 20:55:34
不是,这两个命令在CAD里面好像是一样的功能啊
[仑通]仑通 20:56:11
很多电子书 提供的函数不全
[仑通]仑通 21:03:38
MCCAD好似是钱东人?
[alwtyp][alwtyp] 21:05:06
潮汕的
[仑通]仑通 21:07:16
我知道 我也那边
[alwtyp][alwtyp] 21:07:48
我去过一次,还是90年代
[kwok][kwok]巭隼 21:07:48
我也是也
[mccad][MCCAD] 21:07:52
??
正宗潮州人
[alwtyp][alwtyp] 21:08:22
湘子桥
[kwok][kwok]巭隼 21:08:23
我是正宗潮汕人
[alwtyp][alwtyp] 21:08:50
开元寺
[kwok][kwok]巭隼 21:09:18
看来群里挺多潮汕的,
[alwtyp][alwtyp] 21:09:45
还去过韩山师院
[仑通]仑通 21:09:48
我饶平
[mccad][MCCAD] 21:09:54
开元寺去过几次,你在前殿还是后殿?
[mccad][MCCAD] 21:10:28
qjchen也是潮州的
[alwtyp][alwtyp] 21:10:48
从前面进去的,后面有没有去过忘记了。都快二十年了
[alwtyp][alwtyp] 21:11:33
还去过彩塘
爬过那里一座山
[mccad][MCCAD] 21:12:33
彩塘离我家很近了
[仑通]仑通 21:12:48
 这个论坛是高中一个同学介绍给我的 不知道 群主是不是他哥
[alwtyp][alwtyp] 21:12:54
骑车从彩塘去达濠,回来走海边的大桥到火车站买车票
[仑通]仑通 21:13:05
许明鑫
[mccad][MCCAD] 21:13:16
桑脯山
[仑通]仑通 21:13:23
他也是做论坛的
[alwtyp][alwtyp] 21:13:32
上面有一个小庙
[mccad][MCCAD] 21:13:32
呵呵
我不是做论坛的,呵呵
小庙,甘露寺?
[kwok][kwok]巭隼 21:13:57
达濠现在是汕头最好的地方了
[alwtyp][alwtyp] 21:14:09
好像是叫这个名字
[kwok][kwok]巭隼 21:14:26
路大空气好
[alwtyp][alwtyp] 21:14:37
夹在山中的大石头里面
[mccad][MCCAD] 21:14:48
是的
[仑通]仑通 21:14:56
汕头 住宿很便宜 呵呵 我去汕头 陈处合 住土着宾馆 一个晚上 25元
[mccad][MCCAD] 21:15:12
我就讨厌一路台阶都是乞丐
[alwtyp][alwtyp] 21:16:05
我好多小学同学都是潮汕的,90年代都返回潮汕了
[仑通]仑通 21:16:52
现在潮汕地区比安徽池州还差
[kwok][kwok]巭隼 21:17:14
现在也可以来,高铁一建好,来回很快的
这边吃的是最好的,
[仑通]仑通 21:18:21
 上次回家 花甲一斤4.5元 太爽了
[kwok][kwok]巭隼 21:18:28
娱乐也多
[kwok][kwok]巭隼 21:19:06
机场也有专车
[alwtyp][alwtyp] 21:19:13
潮汕美食很赞。尤其是那个牛肉丸,到现在都还在回味
[mccad][MCCAD] 21:19:20
我老家离机场不远
离高铁站也不远
[仑通]仑通 21:19:38
 估计你还没吃过 果粉
[alwtyp][alwtyp] 21:20:09
听过,不过不是很喜欢
吃过
[weiqi]weiqi 21:20:16
明总一定吃过果条~
[gzxl] 21:20:35
"答咪該"是不是潮汕话?
[kwok][kwok]巭隼 21:20:36
没办法,高铁弄以饶平那边
[仑通]仑通 21:20:37
现在深圳找不到
[weiqi]weiqi 21:20:41
是。
[kwok][kwok]巭隼 21:20:46
说要带动那边
[仑通]仑通 21:20:59
果条这个人人都吃过 果粉就不一定
[tryhi]大海 21:21:09
请教一个西安80坐标转北京54坐标四参数转换问题
明经币悬赏http://bbs.mjtd.com/thread-101326-1-1.html
[weiqi]weiqi 21:21:32
果粉是什么?
[kwok][kwok]巭隼 21:21:55
【逸龙】312205714 21:21:58
请教高手:atuocad2004 LISP重生命令能否对某对象重生,不要对整个图档重生
[gzxl] 21:22:01
果条
[kwok][kwok]巭隼 21:22:14
果粉相当好食
[weiqi]weiqi 21:22:46
。。。
[仑通]仑通 21:22:56
果粉 很怀念 没办法 现在回去都没办法吃到 要遇到有人叫街卖
[alwtyp][alwtyp] 21:22:58
用删除再回退的方法好一点
[仑通]仑通 21:23:12
现在也没人叫街卖这个了
[weiqi]weiqi 21:23:15
我湘桥区的~
[alwtyp][alwtyp] 21:23:28
对了,还有擂茶。
[mccad][MCCAD] 21:23:45
完了,擂茶我没听过
[alwtyp][alwtyp] 21:23:48
好像是客家人的东西吧
[kwok][kwok]巭隼 21:23:54
擂茶 更少了,现在
[仑通]仑通 21:24:08
油炸果
[alwtyp][alwtyp] 21:24:17
在揭西时喝过
[weiqi]weiqi 21:24:20
[仑通]仑通 21:24:27
芋苏
[kwok][kwok]巭隼 21:24:39
我边有一条少女好食街,专吃这些小吃
[仑通]仑通 21:24:44
菜头丸
[mccad][MCCAD] 21:24:49
我喜欢薄壳米
[仑通]仑通 21:25:21
薄壳 我小时候 我家虾池一条沟 长满 忍吃
[kwok][kwok]巭隼 21:25:22
苏饺也不错
[alwtyp][alwtyp] 21:25:34
薄壳米,这个不错,我也喜欢
[仑通]仑通 21:25:36
任吃
alwtyp 看来在潮汕生活过
[gzxl] 21:26:07
花生?这句我懂
[kwok][kwok]巭隼 21:26:09
薄壳 加点九层塔,相当没法说
[weiqi]weiqi 21:26:20
[仑通]仑通 21:26:40
沙茶炒薄壳
[alwtyp][alwtyp] 21:26:54
没有,就是以前去过,每到一个地方都有好几个同学招待。在潮汕地区待了快一个。
[仑通]仑通 21:27:07
沙茶炒花蚶
[仑通]仑通 21:27:37
不行了 过几天我肯定要回去爽一下
[weiqi]weiqi 21:27:57
芥兰。。
[gzxl] 21:27:58
还有墨斗丸也很好吃
[仑通]仑通 21:28:10
上次去汕头 就天天喝白粥 20多个小菜选 爽到我天天喝
[kwok][kwok]巭隼 21:28:21
现在花蚶哩有,薄壳哩冇
[仑通]仑通 21:28:26
喝一次饱也就 7  8元
[gzxl] 21:28:42
那个有血的壳叫什么?
[kwok][kwok]巭隼 21:28:55
呵呵
[gzxl] 21:28:58
生吃的
[kwok][kwok]巭隼 21:29:11
还不写了
[weiqi]weiqi 21:29:14
hang....
[kwok][kwok]巭隼 21:29:22
好象,蛤
[gzxl] 21:29:33
海鲜类的,不知道叫什么
[tryhi]大海 21:29:43
血贝
[仑通]仑通 21:29:44
 来深圳8 年 没发现深圳的粥有比汕头饶平地区粥好喝的
没得说 那边
[kwok][kwok]巭隼 21:30:03
谁吃的,你没吃过吧,深圳有大把
[仑通]仑通 21:30:20
你叫我选 我宁愿选择住汕头 饶平
[kwok][kwok]巭隼 21:30:21
在向西那边
龙华也朋
[仑通]仑通 21:30:38
深圳是有 没那边好喝
[kwok][kwok]巭隼 21:31:06
当然,用的水不同嘛
[仑通]仑通 21:31:14
[kwok][kwok]巭隼 21:31:17
[仑通]仑通 21:32:15
我家以前加后面 有个豆浆坊和油条 哇 那个爽 豆浆浓到没得说
一口壶一元
[weiqi]weiqi 21:32:45
肠粉~
[仑通]仑通 21:32:57
油条 2毛一条
[alwtyp][alwtyp] 21:34:00
好想再吃广东的肠粉
[仑通]仑通 21:34:13
肠粉 就是果粉
现在没了
深圳现在这种肠粉 不是果粉
[weiqi]weiqi 21:34:34
[alwtyp][alwtyp] 21:34:42
好像不大一样
[仑通]仑通 21:35:02
果粉 +菜补碎+肉泥
[kwok][kwok]巭隼 21:36:04
现在肠粉这边一份10元,什么都放,虾也有
[weiqi]weiqi 21:36:10
卤。
[仑通]仑通 21:36:33
家乡有家牛肉店 牛肝一碗 8 元 牛肉丸10元 关键是汤好喝 奶奶的 深圳现在这个生活水平根本跟不上我 80 90年代生活
[alwtyp][alwtyp] 21:36:35
想起以前读中学时,一个老人总是早上六点左右用自行车拉一箱来学校门口卖,要是去晚点,还抢不到
[仑通]仑通 21:39:28
那个时候 溪水 清凉 透彻 田野 一望无际  海滩是黄金色的  海浪是纯绿色的 山村是童话故事般的 村姑个个如志玲姐
[weiqi]weiqi 21:39:45
。。。。。
[kwok][kwok]巭隼 21:39:51
[mccad][MCCAD] 21:41:45
村姑都成大妈了
[仑通]仑通 21:41:49
山后是一片果林 山前是田野 田野尽头 是防护林 过了环护林 是15公里海滩
[alwtyp][alwtyp] 21:42:19
我们的那的海防林都砍了种桉树了
[kwok][kwok]巭隼 21:42:20
那不是天天有野味
[仑通]仑通 21:42:20
现在这些都被破坏了 难受啊
[weiqi]weiqi 21:42:20
以前哥一直以哥自称~~
现在别人都叫哥~大叔了。
[仑通]仑通 21:42:52
我上去去商场 一个小孩叫我伯
[alwtyp][alwtyp] 21:43:07
[仑通]仑通 21:43:10
我痛苦地冲他笑了下
[仑通]仑通 21:44:12
虽然牙齿上黄色的
[仑通]仑通 21:45:08
烟牙 一天60支烟左右
[weiqi]weiqi 21:45:48
[仑通]仑通 21:46:06
你要我选择 500万和 童年少年那种村貌 我宁愿选择后者
[仑通]仑通 21:47:17
早晨被鸟声鸣醒 中午热时候去海边游泳 晚上在屋顶数满天星
三顿饭 顿顿带海鲜
[weiqi]weiqi 21:47:51
就潮州陶瓷厂,你还想 有鸟,有乌鸦就不错了。
[alwtyp][alwtyp] 21:48:04
这是神仙才过的日子
[alwtyp][alwtyp] 21:48:43
我在苏州几年了,抬头能看到星星不超过五颗
[mccad][MCCAD] 21:48:59
那是白天看到国旗
[caoyin][caoyin] 21:49:18
苏州也是天朝的天下
[仑通]仑通 21:49:28
现在这些都没了 不知道城市化有啥用
[caoyin][caoyin] 21:49:35
莫非王土,呵呵
[tiyi8888]永远痛 21:49:39
-看到星星干嘛
[alwtyp][alwtyp] 21:49:42
这个,有点远了
[tiyi8888]永远痛 21:49:46
有用吗
[weiqi]weiqi 21:50:03
哄妹子啊。
[alwtyp][alwtyp] 21:50:11
我仰望星空......
[tiyi8888]永远痛 21:50:12
好看的时候你不出去看星星,是因为你年轻大了
[52幕墙设计] 21:50:16
大家好
[tiyi8888]永远痛 21:50:22
星星出来的时候你不看
[alwtyp][alwtyp] 21:50:26
说得也是
[仑通]仑通 21:50:29
整天呆在盒子里 呼吸汽车尾气 喝地沟油 吃基因米
[tiyi8888]永远痛 21:50:34
今天下雨你想看
[alwtyp][alwtyp] 21:50:35
问题是没有星星看
[tiyi8888]永远痛 21:50:35
看个屁
[weiqi]weiqi 21:50:53
。。。。
[tiyi8888]永远痛 21:50:53
你能看的时候不去看
[alwtyp][alwtyp] 21:50:54
不下雨的时候也没有
[tiyi8888]永远痛 21:50:57
我看到了
苏州还算可以的
苏州不行,那北京 你去看过吗
西安看过吗
没有苏州好的
上海也很漂亮的
相片上
你看过吗
[alwtyp][alwtyp] 21:51:26
那就是一颗也看不了
[tiyi8888]永远痛 21:51:41
你的心情决定你看不到星星
[仑通]仑通 21:51:44
北京那鸟地方 漫天薄膜袋 吃的也属于低档次
[tiyi8888]永远痛 21:51:47
那别人怎么看到呢
苏州算是好的了
比别的城市算好多了
[仑通]仑通 21:52:19
北京人还自大说哥是北京的
有啥用
[tiyi8888]永远痛 21:52:32
北京请我去也不会去的
我去过一次
灰灰的
[alwtyp][alwtyp] 21:52:39
也要看跟什么样的城市比
[tiyi8888]永远痛 21:52:40
再也不想去了
有什么好
去的人想当官的
[仑通]仑通 21:52:48
不如哥在乡下一年的生活
[ZZXXQQ] 21:52:49
[tiyi8888]永远痛 21:53:43
我一个同学傻乎乎的去北京
[mccad][MCCAD] 21:53:47
周版就在皇城脚下
[仑通]仑通 21:53:49
李总理曾经问我想进京否 我否了
[tiyi8888]永远痛 21:53:51
说北京大城市
有个鸟用
才不去北京呢
那个鸟地方
北京的乡下也很垃圾的
还去吃农家的菜
垃圾菜
[仑通]仑通 21:54:26
去一般住地下室 满城薄膜袋
[yarp]潜水 21:54:29
反正我去了一次帝都,完全没有好印象了。
[仑通]仑通 21:54:33
食物也很差
[tiyi8888]永远痛 21:54:37
可惜在苏州自己没有地
那儿的人的素质也差的
还牛得不得了
[ZZXXQQ] 21:55:19
[仑通]仑通 21:55:29
我上次去北京 坐火车 到山东那一段 全火车大蒜味 我日 从此。。。。。。。。。。。。留下深刻的坏印象
[tiyi8888]永远痛 21:56:03
不要哭,北京真的不好
[alwtyp][alwtyp] 21:56:04
最北只到黄河喧
[ZZXXQQ] 21:58:19
井底之蛙
[tiyi8888]永远痛 21:58:40
还井底之蛙呢
呵呵,不要踢我噢
不谈政治
随便聊聊
[yarp]潜水 21:59:15
主要是过年前那一段时间,就大雾那天支图书馆买书。回来晚上呼吸就不那么顺。
[ZZXXQQ] 21:59:52
为人民服雾
[yarp]潜水 21:59:59
所以决定除非迫不得已,再也不去帝都了。
[tiyi8888]永远痛 22:00:03
我是十一月份去的
一点也不好感觉上
[kwok][kwok]巭隼 22:00:26
大连吧,就不错,在河对岸
[tiyi8888]永远痛 22:00:30
北京就不该发展
这样大可以了
为什么要发展
为了发展当地的什么
让当地的房价多涨一点
让原来有钱人的财产不贬值
有什么好处
而且北京 的房价特别高
[ZZXXQQ] 22:01:39
对“冒号”有好处
[仑通]仑通 22:01:59
我家乡一个老人 一辈子没走出家乡 有次登上大山 看到福建那边 感叹中国很大
[yanshengjiang]明镜 22:02:16
[qqimg]oldimg/{F169178F-635B-7A89-27C2-C3EB35F3E30D}.jpg[/qqimg]
[仑通]仑通 22:03:24
《忆少年.沙滩月》

少年时 海瓜子 
铁桶菜盆满盛   
沐浴在莲池  
玩耍沙滩月  
游泳黄金滩 
饭猪肉饭 
品牛丸汤 
访寺探庵 
拜经阁 
念诗书 

饭毕
金谷稻田中一游 
闲聊聊斋神话 
沏茶谈新 
果子节 
摘果子 
春种秋收 
打草建窑烧甘薯 
冲自然井水 
品晨花啜玉露  
欢谈深闺女 
笑意皆郎君
这个对过去生活的描述
[tiyi8888]永远痛 22:04:23
就不该发展太快
[仑通]仑通 22:04:28
[tiyi8888]永远痛 22:04:30
好羡慕外国的
真的地大物博
自己却去不了
[kwok][kwok]巭隼 22:04:55
最主要是rmb升值太快了
[yanshengjiang]明镜 22:05:06
[qqimg]oldimg/{F169178F-635B-7A89-27C2-C3EB35F3E30D}.jpg[/qqimg]
[tiyi8888]永远痛 22:05:09
贬值太快了
呵呵
[仑通]仑通 22:11:44
 当时冲自然井水时候 漂亮的村姑一路过就勃起 现在看到深圳白领都没啥兴趣
[weiqi]weiqi 22:12:00
[xiaomm09]江湖 22:12:16
[mccad][MCCAD] 22:12:25
主要是现在看多了,麻木了吧
[仑通]仑通 22:12:49
不是 白领没那种纯净度
[仑通]仑通 22:13:19
没村姑那种含羞答答
[weiqi]weiqi 22:13:33
哪个村的村姑
[仑通]仑通 22:13:58
我们那个村叫龙湾村 一万多人
[kwok][kwok]巭隼 22:14:18
这么多村姑
[仑通]仑通 22:14:45
以前村貌有点类似大理 但是现在新型建筑破坏了这种和谐和美感
[仑通]仑通 22:16:02
 我家后面有一个170左右的姐姐 邻居姐姐 我在冲凉时候她一路过 就就想冲去 
[仑通]仑通 22:16:40
[qqimg]oldimg/{97A5EE7E-1EE7-F6D8-56C3-EE20E7948459}.GIF[/qqimg]
[weiqi]weiqi 22:17:50
[yanshengjiang]明镜 22:19:44
[qqimg]oldimg/{F169178F-635B-7A89-27C2-C3EB35F3E30D}.jpg[/qqimg]
[仑通]仑通 22:19:54
[qqimg]oldimg/{97A5EE7E-1EE7-F6D8-56C3-EE20E7948459}.GIF[/qqimg]虽然那个时候才十三岁左右 现在三十 也没见过一个会让我这么冲动的
[weiqi]weiqi 22:20:23
那你去找那村姑啊
[mccad][MCCAD] 22:20:38
估计人家40了
[仑通]仑通 22:20:58
找不到了 现在有的嫁了 有的被生活折磨成为老幺
她现在三十5 单身
[pzweng]路人 22:21:13
[qqimg]oldimg/{5EBB615B-9B04-D234-E901-8319AEDA7B7D}.gif[/qqimg]
[weiqi]weiqi 22:21:34
估计那姑 看了你们村不少男的洗澡。。。
[mccad][MCCAD] 22:22:18
看来一直在关注
[仑通]仑通 22:22:47
好多 高质量村姑 都因为找不到匹配男人 一直单身
邻居一个四十2 也单身
卫生所 一个38 很高 很漂亮 也单身
[weiqi]weiqi 22:23:37
那你还不快行动。
[仑通]仑通 22:23:38
有些人为了去看她 还专门去打针
[weiqi]weiqi 22:23:48
了解得这么清楚的你
[仑通]仑通 22:23:51
我比她们小 没机会
[mccad][MCCAD] 22:24:03
护士
[仑通]仑通 22:24:06
都是我比较熟悉的人
[仑通]仑通 22:24:45
其中有一个漂亮的找到条件好的老公 其他都看齐 一直等不到那个人出现 只能单身 不过现在年老色衰
[仑通]仑通 22:25:19
弄到我们全村都感叹
这把好身材 港姐都要折服
[xiaomm09]江湖 22:26:11
上照片。
[kwok][kwok]巭隼 22:26:22
有真向
[仑通]仑通 22:26:58
没照片 但是有个可以参考下
[weiqi]weiqi 22:27:20
你别拿林ZLING出来。。
[仑通]仑通 22:27:36
[qqimg]oldimg/{89182A72-508F-F999-E0EB-1F33A34528CB}.jpg[/qqimg]
差不多 这样长大的模样
[weiqi]weiqi 22:28:05
那要看抱着他那个长什么样。。。
基因很重要。
[yanshengjiang]明镜 22:30:20
指定一个点  怎么找到离他最近的两条线呢
[yanshengjiang]明镜 22:31:36
[qqimg]oldimg/{A58E7989-3C2F-781C-C5B6-92D988F0A275}.jpg[/qqimg]
剑南春们  就只知道讨论熟女撒
[仑通]仑通 22:32:05
这个 要群里高手写一个通用函数 这个函数 用得比较频繁
[yanshengjiang]明镜 22:32:22
这样吗? 我以为很简单呢
[仑通]仑通 22:32:55
get-min-near ()
[yanshengjiang]明镜 22:33:17
我想整个好用的 等高线 内插高程点
[yxp]小蜜蜂 22:34:07
先建三角网
等分三角形的边就行了。
[yanshengjiang]明镜 22:34:24
麻烦了撒
[仑通]仑通 22:34:41
小蜜蜂高手 写一写 这个通用函数
[yxp]小蜜蜂 22:34:44
等高线里高程是现成的
[yanshengjiang]明镜 22:35:00
我想的是  在一堆平行线里面点一下 能找到最近的两个条线
[仑通]仑通 22:35:01
以点选择最近图元 以线选择最近图元
[yanshengjiang]明镜 22:35:19
再求这个点到两条线的距离 然后计算高程值
[yxp]小蜜蜂 22:35:26
那个得用 EXTEND 命令
如果在lisp程序里大量使用,会降低程序速度
[yanshengjiang]明镜 22:36:09
搞不懂这个命令啊  从来没用过
[yxp]小蜜蜂 22:36:18
lisp里 command 还是越少越好
[yanshengjiang]明镜 22:36:23
测绘上面  貌似不怎么用ucs之类的
[yxp]小蜜蜂 22:36:59
这个真不难,你选取一点,旋转360度,
每度取一个点
找最短的直线
[yarp]潜水 22:37:30
我写的那个还是不好用啊?
[yanshengjiang]明镜 22:37:59
你写的有内插高程点吗?  没注意呢
[yanshengjiang]明镜 22:38:44
@[yxp]小蜜蜂 真心没看懂啊  不会repeat 360吧
[不死猫][nonsmall]不死猫 22:39:18
[qqimg]oldimg/{CEEA5397-2184-73DA-9BEF-FF91060D1DE0}.jpg[/qqimg]
手机安卓模拟autocad
[仑通]仑通 22:39:21
有几个函数 CAD是欠缺的 用图元方框去选择 方框内图元 以点选择附件最近一定范围内土元 以线选择附件一定范围内图元  坐标随图元
[weiqi]weiqi 22:40:31
[soly2006]季鸟 22:40:39
做成点表
[仑通]仑通 22:43:08
这四个 现在论坛上没发现有
1:用图元方框去选择方框内图元 
2:以点选择附件最近一定范围内土元 
3:以线选择附件一定范围内图元  
4:坐标随图元
[仑通]仑通 22:44:07
1:用图元方框去选择方框内图元 
2:以点选择附近件最近一定范围内图元 
3:以线选择附近一定范围内图元  
4:坐标随图元
[soly2006]季鸟 22:44:21
4什么意思
[yanshengjiang]明镜 22:45:14
[qqimg]oldimg/{C4D09456-0D80-CC99-C5FA-AC2BED79CF7D}.jpg[/qqimg]
[qqimg]oldimg/{81C4CFAD-C075-9651-110B-50A509B8B937}.jpg[/qqimg]
[仑通]仑通 22:45:56
[qqimg]oldimg/{238ECF92-1DFB-4CF5-ED31-C53BD127C8D4}.jpg[/qqimg]
第四个的解释
[yanshengjiang]明镜 22:46:13
[qqimg]oldimg/{94B81D33-78F9-045C-C18B-679B95A9748C}.jpg[/qqimg]
[yxp]小蜜蜂 22:46:24
明镜
[xiaomm09]江湖 22:46:26
用户坐标不行吗?
[yxp]小蜜蜂 22:46:32
==我给你写
[仑通]仑通 22:46:52
小蜜蜂高手一出手 你有福了
我一个函数 他一句稍等 不到20分钟搞定
[yanshengjiang]明镜 22:47:21
[仑通]仑通 22:48:10
 一个比较复杂点的 功能 他从看懂我意思到写出来 不到一个小时
[仑通]仑通 22:50:41
这样的人才却去援助非洲 建设 [qqimg]oldimg/{C5253EE0-7331-7ED3-A9B3-ABFD7D6163A2}.GIF[/qqimg] 放错地方
[yxp]小蜜蜂 22:53:15
好了
[yanshengjiang]明镜 22:53:21
是啊  非洲妇女多么希望能生个白儿子
我看看 辛苦了
[yxp]小蜜蜂 22:53:31
我还没在CAD中运行过,你自己试试
Ln 里面有360个长度
你找最小的两个
[yxp]小蜜蜂 22:55:13
(command ".extend" "" ent "")
后面应该还有个  ""
[yxp]小蜜蜂 22:56:03
(/ n 180.0)
[xiaomm09]江湖 22:56:13
小蜜蜂 信手拈来啊。
[yxp]小蜜蜂 22:56:13
[yanshengjiang]明镜 22:56:38
太慢了是其一
[yxp]小蜜蜂 22:57:00
command本来就慢
没办法
除非用解析法
或者建三角网
[仑通]仑通 22:57:49
改成 批量点 批量选择 然后有范围函数比较好
[yanshengjiang]明镜 22:57:56
其二是受到其他图元干扰 比如单行文字
[仑通]仑通 22:58:06
用 lambda 比较快
[yanshengjiang]明镜 22:58:21
[qqimg]oldimg/{3C754A25-E96C-ADA3-CF26-C5E30DB6E385}.jpg[/qqimg]
[仑通]仑通 22:58:23
过滤
[yanshengjiang]明镜 22:58:31
我以为这个功能很简单能实现呢
[仑通]仑通 22:59:15
两个过滤函数
[yanshengjiang]明镜 22:59:33
我的目的就是  有了这些等高线  我在里面点一下就能生成一个高程点
[仑通]仑通 22:59:47
用LAMBDA比较爽
[yanshengjiang]明镜 23:00:13
[qqimg]oldimg/{20F0F7B0-2E27-D972-5E5D-329DE2A8DAEA}.jpg[/qqimg]
[yxp]小蜜蜂 23:03:24
你的等高线控制点的坐标是三维的吗?
[yanshengjiang]明镜 23:03:48
二维的
lwpolyline
[yxp]小蜜蜂 23:04:18
那,程序怎么知道附近两条线的高程?
手工输入?
[yanshengjiang]明镜 23:04:32
假设现在图面是只有等高线 没有高程点的哦  我要点空白的地方 自动生成高程点
哦现在是有标高的
线是有标高的
[yxp]小蜜蜂 23:05:16
线的坐标 y 值不为 0?
[yanshengjiang]明镜 23:05:46
就是点一下空白的地方 找到最近的两条线 然后根据标高 和距离 计算
线的y?
z哇?
[yxp]小蜜蜂 23:06:07
z
说错了。
[soly2006]季鸟 23:06:16
画十字基本能搞定
[yanshengjiang]明镜 23:06:30
[qqimg]oldimg/{5835EE44-7E8E-2371-9745-FF48EC52770C}.jpg[/qqimg]
Z
是有标高的
[yanshengjiang]明镜 23:07:19
[qqimg]oldimg/{C7EF7DD5-CDA4-B4CF-7379-17F1D41E30A9}.jpg[/qqimg]
(38 . 976.0)
[soly2006]季鸟 23:07:54
速度还快
[yanshengjiang]明镜 23:08:09
十字?
我目前用的方法是手动点选两条线 和插入点 比较麻烦
[yxp]小蜜蜂 23:09:37
找一条最短的边就行了,另外一条就是反向延长
[soly2006]季鸟 23:10:20
十字,取得上下左右最近的等高线,就高得
[yanshengjiang]明镜 23:10:54
哎哎哎 我再考虑下  先加班了
[yxp]小蜜蜂 23:15:32
在 (command ".extend" "" ent) 的第一项里加个等高线对象过滤,就不会遇到text停止
 楼主| 发表于 2013-5-8 23:40:06 | 显示全部楼层
[仑通]仑通 23:40:06
(defun get_min_xneary (pt0 X /);以PTO去得到附件X
 (setvar "cmdecho" 0)
 (graphscr)
 (setq dis_x 2800.0)
 (setq pt0 (dxf te))
 (setq te_ss (ssget "c"
                  (mapcar '- pt0 (list dis_x dis_x 0.0))
                  (mapcar '+ pt0 (list dis_x dis_x 0.0))
                  '((0 . "TEXT") (8 . "X"))
             )
 )
(if te_ss
   (progn
     (setq te_lst '(lambda  (x) (= (type x) 'ENAME)))
     (vl-remove-if-not te_lst (mapcar 'cadr (ssnamex te_ss)))
   )
 )
(princ)
)
 楼主| 发表于 2013-5-8 23:50:55 | 显示全部楼层
[仑通]仑通 23:50:55
(defun get_min_xneary (data / );以PTO去得到附近X
 (setvar "cmdecho" 0)
 (graphscr)
 (setq dis_x 2800.0)
 (setq pt0 (cdr (assoc 10 data)))
 (setq te_ss (ssget "c"
                  (mapcar '- pt0 (list dis_x dis_x 0.0))
                  (mapcar '+ pt0 (list dis_x dis_x 0.0))
                  '((0 . "TEXT") (8 . "X"))
             )
 )
(if te_ss
   (progn
     (setq te_lst '(lambda  (x) (= (type x) 'ENAME)))
     (vl-remove-if-not te_lst (mapcar 'cadr (ssnamex te_ss)))
   )
 )
(princ)
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-23 07:30 , Processed in 0.243850 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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