[LISP程序]：SPEARFISH Structural Toolbox V3

spearfish

*************************************************************************
           SPEARFISH Structural Toolbox V3.10  2009-10-27
*************************************************************************
                 工欲善其事，必先利其器
*************************************************************************
AutoCAD2005自动加载方式：
          1.  将文件 spearfish.vlx 放到C:\Program Files\AutoCAD 2005\Support目录
          2.  打开 C:\Program Files\AutoCAD 2005\Support\acad2005.lsp
          3.  在最后增加：                 (load "spearfish.vlx")
*************************************************************************

************************ 初始化设置**************************************
INIT    -->  SPEARFISH 初始设置 Table/Foundation/Load/Save/Exit):<Exit>
              Table      : 设定输入输出表格方式;
              Foundation : 基础图层jcLayer, 墙柱 coluLayer
              Load       : 加载当前目录下的文件INIT_CONFIG.INI
              Save       : 保存当前设定到当前目录下的文件INIT_CONFIG.INI
INIT_Spearfish / INIT_TSSD / INIT_HUASEN  --> 图层设置
SETSTYLE    -->
SETCOLUPJ   -->  设置配筋率
SETSTYLE    -->  设置字型-->-->-->-->-->-->-->-->-->-->-->-->-->-->-->
TK，TK25(墙柱详图的图框),TK100 ,TK125 TK150 TK175 -->  插入图框
************************ GENERAL ****************************************
【画图及修改】
RC   -->  创建选择集，复制到目标层<2009/6/24>
RC1  -->  通过层过滤创建选择集，进行Move, Copy, Layer层名修改<2009/6,2009/6/24>
NCC  -->  Nested entity COPY routine; NCSET -->  对 NC 初始设定.
R2   -->  建立偏移实体选择集进行，整体偏移<2009/7/17>
R3   -->  建立偏移实体选择集进行，整体偏移拷贝<2009/7/17>
SS   -->  提前确定拉伸长度后，进行拉伸中间可改变方向<2009/7/17>
BE   -->  画梁的双线；BE2/BE3 -->  根据轴线，画梁的双线；BES->确定是否在<LAYER_SM_BEAM>中画梁
InsertDwgs -->  INSERTDWGS IN FILE FOLDER 批插入DWG文件
InsertDxfs -->  INSERTDXFS IN FILE FOLDER 批插入DXF文件
AE   -->  PEDIT
MM   -->  MIRROR
SAX  -->  输入缩放比例，快速缩放
BUBBLE    -->  画轴号，钢筋号
MDLINE    -->  把所有LWPOLYLINE改为逆时针方向,去掉重点和重线的点!!
BD   -->  画边界线
LINEPURGE -->  清除重线
BG   -->  对交线进行处理【主梁和墙柱相交处理 主次梁处理 井字梁处理】
CF   -->  对交线进行全自动处理
BDD  -->  进行等区间OFFSET线段，如产生分轴线
CA   -->  用于裁去部分线CUT LINES
WA   -->  画墙柱线
WT   -->  墙柱填充
AngleCorrect -->  转动实体角度-90～90度
RT/RT1       -->  转动实体角度; 参考平移： r1
MoveCopy/MC  -->  将一个实体的中心和另一个实体的中心进行对中
                   将闭合线内的实体的中心进行对中
JF    -->  PLJOINFUZZ
RECT  -->  画矩形修改示意云线 N RECT1 -->  画给定面积的矩形N RECT2 -->  选择实体，以其中心，画给定面积的正方形N
RECT3 -->  面积不变，修改矩形的边长
【设定及查询】
DS   -->  _dsettings
DSS  -->  _dsettings
REG  -->  _regen
PLINENUM -->  SHOW THE Serial Numbers OF PLINE POINTS
ENTLIST -->  显示关联表属性
AREAS -->  在图上显示面积
AREAM -->  求总面积
COX   -->  用于空间结构，标注line实体的端点坐标
CAL   -->  四则运算，精度同原数；BES-       用于切换是重新生成、修改.
MULT  -->  乘法运算，用于将两数相乘得出的结果写于指定的点上,精度只有小数
【视图及坐标】
VF    -->  设定局部坐标
VR    -->  回到世界坐标
EE    -->  用于在 UCSFOLLOW =0/1 切换<2009/7/17>
VV    -->  模型空间与图纸空间进行切换
LayoutsToDwgs

************************ TEXT *******************************************
【图纸目录】
TXX1  -->  对字符串中进行编号
TXX2  -->  对图纸目录中图名归位
TXX3  -->  选择图纸目录中图纸大小,统计图纸张数
TXTTABLE -->  生成不同字符串的表格; 2009/3
【图层】
TxtCN -->  根据特定字符串属性，修改图层; 2009/3
TxtCV -->  用于将一堆字符串按选择内容分层,相同的字符串同层同颜色; 2009/3!
TLWT  -->  <From: 卢文汀; 通过确定文本数字大小区间，删除多余文本
           数字，改变选定字符颜色。
