[求助]：设计一个命令反应器??谁会？？

nuomandi

设计一个命令反应器，命令结束后判断是什么命令，根据DIMSCALE的值，对生成的实体做什么样的处理，如果是改变DIMSACLE的值，再修改所有需要标准化的实体。

命令反应器怎样设置呀？？？

lijiao

这是我的程序中的一段：

2. 
   
3.   [FONT=courier new]
   
4. (if (not cmmd)
   
5.   (setq cmmd (vlr-editor-reactor nil '((:vlr-commandEnded . update))))
   
6. )
   
7. ;;;命令反应器的回调函数
   
8. (defun update (fyq xx / bbb)
   
9.   (setq bbb (strcase (car xx)))
   
10.   (cond
    
11.     ((wcmatch
    
12.        bbb
    
13.        "*TEXT,DIM*,AMPOWERDIM,QDIM,QLEADER,LEADER,TOLERANCE,AMPARTLIST"
    
14.      )
    
15. ......
    
16.   [/FONT]
    

<br />   [FONT=courier new]<br /> (if (not cmmd)<br />   (setq cmmd (vlr-editor-reactor nil '((:vlr-commandEnded . update))))<br /> )<br /> ;;;命令反应器的回调函数<br /> (defun update (fyq xx / bbb)<br />   (setq bbb (strcase (car xx)))<br />   (cond<br />     ((wcmatch<br />        bbb<br />        "*TEXT,DIM*,AMPOWERDIM,QDIM,QLEADER,LEADER,TOLERANCE,AMPARTLIST"<br />      )<br /> ......<br />   [/FONT]<br />

nuomandi

反应器我不是太懂，楼主能不能说的 清楚一点！！！