[LISP][原创]尺寸驱动的板支座钢筋修改程序

它山之石

尺寸驱动的板支座钢筋修改程序
它山之石图形工作室：http://StoneDWG.ys168.com


程序说明
一、适用范围：
1、不适用于R14，应该能用在2000＋的各版本中，本人仅在2004版测试通过。。
2、程序主要用于结构设计中对现浇板支座钢筋的修改。
3、尽管程序是被设计来用于包括结构平面图中现浇板支座钢筋的修改，
并且本人也经过了系统的测试与实际应用，但鉴于制图习惯及某些规则设置的不同，
为保证程序能正常使用及避免误删除实体等意外情况的发生，建议本程序仅用于
本公司板支座钢筋集中标注图例中。并建议使用本文件提供的图例。
二、使用方法：
1、用你所知道的任何方法加载本程序。
2、在命令行输入“MYShSh”就可以运行（“蚂蚁上树”的汉语拼音声母简写）。
3、根据命令提示点取钢筋实体，注意点取位置不同时程序运行结果可能会不同，见第5条说明
未点取到符合条件的实体时程序退出。
4、如果点取到了有效的钢筋实体（图层为“钢筋__支座”的节点数为4的“LWPOLYLINE”实体）
再根据程序提示输入“伸过支座长度”，就会按输入的数值对钢筋长度及标注进行修改。
注意输入数值不同时程序运行结果可能会不同，见第5条说明
5、如果输入的“伸过支座长度”为正整数（如“900”）则将钢筋强制修改成中间支座形式，
即钢筋向支座两侧伸出相等长度。如果输入的为负整数（如“-900”）则将钢筋强制修改成端支座形式，
即钢筋只向支座一侧伸出输入的长度。注意此时钢筋是向点取时点到的那侧伸出。
三、相关约定：
1、所有图层为“钢筋__支座”的节点数为4的“LWPOLYLINE”实体均认为是有效的钢筋标注。
2、其它的图层设置程序默认为以下几种：钢筋__支座编号、钢筋__支座标注、梁__主梁、轴线__点划线、文字__标注。
3、当图层设置与程序默认结果不同时可能会出现误删除某些实体的情况，请谨慎使用。
四、版本更新：
V040416新增功能
1、当输入负值时自动修改为端支座，并增加了中间支座与端支座的自动转换功能。
V040418新增功能
1、增加了对竖向钢筋的支持。
2、下一版本中将增加钢筋位于支座右侧或上侧的支持。
V040430新增功能
1、增加了对钢筋位于支座右侧或上侧的支持，钢筋会向点取的那侧偏移，
但恢复成中间支座筋时尺寸未复制。
2、下一版本中将增加钢筋位于弧形支座时的支持。
V040510新增功能
1、修正了上一版本中由端支座筋恢复成中间支座筋时尺寸未复制的问题。
V040517新增功能
1、增加了对钢筋位于弧形支座时的支持。
V050707新增功能
1、利用自定义函数，不需要晓东API的支持。
五、特别声明：
1、尽管程序经过测试，但作者在任何情况下均不保证程序运行结果的正确性，
对由于使用本程序而引起的一切直接或间接后果作者均不承担任何责任。
为保证结构安全，作者特作以上声明并提醒大家自行判断，谨慎使用。
同时也恳请各位能将使用中发现的错误及时进行反馈，以便修改或完善。
它山之石图形工作室：http://StoneDWG.ys168.com

aliu22

不实用,给个源码研究下行不