# @lisp工程管理

**Repository Path**: vitalmm/at-pm

## Basic Information

- **Project Name**: @lisp工程管理
- **Description**: @lisp工程管理:基于自定义图框的工程管理、生成图纸目录、批量签名、批量打印、业务逻辑管理等。
- **Primary Language**: Lisp
- **License**: GPL-2.0
- **Default Branch**: main
- **Homepage**: https://atlisp.cn
- **GVP Project**: No

## Statistics

- **Stars**: 9
- **Forks**: 0
- **Created**: 2022-05-23
- **Last Updated**: 2026-09-22

## Categories & Tags

**Categories**: Uncategorized

**Tags**: None

## README

# at-pm — @lisp 工程管理

基于自定义图框的工程管理、生成图纸目录、批量签名、批量打印、业务逻辑管理等。

## 基本信息

| 项目 | 值 |
|------|-----|
| 包名 | `at-pm` |
| 全名 | @lisp 工程管理 |
| 版本 | 1.5.27 |
| 作者 | VitalGG |
| 邮箱 | vitalgg@gmail.com |
| 分类 | 图档管理 |
| 许可 | 非开源 |
| 主页 | http://atlisp.cn |

## 依赖

- `base`（必需）

## 安装

在 CAD 命令行执行：

```
@I at-pm
```

或通过函数调用：

```lisp
(@:package-install "at-pm")
```

## 菜单结构

包加载后注册三个主菜单：

### 1. 工程管理（ProjectManager）

| 菜单项 | 函数 | 说明 |
|--------|------|------|
| 配置管理 | `@pm:setup` | 设置工程管理基本信息 |
| 自动编图号 | `@pm:set-tuhao` | 按排列顺序重置图框的图纸编号 |
| 自动写图名 | `@pm:Intelligent-setup-maptitle` | 基于 AI 识别图框范围内的图名文字并写入图框属性 |
| 手动写图名 | `@pm:setup-maptitle` | 选择文字后写入图框图名属性 |
| 修正比例值 | `@pm:frame-modify-scale` | 将图框比例属性修正为与实际一致 |
| 附着签名 | `@pm:attach-sign` | 将个人手写签名 DWG 附着到图框指定位置 |
| 移除签名 | `@pm:remove-sign` | 删除图中所有签名块 |
| 全选图框 | `@pm:select-tukuang` | 选择所有图框 |
| 单套图框 | `@pm:add-frame-by-ents` | 选择图形并绘制图框 |
| 批量套图框 | `@pm:add-frame-by-cluster` | 按聚类为多组图形分别套图框 |
| 插入图框 | `@pm:insert-tukuang` | 插入标准图框 DWG |
| 阵列图框 | `@pm:array-frames` | 阵列插入固定个数的图框 |
| 变更图框 | `@pm:insert-tukuang` | 插入变更图框 |
| 方案图框 | `@pm:insert-tukuang` | 插入方案图框 |
| 图纸定位 | `@pm:outline-dialog` | 图纸大纲，快速切换图纸视图（快捷键 `vv`） |

### 2. 工程输出（Project Output）

| 菜单项 | 函数 | 说明 |
|--------|------|------|
| 生成目录 | `@pm:menu-make-mulu` | 生成 CSV 格式的图纸目录 |
| 目录成图 | `@pm:insert-mulu-to-dwg` | 在 DWG 中插入图纸目录 |
| 汇总目录 | `@pm:make-total-contents` | 汇总所有专业的图纸目录 |
| 打印预处理 | `@pm:pre_plot` | 轴线细化、填充/实体后置 |
| 批量转PDF | `@pm:mprint-pdf` | 批量将图框输出为 PDF |
| 批量打印 | `@pm:mprint-dev` | 批量输出到打印设备（测试版） |
| 设置打印样式 | `@:set-ctb` | 设置 CTB 打印样式表 |
| 自动输出 | `@pm:auto` | 弹窗选择批量操作组合 |
| 插入二维码 | `@pm:make-qr` | 生成 QR 码并插入图中 |
| 视频教程 | `@pm:video-turorial` | 打开演示视频 |
| 设置图框 | `@pm:set-tukuang` | 选择图框块，设置为当前工程图框 |
| 导出图框 | `@pm:export-frame` | 导出当前图框到标准图库 |
| 替换图框 | `@pm:replace-oldframe` | 将其它图框替换为当前图框 |

