parametric drawing report
nameno.: expected score:
introduction of object to be drawn:图1图2
图1是用solidworks建模的gys型有对中榫凸缘联轴器中的一个半联轴器，图2是该建模用solidworks导出的一个视图，此次参数化编程以这一视图为基础编制程序。视图中圆由内向外半径依次为20mm,30mm,60mm，圆周分布的圆孔有6个，半径为6mm，其圆心到三个同心圆圆心的距离为48mm。
program codes:
下图3和4为编译器上的程序**图（分号后为注释，即图3和4中带阴影层的部分）。图3图4
**文本：defun c: zhou( )
(setq os (getvar "osmode"))保存原始捕捉状态。
(setvar "osmode" 0);关闭捕捉功能。
(setvar "angbase" 0.0);x轴正方向为0度。
(setvar "angdir" 0);逆时针方向为正。
(command "ltscale" 10);设置线型比例。
(command "layer" "m" "draw" "c" "white" "二维视图图层。
(command "layer" "m" "center" "c" "red" "l" "center" "中心线图层。
(command "layer" "m" "dim" "c" "blue" "标注图层。
(setq pc(getpoint "请输入绘图基点：")
r1(getdist"请输入半径1长：")
r2(getdist"请输入半径2长：")
r3(getdist"请输入半径3长：")r1、r2、r3依次为从内向外三个同心圆半径。
r4(getdist"请输入圆孔半径：")
n (getint"请输入圆孔数：")
l (getdist"请输入两圆心的距离：")
a (/2 pi) n)
ang 0.0
p1 (polar pc 0.0 r1)
p2 (polar pc (*0.1 pi) 5.0);半径1尺寸线方向。
p3 (polar pc 0.0 r2)
p4 (polar pc (*0.9 pi) 5.0);半径2尺寸线方向。
p5 (polar pc 0.0 r3)
p6 (polar pc (*1.25 pi) 5.0);半径3尺寸线方向。
);基本参数。
(command "layer" "s" "draw" "
(command "circle" pc r1);绘制圆1
(command "layer" "s" "dim" "
(command "dimradius" p1 p2 ""标注圆1半径。
(command "layer" "s" "draw" "
(command "circle" pc r2);绘制圆2
(command "layer" "s" "dim" "
(command "dimradius" p3 p4 ""标注圆2半径。
(command "layer" "s" "draw" "
(command "circle" pc r3);绘制圆3
(command "layer" "s" "dim" "
(command "dimradius" p5 p6 ""标注圆3半径。
(command "layer" "s" "draw" "
(while ( (setq pt1 (polar pc ang l)) (command "circle" pt1 r4) (setq ang (+ang a)) );绘制圆周分布的圆孔。 (command "layer" "s" "center" " (setq ang 0.0);重置0，上个循环后变量ang值等于2*pi (while ( (setq pt2 (polar pc ang (+r3 10))) (command "line" pc pt2 "" (setq ang (+ang a)) );绘制中心线 (command "layer" "s" "dim" " (setq p7 (polar pt1 0.0 r4) p8 (polar pt1 (*0.25 pi) 5.0);半径4尺寸线方向。 (command "dimradius" p7 p8 ""标注圆4半径。 (setvar "osmode" os);还原捕捉状态。 ;end defun running results: 在autocad里键入zhou命令后，依次选择基点，键入半径1、半径2、半径3、圆孔半径、圆孔数、两圆心之间的距离，等待程序执行后，即可看到程序运行结果（红色为中心线，蓝色为尺寸标注，白色为二维视图）。 下图5为程序运行结果。 图5thought and suggestion(optional): 坦率地说，如果没有选修cad/cam这门课程，我都不知道autocad还支持编程二次开发。以前尽管用autocad画过一些图，但都没有接触过这方面的内容，所以刚开始的时候觉得二次开发最多不过就是扩展一些功能而已，对我们绘图作用不大。后来逐渐接触下来，才知道其真正的核心所在。 autolisp语言可以实现直接增加、修改autocad的命令，随意扩大图形编辑功能，建立图形库和数据库并对当前图形进行直接访问和修改，开发cad软件包等。例如，autocad中没有在图形文本对象内绘制矩形及作全局改变的命令。通过autolisp，你可以使用autolisp程序语言编制能够在图形文本对象内绘制矩形或作全局选择性改变的程序。 事实上，可以用autolisp编制任何程序，或把它嵌入到菜单中，这样定制你的系统会取得更高的效率。 在这次编程中，由于刚开始对语法规则和部分函数（如command函数）等不太清楚，所以绕了很多弯路，希望老师在以后的课堂上能详细介绍一些使用频率较高的语法规则和函数的具体使用即特例，以便以后的学生可以更高效的学习。 modeling report student name student class expected score model name 凸缘联轴器。characteristics 凸缘联轴器属于刚性联轴器，是把两个带有凸缘的半联轴器用普通平键分别与两轴连接，然后用螺栓把两个半联轴器连成一体，以传递... 机械cad cam平时作业一。一 填空题 每空2分，共20分 1.在创成式capp系统中进行逻辑决策的两种常用方法为 和 2.对话框中最常用的两个退出按扭是3.零件分类方法中的编码分类法可以细分为 法 法和 法。4.柔性制造系统是由 系统 系统和 系统三大部分组成的。二 单项选择题 第小题4分，共2... pro engineer wildfire 上机实验指导书。工业设计教研室。二 六年十月。一实验目的。1 在利用pro e 进行三维零件设计的时候，必须先绘制二维截面，再利用拉伸 旋转 扫描等方式创建出三维实体模型。2 通过本实验，掌握在目的管理器模式下，几何线条的绘制方式 几何线条的编辑调整和操控...地大机械CAD作业
机械CAD作业
机械三维CAD大作业