2013-07-15 明经 AutoLISP 编程(102918348) 群聊记录：[face13.gif]晚点就中了

明经快报

[springwillow]孤帆 14:44:00

你是想编个梁校对程序是怎么着？

[500w008]500w008 14:45:35

是的

[500w008]500w008 14:46:16

批量 钢筋字符 距梁线距离一定

[qqimg]201307/{94BB5619-81F7-0E91-304E-EFCF9C2E2F17}.jpg[/qqimg]

其实这个可以不写 为了图更完美

[springwillow]孤帆 14:46:28

我想过编这个，不过感觉难度挺大的

[500w008]500w008 14:46:38

不大

[500w008]500w008 14:47:14

没批量就没意思

[springwillow]孤帆 14:47:42

你这个都是原位标注，没有考虑集中标注

[lisp-study]jun 14:49:21

早有人都做过了

[springwillow]孤帆 14:50:03

可是到目前为止还没的用

[500w008]500w008 14:50:04

集中标注不一起吧

jun 你应该有吧 给我一个 我看看别人怎么实现

[lisp-study]jun 14:52:21

通过文字来选择梁线，然后根据梁线修改文字的位置

[500w008]500w008 14:52:36

我这个思路就是这样的

[500w008]500w008 14:53:38

选择文字  以文字坐标点选最近的梁线垂足 再以垂足取定点 修正文字位置

[lisp-study]jun 14:54:11

[500w008]500w008 14:54:34

你应该已经有了

[lisp-study]jun 14:55:08

还没

[springwillow]孤帆 14:55:57

以文字坐标点误差太大

没有原位标注的该怎么办？

[500w008]500w008 14:57:12

你先选择字符再REPEAT

[lisp-study]jun 14:57:19

只修改原位标注  集中标注还需要对齐么？

[500w008]500w008 14:57:48

集中标注 有人写了

[springwillow]孤帆 14:59:07

你这个是整理图面的哈

[500w008]500w008 14:59:47

是

孤帆 推荐几个LSP 或者演示几个 给我们开下眼界

[springwillow]孤帆 15:00:25

也没啥好的呢

[500w008]500w008 15:00:57

以前 我发过几个我凑的好的LSP在群里不知道你们看到收集了没

[500w008]500w008 15:01:50

[qqimg]201307/{91AE7D65-5E97-C37F-47D1-1C543EFD8A1D}.gif[/qqimg] 我现在后悔了

[aeromodelling]纸飞 15:02:11

[qqimg]201307/{A7D1FF2A-89C8-C55B-98A6-A59EE59E6E81}.jpg[/qqimg]

[500w008]500w008 15:02:46

梁钢筋校对 和批量成筋

[flytoday]过^-^客 15:03:14

[image=83AA2B8B4E876960295004055180D385.png]

后悔什么

[500w008]500w008 15:03:57

帮别人发财 [qqimg]201307/{91AE7D65-5E97-C37F-47D1-1C543EFD8A1D}.gif[/qqimg]

[springwillow]孤帆 15:04:06

梁筋校对的，还是有些问题，功能不太完善。生成吊筋的在我这也有问题

[springwillow]孤帆 15:04:50

现在用探索者的生成校对，也挺费劲的

[500w008]500w008 15:04:54

看来被流传了 [qqimg]201307/{EA7FB6F5-C756-DA2A-B747-BD43A078B2EF}.gif[/qqimg]

[500w008]500w008 15:05:33

[qqimg]201307/{91AE7D65-5E97-C37F-47D1-1C543EFD8A1D}.gif[/qqimg]探索者没有我的好

[flytoday]过^-^客 15:05:35

[image=66A3EEB6A3E841AD70058E3D91CF28E1.png]

[500w008]500w008 15:05:52

我很少用探索者功能了

