[求助]关于macro的edit:move问题 [复制链接]

大家好，最近开始学习macro编程，但是手头没有相关的参考书，就照着help做一些test,下面是自己写的一个小程序，创建一个箱体，然后通过bool运算给它一个开口以出射光。但是选择文件，并在command键入 &-Y:4.BXZ  
(creat_outbox 1550 2500 750 1450 2400) ，点击执行时出现 +!Ag n)  
*** ERROR *** edit:move: application of non-procedure: #[entity 1 3] > V}NG  
的错误。而且从tracepro的窗口看，箱体是建立起来了，但是没有移动 K'/x9.'%  
(define creat_outbox `IQC\DSl/  
  (lambda (x_width y_length z_height x_out y_out) m Dq,,  
    (define outbox (insert:block x_width y_length z_height)) `7n,(  
    (edit:move (outbox) 0 0 130 )         ;help 中语法形式 XdVC>6  
    (define outputface (insert:block x_out y_out 10)) rz7b
%
WY  
    (edit:move (outputface) 0 0 505)     ;help 中语法形式 r+Cha%&D  
    (define bu5)~|?{t  
      outter (bool:subtract outbox outputface)) AG0x)  
    )) g<c^\WG  
;(creat_outbox 1550 2500 750 1450 2400) <W^~Y31:0  
9'aR-tFun;  
如果我按照example中“Toroidal_Mirror.scm”的edit:move语句写程序（如下）就可以正确运行， 1vd+p!n  
(define creat_outbox 8rNxd=!  
  (lambda (x_width y_length z_height x_out y_out) dju{&wo~4  
    (define outbox (insert:block x_width y_length z_height)) >n\Q[W  
    (define outbox (edit:move outbox 0 0 130)) CI{TgL:l  
    (define outputface (insert:block x_out y_out 10)) '(>N gd[  
    (define outputface (edit:move outputface 0 0 505)) -e\kIK %  
    (define z<=t3dj  
      outter (bool:subtract outbox outputface)) jzp%.4/j  
    )) LEa:{s<:  
m&8_i`%<  
想请教下其中错误的原因  >S/>2e:  
50`r}
s}  
help中edit:move的实例为 Z28@yD+  
Ob+c*@KiW  

Syntax:

(edit:move body xdist ydist zdist [copy=#f] [rel=#t | dist])

<[~M|OL9q,  

Example:

<O&s 'A[   ;Create a sphere centered at the origin   {,srj['RS   (solid:sphere (position 0 0 0) 12)   zg"ZXZ   ;;#[entity 1 1]   G;+0V0K   ;Move the sphere by 1 unit in x, y, and z.   %"V,V3kw4   (edit:move (entity 1) 1 1 1) a$A S?`L

XA%?35v~  
"0mR*{nF  
b,`N;*  
>cLZP#^\2E  

这个语法真的是有点让人无语。。。。

参加培训吧。

我也不懂，等别人来答吧

其他问题： hsh W5j  
1. 我发现每次通过 SchemeEdit 改变设置时，必须要在tracpro中重新加载一次（Macro-Execute-选择文件）才能运行。否则它会执行修改前的程序 ，而不是像matlab之类的，修改函数后，调用函数是修改后的结果 5 ,HNb
 
#i?TCO  
2. ! JN@4  
我在程序中给每一个实体（entity）都会命名，但是tracepro建立的模型中，这些实体都是没有名字的，全部是用object**来代替。是tracepro本身就这样的吗，有没有一个方法让模型按自己的命名显示 0Pe.G0 #  
Al?XJ C B@  
3. WO^h\#^n  
mannul上面在macro的“Creating Solids”部分都是用solid:cone or solid:block来建立实体的， 6+>rf{5P7  
example中主要是define ** (insert:**) 来建立实体的， f>o@Y]/l  
这两个有什么区别吗？比如我建一个长宽高（xyz）为 20 30 40 的长方体 FM5$83Q  
(define block1 (solid:block (position 0 0 0) (position 20 30 40))) Sq,x@  
(define block1 (insert:block 20 30 40)) $%<gp@Gz  
我知道其中一个区别是他们的基点不同， M&L"yQA  
solid:block是你指定两个边点； BdSTB"  
insert的是按长宽高做实体，实体基点有一个规定，block为体心 4)?c[aC4P  
X~0P+E#  
还有其他的吗？ Wr;)3K  
yq2Bz7P  
g`6S*&8I