### 3. 工程云盘（Project's Cloud）

| 菜单项 | 函数 | 说明 |
|--------|------|------|
| 打开云盘 | `@pm:open-yunpath` | 打开云盘工程目录 |
| 发布DWG | `@pm:upload-curr` | 发布当前文件到云盘 |
| 从云拉取 | `@pm:pull` | 从云盘拉取文件 |
| 推送到云 | `@pm:push` | 推送文件到云盘 |
| 工程浏览 | `@pm:explore` | 浏览工程文件 |
| AI图名说明 | `@pm:menu-pickout-maptitle-readme` | 图名识别训练说明 |
| 识别图名 | `@pm:menu-pickout-maptitle` | AI 框选识别图名 |
| 正向训练 | `@pm:train-maptitle` | 选择图名文字进行正向训练 |
| 反向训练 | `@pm:train-notmaptitle` | 选择非图名文字进行反向训练 |
| 白名单 | `@pm:add-to-whitelist` | 添加图名白名单 |
| 黑名单 | `@pm:add-to-blacklist` | 添加图名黑名单 |
| 清理样本 | `@pm:clean-example` | 清空识别样本数据 |

## 快捷键

| 快捷键 | 功能 |
|--------|------|
| `vv` | 图纸大纲（快速切换图纸视图） |

## 配置参数

| 配置项 | 默认值 | 说明 |
|--------|--------|------|
| `@pm:user-name` | 张三 | 你的姓名，用于对比图框设计人进行过滤 |
| `@pm:my-profession` | 建施 | 你的专业，排图号时默认使用的专业/图别 |
| `@pm:projects-output` | D:\Output | 本地 PDF 输出目录 |
| `@pm:projects-yun` | Z:\Projects | 云共享 PDF 输出目录 |
| `@pm:projects-yunpath` | Z:\s设计资料交接明细 | 云共享工程文件目录 |
| `@pm:projects-prefix` | D:\Design | 本地工程文件目录 |
| `@pm:tuku` | D:\Design\standard | 本地标准图库文件目录 |
| `@pm:tuku-yun` | Z:\Design\standard | 云共享标准图库目录 |
| `@pm:tukuang` | 图框 | 用于工程管理的图框块名 |
| `@pm:tukuang-scale` | 1.0 | 插入图框的默认比例 |
| `@pm:tukuang-mapsheet` | A2 | 插入图框的默认图幅 |
| `@pm:tukuang-base` | 0 | 图框基点位置（0 右下角 1 左下角） |
| `@pm:tukuang-corner` | 0 | 图框角点识别方法（0 查表法 1 包围盒法） |
| `@pm:bg-tukuang` | 图框-变更 | 变更图框块名 |
| `@pm:fa-tukuang` | 图框-方案 | 方案图框块名 |
| `@pm:print-tuming` | 1 | 打印文件名是否带图名（0 不带 1 带图名 2 带图名及图幅） |
| `@pm:prefix-profession` | 1 | 文件前缀带图别 |
| `@pm:consistency` | 建设单位;工程名称;子项名称;日期;阶段;工号;版次 | 生成目录前须检查一致性的项目 |
| `@pm:drawing-number` | 图号 | 图框块的图号属性标签名 |
| `@pm:drawing-numbers` | 图号,图纸编号 | 可用的图号属性标签名（逗号分隔） |
| `@pm:drawing-number-bits` | 2 | 图号位数，不足补 0 |
| `@pm:drawing-number-prefix` | （空） | 图号前缀 |
| `@pm:drawing-number-order` | xY | 图框排列顺序（xy 大小写表示坐标优先级和排序方向） |
| `@pm:drawing-number-sub-order` | 0 | 是否对次级排序进行次级编号（1 是 0 否） |
| `@pm:drawing-name` | 图名 | 图框块的图名属性标签名 |
| `@pm:drawing-names` | 图名,图纸名称,图名第一行,图名第二行 | 可用的图名属性标签名（逗号分隔） |
| `@pm:profession-name` | 专业 | 图框块的专业属性标签名 |
| `@pm:ml-order-preliminary` | 建初;结初;水初;暖初;电初 | 初步设计目录专业顺序 |
| `@pm:ml-order` | 建施;建筑;结施;结构;水施;给排水;暖施;暖通;电施;电气 | 施工图目录专业顺序 |
| `@pm:ml-order-rf` | 建防;结防;水防;暖防;电防 | 人防目录专业顺序 |
| `@pm:ml-ruler` | 800;300;1350;3800;15050 | 目录成图定位信息（行距;各显示项水平距） |
| `@pm:sign-dwg` | my-sign | 个人签名 DWG 文件名（不含扩展名） |
| `@pm:sign-offset` | -1000,12500 | 签名基点相对于图框基点的偏移位置 |
| `@pm:project-tree` | 项目名称;工程名称;子项名称 | 工程命名层级关系 |
| `@pm:merge-pdf` | 1 | 打印完成后合并多个 PDF |
| `@pm:pdf-prefix` | 消防- | PDF 文件名前缀 |
| `@pm:qr-size` | 1000 | QR 码尺寸与原图像素比 |
| `@:outline-curr-page` | 0 | 图纸大纲当前页 |
| `@:outline-per-page` | 20 | 图纸大纲每页显示数量 |