TLWT2 -->  <过滤出文本中第一个数，通过确定文本数字大小区间，改变
           选定字符颜色和层。
RC    -->  创建选择集，复制到目标层<2009/6/24>
RC1   -->  通过层过滤创建选择集，进行Move, Copy, Layer层名修改<2009/6,2009/6/24>
【字符串变化】
TD    -->  将TEXT文本分段
TD    -->  将字符串分段! ; 2009/3
TD2   -->  将字符串xxx-xxx-xxx分段! ; 2009
CCT   -->  交换字符串内容
CCT1  -->  交换字符串位置
DELTXT1    -->  删除某字符串中特定字符串之前的字符
TSS   -->  前后缀修改工具箱 AA加前缀DA去前缀AD加后缀DD去后缀
                     RA替换前缀RD替换后缀
FA    -->  TEXT文本连接
DAA   -->  对齐的标注
FE    -->  对齐字符串
FE2   -->  Select a polyline and where to place the text
Find1 -->  相当于FIND命令
FIND2 -->  用于替换字符串=等效于FIND命令; 2009/3
BATFIND2   -->  用于替换字符串=等效于(来自TXT文件)FIND命令
FIND3      -->  选择字符串，再选择反应替换字符串关系的表格，替换
               对应字符串; 2009/3
TLWT  -->  <FROM: 卢文汀; 通过确定文本数字大小区间，删除多余文本
           数字，改变选定字符颜色。
TLWT2 -->  <过滤出文本中第一个数，通过确定文本数字大小区间，改变
           选定字符颜色和层。
ET1   -->  <过滤出文本P=XX-XX-XX的最大数，改变选定字符颜色和层。
FF    -->  替换字符内容/块/外部引用/线的宽度,将第一个选中的文本值
            赋给其余选项 2009/6/18
TT    -->   修改梁断面,跨数,编号,等等h=xxx,H=xxx
            【12,20,1z,1f,2z,2f~9z,9f,11z~29z】 -->  修改梁的断面,跨数,标高h=xxx,H=xxx
11~99 -->  修改梁的跨数，等效于【BC, B2】
TXTBOX-->  在当前层中对字符串画外框
【字符串修改】
DDE   -->  修改字符或尺寸
txtTable   -->  生成不同字符串的表格; 2009/3
Fh    -->  该字高文本替换(将第一个选中的文本值赋给其余选项)
Ft    -->  该字形(将第一个选中的文本值赋给其余选项)
【字符串BRUSH】
FF    -->  替换字符内容/块/外部引用/线的宽度,将第一个选中的文本值
            赋给其余选项 2009/6/18
Fh    -->  该字高文本替换(将第一个选中的文本值赋给其余选项)
Ft    -->  该字形(将第一个选中的文本值赋给其余选项)
Find2 -->  用于替换字符串=等效于FIND命令; 2009/3
Find3 -->  选择字符串，再选择反应替换字符串关系的表格，替换
           对应字符串; 2009/3
【暂时保留】
TA    -->  在TEXT中加前缀   【汇总到TSS】
TS    -->  TEXT中去前缀     【汇总到TSS】
TS2   -->  在TEXT中去后缀  【汇总到TSS】
T1    -->  Change the Title oF Text,可用于修改编号或梁的宽度  【汇总到TSS】
T2    -->  为字符串修改尾部字符  【汇总到TSS】

*********************** Block & XREF ************************************
BED   -->  对块进行编辑,加入图元/删除图元/修改块名,
            建议操作完后使用命令Regen
BTX   -->  将块用外部引用替换
ETX   -->  选择图中元素，并转换成外部引用
BBR   -->  Use new block to Replace old block
BBA   -->
BBN   -->  修改改块的名字
INS_BLK    -->  插入其它文件中的块 或可以采用文件中心
FF         -->  块替换(将第一个选中的文本值/块赋给其余选项)
BlockReplace -->  对块进行搜索替换
BlockNum     -->  对块的数量进行统计
XREFPRINT    -->  对外部应用路径进行表格输出
InsertBlock  -->  Insert A Block Based on the Point of A String
NCC          -->  从外部引用中复制实体；Newlayer 为负责到新的层名/ NCSET设置复制方式
SHOWBLOCKNAME -->
XrefFix

************************ Layer ******************************************
图层开关控制方法：
   1. 通过ACE、ACEE, LAYERSREAD LAYERSWRITE 创建图层状态来控制 BES
   2. 通过ABA, AC, ACC 输入<图层前缀>或<特定字符串>控制图层开关
*************************************************************************
【图层开关】
AS    -->  开关隔离图层，通过选择实体，确定开关图层时，保留打开的图层
            添加了外部引用的层隔离
