小弟有问题：看看这个程序缺什么参数？

andrewla

小弟有个问题：
3 ~( o& q1 y; {! b" u. p      大家看看下面的程序。看看有什么问题。问题出在哪。我加载之后他总是提示参数不全。但我又不知道缺什么参数。
) X& g5 P/ O3 O+ ?! \(defun c:a3 (/b,a,x0,x1)
- O; J, f8 C! d6 h. C: T3 O" V  (setq myos(getvar "OSMODE"))
  (setvar "OSMODE" 0)
  (setvar "CMDDIA" 0)
  (setvar "cmdecho" 0)
  (setq a 21000)
9 V+ @: M$ _8 \! s/ e7 W; x3 g6 O4 J) r- T  (setq b (getint"\n请输入打印页数:"))
  (setq x0 0 )
  (setq x1 21000)
  V" m# c/ N+ A/ V% q5 e  (while (< 0 b)
    (command "-plot" "y" "模型" "adobe pdf" "a3" "m" "l" "n" "w" "x0,0" "a,14850" "1:50" "center" "y" "acad.ctb" "y" "a" "n" "n" "y" "\r" )
* `- R0 O7 _! I7 U    (setq b (- b 1))
" Q; }( a3 ]4 b6 d! N    (setq x0 (+ x0 a))
; v. g: P: M) S" f9 `* a5 @+ m  \    (setq x1 (+ x1 a))
5 [0 Q0 ?) g6 d4 X" j! d  )
  (setvar "CMDDIA" 1)
8 b; D3 J% T5 R" s' L4 I- c  (setvar "cmdecho" 1)
  princ()
4 G, k1 @: s6 H- _4 W3 W' u4 b)
4 @) V, R$ o2 D2 R" N
[ 本帖最后由 ★新手★ 于 2007-2-25 14:20 编辑 ]

woaishuijia

第一行中“/”和“b”之间缺少空格

andrewla

谢谢指导。但还是有问题。plot 命令那还是有问题。麻烦高手帮忙看一下

偶就稀饭美金

我想你可能是在坐标输入的时候出错了,
/ K5 d$ T7 h/ E- A"x0,0" "a,14850"
在LISP里面,坐标并不是这样输入的,这是文字输入的形式,
3 }/ w4 H. z) m! D6 n2 a2 q5 W坐标输入我也不记的了,呵呵,不好意思啊,
我想你在这本书里一定可以找到
http://www.3dportal.cn/discuz/viewthread.php?tid=199860&extra=page%3D1

还有就是这里,"\r"
你输入路径后,是不是还要点保存呢?
! e1 y! |* J. e3 A1 T你再试试

[ 本帖最后由 偶就稀饭美金 于 2007-2-26 10:00 编辑 ]

andrewla

谢谢了。问题解决了。确实是坐标输入有问题。我改了一下用表的形式就可以了。
, f+ ~/ a8 x" X+ H/ [3 y先谢谢你们的帮忙。以后应该常讨论阿。

偶就稀饭美金

呵呵,不用客气,大家一起学习