高山流水结构工具箱V1.5.4(15年04月11日更新)

本帖最后由 tornatore 于 2015-9-2 09:31 编辑





原帖更新在晓东CAD家园

;;;--------------------2015年04月11日更新
1、重新整理过系统函数库，部分通用函数的名称和用法有调整，由于个人时间短缺，目前帮助文件尚未重新整理，深感歉意。
2、修改了工具箱使用**日期，2015年5月1日改为2017年5月1日。
3、修改了部分命令功能，以适应结构新软件：PKPM-v2.2版本，YJK等。
;;;--------------------2014年9月21日更新
1、改进全局变量的存储方式，直接保存在图纸中，免去每次打开图纸都得重置这些参数的困恼。
2、增加映射复制程序,【修改辅助】->【映射复制】，命令SS_MapCopy。
3、新增双线对轴程序，【模板】->【双线对轴】，命令ss_SXDZ
4、新增筏板附加筋绘制程序(基于YJK筏板单元面积结果），【基础】>【筏板加筋】，命令ss_fst(命令执行后可按ESC设置参数，也可以单独输入命令SS_FSD定义参数)。
5、修正了日照棒制作程序中正12点时的错误。
6、修正了其中一些由于系统函数修改引起的BUG,目前发现主要影响到的程序有:批量插入程序MYII、批量改负筋长度SS_PGFJCD、数值运算SZYS、Y轴标高YBG等基本已修复。
7、改进柱N-M曲线程序，支持型钢混凝土柱、钢管混凝土柱。
8、改进梁图文字移动程序CS_MYMOVE(RZ)，最小移动量取为(出图比例/绘图比例/10)使其适用范围得到增广，如按米为单位绘制的总平面图中的文字。
9、改进数值检查程序，增加多个数值和多个颜色匹配，默认颜色从小到大为5,140,4,110,3,70,2,40,30,20,1,230,6
10、改进通用对话框函数INIT,支持POPUP_list模式,单条用法(list "varname" "prompt" "pop_list" "itemlst-varname" "selectitem")
如(setq itemlst-varname '("建筑" "结构" "设备")) (init (list (list "ZYLB" "专业类别" "pop_list" "itemlst-varname" "0")) "dlg" nil)
11、改进板配筋格式刷，使其支持两种钢筋直径组合以适应**间距的情况。
12、新增带半径倒角命令SS_RadFillet，功能和Fillet没差别，只是提前预定了个半径值，命令完成后返回原有设定的半径值，方便画详图时存在大量倒角使用。
13、修正拟合椭圆中长轴靠近Y轴时不能得到结果的BUG。
14、菜单修改 【校审】-> [最小外圆]^c^cZXWY [最小外框]^c^cZXWK [最短外框]^c^cZDWK [实体外框]^c^css_WK 四个程序转移到绘图辅助。
15、新增最大内接圆程序,【绘图辅助】->【最大内圆】,命令SS_ZDNY。
16、新增点集转圆管程序,【趣味拾余】->【点集求圆管】,命令SS_PTS2PILE。
;;;------------------------2014年5月5日更新
1、紧急修改，原版本**日期为2014年5月1日修改为2015年5月1日。
2、新增对ACAD2012~2015（32位和64位系统）的支持。
3、改进图纸再造程序MakeEntMake，支持嵌套块，该命令将产生一个以图纸名称命名的线型文件在第1个系统支持搜索目录内，\\***\\ <图名> .Lin；并产生一个以 <图名> .lsp文件在
图纸所在文件夹内；请新建空白图纸，并加载 <图名> .lsp，然后执行Emake再造图纸。
该程序制作的新图，不再受教育版及去印戳后被提示非AutoCAD产品制作的困恼。
操作视频见后附跟帖。
4、改进读取文本流函数SS:READBINARY,具体用法见后序跟帖。
5、新增字体文件字形索引编号及索引形名称查看函数，SS:Shx:GetIndexName 。
6、本程序加载了AutoCAD自带的ARX程序Geom3D.arx和GeomCAL.arx文件，即可下列使用系统函数，方便编程：
(cal "-0.2+5^3/2*sin(1.4)")
(align <选择集 象> <第1个源点> <第1个目标点> <第2个源点> <第2个目标点> [指定第3个源点+第3个目标点或 <继续, [是否基于对齐点缩放对象？[是(y) (n)] <否> ] >])
(3dalign <选择集 象> [复制C] <第1个源点,基点> <第2个源点> <第3个源点> <第1个目标点> <第2个目标点> <第3个目标点> )
(mirror3d <选择集 象> <[对象(O)/最近的(L)/Z 轴(Z)/视图(V)/XY 平面(XY)/YZ 平面(YZ)/ZX 平面(ZX)/三点(3)] <三点> ]> )
(rotate3d <选择集 象> <[对象(O)/最近的(L)/视图(V)/x 轴(X)/y 轴(Y)/z 轴(Z)/两点(2)]>)
;;;-------------------------2014年04月07日更新
1.【修改辅助】★多段线超级简化，命令改为【★多线超简】，更新简化内核，原来只简化为ARC，更改为自适应识别简直线段和圆弧段，引入可输入同弧或同直段容差，可输入；
这个功能主要用于形似图块简化（如人物、树木图块等）减少图形存储量。
2.调整sjrf.shx字体文件，上下标起止标识符号%%160~%%163为%%190~%%193，因其中两个标识号在高版本CAD中未能引用到特殊UNICODE码，会引起双击时文字变形。
3.改进批量修改文字程序，对高版本天正对象的支持。
4.改进等高线绘制程序(采用YMG程序增减)，增加等高线倒角功能。
5.增加二维Voronoi图绘制程序，命令SS_Voronoi。
6.改进离散点集三角网程序SS_Tin，增加可生成2DVoronoi图选项。
7.引入了Charles Alan Butler 的把对象制作成lisp文件的程序,命令MakeEntMake ,修改了原有函数Obj->str，*****相关函数未作测试***需要找时间测试下。
8.增加【塔吊计算】工具，风荷载计算SS_Crane_QW、支座反力计算SS_Crane_RF、附着杆内力计算SS_Crane_AttMF。
9.增加【仿射变形】工具，将原定向仿射、四边形仿射移至该栏，增加单线网格SS_1CURVE_MESH、双向网格SS_2CURVE_MESH、四线仿射SS_4S_AFF、任意边界仿射SS_B_AFF。
10.修改同时新增了连续梁力矩分配法计算函数：SS:SM:M-d-m 详细用法见后面跟帖。
;;;-------------------------2014年01月02日更新
1.紧急修复凸包函数更新中的1个BUG，导致多个程序不能使用；
2.新增多点拟合直线程序, SS_LS_PTS_Line
3.新增多点拟合圆程序,SS_LS_PTS_Circle
4.新增多点拟合椭圆程序,SS_LS_PTS_Ellipse

;;;-------------------------2013年12月06日更新
1.菜单改版，将原【绘图辅助】栏拆分为【绘图辅助】、【修改辅助】、【标注辅助】，将原【加载管理】中的[标注样式]功能移到【标注辅助】。
2.增加了【趣味拾余】[定向仿射]程序SS_DX_AFF，主要用于平立剖模拟轴侧图辅助用。
3.增加了【修改辅助】[超级多段线简化]功能SS_LWPolyLine_SuperSimplified，此功能仅用于测试用，有待进一步完善。
4.增加了【修改辅助】[中心替换]功能SS_Cen_RePlace，主要用于批量替换对象，替换位置为被替换和替换对象的中心对位。
5.修正了[宽多段线剪影]程序的一个BUG——前段窄后段宽且在同一直线上时出错。
6.改进【基础】[筏板厚度]程序，提供非柱墩位置筏板厚度建议值。
7.修正【基础】[双偏压独基]尺寸优化程序中的一个BUG——当柱截面bc=hc且Mx=My时无法得到结果。
8.改进选择过滤器在高版本CAD中当动态输入打开时不能发送点坐标的BUG。
9.改进了系统函数库：新增函数AddLast、SubLast等表项函数，新增求对象转换矩阵函数——ss:3dMirrorMatrix(**镜像变换Householder法适用于超3维变换矩阵)、
ss:2dMirrorMatrix、ss:ScaleMatrix(非等比或等比缩放矩阵），改进mytrans点集坐标变换函数（在原平移、旋转、顺逆的基础上加入非等比缩放功能）。
这几个函数在编制过程主要参考了highflybird高飞兄的Lisp轮矩阵一文和维基百科，在此致谢作者。
新增函数strcatby：(strcatby '("1" "2" "3") "-");_--> "1-2-3"
参数式对话框函数INIT 增加放灯片图片插入功能。
10.新增【建筑处理】[日照棒制作]SS_SunlightAnalysys_Rods程序。
11.将该版程序，**时间推迟至2014年12月30日。
;;;-------------------------2013年10月12日更新
增加了几个基础方面的命令:
1、矩形角点平均附加布氏应力系数查询 SS_JC_B_A；
2、矩形角点平均附加明氏应力系数查询SS_JC_MIDALIN_A；
3、地基抗滑稳定性验算SS_JC_FSSC；
4、双偏压作用下独立基础截面尺寸优化SS_JC_INF_OPT；
5、修正了通用函数求点集凸包函数优化化变量未回收的BUG。
;;;-------------------------2013年6月13日更新
新增加4个功能、修正了1个BUG：
1、快速填充，ss_myhatch 用于高版本CAD的大图中的点式填充，由于高版本点选填充区域时，使用的边界搜索对象是全部对象，爆慢。
2、曲线回直，ss_qxhz 曲线按长度及其上的各点回直，并添加直线上的垂线，方便绘制曲线展开立面。
3、最短路径遗传算法求解（非封闭），NSP 可以是双源点之间连通，也可以是单源点向外连续。
4、基础工具中增加平板式筏板中柱抗冲切最小厚度计算。
5、修正一元高次方程求解程序 ss_slover 的一个BUG ，大于5次的方程采用牛顿法求解使用函数漏加进去了，补进去。
;;;-------------------------2013年4月14日更新
1、增加了SATWE柱底内力简图文字自适应避让程序（公测版）,命令SS_WN_MOVE_ALL，可到后面参看相关演示；
2、修正了图层隔离和图层全开的一个BUG（当隔离过程按下ECS键或者中断退出时，会导致图层颜色无法恢复）。
;;;-------------------------2013年3月5日更新
1、摒弃自定义命令在gsls_zcm.lsp文件中定义，您可以在pgp文件中添加自己的快捷命令，也可以在这个lsp文件中添加。
2、选择对象提示语句进一步完善（仍有一些程序未改进，有空慢慢做）；
3、增加了点集一元多次方程曲线回归命令SS_RegressCurve；
4、增加了餐厅厨房面积经验估算程序，命令ss_KitchenArea；
5、增加了Gile的椭圆弧转圆弧程序，命令EL2PL；
6、增加了Gile的画多义线椭圆程序，命令PELL，这个命令和EL2PL的结果与设置画椭圆的系统变量pellipse = 1的结果相同；
7、改进配筋结果对比程序WPJMAX，增加对比后的较大配筋的超链接，右键停留时可现实；显示内容举例："2.0cm^2;3-381-405;1-222-236；"该内容含义为：配筋值比原配筋值增大2.0cm^2；原电算为3级钢筋，换算为Q235放大1.11倍钢板截面面积为381，换算为Q235放大1.18倍的钢板截面面积为405；原电算为1级钢筋，换算为Q235放大1.11倍钢板截面面积为222，换算为Q235放大1.18倍的钢板截面面积为236；
;;;-------------------------2013年1月6日更新
1、修复梁柱交线处理的一个小BUG（当梁线或墙线存在多义线时，进行滤除处理）；
2、通用函数库增加了矩阵运算的相关函数：
Householder ： 正交变换函数；
EEA:Gauss : 高斯消元法将矩阵左下三角消0；
Givens : 吉文斯矩阵旋转变换函数；
QR->EV : QR法求矩阵特征值与特征向量;
[E] : Jacobi法求矩阵特征值与特征向量 ；
PowerEigen : 幂法求矩阵主特征值及对应特征向量；
Power->Eigenvalues : 幂法求全部矩阵特征值；
Eigenvalue->Eigenvectors : 已知矩阵特征值求其对应的特征向量 ；
;;;-------------------------2013年1月4日更新
1、增加柱配筋还原计算书——柱表入库对存在重复线表格的支持；
2、调整了函数库的通用函数的正负号判断函数：sign 当≥0时返回 1.0 ，<0时返回-1.
;;;---------------------2012年12月24日更新
1、改进了一些通用函数库
2、增加了深厚粘性土层内打预制桩的浮桩检查程序（功能用法见后续动画)
;;;---------------------2012年12月18日更新
1、对于配筋比较，增加宏观指标输出：配筋增大处数占总体比例，配筋增大比率（含平均比率和最大比率）；同样也输出配筋减小对应的3个指标。
2、改进柱表标高该层，引入层高容差索引，以更适应柱表配筋还原计算书使用；同时允许多次选择柱表，以适应多栏选择。
3、修正柱表或柱大样图入库程序的BUG——对话框不显示，方便柱表入库。
;;;-----------------2012年12月7日更新
1)改进连接直线SS_LJZHX程序的算法，快速高效;
2)改进复核复制SS_FC程序的功能，增加相对于点Point对象群复制;
3)改进安装程序，使得多版本时可选;
4)增加样条曲线转为直线功能SS_SPL2L，主要用于将3DMAX模型转向CAD（采用*.sat文件格式导入）后将视图
通过SolProf命令转为2D平面图后产生了大量的两点SPline线转为直线;
5)增加封闭区域群标面积程序，面积标注于形心；
6)另外还有2个不成熟测试程序：文字移动到指定曲线上ss_wzqxpy[字群垂移]，双线绘制圆柱面投影线ss_yhzkx[圆弧曲线展开]