高人指点一下.网上看到的.不会用.!!先谢了.

david3385

2. 批量打印出图(Mplot)
　　在AutoCAD中用PLOT命令每次只能打印一张图纸，如果在一个图形文件内有多张大小一样的图纸成纵向排列，间距M_d=500mm。通过Mplot只需调试一张，便可打印所有图纸。程序如下：

　　(defun c:Mplot()

　　　　(setq p_1 (getpoint"\n\tFirst CORNER:")

　　　　　　 P_2 (getPOINT"\n\tOther CORNER:")

　　　　　　 n (getint"\n\t总张数：<1>"))

　　　　(if (= n nil) (setq n 1))

　　　　(setq m_d 500)

　　 (REPEAT n

　　　　　　 (command"plot" "w" P_1 P_2 "n" COMMAND)javascript :window.open(this.src); alt="" src="http://www.sohozu.com/2005/down_info.asp?id=1993" width=1 onload="return imgzoom(this,550)" border=0>

不会用呀.怎么用.在看看程序有没有问题.谢谢了.