CAD不是编程软件,是计算机辅助设计(Computer Aide Design)是做设计绘图用的(机械模具建筑装修)等。编程软件可用MASTERCAM,UG等。例如:atocad能够使通过LISO编写各种定制度绘图命令,从而达到控制绘图的效果。LISP语言(全名LISt Processor,即表处理语言),由约翰·麦卡锡在1960年左右创造的一种基于λ演算的函数式编程语言。就此编写了一个简单的程序,以期对用户起到抛砖引玉的作用。方法/步骤创建一个cad,新建一个工程,在lisp编辑器中编写一下程序,程序的作用为计算线段总长度,并选择另存为位置,保存文件lsp文件。使用cad加载lsp文件,选择lsp文件位置。在命令栏点击l,用cad绘制几条线段。在命令栏输入ll,选择所有线段,则在图下计算并显示出了所有线段的总长度。用lisp的代码为(defun c:LL ()(setvar "cmdecho" 1)(setq en (ssget (list '(0 "spline,arc,line,ellipse,LWPOLYLINE"))))(setq i 0)(setq ll 0)(repeat (sslength en) (setq ss (ssname en i)) (setq endata (entget ss)) (command "lengthen" ss "") (setq dd (getvar "perimeter"))(setq ll (+ dd ll)) (setq i (1+ i))) (princ "所选线条总长为:")(princ ll)(princ))