首页

  1. 首页
  2. CAD书籍
  3. 内容

AutoCAD Lisp程序100例

  • 资料大小:482 KB
  • 运行环境:NT/2000/XP/2003/Vista
  • 资料语言:简体中文
  • 资料评级
  • 授权形式:资料共享
  • 更新时间:2011-06-11 10:03
  • 发布作者:yoyo123
  • 插件情况 无插件,请放心使用
  • 文件类型 RAR
  • 解压密码:civilcn.com
  • 安全检测 瑞星 江民 卡巴斯基 金山
AutoCAD Lisp程序100例
介绍: 如果您使用 AutoCAD,下面的内容对您一定有帮助。在某些方面能大大提高您的工作效率。下面的程序均以源程序方式给出,您可以使用、参考、修改它。 bg.lsp 表格自动生成 asc.lsp 将文本文件内容写入图中,字符是单个的 wf.lsp 将图中字符写入磁盘 exstr.lsp 将字符串分解成单字 pgtxt.lsp 将字符合成字符串 pb.lsp 通过给出长度将字符串分成两个串 cht.lsp 直接修改文字内容或块属性 ct.lsp 对数字串进行加减 chh.lsp 直接修改文字高度 chhw.lsp 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角) chst.lsp 直接修改文字字体 txt.shx 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片) tiao.lsp 配合修改过的标准字体文件,将中文字符调大 tiao1.lsp 配合修改过的标准字体文件,将英文字符调小 untiao.lsp 上两个程序的复原 sht.lsp 在图中查找字符串 zhuang.lsp 桩点及钎探号绘制(勘测图) dim.lsp 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:1) dimm.lsp 配合JT.DWG将尺寸标注调成适合建筑结构设计(1:100) di1.lsp~di8.lsp 直接连续标注尺寸(用于1:1的图) di100.lsp~di800.lsp 直接连续标注尺寸(用于1:100的图)   brk.lsp 将一线条在与其它线条相交处断开 peditx.lsp 成批修改线条的线宽 ex.lsp 分别或一起或通过层来炸开块、尺寸标注及PLINE线 chcr.lsp 修改园和园弧的半径 lay.lsp 通过点取层上一实体来实现层操作:删除/解冻/冻结 bg0.lsp 直接将正负零标注在图纸中(建筑结构图用) bg1.lsp~bg4.lsp 标注各种标高 hu.lsp 直接给出园弧长度 jdx.lsp 截断线 jdx2.lsp 双截断线 bdgj.lsp 板底钢筋(土建结构图用) bdgj1.lsp,bdgj2.lsp 板顶钢筋(土建结构图用) dk1.lsp~dk8.lsp 配合PKPM软件生成的图绘洞口(基础留洞) gl1.lsp~gl8.lsp 配合PKPM软件生成的图绘过梁(结构平面图) gzz.lsp 构造柱绘制 ACAD.LIN 增强的线型文件, 扩充线型(线型比例为1)如下: XX 虚线(用于1:1的图) DHX 点划线(用于1:1的图) XX100 虚线(用于1:100的图) DHX100 点划线(用于1:100的图) ACAD.LSP 增强的ACAD启动文件, 命令扩展如下: CHXX 将线型改为虚线(用于1:1的图) CHDHX 将线型改为点划线(用于1:1的图) CHXX100 将线型改为虚线(用于1:100的图) CHDHX100 将线型改为点划线(用于1:100的图) CHCON 将线型改为连续线 CHC 直接修改实体的颜色 其余详见ACAD.LSP的内容。ACAD的命令缩写根据其使用的频率作了调整。 V 先执行ZOOM E, 再将当前视图存储,并调用ZOOM W 此命令主要为"超级视图"做准备,"超级视图"妙处一用便知 ! 建议使用显 示卡自带的AutoCAD显示驱动 增强后的ACAD.LSP能在状态行上显示当前文件名 ACAD.MNU的改进: 调整了光标菜单(共两页),并将最常用的捕捉方式定义 在组合光标键上。 将如下内容替换原相应项 ***BUTTONS1 **b11 ; $b1=b12 $p0=p01 $p0=* **b12 ; $b1=b11 $p0=p02 $p0=* ***BUTTONS2 _end,_int ***BUTTONS3 _nea ***BUTTONS4 '_view r e '_zoom w ***POP0 **p02 [DDedit]^C^CDDEDIT [CHGtext]^C^C(if (not chgtext) (load "chgtext"));chgtext [] [NEArest]_nea [PERpendicular]_per [MIDpoint]_mid [CENter]_center [ENDpoint]_endp [INSert]_ins [INTersection]_int [NODe]_nod [QUAdrant]_qua [TANgent]_tan [NONe]_non [] [Calculator]'cal **p01 [] [Line]^C^C_line [Polyline]^C^C_pline [Circle]^C^C_circle [Arc]^C^C_arc [] [Erase]^C^C_erase [Move]^C^C_move [Copy]^C^C_c [Stretch]^C^C_str [Rotate]^C^C_rotate [Fillet]^C^C_f [Offset]^C^C_offset [Extend]^C^C_extend [Trim]^C^C_trim [Break]^C^C_break [Explode]^C^C_explode [] 说明: 1. 按Shift鼠标右键: end,int 捕捉方式 2. 按Ctrl鼠标右键: nea 捕捉方式 3. 按ShiftCtrl鼠标右键: 启动"超级视图" 4. 按鼠标中键: 捕捉方式和常用绘图命令的切换(共两页) 下面是一业余版的二维建筑设计软件,其最大的特色为所绘的实体仅有 LINE、POLYLINE、CIRCLE和TEXT四种,修改容易。虽只有二十多个程序, 但确能帮您解决二维绘图中的一些问题。 ax.lsp 规则轴网绘制 chax.lsp 轴线线型由点划线到连续线的交替变换 wwall.lsp 外墙绘制 nwall.lsp 内墙绘制(beta) gwall.lsp 隔墙绘制(beta) ss.lsp 室外散水 chww.lsp 墙线加粗 chw0.lsp 墙线加粗恢复 dimw.lsp 标注墙厚 zhu.lsp 交点插柱 win.lsp 墙上插窗 wwin.lsp 无墙画窗 door.lsp 墙上插门 3dimzs.lsp 标注左边及上边的第三排尺寸线 3dimyx.lsp 标注右边及下边的第三排尺寸线 lt1.lsp 双跑楼梯平面 ltpm.lsp 双跑楼梯剖面(better) wsj.lsp 卫生间布置 wsj1.lsp 单个侧开门卫生间 tj1.lsp 台阶绘制 pd.lsp 坡道绘制 sy1.lsp 索引1 sy2.lsp 索引2 lmw.lsp 立面窗 lmm.lsp 立面门
点击进入下载 (需要 0 积分)

相关文章

回到顶部
请复制以下网址分享
AutoCAD Lisp程序100例
http://m.civilcn.com/autocad/CADsj/1341796174301693.html