程序加载后，无反应，仅提示“未知命令”

wjnnan

程序加载后，无反应，仅提示“未知命令”，不知道怎么回事


(defun c:HH()
(alert"
\ [标注]
\ 01-标注角度-jd      02-标注半径-bj      03-标注直径-zj       04-逐点标注-bz
\ 05-标注弧长-hu      06-还原标注值-hy    07-标准断开-bd       08-标注合并-bh
\ 09-标注避让-br      10-标注恢复原位-fw  11-标注比例修改-bzbl 12-标注对齐-dq
\ 13-坐标标注-zb      14-标高标注-bg      15-复制并改标高-gbg  16-检查假尺寸-cbz
\ 17-尺寸检查及恢复-cbz2  18-标注等分-bf  19-标注归同层-bzgc   20-动态引线标注1-yb1
\ 21-动态引线标注2-yb2    22-多点引线标注-ddyx   23-改尺寸值-gcc
\--------------------------------------------------------------------------------
\ [块]
\ 01-快速建块-jk     02-改块基点-kj     03-块内复制-kc     04-删重叠块-sdk
\ 05-块统计-ktj      06-块相同刷-sss    07-改块名-gkm     08-改块名-gkm2
\ 09-将对象加入块-jrk    10-删除块中某个对象-yck
\-------------------------------------------------------------------------------
\ [图层]
\ 01-图层关闭-tg    02-图层关闭(反)-tgf    03-图层冻结-td    04-图层冻结(反)-tdf
\ 05-图层锁定-ts    06-图层解锁(反)-tsf    07-图层全部解冻-tdj   08-图层全部解锁-tsj
\ 09-解锁某图层-tjs    10- 显示+解锁+解冻-txq    11-对象层变为当前层-tq
\ 12-快速将对象加入当前图层-gtc
\-------------------------------------------------------------------------------
\ [常用]
\ 01-前置对象-sf   02-后置对象-sb    03-设置捕捉-bbb   04-审图云线-st
\ 05-实心箭头-jt   06-文件清理-qq    07-画云线-xd    08-测量长度-lcd
\ 09-面积长度-lmj   10-数字求和-sh    11-四则计算-js    12-动态信息-info
\ 13-画中心线-zx    14-小蔡选择易-ss   15-批量打印-bp    16-插入日期及时间-it
\ 17-画截断线-jdx    18-双截断线-jdx2    19-剖面符号-pm    20-剖切符号-pq
\ 21-图名线-tmx    22-写图号-th    23-角平分线-pfx    24-改成红色-c1
\ 25-改成黄色-c2    26-改成绿色-c3   27-改成青色-c4     28-改成蓝色-c5
\ 29-改成洋红色-c6    30-改成白、黑色-c7    31-改成灰色-c8    32-引线球型编号-qb
\ 33-输入管线-bs   34-剖管符号-gf
\-------------------------------------------------------------------------------
\ [文字]
\ 01-改宽高比-ttk    02-改字高度-ttg    03-文字内同交换-tth    04-分号前后交换-ttfh
\ 05-文字合并-ttj    06-文字刷-tts    07-文字打断-ttd    08-文字行距-hj
\ 09-加上下划线-jl    10-改文字范围-ttf    11-文字炸碎-ttt    12-加前后缀-jqh
\ 13-减前后缀-sqh    14-表格文字对齐-ttb    15-文字加框-tk    16-文字与线齐-ax
\ 17-文字左对齐-za    18-文字右对齐-zd    19-文字中间对齐-zs    20-文字对齐-ttq
\ 21-斜向文字对齐-tta    22-文字角度-ttr    23-文字超级修改-tt    24-批量替换文字-

tpg
\ 25-大小写修改-dx    26-单行变多行-tm    27-空格删除-sk   28-文字导出-ttdc
\ 29-设定样式为hx -hx    30-设定样式为tssd_rein -tssd   31-设定样式为hzs -hzs   
\ 32-修改对象文字样式为hx -ghx   33-修改对象文字样式为tssd_rein -gts
\ 34-修改对象文字样式为hzs -ghs
\-------------------------------------------------------------------------------
\ [修改]
\ 01-修剪-t    02-延伸-ex    03-移动-a    04-拉伸-s
\ 05-画圆形-ww    06-画椭圆-ty    07-倒尖角-ff    08-倒圆角 -fr
\ 09-缩放-sc    10-复制-cm    11-方向复制-cf    12-旋转复制-cr
\ 13-复制到当前层-cl    14-旋转-r    15-顺时针转90度-r9    16-逆时针转90度-r99
\ 17-修改文字-de    18-改线弧圆宽度-n    19-缩放0.5倍-s1    20-缩放2倍-s2     
\ 21-缩放4倍-s4    22-缩放100倍-s0    23-x,y方向不同比例缩放-ssc    24-1个可视窗口-

v1
\ 25-2个可视窗口-v2    26-弧变圆-a2c    27-改多圆半径-gr    28-圆变多边形-y2d   
\ 29-连接线-jj    30-改变填充角度-tjj  31-改变填充比例-tbb    32-将线等分并断开-df  
\ 33-重生成填充边框-htt  34-剪切掉所选对象的线-cx  35-超级修剪-cut  36-Z轴归零-z0
\ 37-圆弧反向-hf   38-动态线型比例-lb   39-线型、填充比例修改-bl   40-充满窗口-ee
\-------------------------------------------------------------------------------
\ [结构]
\ 01-画板负筋-b1   02-画板正筋-b2   03-画箍筋-hgj   04-画拉筋-hlj
\ 05-画S拉筋-hsj   06-异形箍筋及拉筋-yxg   07-直筋变弧筋-zbh   08-钢筋镜像-gjfx
\ 09-线筋引线标注-xjbz   10-点筋引线标注-djbz  11-管径标注-gj    12-柱截面估算-zjm
\ 13-柱编号编辑-zbh   14-备注-xbz   15-填充全色-h1   16-填充斜格-h2   
\ 17-填充混凝土-h3   18-填充点点-h4   19-填充毛石-h5   20-填充斜线混凝土-h6
\ 21-填充地坪-h7   22-填充斜线-h8   23-水平尺寸线断点-dd   24-垂直尺寸线断点-ddd
\ 25-输入钢筋号-gjh  26-输入轴线号-zxh   27-钢筋线加钩-jg   28-梁配筋加括号-jkh
\ 29-楼梯平面-lt1   30-楼梯剖面-lt2   31-楼梯剖面2-stpo   32-钢筋修改输入-ggj
\ 33-绘制钢筋点-hdj
\-------------------------------------------------------------------------------
\ [初始化]-还在编写中
\n 感谢使用工具箱！部分源码自己编写，感谢明经论坛及部分网友提供源码，还会继续完善,命
令 HH
")
)

Gu_xl

反斜杠后加 "n"

nzl1116

我估计是字符串太长了

xyp1964

string too long on input

xyp1964

2. (defun c:hh ()
   
3.   (alert
   
4.   (strcat
   
5.   "\n[标注]
   
6. \n01-标注角度-jd  02-标注半径-bj  03-标注直径-zj  04-逐点标注-bz 05-标注弧长-hu
   
7. \n06-还原标注值-hy  07-标准断开-bd  08-标注合并-bh 09-标注避让-br  10-标注恢复原位-fw
   
8. \n11-标注比例修改-bzbl 12-标注对齐-dq 13-坐标标注-zb  14-标高标注-bg  15-复制并改标高-gbg
   
9. \n16-检查假尺寸-cbz  17-尺寸检查及恢复-cbz2  18-标注等分-bf  19-标注归同层-bzgc  20-动态引线标注1-yb1
   
10. \n21-动态引线标注2-yb2  22-多点引线标注-ddyx  23-改尺寸值-gcc
    
11. \--------------------------------------------------------------------------------
    
12. \n[块]
    
13. \n01-快速建块-jk  02-改块基点-kj  03-块内复制-kc  04-删重叠块-sdk  05-块统计-ktj
    
14. \n06-块相同刷-sss  07-改块名-gkm  08-改块名-gkm2  09-将对象加入块-jrk  10-删除块中某个对象-yck
    
15. \-------------------------------------------------------------------------------
    
16. \n[图层]
    
17. \n01-图层关闭-tg  02-图层关闭(反)-tgf  03-图层冻结-td  04-图层冻结(反)-tdf 05-图层锁定-ts
    
18. \n06-图层解锁(反)-tsf  07-图层全部解冻-tdj  08-图层全部解锁-tsj  09-解锁某图层-tjs  10- 显示+解锁+解冻-txq
    
19. \n11-对象层变为当前层-tq  12-快速将对象加入当前图层-gtc
    
20. \-------------------------------------------------------------------------------"
    
21.   "\n[常用]
    
22. \n01-前置对象-sf  02-后置对象-sb  03-设置捕捉-bbb  04-审图云线-st  05-实心箭头-jt
    
23. \n06-文件清理-qq  07-画云线-xd  08-测量长度-lcd  09-面积长度-lmj  10-数字求和-sh
    
24. \n11-四则计算-js  12-动态信息-info  13-画中心线-zx  14-小蔡选择易-ss  15-批量打印-bp
    
25. \n16-插入日期及时间-it  17-画截断线-jdx  18-双截断线-jdx2  19-剖面符号-pm  20-剖切符号-pq
    
26. \n21-图名线-tmx  22-写图号-th  23-角平分线-pfx  24-改成红色-c1  25-改成黄色-c2
    
27. \n26-改成绿色-c3  27-改成青色-c4  28-改成蓝色-c5 29-改成洋红色-c6  30-改成白、黑色-c7
    
28. \n31-改成灰色-c8  32-引线球型编号-qb  33-输入管线-bs  34-剖管符号-gf
    
29. \-------------------------------------------------------------------------------
    
30. \n[文字]
    
31. \n01-改宽高比-ttk  02-改字高度-ttg  03-文字内同交换-tth  04-分号前后交换-ttfh  05-文字合并-ttj
    
32. \n06-文字刷-tts  07-文字打断-ttd  08-文字行距-hj  09-加上下划线-jl  10-改文字范围-ttf
    
33. \n11-文字炸碎-ttt  12-加前后缀-jqh  13-减前后缀-sqh  14-表格文字对齐-ttb  15-文字加框-tk
    
34. \n16-文字与线齐-ax  17-文字左对齐-za  18-文字右对齐-zd  19-文字中间对齐-zs  20-文字对齐-ttq
    
35. \n21-斜向文字对齐-tta  22-文字角度-ttr  23-文字超级修改-tt  24-批量替换文字-tpg 25-大小写修改-dx
    
36. \n26-单行变多行-tm  27-空格删除-sk  28-文字导出-ttdc  29-设定样式为hx-hx  30-设定样式为tssd_rein-tssd
    
37. \n31-设定样式为hzs-hzs  32-修改对象文字样式为hx-ghx  33-修改对象文字样式为tssd_rein-gts  34-修改对象文字样式为hzs-ghs
    
38. \-------------------------------------------------------------------------------"
    
39.   "\n[修改]
    
40. \n01-修剪-t  02-延伸-ex  03-移动-a  04-拉伸-s  05-画圆形-ww
    
41. \n06-画椭圆-ty  07-倒尖角-ff  08-倒圆角-fr  09-缩放-sc  10-复制-cm
    
42. \n11-方向复制-cf  12-旋转复制-cr  13-复制到当前层-cl  14-旋转-r  15-顺时针转90度-r9
    
43. \n16-逆时针转90度-r99  17-修改文字-de  18-改线弧圆宽度-n  19-缩放0.5倍-s1  20-缩放2倍-s2  
    
44. \n21-缩放4倍-s4  22-缩放100倍-s0  23-x,y方向不同比例缩放-ssc  24-1个可视窗口-v1  25-2个可视窗口-v2
    
45. \n26-弧变圆-a2c  27-改多圆半径-gr  28-圆变多边形-y2d  29-连接线-jj  30-改变填充角度-tjj
    
46. \n31-改变填充比例-tbb  32-将线等分并断开-df  33-重生成填充边框-htt  34-剪切掉所选对象的线-cx  35-超级修剪-cut
    
47. \n36-z轴归零-z0  37-圆弧反向-hf  38-动态线型比例-lb  39-线型、填充比例修改-bl  40-充满窗口-ee
    
48. \-------------------------------------------------------------------------------"
    
49.   "\n[结构]
    
50. \n01-画板负筋-b1  02-画板正筋-b2  03-画箍筋-hgj  04-画拉筋-hlj  05-画s拉筋-hsj
    
51. \n06-异形箍筋及拉筋-yxg  07-直筋变弧筋-zbh  08-钢筋镜像-gjfx  09-线筋引线标注-xjbz  10-点筋引线标注-djbz
    
52. \n11-管径标注-gj  12-柱截面估算-zjm  13-柱编号编辑-zbh  14-备注-xbz  15-填充全色-h1
    
53. \n16-填充斜格-h2  17-填充混凝土-h3  18-填充点点-h4  19-填充毛石-h5  20-填充斜线混凝土-h6
    
54. \n21-填充地坪-h7  22-填充斜线-h8  23-水平尺寸线断点-dd  24-垂直尺寸线断点-ddd  25-输入钢筋号-gjh
    
55. \n26-输入轴线号-zxh  27-钢筋线加钩-jg  28-梁配筋加括号-jkh  29-楼梯平面-lt1  30-楼梯剖面-lt2
    
56. \n31-楼梯剖面2-stpo  32-钢筋修改输入-ggj  33-绘制钢筋点-hdj
    
57. \-------------------------------------------------------------------------------
    
58. \n[初始化]-还在编写中
    
59. \n 感谢使用工具箱！部分源码自己编写，感谢明经论坛及部分网友提供源码，还会继续完善,命令 hh")
    
60.   )
    
61. )

(defun c:hh ()<br />   (alert<br />   (strcat<br />   "\n[标注]<br /> \n01-标注角度-jd  02-标注半径-bj  03-标注直径-zj  04-逐点标注-bz 05-标注弧长-hu<br /> \n06-还原标注值-hy  07-标准断开-bd  08-标注合并-bh 09-标注避让-br  10-标注恢复原位-fw<br /> \n11-标注比例修改-bzbl 12-标注对齐-dq 13-坐标标注-zb  14-标高标注-bg  15-复制并改标高-gbg<br /> \n16-检查假尺寸-cbz  17-尺寸检查及恢复-cbz2  18-标注等分-bf  19-标注归同层-bzgc  20-动态引线标注1-yb1<br /> \n21-动态引线标注2-yb2  22-多点引线标注-ddyx  23-改尺寸值-gcc<br /> \--------------------------------------------------------------------------------<br /> \n[块]<br /> \n01-快速建块-jk  02-改块基点-kj  03-块内复制-kc  04-删重叠块-sdk  05-块统计-ktj<br /> \n06-块相同刷-sss  07-改块名-gkm  08-改块名-gkm2  09-将对象加入块-jrk  10-删除块中某个对象-yck<br /> \-------------------------------------------------------------------------------<br /> \n[图层]<br /> \n01-图层关闭-tg  02-图层关闭(反)-tgf  03-图层冻结-td  04-图层冻结(反)-tdf 05-图层锁定-ts<br /> \n06-图层解锁(反)-tsf  07-图层全部解冻-tdj  08-图层全部解锁-tsj  09-解锁某图层-tjs  10- 显示+解锁+解冻-txq<br /> \n11-对象层变为当前层-tq  12-快速将对象加入当前图层-gtc<br /> \-------------------------------------------------------------------------------"<br />   "\n[常用]<br /> \n01-前置对象-sf  02-后置对象-sb  03-设置捕捉-bbb  04-审图云线-st  05-实心箭头-jt<br /> \n06-文件清理-qq  07-画云线-xd  08-测量长度-lcd  09-面积长度-lmj  10-数字求和-sh<br /> \n11-四则计算-js  12-动态信息-info  13-画中心线-zx  14-小蔡选择易-ss  15-批量打印-bp<br /> \n16-插入日期及时间-it  17-画截断线-jdx  18-双截断线-jdx2  19-剖面符号-pm  20-剖切符号-pq<br /> \n21-图名线-tmx  22-写图号-th  23-角平分线-pfx  24-改成红色-c1  25-改成黄色-c2<br /> \n26-改成绿色-c3  27-改成青色-c4  28-改成蓝色-c5 29-改成洋红色-c6  30-改成白、黑色-c7<br /> \n31-改成灰色-c8  32-引线球型编号-qb  33-输入管线-bs  34-剖管符号-gf<br /> \-------------------------------------------------------------------------------<br /> \n[文字]<br /> \n01-改宽高比-ttk  02-改字高度-ttg  03-文字内同交换-tth  04-分号前后交换-ttfh  05-文字合并-ttj<br /> \n06-文字刷-tts  07-文字打断-ttd  08-文字行距-hj  09-加上下划线-jl  10-改文字范围-ttf<br /> \n11-文字炸碎-ttt  12-加前后缀-jqh  13-减前后缀-sqh  14-表格文字对齐-ttb  15-文字加框-tk<br /> \n16-文字与线齐-ax  17-文字左对齐-za  18-文字右对齐-zd  19-文字中间对齐-zs  20-文字对齐-ttq<br /> \n21-斜向文字对齐-tta  22-文字角度-ttr  23-文字超级修改-tt  24-批量替换文字-tpg 25-大小写修改-dx<br /> \n26-单行变多行-tm  27-空格删除-sk  28-文字导出-ttdc  29-设定样式为hx-hx  30-设定样式为tssd_rein-tssd<br /> \n31-设定样式为hzs-hzs  32-修改对象文字样式为hx-ghx  33-修改对象文字样式为tssd_rein-gts  34-修改对象文字样式为hzs-ghs<br /> \-------------------------------------------------------------------------------"<br />   "\n[修改]<br /> \n01-修剪-t  02-延伸-ex  03-移动-a  04-拉伸-s  05-画圆形-ww<br /> \n06-画椭圆-ty  07-倒尖角-ff  08-倒圆角-fr  09-缩放-sc  10-复制-cm<br /> \n11-方向复制-cf  12-旋转复制-cr  13-复制到当前层-cl  14-旋转-r  15-顺时针转90度-r9<br /> \n16-逆时针转90度-r99  17-修改文字-de  18-改线弧圆宽度-n  19-缩放0.5倍-s1  20-缩放2倍-s2  <br /> \n21-缩放4倍-s4  22-缩放100倍-s0  23-x,y方向不同比例缩放-ssc  24-1个可视窗口-v1  25-2个可视窗口-v2<br /> \n26-弧变圆-a2c  27-改多圆半径-gr  28-圆变多边形-y2d  29-连接线-jj  30-改变填充角度-tjj<br /> \n31-改变填充比例-tbb  32-将线等分并断开-df  33-重生成填充边框-htt  34-剪切掉所选对象的线-cx  35-超级修剪-cut<br /> \n36-z轴归零-z0  37-圆弧反向-hf  38-动态线型比例-lb  39-线型、填充比例修改-bl  40-充满窗口-ee<br /> \-------------------------------------------------------------------------------"<br />   "\n[结构]<br /> \n01-画板负筋-b1  02-画板正筋-b2  03-画箍筋-hgj  04-画拉筋-hlj  05-画s拉筋-hsj<br /> \n06-异形箍筋及拉筋-yxg  07-直筋变弧筋-zbh  08-钢筋镜像-gjfx  09-线筋引线标注-xjbz  10-点筋引线标注-djbz<br /> \n11-管径标注-gj  12-柱截面估算-zjm  13-柱编号编辑-zbh  14-备注-xbz  15-填充全色-h1<br /> \n16-填充斜格-h2  17-填充混凝土-h3  18-填充点点-h4  19-填充毛石-h5  20-填充斜线混凝土-h6<br /> \n21-填充地坪-h7  22-填充斜线-h8  23-水平尺寸线断点-dd  24-垂直尺寸线断点-ddd  25-输入钢筋号-gjh<br /> \n26-输入轴线号-zxh  27-钢筋线加钩-jg  28-梁配筋加括号-jkh  29-楼梯平面-lt1  30-楼梯剖面-lt2<br /> \n31-楼梯剖面2-stpo  32-钢筋修改输入-ggj  33-绘制钢筋点-hdj<br /> \-------------------------------------------------------------------------------<br /> \n[初始化]-还在编写中<br /> \n 感谢使用工具箱！部分源码自己编写，感谢明经论坛及部分网友提供源码，还会继续完善,命令 hh")<br />   )<br /> )

chenweibin86

用reinit初始化下是否可以？

edata

编辑器的一个字符串含引号中文1154个字。

wjnnan

xyp1964 发表于 2014-8-4 13:34

感谢院长，可以显示了，

xyp1964

机械工程师

测试把strcat去掉，不会导致 未知命令 啊？？