AB    -->  关闭选择图层
ABA   -->  关闭所有图层
ABW / OFFCOLU  -->  关闭所有墙柱填充层
AC    -->  打开所有图层
ACC   -->  通过输入图层名特定字符串控制图层开关
ACE   -->  记录图层开关状态，并生成命令<LAYERSTAT>
ACEE  -->  恢复图层开关状态<LAYERSTAT>
LAYERSREAD  -->  将图层状态文件CTR_LAYERS_STAT读入内存，并生成命令。<LAYERSTAT>
LAYERSWRITE -->  将图层状态写入文件CTR_LAYERS_STAT。
BES   -->  用于<LAYERSTAT>命令切换图层隔离或增加打开方式
LayerPrint 批量输出层信息表格,[BES]用于切换是否仅将打开的图层输出; 2009/5；2009/7
LayerNames -->  输出选择的图层名
LAYERSLAB  -->  建立板配筋图层
SetSatweLayerColor  -->  设置配筋辅助层(SB_SATWE SB_Temp1 SB_Temp) 颜色
【结构图层专用开关】
下面三个命令SATWE SB SB2 均通过文件<INIT_CONFIG.INI>设定, 参考命令 INIT
SATWE  -->
控制SATWE配筋图层和JCCAD图层/PKPM系列图层控制:(Toggle/Isolate/On/oFf):<Toggle>;2009/10
SB     --> 对结构图层进行组合控制
SB2    --> 对结构图层进行单独控制
【图层锁定】
ASS   -->  锁定隔离图层，其他图层锁定
ACS   -->  解锁所有图层
AD    -->  锁定选择的图层
ADD   -->  解锁选择的图层
CW    -->  对图层OFF和Lock进行孤立操作
【图层冻结修改】
LAYFREEZE   -->
ALLUNFREEZE -->
【图层修改】
CV    -->  修改图层，目标图层不选择则改为当前图层，采用刷新法
CN    -->  修改图层，采用输入图层名
SE    -->  设定当前图层、字型、尺寸标注
SW    -->  Set层的颜色和线型
SWB   -->  Brush层的颜色和线型
SWC   -->  Set的颜色
LayerRename  -->  通过图层表批量修改图层名; 2009/6
ByLayerColor -->  如果图层颜色为白色则图层颜色随实体；
                 实体颜色随层!; 2009/3
LayerColor -->  实体按色改图层,可自动生成新图层层名为颜色号并
               改图层颜色，自动修改实体色随层
RC    -->  创建选择集，复制到目标层<2009/6/24>
RC1   -->  通过层过滤创建选择集，进行Move, Copy, Layer层名修改<2009/6,2009/6/24>
NC    -->  Nested entity COPY routine.
NCSET -->  对 NC 初始设定.
TxtCN -->  根据实体的特定属性，修改图层 ; 2009/3
TxtCV -->  用于将一堆字符串按选择内容分层,相同的字符串同层同颜色!


************************ DIMENSION***************************************
DAW   -->  全自动对墙柱进行标注尺寸
DAB   -->  半自动对墙柱进行标注尺寸
DAC   -->  截断轴线标注尺寸
DAD   -->  尺寸文字避让
D1    -->  水平或竖向连续标注
D2    -->  任意方向连续标注
DG    -->  分段或延伸添加尺寸标注


********************** Table & Excel  ***********************************
SHEET -->  选择EXCEL文件，在图中画SHEET中的内容
WriteSheet -->  选择图中的表格，而后整理或输出至EXCEL
DP1   -->  选择xy 的成对字符串画曲线, 可根据上述表中数据画曲线
txtTable   -->  生成不同截面字符串形成表格
Find3 -->  选择字符串，再选择反应替换字符串关系的表格，替换
           对应字符串
Find33 -->  选择替换表格(DWG/EXCEL), 在图中对应替换
BeamLength/beamLength2 -->  选择结构平面，统计出梁断面的长度
LayerPrint -->  输出层信息表格能【根据层颜色输出】

************************ GROUP ******************************************
GCG   -->  创建组
GAG   -->  选择实体加入组
GFG   -->  选择实体， 脱离编组
GDG   -->  取消编组
ADDATA -->  选择梁编号和断面,为梁加扩展数据
SHOWEXDATA/ XDLIST -->  显示梁扩展数据
ALLEXDATA -->  为所有梁加扩展数据

**************** AREA & Wall Column InFo ********************************
ModiFyLwLine -->
aream -->  Calculates the total area oF selected objects

****************  图纸集 & 打印  ****************************************
PD -->

fuweihua

看了命令列表，还是很不错，第一个吃螃蟹啦。

lmt112233

不能下載，浪費一個金幣

playhi

看看好东西，要注册的吗?谢谢了

modaosy

看上去很好，下载试试看，不要注册的吧！谢谢楼主先。