请问，这句代码是什么意思啊

artken

请问， 这段代码是什么意思啊

2.       (setq PSFLAG (if (= 1 (caar (vports)))
3.                        1 0
4.                    )
5.       )
6.       (Setq SS1 (SsGet (list (cons 0 "INSERT")(cons 67 PSFLAG))))

      (setq PSFLAG (if (= 1 (caar (vports)))                        1 0                    )       )       (Setq SS1 (SsGet (list (cons 0 "INSERT")(cons 67 PSFLAG))))

比如：(caar (vports))           (cons 67 PSFLAG)  等

ZZXXQQ

1、(caar (vports)) 取得vports函数返回值表中第一个元素表中的第一个元素。即(caar xxx)=(car(car xxx)。

2、(cons 67 PSFLAG) 组成 67 组码的点对，用于选择不同空间的实体。

artken

明白了

多謝版主