下面是我学习绘制一个输入两点画方框的小程序,为干什么在CAD2006里不能执行,反应是:参数类型错误 请大家给我指点迷津,不胜感激…… ( defun c:rect_1 (/ pt1 pt2 pt3 pt4);指定表达式全称并申明四个局部变量 (setq pt1 (getpoint "\n 请指定矩形的第一个点:")) (setq pt3 (getpoint "\n 请指定矩形的第二个点:")) (setq pt2 (list (car pt1) (cadr pt3)));计算矩形的第2点和第4点 (setq pt4 (list (car pt3) (cadr pt1))) (princ "\n") (command "line" pt1 pt2 pt3 pt4 "c");以四点绘制封闭矩形 );end of rect_1 (setq msg_ "\n......指令:rect_1.......\n") (prompt msg_) (princ "\n") |