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

andrewla

小弟有个问题：
8 c: `' W' S' v5 a) B0 X( ]) x      大家看看下面的程序。看看有什么问题。问题出在哪。我加载之后他总是提示参数不全。但我又不知道缺什么参数。
% {8 j: ?$ M  o/ Y4 R6 s3 `7 o(defun c:a3 (/b,a,x0,x1)
  (setq myos(getvar "OSMODE"))
1 l+ D0 ^. U# M: M  (setvar "OSMODE" 0)
  (setvar "CMDDIA" 0)
  (setvar "cmdecho" 0)
' u( A- u5 u& T3 _  (setq a 21000)
. Q# ]) e# C" Q# q' }7 d  (setq b (getint"\n请输入打印页数:"))
  (setq x0 0 )
  (setq x1 21000)
6 }* q$ I) x; d8 K9 f  (while (< 0 b)
4 z$ M; ]( o& b, z) Q1 R    (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" )
; [" y5 {/ T% q8 ]8 G% ~! F    (setq b (- b 1))
    (setq x0 (+ x0 a))
7 P' O4 w! e4 t, C6 D) @$ U) B5 q3 I    (setq x1 (+ x1 a))
  )
& s4 C2 Q! f9 r8 s  (setvar "CMDDIA" 1)
  A! X( t$ x! m+ w4 q7 ?: J  (setvar "cmdecho" 1)
1 X' k% e. {3 i& g  princ()
4 }2 P! h4 S- k' I/ L( v)

[ 本帖最后由 ★新手★ 于 2007-2-25 14:20 编辑 ]

woaishuijia

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

andrewla

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

偶就稀饭美金

我想你可能是在坐标输入的时候出错了,
"x0,0" "a,14850"
9 J( I4 V: ]5 j6 [7 w在LISP里面,坐标并不是这样输入的,这是文字输入的形式,
坐标输入我也不记的了,呵呵,不好意思啊,
我想你在这本书里一定可以找到
http://www.3dportal.cn/discuz/viewthread.php?tid=199860&extra=page%3D1
' v0 t6 f9 c# T. v- a& u; j6 t
还有就是这里,"\r"
你输入路径后,是不是还要点保存呢?
0 i# a, u+ }+ c+ A你再试试
/ D  B; H& }3 t3 L$ e6 R, ?# B
# ]) f. {# H' ^2 F[ 本帖最后由 偶就稀饭美金 于 2007-2-26 10:00 编辑 ]

andrewla

谢谢了。问题解决了。确实是坐标输入有问题。我改了一下用表的形式就可以了。
- x5 {" S# h' _/ \先谢谢你们的帮忙。以后应该常讨论阿。

偶就稀饭美金

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