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

andrewla

小弟有个问题：
      大家看看下面的程序。看看有什么问题。问题出在哪。我加载之后他总是提示参数不全。但我又不知道缺什么参数。
; Y/ g; {9 w, Z, \(defun c:a3 (/b,a,x0,x1)
  (setq myos(getvar "OSMODE"))
  \! A) |7 |6 U. }; D# m" D: O  (setvar "OSMODE" 0)
; G( c* }) ~  N6 F0 R1 R1 F  (setvar "CMDDIA" 0)
# Z1 V0 q/ l& _9 c( F( |4 X7 m  (setvar "cmdecho" 0)
  h2 `" P9 U' w5 r. `  (setq a 21000)
  (setq b (getint"\n请输入打印页数:"))
$ v% a4 r5 S2 \: S  (setq x0 0 )
) @$ l+ B% N4 z$ W3 n  (setq x1 21000)
4 ^4 M, e% Z# Z* u7 u  (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" )
    (setq b (- b 1))
    (setq x0 (+ x0 a))
! r/ k; {* a- f- c* o% N' o  ]    (setq x1 (+ x1 a))
  )
" b. T3 L8 U1 u. C& w  (setvar "CMDDIA" 1)
  (setvar "cmdecho" 1)
  princ()
+ W: I" @% V& d' v)
& R2 a% O+ U8 g7 _% U% l, V
[ 本帖最后由 ★新手★ 于 2007-2-25 14:20 编辑 ]

woaishuijia

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

andrewla

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

偶就稀饭美金

我想你可能是在坐标输入的时候出错了,
: g) S0 [! H' l$ ~"x0,0" "a,14850"
6 C/ S+ p3 o6 i' A4 Z, z( t在LISP里面,坐标并不是这样输入的,这是文字输入的形式,
坐标输入我也不记的了,呵呵,不好意思啊,
我想你在这本书里一定可以找到
0 X/ p& t9 D- J2 e( c# f, X+ Phttp://www.3dportal.cn/discuz/viewthread.php?tid=199860&extra=page%3D1

! }" i/ v; [6 k$ P4 ?2 h& N+ D( o& j: O还有就是这里,"\r"
/ P! W8 ?+ X# G5 E3 U& x你输入路径后,是不是还要点保存呢?
) o3 g4 `9 ~& n$ Z* j! w你再试试
" ]) \8 P* k+ t+ x) i
  K5 o' b' v* l! L2 r# W1 y4 A[ 本帖最后由 偶就稀饭美金 于 2007-2-26 10:00 编辑 ]

andrewla

谢谢了。问题解决了。确实是坐标输入有问题。我改了一下用表的形式就可以了。
, q1 @2 j1 l; ?# G先谢谢你们的帮忙。以后应该常讨论阿。

偶就稀饭美金

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