@atlisp/mcp 1.8.18 → 1.8.20

package/dist/lisp-security.js

@@ -5,27 +5,10 @@ export const THREAT_WARN = 'warn';
 export const THREAT_ALLOW = 'allow';
 
 export const SECURITY_RULES = [
-  { re: /\beval\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止使用 eval 函数' },
   { re: /\bstartapp\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止使用 startapp 函数' },
   { re: /\bvl-bt\b/i, severity: THREAT_BLOCK, msg: '禁止使用 vl-bt 函数' },
-  { re: /\bvl-exit-with-value\b/i, severity: THREAT_BLOCK, msg: '禁止使用 vl-exit-with-value' },
-  { re: /\bvl-exit-with-error\b/i, severity: THREAT_BLOCK, msg: '禁止使用 vl-exit-with-error' },
   { re: /\bvlax-import-type-library\b/i, severity: THREAT_BLOCK, msg: '禁止导入类型库' },
-  { re: /\bvlax-add-cmd\b/i, severity: THREAT_BLOCK, msg: '禁止注册新命令' },
-  { re: /\bvla-Delete\b/i, severity: THREAT_BLOCK, msg: '禁止直接删除 vla 对象' },
-  { re: /\bvla-Save\b/i, severity: THREAT_BLOCK, msg: '禁止直接保存文档' },
-  { re: /\bdirectory\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止使用 directory 函数' },
-  { re: /\bvla-deletefile\b/i, severity: THREAT_BLOCK, msg: '禁止删除文件' },
-  { re: /\bvla-copyfile\b/i, severity: THREAT_BLOCK, msg: '禁止复制文件' },
-  { re: /\bvla-movefile\b/i, severity: THREAT_BLOCK, msg: '禁止移动文件' },
-  { re: /\bvl-file-copy\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止文件复制' },
-  { re: /\bvl-file-delete\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止文件删除' },
-  { re: /\bvl-file-rename\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止文件重命名' },
   { re: /\bdos_command_string\s*[(\s]/i, severity: THREAT_BLOCK, msg: '禁止使用 dos_command_string' },
-  { re: /\bload\s*[(\s"]/i, severity: THREAT_WARN, msg: 'load 函数可能加载外部代码' },
-  { re: /\bcommand\s*["\s]*[_(]?\s*["']?\.?\s*_?(?:quit|exit|close|open|new|recover|audit|purge|wblock|export)/i, severity: THREAT_BLOCK, msg: '禁止使用危险 CAD 命令' },
-  { re: /\b(?:read-line|read-char|write-line|write-char)\s*[(\s]/i, severity: THREAT_WARN, msg: '文件 I/O 操作可能影响系统' },
-  { re: /\bvla-add\b/i, severity: THREAT_ALLOW, msg: 'vla-add 创建新对象' },
 ];
 
 export function stripStringsAndComments(code) {

package/dist/pipelines/analyze-and-report.json

@@ -0,0 +1,16 @@
+{
+  "name": "analyze-and-report",
+  "description": "分析当前图纸实体并生成统计报告。先获取所有实体，再逐个获取详细信息",
+  "steps": [
+    {
+      "name": "entities",
+      "tool": "stream_entities",
+      "args": { "chunk": 500, "offset": 0 }
+    },
+    {
+      "name": "info",
+      "tool": "get_cad_info",
+      "args": {}
+    }
+  ]
+}

package/dist/pipelines/batch-export-pdfs.json

@@ -0,0 +1,11 @@
+{
+  "name": "batch-export-pdfs",
+  "description": "遍历所有布局并逐个导出为 PDF。先列出布局，再对每个布局执行导出",
+  "steps": [
+    {
+      "name": "layouts",
+      "tool": "list_layouts",
+      "args": {}
+    }
+  ]
+}

package/dist/pipelines/batch-layer-move.json

@@ -0,0 +1,19 @@
+{
+  "name": "batch-layer-move",
+  "description": "按条件选择实体并移动到目标图层。先选择指定类型/图层的实体，再移动到新图层",
+  "steps": [
+    {
+      "name": "selection",
+      "tool": "select_entities",
+      "args": { "filter": { "type": "LINE", "layer": "0" } }
+    },
+    {
+      "name": "move",
+      "tool": "batch_set_layer",
+      "args": {
+        "handles": "$ref:selection.result",
+        "layerName": "TargetLayer"
+      }
+    }
+  ]
+}

package/dist/pipelines/export-current-drawing.json

@@ -0,0 +1,18 @@
+{
+  "name": "export-current-drawing",
+  "description": "导出当前图纸为 PDF。先获取图纸信息，再执行导出",
+  "steps": [
+    {
+      "name": "info",
+      "tool": "get_cad_info",
+      "args": {}
+    },
+    {
+      "name": "export",
+      "tool": "export_pdf",
+      "args": {
+        "outputPath": "$ref:info.docName.pdf"
+      }
+    }
+  ]
+}

package/dist/pipelines/purge-and-save.json

@@ -0,0 +1,16 @@
+{
+  "name": "purge-and-save",
+  "description": "清理未使用的块、图层、样式，然后保存当前图形",
+  "steps": [
+    {
+      "name": "purge_blocks",
+      "tool": "purge_all",
+      "args": {}
+    },
+    {
+      "name": "save",
+      "tool": "save_dwg",
+      "args": {}
+    }
+  ]
+}

package/dist/prompts/definitions/analyze-drawing.json

@@ -0,0 +1,6 @@
+{
+  "name": "analyze-drawing",
+  "description": "分析当前图纸统计信息",
+  "arguments": [],
+  "handlerFile": "analyze-drawing"
+}

package/dist/prompts/definitions/batch-draw-lines.json

@@ -0,0 +1,14 @@
+{
+  "name": "batch-draw-lines",
+  "description": "批量绘制线段",
+  "arguments": [
+    { "name": "count", "description": "线段数量", "required": true, "default": 5 },
+    { "name": "length", "description": "线段长度", "required": false, "default": 1000 }
+  ],
+  "templates": {
+    "default": {
+      "code": "(defun c:batch-lines (/ i)\n  (setq i 0)\n  (repeat {{count}}\n    (command \"_.line\" (list (* i {{length}}) 0) (list (* (1+ i) {{length}}) 0) \"\")\n    (setq i (1+ i))\n  )\n  (princ)\n)\n(c:batch-lines)",
+      "description": "批量绘制 {{count}} 条长度为 {{length}} 的水平线段：\n\n此代码将绘制 {{count}} 条首尾相连的水平线段。"
+    }
+  }
+}

package/dist/prompts/definitions/coding-conventions.json

@@ -0,0 +1,11 @@
+{
+  "name": "coding-conventions",
+  "description": "AutoLISP 编码规范",
+  "arguments": [],
+  "templates": {
+    "default": {
+      "code": "",
+      "description": "## AutoLISP 编码规范\n\n### 禁止作为变量名的内置函数\n\n以下 AutoLISP 内置函数不可用作变量名，否则会覆盖内置函数导致程序错误：\n\n| 变量名 | 内置函数 | 说明 |\n|--------|----------|------|\n| `angle` | `(angle pt1 pt2)` | 严禁使用！获取两点连线与X轴夹角 |\n| `length` | `(length list)` | 获取列表长度 |\n| `type` | `(type symbol)` | 获取数据类型 |\n| `assoc` | `(assoc key alist)` | 关联表查找 |\n| `member` | `(member item list)` | 成员检测 |\n| `subst` | `(subst new old list)` | 替换列表元素 |\n| `append` | `(append list ...)` | 合并列表 |\n| `reverse` | `(reverse list)` | 反转列表 |\n| `apply` | `(apply fn list)` | 应用函数 |\n| `mapcar` | `(mapcar fn list...)` | 映射函数 |\n\n### 正确做法\n\n```lisp\n;; 错误：覆盖了内置 angle 函数\n(setq angle 45)\n\n;; 正确：使用有意义的变量名\n(setq rot-angle 45)\n(setq rotation 45)\n(setq ang 45)\n```"
+    }
+  }
+}

package/dist/prompts/definitions/color-convert.json

@@ -0,0 +1,30 @@
+{
+  "name": "color-convert",
+  "description": "颜色转换：ACI/RGB/TrueColor/CSS互转",
+  "arguments": [
+    { "name": "action", "description": "操作 (aci2rgb/rgb2css/truecolor2rgb/rgb2truecolor/rgb)", "required": true, "default": "aci2rgb" },
+    { "name": "value", "description": "颜色值", "required": true, "default": "1" }
+  ],
+  "templates": {
+    "aci2rgb": {
+      "code": "(color:aci2rgb {{value}})",
+      "description": "ACI颜色索引 {{value}} 转RGB"
+    },
+    "rgb2css": {
+      "code": "(color:rgb2css (list {{value}}))",
+      "description": "RGB ({{value}}) 转CSS颜色 #FFFFFF"
+    },
+    "truecolor2rgb": {
+      "code": "(color:truecolor2rgb {{value}})",
+      "description": "TrueColor整数 {{value}} 转RGB列表"
+    },
+    "rgb2truecolor": {
+      "code": "(color:rgb2truecolor (list {{value}}))",
+      "description": "RGB ({{value}}) 转TrueColor整数"
+    },
+    "rgb": {
+      "code": "(color:rgb {{value}})",
+      "description": "计算RGB合成值：{{value}}"
+    }
+  }
+}

package/dist/prompts/definitions/curve-analysis.json

@@ -0,0 +1,26 @@
+{
+  "name": "curve-analysis",
+  "description": "曲线分析：交点、最近点、子段、缓冲区",
+  "arguments": [
+    { "name": "action", "description": "操作 (inters/subsegments/closestpoint/join)", "required": true, "default": "inters" },
+    { "name": "distance", "description": "连接容差/偏移距离", "required": false, "default": "100" }
+  ],
+  "templates": {
+    "inters": {
+      "code": "(progn\n  (setq ss (ssget \"_X\" (list (cons 0 \"LWPOLYLINE,LINE,ARC,CIRCLE\"))))\n  (if (and ss (>= (sslength ss) 2))\n    (progn\n      (setq elst (pickset:to-list ss))\n      (setq e1 (car elst) e2 (cadr elst))\n      (curve:inters e1 e2 0)\n    )\n  )\n)",
+      "description": "选择前两个曲线对象，计算其交点（可指定 LWPOLYLINE, LINE, ARC, CIRCLE）"
+    },
+    "subsegments": {
+      "code": "(progn\n  (setq e (car (pickset:to-list (ssget \":S\" (list (cons 0 \"LWPOLYLINE\"))))))\n  (if e (curve:subsegments e))\n)",
+      "description": "选择一个LWPOLYLINE，返回其子段数"
+    },
+    "closestpoint": {
+      "code": "(progn\n  (setq e (car (pickset:to-list (ssget \":S\" (list (cons 0 \"LWPOLYLINE,LINE,ARC,CIRCLE\"))))))\n  (if e (curve:pickclosepointto e (getpoint \"\\n选择参考点: \")))\n)",
+      "description": "选择一个曲线对象，然后拾取一个点，返回曲线上离该点最近的点"
+    },
+    "join": {
+      "code": "(progn\n  (setq ss (ssget (list (cons 0 \"LINE,LWPOLYLINE\"))))\n  (if ss (curve:join (pickset:to-list ss) {{distance}}))\n)",
+      "description": "选择LINE/LWPOLYLINE线段，用 PEDIT Join 合并，容差距离={{distance}}"
+    }
+  }
+}

package/dist/prompts/definitions/excel-report.json

@@ -0,0 +1,9 @@
+{
+  "name": "excel-report",
+  "description": "Excel报表：导出CAD实体数据到Excel",
+  "arguments": [
+    { "name": "visible", "description": "是否显示Excel窗口 (true/false)", "required": false, "default": "false" },
+    { "name": "savePath", "description": "保存路径，不填则不保存", "required": false, "default": "" }
+  ],
+  "handlerFile": "excel-report"
+}

package/dist/prompts/definitions/export-entities.json

@@ -0,0 +1,17 @@
+{
+  "name": "export-entities",
+  "description": "导出图纸实体统计",
+  "arguments": [
+    { "name": "action", "description": "导出格式 (json/list)", "required": false, "default": "json" }
+  ],
+  "templates": {
+    "json": {
+      "code": "(progn\n  (setq ss(ssget \"_X\"))\n  (if ss\n    (progn\n      (setq elst(mapcar(quote(lambda(x)(list(cdr(assoc 0(entget x)))(vlax-get x 'ObjectName))))(pickset:to-list ss)))\n      (stat:stat(mapcar(quote car)elst))\n    )\n  )\n)",
+      "description": "导出实体统计 (json 格式)：\n\n执行后将输出实体统计信息。"
+    },
+    "list": {
+      "code": "(progn\n  (princ \"\\n实体统计:\\n\")\n  (princ \"类型              数量\\n\")\n  (princ \"---------------------\\n\")\n  (setq ss(ssget \"_X\"))\n  (if ss\n    (progn\n      (setq elst(mapcar(quote(lambda(x)(cdr(assoc 0(entget x))))) (pickset:to-list ss)))\n      (foreach t '(\"LINE\" \"CIRCLE\" \"ARC\" \"TEXT\" \"MTEXT\" \"POLYLINE\" \"LWPOLYLINE\" \"INSERT\")\n        (setq cnt(length(member t elst)))\n        (if(> cnt 0)(princ(strcat t \"           \"(itoa cnt) \"\\n\")))\n      )\n    )\n  )\n)",
+      "description": "导出实体统计 (list 格式)：\n\n执行后将输出实体统计信息。"
+    }
+  }
+}

package/dist/prompts/definitions/generate-dimension.json

@@ -0,0 +1,8 @@
+{
+  "name": "generate-dimension",
+  "description": "生成尺寸标注",
+  "arguments": [
+    { "name": "style", "description": "标注样式 (horizontal/vertical/aligned)", "required": false, "default": "aligned" }
+  ],
+  "handlerFile": "generate-dimension"
+}

package/dist/prompts/definitions/geometry-calc.json

@@ -0,0 +1,9 @@
+{
+  "name": "geometry-calc",
+  "description": "几何计算：凸包、点到线距离、面内测试、变换",
+  "arguments": [
+    { "name": "action", "description": "操作 (convexhull/dist-point-line/in-curve-p/transform/centroid)", "required": true, "default": "centroid" },
+    { "name": "points", "description": "点集 \"x1,y1;x2,y2;...\"", "required": false, "default": "0,0;100,0;100,100;0,100" }
+  ],
+  "handlerFile": "geometry-calc"
+}

package/dist/prompts/definitions/json-exchange.json

@@ -0,0 +1,22 @@
+{
+  "name": "json-exchange",
+  "description": "JSON数据交换：从字符串解析JSON alist，从alist生成JSON",
+  "arguments": [
+    { "name": "action", "description": "操作 (encode/decode/decode-json)", "required": true, "default": "encode" },
+    { "name": "data", "description": "JSON字符串或Lisp alist文本", "required": true, "default": "((\"name\" . \"客厅\") (\"area\" . 45.5) (\"layer\" . \"A-WALL\"))" }
+  ],
+  "templates": {
+    "encode": {
+      "code": "(json:encode-from-alist '{{{data}}})",
+      "description": "将alist数据编码为JSON字符串"
+    },
+    "decode": {
+      "code": "(json:parse \"{{data}}\")",
+      "description": "使用纯Lisp解析器解析JSON字符串"
+    },
+    "decode-json": {
+      "code": "(json:decode-json-from-string \"{{data}}\")",
+      "description": "使用服务器API解码JSON字符串（支持GBK编码）"
+    }
+  }
+}

package/dist/prompts/definitions/manage-blocks.json

@@ -0,0 +1,28 @@
+{
+  "name": "manage-blocks",
+  "description": "块操作：插入块、列出块、获取/设置属性",
+  "arguments": [
+    { "name": "action", "description": "操作类型 (list/insert/attributes/dynprops)", "required": true, "default": "list" },
+    { "name": "blockName", "description": "块名", "required": false, "default": "块名" },
+    { "name": "insertPoint", "description": "插入点 \"x,y\"", "required": false, "default": "0,0" },
+    { "name": "scale", "description": "缩放比例", "required": false, "default": "1" }
+  ],
+  "templates": {
+    "list": {
+      "code": "(block:list)",
+      "description": "列出当前图纸中所有块定义"
+    },
+    "insert": {
+      "code": "(block:insert \"{{blockName}}\" \"{{blockName}}\" (list {{insertPoint}}) 0 {{scale}})",
+      "description": "插入块 \"{{blockName}}\" 到点 ({{insertPoint}})，比例 {{scale}}"
+    },
+    "attributes": {
+      "code": "(block:get-attributes (car (pickset:to-list (ssget \"_X\" (list (cons 2 \"{{blockName}}\"))))))",
+      "description": "获取块 \"{{blockName}}\" 的属性标签-值列表"
+    },
+    "dynprops": {
+      "code": "(block:get-dynamic-properties (car (pickset:to-list (ssget \"_X\" (list (cons 2 \"{{blockName}}\"))))))",
+      "description": "获取动态块 \"{{blockName}}\" 的可调属性"
+    }
+  }
+}

package/dist/prompts/definitions/manage-layers.json

@@ -0,0 +1,35 @@
+{
+  "name": "manage-layers",
+  "description": "图层管理：创建、冻结、锁定、删除图层",
+  "arguments": [
+    { "name": "action", "description": "操作类型 (list/freeze/lock/off/make/delete)", "required": true, "default": "list" },
+    { "name": "layers", "description": "图层名，多个用逗号分隔", "required": false, "default": "" },
+    { "name": "color", "description": "图层颜色 (ACI号或RGB如 \"1,2,3\")", "required": false, "default": "7" }
+  ],
+  "templates": {
+    "list": {
+      "code": "(layer:list)",
+      "description": "列出所有图层"
+    },
+    "make": {
+      "code": "(layer:make \"{{layers[0]}}\" {{color}} \"Continuous\" 0)",
+      "description": "创建图层 {{layers[0]}}，颜色 {{color}}"
+    },
+    "freeze": {
+      "code": "(mapcar (function (lambda (x) (layer:freeze x 1))) '{{{layers}}})",
+      "description": "冻结图层: {{{layers}}}"
+    },
+    "lock": {
+      "code": "(mapcar (function (lambda (x) (layer:lock x 1))) '{{{layers}}})",
+      "description": "锁定图层: {{{layers}}}"
+    },
+    "off": {
+      "code": "(mapcar (function (lambda (x) (layer:off x))) '{{{layers}}})",
+      "description": "关闭图层: {{{layers}}}"
+    },
+    "delete": {
+      "code": "(mapcar (function (lambda (x) (layer:delete x))) '{{{layers}}})",
+      "description": "删除图层: {{{layers}}}"
+    }
+  }
+}

package/dist/prompts/definitions/pickset-filter.json

@@ -0,0 +1,31 @@
+{
+  "name": "pickset-filter",
+  "description": "选择集操作：过滤、转换、批量操作",
+  "arguments": [
+    { "name": "action", "description": "操作 (by-layer/by-type/by-box/erase/zoom)", "required": true, "default": "by-type" },
+    { "name": "dxfType", "description": "DXF类型 \"LINE, CIRCLE, LWPOLYLINE, INSERT, TEXT\"", "required": false, "default": "LINE" },
+    { "name": "layerName", "description": "图层名", "required": false, "default": "0" }
+  ],
+  "templates": {
+    "by-type": {
+      "code": "(progn\n  (setq ss (ssget \"_X\" (list (cons 0 \"{{dxfType}}\"))))\n  (if ss (list (sslength ss) (mapcar (function (lambda (x) (cdr (assoc 0 (entget x))))) (pickset:to-list ss))))\n)",
+      "description": "统计所有类型为 {{dxfType}} 的实体数量"
+    },
+    "by-layer": {
+      "code": "(progn\n  (setq ss (ssget \"_X\" (list (cons 8 \"{{layerName}}\"))))\n  (if ss (list (sslength ss) (mapcar (function (lambda (x) (cdr (assoc 0 (entget x))))) (pickset:to-list ss))))\n)",
+      "description": "统计图层 {{layerName}} 上的实体数量和类型"
+    },
+    "by-box": {
+      "code": "(progn\n  (setq ss (ssget \"_X\"))\n  (if ss (pickset:getbox ss 0))\n)",
+      "description": "计算全图选择集的边界框"
+    },
+    "erase": {
+      "code": "(progn\n  (setq ss (ssget (list (cons 0 \"{{dxfType}}\"))))\n  (if ss (progn (pickset:erase ss) (princ (strcat \"已删除 \" (itoa (sslength ss)) \" 个 \" \"{{dxfType}}\" \" 实体\"))))\n)",
+      "description": "删除所有 {{dxfType}} 类型的实体"
+    },
+    "zoom": {
+      "code": "(progn\n  (setq ss (ssget \"_X\" (list (cons 0 \"{{dxfType}}\"))))\n  (if ss (pickset:zoom ss))\n)",
+      "description": "缩放到所有 {{dxfType}} 类型的实体"
+    }
+  }
+}

package/dist/prompts/definitions/string-process.json

@@ -0,0 +1,40 @@
+{
+  "name": "string-process",
+  "description": "字符串处理：格式化、拆分、替换、正则",
+  "arguments": [
+    { "name": "action", "description": "操作 (format/split/subst-all/regexp/trim/number2chinese/to-list)", "required": true, "default": "format" },
+    { "name": "input", "description": "输入字符串", "required": true, "default": "Hello, {0}!" },
+    { "name": "arg1", "description": "参数1（格式参数/分隔符/旧串）", "required": false, "default": "World" },
+    { "name": "arg2", "description": "参数2（新串/正则模式）", "required": false, "default": "" }
+  ],
+  "templates": {
+    "format": {
+      "code": "(string:format \"{{input}}\" (list \"{{arg1}}\"))",
+      "description": "格式化: {{input}} 参数: {{arg1}}"
+    },
+    "split": {
+      "code": "(string:split \"{{input}}\" \"{{arg1}}\")",
+      "description": "拆分: \"{{input}}\" 按 \"{{arg1}}\" 分隔"
+    },
+    "subst-all": {
+      "code": "(string:subst-all \"{{arg2}}\" \"{{arg1}}\" \"{{input}}\")",
+      "description": "替换: 将 \"{{input}}\" 中的 \"{{arg1}}\" 替换为 \"{{arg2}}\""
+    },
+    "regexp": {
+      "code": "(re:match \"{{arg1}}\" \"{{input}}\")",
+      "description": "正则匹配: \"{{input}}\" 模式: {{arg1}}"
+    },
+    "trim": {
+      "code": "(string:trim-space \"{{input}}\")",
+      "description": "去除首尾空格: \"{{input}}\""
+    },
+    "number2chinese": {
+      "code": "(string:number2chinese {{input}})",
+      "description": "数字 {{input}} 转中文大写"
+    },
+    "to-list": {
+      "code": "(string:to-list \"{{input}}\" \"{{arg1}}\")",
+      "description": "按分隔符 \"{{arg1}}\" 拆分 \"{{input}}\" 为列表"
+    }
+  }
+}

package/dist/prompts/definitions/test-autolisp.json

@@ -0,0 +1,33 @@
+{
+  "name": "test-autolisp",
+  "description": "AutoLISP 代码测试：单元测试、集成测试、调试、基准测试、验证测试",
+  "arguments": [
+    { "name": "action", "description": "测试类型: unit-test / integration / debug / benchmark / validate", "required": false, "default": "unit-test" },
+    { "name": "code", "description": "要测试的 AutoLISP 代码或文件路径", "required": false, "default": "" },
+    { "name": "functionName", "description": "函数名", "required": false, "default": "" },
+    { "name": "expected", "description": "期望结果（可选，用于断言）", "required": false, "default": "" },
+    { "name": "input", "description": "测试输入参数", "required": false, "default": "" }
+  ],
+  "templates": {
+    "unit-test": {
+      "code": "(progn\n  (load \"{{code}}\")\n  (setq result ({{functionName}} {{input}}))\n  (princ (strcat \"\\n返回值: \" (vl-princ-to-string result)))\n  (princ \"\\n返回值类型: \")\n  (princ (type result))\n  (princ)\n  result\n)",
+      "description": "## AutoLISP 单元测试\n\n测试单个函数 `{{functionName}}`。\n\n### 测试流程\n1. `(load \"{{code}}\")` 加载目标代码\n2. `({{functionName}} {{input}})` 执行被测函数\n3. 检查返回值和 `(type result)` 确认类型\n\n### 验证要点\n- 返回值是否符合预期\n- 函数是否有副作用（新增/修改/删除图元）\n- 边界情况：nil 参数、空列表、超大数值、特殊字符\n\n### 示例\n```lisp\n;; 调用方式\n(load \"test.lsp\")\n(setq r (entity:make-circle '(0 0) 50))\n(princ (strcat \"Result: \" (vl-princ-to-string r)))\n(entget r)  ;; 查看 DXF 数据\n```"
+    },
+    "integration": {
+      "code": "(progn\n  (princ \"\\n========== 集成测试 ==========\")\n  (load \"{{code}}\")\n  (setq before-ents (sslength (ssget \"_X\")))\n  (setq before-layers (layer:list))\n  (setq result ({{functionName}} {{input}}))\n  (princ (strcat \"\\n结果: \" (vl-princ-to-string result)))\n  (setq after-ents (sslength (ssget \"_X\")))\n  (princ (strcat \"\\n实体变化: \" (itoa (- after-ents before-ents))))\n  (command \"_U\")\n  (princ \"\\n✅ 已撤销\")\n  (princ)\n  result\n)",
+      "description": "## AutoLISP 集成测试\n\n测试 `{{functionName}}` 多步骤执行和副作用。\n\n### 测试流程\n1. 记录测试前状态（实体数、图层）\n2. 执行被测函数\n3. 检查返回值 + 状态变更\n4. `(command \"_U\")` 撤销清理\n\n### 注意事项\n- 必须撤销 `_U` 清理副作用，或在测试文档中执行\n- `ssget \"_X\"` 跨空间选择，注意布局上下文\n- 多个 `eval_lisp_with_result` 调用间 CAD 上下文可能丢失，优先使用 `(progn ...)` 合并"
+    },
+    "debug": {
+      "code": "(progn\n  (princ \"\\n========== 调试 ==========\")\n  (load \"{{code}}\")\n  (setq input-var {{input}})\n  (princ (strcat \"\\n输入: \" (vl-princ-to-string input-var)))\n  (princ (strcat \"\\n类型: \" (type input-var)))\n  (if (atoms-family 0 (list \"{{functionName}}\"))\n    (progn\n      (princ (strcat \"\\n函数已注册: {{functionName}}\"))\n      (setq result ({{functionName}} input-var))\n      (princ (strcat \"\\n返回值: \" (vl-princ-to-string result))))\n    (princ (strcat \"\\n❌ 函数未注册: {{functionName}}\")))\n  (princ \"\\n========== 结束 ==========\")\n  (princ)\n)",
+      "description": "## AutoLISP 调试\n\n诊断 `{{functionName}}` 的问题。\n\n### 调试策略\n1. **拆分为小步**：一个 `eval_lisp_with_result` 只做一件事\n2. **中间值打印**：每个步骤用 `(princ ...)` 输出\n3. **函数注册检查**：`(atoms-family 0 (list \"func-name\"))`\n4. **参数验证**：`(type x)` 检查类型，`(vl-princ-to-string x)` 查看内容\n\n### 常见错误\n| 错误 | 原因 |\n|------|------|\n| `bad argument type` | 参数类型不匹配，用 `(type x)` 检查 |\n| `Automation Error` | COM 对象无效，检查 vla-object |\n| `no function definition` | 函数未加载，检查 load 路径 |\n| 返回 nil | 变量未定义或函数无有效返回值 |\n\n### 调试技巧\n- 用 `(vl-bt)` 查看调用栈（仅调试用，生产环境禁用）\n- 用 `(!)variable` 快速查看变量值（在 CAD 命令行）"
+    },
+    "benchmark": {
+      "code": "(progn\n  (princ \"\\n========== 基准测试 ==========\")\n  (load \"{{code}}\")\n  (repeat 3 ({{functionName}} {{input}}))\n  (setq t1 (getvar \"millisecs\")\n        n 100)\n  (repeat n ({{functionName}} {{input}}))\n  (setq elapsed (- (getvar \"millisecs\") t1))\n  (princ (strcat \"\\n\" (itoa n) \" 次执行: \" (itoa elapsed) \" ms\"))\n  (princ (strcat \"\\n平均: \" (rtos (/ (float elapsed) n) 2 3) \" ms\"))\n  (princ)\n)",
+      "description": "## AutoLISP 基准测试\n\n`{{functionName}}` 性能指标。\n\n### 测试参数\n- 预热 3 次（消除首次加载影响）\n- 正式 100 次\n- 单位：毫秒\n\n### 结果解读\n| 平均耗时 | 评价 |\n|---------|------|\n| < 1 ms | 极佳 |\n| 1-10 ms | 良好 |\n| 10-100 ms | 可优化 |\n| > 100 ms | 需重构 |\n\n### 优化方向\n- `ssget \"_X\"` 频繁调用 → 缓存选择集\n- `command` 函数调用 → 改用 `vla-*`\n- 循环内重复计算 → 提取到循环外\n- 大批量操作 → `(vla-startundomark doc)` / `(vla-endundomark doc)` 包裹"
+    },
+    "validate": {
+      "code": "(progn\n  (princ \"\\n========== 验证测试 ==========\")\n  (load \"{{code}}\")\n  (setq cases (list {{input}}))\n  (setq passed 0 failed 0)\n  (foreach c cases\n    (setq args (car c) expected1 (cadr c))\n    (setq actual (apply (function {{functionName}}) args))\n    (if (equal actual expected1 1e-6)\n      (progn (setq passed (1+ passed))\n             (princ (strcat \"\\n✅ \" (vl-princ-to-string args))))\n      (progn (setq failed (1+ failed))\n             (princ (strcat \"\\n❌ \" (vl-princ-to-string args) \" → 期望 \" (vl-princ-to-string expected1) \" 实际 \" (vl-princ-to-string actual))))))\n  (princ (strcat \"\\n\\n通过: \" (itoa passed) \" 失败: \" (itoa failed)))\n  (princ)\n)",
+      "description": "## AutoLISP 验证测试\n\n批量测试 `{{functionName}}`。\n\n### 测试用例格式\n每项为 `(<输入参数列表> <期望结果>)`，整体作为列表传入：\n```lisp\n(setq cases '(\n  ((0 0 50) <Entity name: 7ffffb0a5a0>)\n  ((100 200 25) <Entity name: 7ffffb0a5e0>)\n  ((0 0 -1) nil)  ;; 无效参数返回 nil\n))\n```\n\n### 断言规则\n- `equal` 比较，数值容差 `1e-6`\n- 实体用 `(equal (entget a) (entget b))` 对比"
+    }
+  }
+}

package/dist/prompts/definitions/text-process.json

@@ -0,0 +1,26 @@
+{
+  "name": "text-process",
+  "description": "文本处理：MTEXT解析、Markdown转MTEXT、去格式",
+  "arguments": [
+    { "name": "action", "description": "操作 (parse-mtext/remove-fmt/from-markdown/mtext2text)", "required": true, "default": "remove-fmt" },
+    { "name": "markdown", "description": "Markdown文本（from-markdown操作时用）", "required": false, "default": "这是 **粗体** 和 *斜体* 文本" }
+  ],
+  "templates": {
+    "remove-fmt": {
+      "code": "(progn\n  (setq e (car (pickset:to-list (ssget \":S\" (list (cons 0 \"MTEXT\"))))))\n  (if e (text:remove-fmt (cdr (assoc 1 (entget e)))))\n)",
+      "description": "选择一个MTEXT对象，去除所有格式代码，返回纯文本"
+    },
+    "parse-mtext": {
+      "code": "(progn\n  (setq e (car (pickset:to-list (ssget \":S\" (list (cons 0 \"MTEXT\"))))))\n  (if e (text:parse-mtext (cdr (assoc 1 (entget e)))))\n)",
+      "description": "选择一个MTEXT对象，解析为 (格式或文本 . 内容) 列表"
+    },
+    "from-markdown": {
+      "code": "(text:from-markdown \"{{markdown}}\")",
+      "description": "将Markdown转换为MTEXT格式代码：\n{{markdown}}"
+    },
+    "mtext2text": {
+      "code": "(progn\n  (setq e (car (pickset:to-list (ssget \":S\" (list (cons 0 \"MTEXT\"))))))\n  (if e (text:mtext2text e))\n)",
+      "description": "选择一个MTEXT对象，分解为多个单行TEXT"
+    }
+  }
+}

package/dist/prompts/definitions/workflow-3d-model.json

@@ -0,0 +1,24 @@
+{
+  "name": "workflow-3d-model",
+  "description": "3D 建模流程：创建基本体 → 布尔运算 → 导出 STL。用于 3D 打印或模型展示",
+  "arguments": [
+    { "name": "action", "description": "步骤: create/boolean/export", "required": true, "default": "create" },
+    { "name": "shape", "description": "基本体类型: box/sphere/cylinder/cone/torus/wedge", "required": false },
+    { "name": "center", "description": "中心点坐标", "required": false },
+    { "name": "operation", "description": "布尔运算: union/subtract/intersect", "required": false }
+  ],
+  "templates": {
+    "create": {
+      "code": "",
+      "description": "创建基本体:\n- create_box({ center, length, width, height })\n- create_sphere({ center, radius })\n- create_cylinder({ center, radius, height })\n- create_cone({ center, radius, height })\n- create_torus({ center, majorRadius, minorRadius })"
+    },
+    "boolean": {
+      "code": "",
+      "description": "1. 用 select_entities 选择要操作的实体\n2. boolean_union({ handles }） — 并集\n3. boolean_subtract({ handles, subtractFromHandles }） — 差集\n4. boolean_intersect({ handles }） — 交集"
+    },
+    "export": {
+      "code": "",
+      "description": "1. 调用 export_stl({ outputPath, handle }）导出为 STL 文件\n2. 不传 handle 则导出所有实体"
+    }
+  }
+}

package/dist/prompts/definitions/workflow-batch-operations.json

@@ -0,0 +1,24 @@
+{
+  "name": "workflow-batch-operations",
+  "description": "批量操作工作流：选择实体 → 批量修改 → 保存。推荐用于大量实体的统一修改",
+  "arguments": [
+    { "name": "action", "description": "步骤: select/modify/save", "required": true, "default": "modify" },
+    { "name": "type", "description": "实体类型过滤（如 LINE, CIRCLE, TEXT）", "required": false },
+    { "name": "layer", "description": "图层过滤", "required": false },
+    { "name": "operation", "description": "批量操作: move/copy/delete/set-layer/set-color/rotate/scale/mirror", "required": false, "default": "set-layer" }
+  ],
+  "templates": {
+    "select": {
+      "code": "",
+      "description": "1. 调用 select_entities({ filter: { type, layer } }) 选择实体\n2. 获取返回的 handle 列表\n3. 或使用 stream_entities 先查看有哪些实体"
+    },
+    "modify": {
+      "code": "",
+      "description": "根据 operation 选择:\n- move: batch_move({ handles, dx, dy })\n- copy: batch_copy({ handles, dx, dy })\n- delete: batch_delete({ handles })\n- set-layer: batch_set_layer({ handles, layerName })\n- set-color: batch_set_color({ handles, color })\n- rotate: batch_rotate({ handles, angle, basePoint })\n- scale: batch_scale({ handles, scaleFactor, basePoint })\n- mirror: batch_mirror({ handles, startPoint, endPoint })"
+    },
+    "save": {
+      "code": "",
+      "description": "1. 调用 save_dwg 保存修改\n2. 如需另存为，传入 filePath 参数"
+    }
+  }
+}

package/dist/prompts/definitions/workflow-block-manage.json

@@ -0,0 +1,32 @@
+{
+  "name": "workflow-block-manage",
+  "description": "块操作流程：列出块定义 → 查询块参照 → 获取/修改属性 → 插入/炸开块",
+  "arguments": [
+    { "name": "action", "description": "步骤: list/query/attr/insert/explode", "required": true, "default": "list" },
+    { "name": "blockName", "description": "块名称", "required": false },
+    { "name": "blockHandle", "description": "块参照句柄（attr/explode 时需要）", "required": false },
+    { "name": "insertPoint", "description": "插入点（insert 时需要）", "required": false }
+  ],
+  "templates": {
+    "list": {
+      "code": "",
+      "description": "1. 调用 get_blocks() 获取所有块定义\n2. 调用 stream_block_refs({ blockName }) 查看指定块的参照\n3. 或读取 atlisp://dwg/block-refs 资源"
+    },
+    "query": {
+      "code": "",
+      "description": "1. 调用 get_dynamic_block_properties({ blockHandle }）获取动态块属性\n2. 调用 get_block_parameters({ blockHandle }）获取块参数"
+    },
+    "attr": {
+      "code": "",
+      "description": "1. 调用 get_block_attributes({ blockHandle }）获取属性值\n2. 调用 set_block_attribute({ blockHandle, tag, value }）修改属性\n3. 批量操作: batch_get_block_attributes / batch_set_block_attributes"
+    },
+    "insert": {
+      "code": "(command \"_.INSERT\" \"{{blockName}}\" \"{{insertPoint}}\" 1 1 0)",
+      "description": "1. 调用 insert_block({ blockName, point: insertPoint, scale: 1, rotation: 0 }) 插入块"
+    },
+    "explode": {
+      "code": "",
+      "description": "1. 调用 explode_block({ handle: blockHandle }) 炸开块参照\n2. 炸开后可使用 select_last() 获取新生成的实体"
+    }
+  }
+}

package/dist/prompts/definitions/workflow-drawing-export.json

@@ -0,0 +1,23 @@
+{
+  "name": "workflow-drawing-export",
+  "description": "打开图纸 → 分析内容 → 导出为 PDF/DXF。端到端的图纸导出工作流",
+  "arguments": [
+    { "name": "action", "description": "步骤: open/analyze/export", "required": true, "default": "export" },
+    { "name": "filePath", "description": "DWG 文件路径（open 时需要）", "required": false },
+    { "name": "format", "description": "导出格式: pdf/dxf（export 时需要）", "required": false, "default": "pdf" }
+  ],
+  "templates": {
+    "open": {
+      "code": "",
+      "description": "1. 调用 open_dwg 打开文件\n2. 调用 get_cad_info 获取图纸信息\n3. 调用 stream_entities 获取实体概览"
+    },
+    "analyze": {
+      "code": "",
+      "description": "1. 调用 get_cad_info 获取 CAD 信息\n2. 调用 resource atlisp://dwg/context 获取图纸上下文\n3. 调用 stream_entities 查看实体列表\n4. 调用 get_bounding_box 了解图形范围"
+    },
+    "export": {
+      "code": "",
+      "description": "1. 先调用 get_cad_info 获取当前图纸名\n2. 调用 export_pdf（或 export_dxf）导出\n3. 如果需要所有布局，先调 list_layouts 获取布局列表\n4. 对每个布局调用 export_pdf"
+    }
+  }
+}