CAD lisp程序注释解析

(defun c:try( / p)定义命令行命令“try”，定义局部变量“p”

(setq p (getpoint "from point: "))利用交互获得一个点，将该点坐标存入变量“p”当中

(command "PLINE")利用命令行启动“PLINE”多段线命令，

(while p循环开始，当p不为空（即交互时一直给出下一点）时，无限循环。

(command p)将p的值（用户给出或选定的坐标点）输入至命令行，做为“PLINE”命令的参数。

(setq p (getpoint "to point: "))获取下一点坐标，重新存入变量p中

)

(command)等同于按下空格或回车键，用于结束“PLINE”命令

)

这个应该是用天正画的,只能说CAD也可以,只是要麻烦些,先画轴网,标注轴号,中间多余的轴线剪掉,然后可以用单线生成墙或者直接绘制墙体,顺着中轴线拉一边墙体就全部出来了,至于门和窗,该怎么画就不用多说了吧,楼梯只是一个截取面,在天正里面可以直接插入,CAD就需要自己画,尺寸就直接拉就行,这就只是一个框架图,大概步骤就这样

---