明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
楼主: springwillow

[源码] 再为结构的出把力吧,点筋空心实心转换

    [复制链接]
发表于 2018-11-18 23:19:00 来自手机 | 显示全部楼层
结构搬砖路过帮顶,不错。
发表于 2018-11-19 09:08:43 | 显示全部楼层
感谢分享,确实强悍。
发表于 2018-11-19 21:29:18 | 显示全部楼层
空心钢筋?那是钢管吧?
发表于 2019-7-7 20:43:28 | 显示全部楼层
我加了这句话改颜色,为何改不成   (setq ent (subst (cons 62. 2) (cons 62 ent) ent))
 楼主| 发表于 2019-7-10 08:28:19 | 显示全部楼层
BUBUBA918 发表于 2019-7-7 20:43
我加了这句话改颜色,为何改不成   (setq ent (subst (cons 62. 2) (cons 62 ent) ent))

首先,你要决断ent里是否有62组码(随层的情况下没有62组码),其次你的表达式不对。 (setq ent (subst (cons 2 62) (assoc 62 ent) ent))
发表于 2019-7-10 11:37:38 | 显示全部楼层
springwillow 发表于 2019-7-10 08:28
首先,你要决断ent里是否有62组码(随层的情况下没有62组码),其次你的表达式不对。 (setq ent (subst ( ...

实在想不到这个功能的应用场景
发表于 2019-7-10 16:19:05 | 显示全部楼层
springwillow 发表于 2019-7-10 08:28
首先,你要决断ent里是否有62组码(随层的情况下没有62组码),其次你的表达式不对。 (setq ent (subst ( ...

如何判断里有62组码?
 楼主| 发表于 2019-7-11 08:41:55 | 显示全部楼层
BUBUBA918 发表于 2019-7-10 16:19
如何判断里有62组码?

看(assoc 62 ent) 是否返回nil,返回nil就是没有,需要将(cons 62 2) 直接加到ent里去,有就替换
发表于 2019-7-12 16:44:48 | 显示全部楼层
直接把图传上,能否修改一下程序

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2019-8-2 11:51:19 | 显示全部楼层
强悍,感谢楼主,有如此好的插件
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-12-23 20:05 , Processed in 0.184923 second(s), 19 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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