## 支持的图幅

包内置以下标准图幅尺寸（单位 mm，宽×高）：

| 图幅名 | 尺寸 |
|--------|------|
| A0 | 1189×841 |
| A0+0.125~A0+0.5 | 加长 A0 |
| A1 | 841×594 |
| A1+0.25~A1+1.25 | 加长 A1 |
| A2 | 594×420 |
| A2+0.25~A2+1.5 | 加长 A2 |
| A3 | 420×297 |
| A3+1/4~A3+1 | 加长 A3 |
| A4 | 297×210 |
| A3v / A4v | 竖向图幅 |

分数形式（+1/4, +1/2 等）和小数形式（+0.25, +0.5 等）均可识别。

## 源码文件

| 文件 | 说明 |
|------|------|
| `at-pm.lsp` | 包入口：配置定义、图幅表、初始化 |
| `contents.lsp` | 图框信息提取、目录生成（CSV）、目录插入（DWG 成图）、图别/图号/图名/图幅解析 |
| `sign.lsp` | 个人手写签名的附着与移除 |
| `plot.lsp` | 批量打印（PDF/设备）、打印预处理 |
| `saveas.lsp` | 局部导出 DXF |
| `outline.lsp` | 图纸大纲对话框，快速切换图纸视图 |
| `frame.lsp` | 图框管理：设置/插入/替换/对齐/导出、图框识别、角点计算 |
| `maptitle.lsp` | AI 图名识别（概率模型）、正/反向训练、白/黑名单管理 |
| `qr.lsp` | 通过 atlisp.cn 在线服务生成 QR 码 |
| `menus.lsp` | 菜单注册、快捷键定义 |
| `yun.lsp` | 云盘目录打开与文件发布 |
| `auto.lsp` | 自动化批量操作（编图号→修正比例→签名→目录→打印预处理→PDF） |
| `add-frame-by-ents.lsp` | 选择图形自动套图框（单套/批量聚类） |
| `beihua.lsp` | 北华旧图框修正专用 |
| `replace-xtsjy.lsp` | 邢台市设计院图框替换专用 |
| `map-sheet.dwg` | 标准图框模板资源文件 |

## 典型工作流

1. 使用「设置图框」选择当前图纸的图框块
2. 使用「自动编图号」按空间位置编号
3. 使用「附着签名」批量插入个人签名
4. 使用「打印预处理」优化出图效果
5. 使用「批量转PDF」输出所有图框为 PDF
6. 使用「生成目录」输出 CSV 格式目录
7. 使用「目录成图」将目录插入 DWG

或使用「自动输出」一键执行组合操作。

## 约束

- 图框块必须包含至少一个图号属性标签（图号/图纸编号等）
- 图框块应包含项目名称/工程名称/子项名称等属性
- 签名功能需要个人签名 DWG 文件放置在标准图库目录下
- 非标准图框（尺寸不在内置图幅表中）不支持自动打印