# autolisp

**Repository Path**: jrobot/autolisp

## Basic Information

- **Project Name**: autolisp
- **Description**: No description available
- **Primary Language**: Unknown
- **License**: Not specified
- **Default Branch**: master
- **Homepage**: None
- **GVP Project**: No

## Statistics

- **Stars**: 0
- **Forks**: 3
- **Created**: 2022-06-26
- **Last Updated**: 2022-06-26

## Categories & Tags

**Categories**: Uncategorized

**Tags**: None

## README

# 介绍
保存了我这些年写的一些工作上使用的AutoCad 的 lisp 程序。

有些程序引用了特定的图块，所以直接运行会报错。

仅供参考。

![sample](./img/sample.png)

# 目录
- batchplot.LSP  目前使用的程序。默认使用 HP M701打印机
- batchplot-M1213nf.LSP    在HP M1213上自动批量打印, 需把图框设定为特定块名， 如paper-a4x.dwg.
- block-name-clipbrd.LSP   将选择的图块的名字复制到windows的剪贴板，使用了doslib库。比如要用图块名，命名当前标题栏里的图名。
- ccyk.lsp    长圆孔-多段线（类似solidworks中的槽口）
- copy-layout.lsp  复制布局
- cyk.lsp    长圆孔-圆切直 （以长轴为直径画圆，然后作两平行玄，距离是短轴尺寸）
- drawing-number.LSP   对标题栏图快进行图号编辑
- fugan.LSP  快速简易画桁架的腹杆
- hengjia.LSP  快速简易画桁架（除腹杆以外）
- itoc(数字转换成汉字).lsp   将数字 ‘0～9’ 转为汉字 ‘零～九’
- lname.LSP    在布局空间，获取标题栏图名， 赋值给布局选项卡名
- osmode.LSP 快速恢复对象捕获设置
- picture-frame-2-txt-dim-style.LSP 根据图框的放大比例，重置文字样式和标注样式
- plot-M701.lsp 在HP M701打印无图框图纸
- plot-monochrome.lsp 以monochrome样式打印图纸
- plot2pdf.LSP 将图框（特定的图块）范围内图纸打印输出成pdf文件，放在同目录下
- plot-pdf.lsp 没有图框时打印成pdf
- rzl.lsp   计算人字梁长度
- set-dimlfac.LSP 根据局部视图的放大比例，生成相应的标注样式
- skck.LSP   由CAD图纸手工生成数控冲床加工代码
- skck-mirror.LSP  由CAD图纸手工生成数控冲床加工代码， 镜像对称时用
- steel.dcl     sweight.LSP的DCL文件
- steelweight-reg6.LSP   计算几种型钢重量， 利用了正则表达式实现对输入语句的合法性校验
- swr.VLX   steelweight-reg6.LSP编译过的二进制文件
- sum-length.lsp   计算选中的线段总长度
- sweight.LSP   计算三种钢材重量 使用DCL对话框
- szz.LSP   由CAD图纸手工生成数控三轴钻钻孔CNC代码
- tu-fu-kuang-new-a4block.lsp   给定对角线两点，生成A4、A3图框，自动设置字体和标注比例
- venlo-p.dcl     venlo-plan-dcl.LSP  的DCL文件
- venlo-plan-dcl.LSP  由给定参数，生成温室轴网
- wjl.lsp  根据屋脊跨度，几字钢屋架长度计算
- xuhaoqiu-r.lsp  生成序号球，自定义编号起始号码
- zw.LSP  根据给定参数，生成轴网
- 标题栏.dwg 非国标标题栏图块 公司名称已删去，不影响使用。
- paper-a3x.dwg  非国标A3横幅图框图块
- paper-a4x.dwg  非国标A4横幅图框图块
- paper-a4y.dwg  非国标A4竖幅图框图块

**使用时，需把本目录列入cad受信任的位置。**