lisp语言中相对坐标的语法怎么表达

那位老大知道在lisp语言中相对坐标的语法怎么表达?

怎么都没有人知道呀?高手都到哪里去了?

(trans pt from to [disp])   

参数pt 三维实数列表，既可以被解释成一个三维点，又可以被解释成一个三维位移（矢量）。
from 整数代码、图元名或三维拉伸矢量，指定 pt 的坐标系。整数代码可以为如下值：
0  世界坐标系（WCS）
1  用户坐标系（当前 UCS）
2  与代码 0 或代码 1 一起使用时，表示当前视口的显示坐标系 (DCS)。与代码 3 一起使用时，表示当前模型空间视口的 DCS。
3  图纸空间 DCS（仅用于代码 2）
to 整数代码、图元名或三维拉伸矢量，指定返回点的坐标系。有效的整数代码取值请参见 from 参数。disp
如果存在且不为 nil，则将 pt 作为三维位移而不是三维点看待。
如果 from 或 to 参数是图元名，它必须是由 entnext、entlast、entsel、nentsel 和 ssname 等函数返回的图元名。这样就可以将某个特定对象的对象坐标系 (OCS) 中的点来回进行转换（对于某些对象，OCS 等价于 WCS，对这些对象，OCS 和 WCS 之间的转换是空操作）。使用三维拉伸矢量（三个实数组成的一个表）是来回转换对象 OCS 的另一种方法。但是，对于 OCS 等价于 WCS 的那些对象，这种转换也不做任何操作。
返回值由参数 to 指定的坐标系表示的一个三维点（或位移）。