[flytoday]过^-^客( 就没见你发过一个程序 你还老来诋毁我

[flytoday]过^-^客 15:06:11

那点程序还………偑服你太自恋了

[500w008]500w008 15:06:14

你看我 我凑的程序一般都共享 你呢

[springwillow]孤帆 15:06:19

你没有考虑集中标注

[flytoday]过^-^客 15:06:43

我真不会地球人都知道

[flytoday]过^-^客 15:07:28

兄弟你最近很入迷……别入魔了哈

[500w008]500w008 15:07:44

[qqimg]201307/{D73BA2C7-62B1-302A-79B3-4B5957BCCBA3}.GIF[/qqimg]

[springwillow]孤帆 15:08:00

上传一个演示，还不太成熟

画框柱的

[500w008]500w008 15:08:34

画柱用板王就够了吧

[springwillow]孤帆 15:08:45

我没有板王

[springwillow]孤帆 15:09:55

对齐点不一定

[lisp-study]jun 15:09:58

用老虎生成吊筋嘛

[500w008]500w008 15:12:23

孤帆

[springwillow]孤帆 15:13:26

[500w008]500w008 15:15:18

[flytoday]过^-^客(596797191)  15:06:08
那点程序还………偑服你太自恋了    ----------------没见你的程序

在群里 两三年 没见你共享过一个

[500w008]500w008 15:16:05

我估计你都用 孤帆 很蔡建伟的

跟

[500w008]500w008 15:17:18

我的话 你总是抓图重发 你对我有成见

[leyouyou001]youyou 15:18:48

cad窗口切换软件，支持CAD2013的，谁有呀

明经快报

[500w008]500w008 15:32:22

[flytoday]过^-^客 诋毁和起哄是你的竞争手段吗

[qqimg]201307/{96EF250A-6CE0-4DBF-F3FA-1AE3F63DF6F7}.GIF[/qqimg]

[stoyer][stoyer] 15:35:06

在Cad中怎么运行以下命令：
net use 192.168.1.254f "" /user: "guest"

[flytoday]过^-^客 15:35:21

不语

[500w008]500w008 15:36:40

我不知道 什么时候 跟你染上了 居然处处针对我 你发个LSP在群里瞧瞧

[stoyer][stoyer] 15:36:52

net use \192.168.1.254f "" /user: "guest"
不能在Cad中运行吗？？

明经快报

[236004]张牙舞爪 16:17:17

[qqimg]201307/{ECF3D1B7-04A0-321E-171D-1341F093372A}.jpg[/qqimg]

[阿然][阿然] 16:22:47

(vla-get-objectname vlaobj1)看看

[236004]张牙舞爪 16:26:13

[qqimg]201307/{15638CDC-30B9-CAC1-8E07-E48E40635DCA}.jpg[/qqimg]

[qqimg]201307/{E7DA9F48-25D8-365A-ED15-D775B678BC0B}.jpg[/qqimg]

这个线线，已经拟合了，为什么，还是多段线

如果我把图形保存关闭，之后显示的，就是二维多段线，我那二个程序就可以了用了
[qqimg]201307/{CDD95E78-6302-0139-19A3-4AFEFC986A4C}.jpg[/qqimg]

明经快报

[阿然][阿然] 16:42:06

你这个是2dpolyline

每个点要3个坐标

明经快报

[flytoday]过^-^客 16:55:00

李敖点评郭美美--年轻姑娘炫富，无非就两种情况 要么睡她的人牛B 要么睡她妈的人牛B，郭小姐称：自己所的有钱都是通过炒股而来，广大网民很纳闷：究竟是哪支股能这么厉害呢？后来才明白，原来是屁股。

明经快报

[stoyer][stoyer] 17:21:25

妹的，装了office2013 x64,,以前写的程序不能用了。

[tryhi]大海 17:26:16

car 是返回lisp的第一个元素，请问返回第二个元素是什么

[阿然][阿然] 17:26:35

cadr

[tryhi]大海 17:27:06

多谢，很奇怪帮助文档居然没有

[stoyer][stoyer] 17:27:25

第三个：caddr
第4个：nth 3 list

[tryhi]大海 17:27:33

非常感谢

[阿然][阿然] 17:27:54

cadddr也可以获得第四个

[stoyer][stoyer] 17:28:22

第5个应该不可以了。。

[tryhi]大海 17:29:18

[yxp]小蜜蜂 17:29:26

可以自己编么， cadddddddr

[tryhi]大海 17:29:41

可以

吧

[yxp]小蜜蜂 17:29:59

就是一个递归

[vormittag]桔子 17:30:47

(cadr (cdddr x)) 这不就行了。

[yxp]小蜜蜂 17:30:55

是的。

[vormittag]桔子 17:30:59

就是看着累一点。

[yxp]小蜜蜂 17:31:16

 你得数有几个 d

明经快报

[flytoday]过^-^客 17:43:58

日暴雨开车要小心
因连日暴雨，四川好多地方出现洪涝灾害。一男子开车经过一积水处，前面堵了好多轿车不敢过去。他仗着自己是越野车就想试试，尤其看到前面几十米还有几个人站在水中，水只到膝盖。刚开到水中没多远，车突然全部沉入水中。男子爬上车顶，问站在水中的几个人：你们那怎么水那么浅？答：我们也在车上面。

[328302216][328302216]小莫 17:47:17

明经快报

[OWEN7][qqou7]clever 17:57:45

[qqimg]201307/{98D5DFAA-8061-65AC-C742-45DE3F095B7E}.jpg[/qqimg]

见过牛的功能，没见过这么牛的

[OWEN7][qqou7]clever 17:58:34

这才是真正的玩CAD

[vormittag]桔子 17:58:58

回到绘图板的年代。

[OWEN7][qqou7]clever 18:00:21

那才是真正的 开发 ，

明经快报

[stoyer][stoyer] 20:10:36

终于搞定lisp使用x64 Excel2013,,1125行数据比32位的还是快了一些。。。
[qqimg]201307/{92E21A54-EBE5-7521-279B-68CF17E1A2DD}.jpg[/qqimg]

明经快报

[tiyi8888]永远D痛 20:25:59

不错

学习了