“>”)))
(ifinp
(setqjs-scaleinp)
))
;比例放大或缩小
（defunsc(x)
(*xjs-scale)
)
(prompt“n画五角星程序，键入：5js执行”)
(princ)
图1VisualLISP语言程序界面
Fig．1VisualLISPLanguageProgrammingInterface
AutoCAD中加载上述代码文件后，在命令行输入：5js，命令行提示“输入比例因子：”，给定比例因子并回车，命令行提示“插入点”，在这个提示下在绘图界面单击鼠标左键，就可以确定插入点，同时绘制了红色五角星，如图2所示。
图2按程序自动绘出的五角星
Fig．2Automaticdrawingofthefive-poingedstaraccordingtotheprocedure
我国的古建筑历史悠久，近年来，借助CAD这一现代技术，仿古建筑设计发展很快，如何利用CAD提高仿古建筑设计的水平和效率是目前需要解决的问题。
在仿古建筑设计过程中，针对仿古建筑节点构造繁多，形状复杂，通过对CAD进行二次开发是提高设计效率的重要一环。
本文利用AutoCAD的二次开发工具VisualLISP，针对仿古建筑设计存在的问题，在仿古建筑设计的参数化绘图方面进行了浅试，意在抛砖引玉，使有关人员对仿古建筑设计过程中遇到的问题提出更多解决方法，促进仿古建筑设计的发展。
