OSD Modeling Lisp问题一

kting

查看几个modeling add-on lisp，看到里面经常使用到以下语句：
7 G) s/ D0 w% e(in-package :custom)
; {8 e8 }% l! _( A(use-package : oli)
* V9 V* z3 ~/ O& s(use-package :elan-ui)
( r' D' ]9 H5 l( k3 @( x5 u是什么意义？为什么要用到这语句？
3 v5 a$ p( f2 `, F0 t
) U# G! O( S( O另外gpntwc的意义和用法是？

alexsum

in-package是表示你下面的代码在那个包里面（姑且这么认为吧），变量就在相应的namespace中，这个名称可以随便定义咯，只要不冲突。
use-packge :oli是OSD Lisp必备，即引用OSD内部的lisp函数。
use-package :elan-ui这个不清楚，可能是引用其他人写的package吧
% `% u7 l4 k- c9 Y/ [$ n3 ogpntwc？不清楚，不过gpnt2d或者gpnt3d指的是二维点和三维点(x,y) (x,y,z)，OSD定义的数据类型.

" P( H7 c8 H' B1 L; C, Q[ 本帖最后由 sytgos 于 2008-11-10 19:12 编辑 ]

kting

我看过一些add-on的lisp，可以直接拿到osd运行，查看lisp里面就有用到(in-package :custom)，按alexsum的解析，这个包应该是osd里面有的吧？(use-package :elan-ui)同前者，应该不会是其他人写的package。
0 f: S' d4 f! E- Q, Y4 l/ G) @$ o
4 Q7 b7 c* }" Q4 R8 v* N8 P另，看gpntwc在lisp的出现如： gpntw(3.12451245 4.12452452 4.75215571 "vport1")
$ J5 O9 M: Z5 B+ }; a猜想应该是绝对坐标点，但我对里面的坐标值觉的很怪，一般我们用create-->workplane-->new出现的workplane应该是经过绝对坐标z=0的平面，为什么看数值没个为0的？

/ j: X$ m' M, w7 q' e5 x- h/ w还有，对与osd内部的函数库是不是可以理解为package，osd有多少个package？分别是？
: y& Q4 D/ _; J# r& M
0 x' `) G- _) B* y* i' b最后，setf和setq的区别是？

alexsum

不是，use-packege指的是你写程序所在的包，不是osd自带的bao如如果你写了一个lisp文件用的pakage是custom1，接着又写了一个lisp文件用的是custom2，那么你可以在custom2中使用这样的语句来引用custom1中的东西如custom1::functionsxxx，同样也可以在custom1中用custom2::functionxxx来引用custom2中的函数，前提是把相应的lisp文件加载进去了并且用use-package custom1或者use-package custom2的语句。
至于elan-ui，我看了一下，应该不是其他人写的啦，可能是osd界面包（猜测）。
: i9 m. }7 Q: v5 P一般来说use-pakege oli就足够了，其他的我也不清楚。
1 u, w9 t. Y' z我看了，gpntwc是带着ViewPort选择的gpnt3d应该，没有z的会自动变成0的吧。
1 |. w# W, A1 B在osd lisp中基本上setf和setq差不多的，局部变量建议用let。

kting

大概了解了，还是要感谢alexsun的解答，我再仔细研究一下...........