机床数控技术课程设计(可编辑).doc

上传人:文库蛋蛋多 文档编号:2944869 上传时间:2023-03-05 格式:DOC 页数:26 大小:115.50KB
返回 下载 相关 举报
机床数控技术课程设计(可编辑).doc_第1页
第1页 / 共26页
机床数控技术课程设计(可编辑).doc_第2页
第2页 / 共26页
机床数控技术课程设计(可编辑).doc_第3页
第3页 / 共26页
机床数控技术课程设计(可编辑).doc_第4页
第4页 / 共26页
机床数控技术课程设计(可编辑).doc_第5页
第5页 / 共26页
点击查看更多>>
资源描述

《机床数控技术课程设计(可编辑).doc》由会员分享,可在线阅读,更多相关《机床数控技术课程设计(可编辑).doc(26页珍藏版)》请在三一办公上搜索。

1、机床数控技术课程设计 机床数控技术课程设计说明书学校:南京航空航天大学专业:机械工程及自动化学号:姓名:设计题目:PL1 DC21指导老师:时间:一课设任务:1.PL1-逐点比较法插补第1象限直线;2.DC21-DDA法插补第21象限顺圆弧。二课设要求:1.具有数据输入界面,如输入直线插补的起点、终点,圆弧插补的起止点、圆心或半径、插补的步长等;2.具有插补过程的动态显示功能,如单步插补、连续插补等;3.插补的步长可调;4.直线的起点、圆弧的圆心在坐标系中的位置可变(即直线的起点、圆弧的圆心可不设定在坐标原点)5.建议使用C语言编程,有条件者可使用VB、VC等语言编程。三程序界面及运行截图1.

2、直线连续插补:直线单步插补:圆弧连续插补:4.圆弧单步插补:四、程序流程图1.PL1:逐点比较法插补第1象限直线逐点比较法插补直线的过程为每进给一步需完成偏差判别,坐标进给,偏差计算,终点判别四个步骤,具体流程如图1 所示。五程序及变量说明(Matlab)function varargout cxy_050910610 varargin gui_Singleton 1;gui_State struct gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_OpeningFcn, cxy_050910610_OpeningFcn,

3、. gui_OutputFcn, cxy_050910610_OutputFcn, . gui_LayoutFcn, , . gui_Callback, ;if nargin & ischar varargin 1 gui_State.gui_Callback str2func varargin 1 ;endif nargout varargout 1:nargout gui_mainfcn gui_State, varargin : ;else gui_mainfcn gui_State, varargin : ;endfunction cxy_050910610_OpeningFcn hO

4、bject, eventdata, handles, varargin global uu 0;global fla;fla 0;handles.output hObject;guidata hObject, handles ;function varargout cxy_050910610_OutputFcn hObject, eventdata, handles varargout 1 handles.output;function x1_Callback hObject, eventdata, handles global x01;x01 str2double get handles.x

5、1,string ;function x1_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction x2_Callback hObject, eventdata, handles global x02;x02 str2double get handles.x2,string ;function x2_Create

6、Fcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction y1_Callback hObject, eventdata, handles global y01;y01 str2double get handles.y1,string ;function y1_CreateFcn hObject, eventdata, hand

7、les if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction y2_Callback hObject, eventdata, handles global y02;y02 str2double get handles.y2,string ;function y2_CreateFcn hObject, eventdata, handles if ispc & isequal get hO

8、bject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction x3_Callback hObject, eventdata, handles global x03;x03 str2double get handles.x3,string ;function x3_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get

9、0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction y3_Callback hObject, eventdata, handles global y03;y03 str2double get handles.y3,string ;function y3_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackground

10、Color set hObject,BackgroundColor,white ;endfunction x4_Callback hObject, eventdata, handles global x04;x04 str2double get handles.x4,string ;function x4_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,Background

11、Color,white ;endfunction y4_Callback hObject, eventdata, handles global y04;y04 str2double get handles.y4,string ;function y4_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction r_C

12、allback hObject, eventdata, handles global R;R str2double get handles.r,string ;function r_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction clear_Callback hObject, eventdata, han

13、dles cla;function straightline_Callback hObject, eventdata, handles global s;grid on;x01 str2double get handles.x1,string ;x02 str2double get handles.x2,string ;y01 str2double get handles.y1,string ;y02 str2double get handles.y2,string ;x linspace x01,x02,1000 ;y y02-y01 / x02-x01 * x-x01 +y01;plot

14、x,y,b ;hold on;s 1;function circular_arc_Callback hObject, eventdata, handles grid on;x03 str2double get handles.x3,string ;x04 str2double get handles.x4,string ;y03 str2double get handles.y3,string ;y04 str2double get handles.y4,string ;R str2double get handles.r,string ;l sqrt y04-y03 .2+ x04-x03

15、.2 ;k sqrt R2- l2 /4 ;x0 x03+x04 /2+ y04-y03 *k /l;y0 y03+y04 /2- x04-x03 *k /l;x linspace x03,x04,1000 ;y y0+sqrt R2- x-x0 .2 ;plot x,y,b ;axis equal;hold on;global ss 0;function lxcb_Callback hObject, eventdata, handles global s F X Y;if s 1 x01 str2double get handles.x1,string ; x02 str2double ge

16、t handles.x2,string ; y01 str2double get handles.y1,string ; y02 str2double get handles.y2,string ; k str2double get handles.buchang,string ; X x01;Y y01; F 0; E abs x01-x02 +abs y01-y02 /k; while E 0 if F 0 X X+k; m linspace X-k,X,100 ; n Y; F F- y02-y01 ; plot m,n,r ; else Y Y+k; p X; q linspace Y

17、-k,Y,100 ; F F+ x02-x01 ; plot p,q,r ; end E E-1; endelse x03 str2double get handles.x3,string ; x04 str2double get handles.x4,string ; y03 str2double get handles.y3,string ; y04 str2double get handles.y4,string ; b str2double get handles.buchang,string ; j str2double get handles.jcq,string ; R str2

18、double get handles.r,string ; l y04-y03 2+ x04-x03 2 0.5; m y04-y03 /l; n x03-x04 /l; xx x03+x04 /2+ R2-l2/4 0.5*m; yy y03+y04 /2+ R2-l2/4 0.5*n;if x03 xx&xx x04&y03 yy&y04 yy errordlg 请输入第二一象限的顺圆弧 ;else xi x03;yi y03;xii x03;yii y03; jvx 0; jvy 0; xj fix xx-x03 /b ;yj fix yy+R-y03 /b ; %计算步数 m 2j;

19、%模 while xj 0|yj 0 if xj 0 jvx jvx+yi-yy; end if yj 0 jvy jvy+xx-xi; end flag 0; if jvx m xj xj-1;flag 1; xi xi+b; jvx mod jvx,m ; end if jvy m yj yj-1;flag 1; yi yi+b; jvy mod jvy,m ; end if flag 1 line xii,xi,yii,yi,color,r ; hold on; xii xi; yii yi; end endend line xi,xx,yi,yy+R,color,r ; xi xx;y

20、i yy+R;xii xx;yii yy+R; jvx 0; jvy 0; xj fix x04-xx /b ;yj fix yy+R-y04 /b ; m 2j; axis auto; while xj 0|yj 0 if xj 0 jvx jvx+yi-yy; end if yj 0 jvy jvy+xi-xx; end flag 0; if jvx m xj xj-1;flag 1; xi xi+b; jvx mod jvx,m ; end if jvy m yj yj-1;flag 1; yi yi-b; jvy mod jvy,m ; end if flag 1 line xii,x

21、i,yii,yi,color,r ; xii xi; yii yi; hold on; end end endfunction dbcb_Callback hObject, eventdata, handles global X Y F u E s;if s 1 x01 str2double get handles.x1,string ; y01 str2double get handles.y1,string ; x02 str2double get handles.x2,string ; y02 str2double get handles.y2,string ; k str2double

22、 get handles.buchang,string ; if u 0 X x01; Y y01; u u+1; E abs x01-x02 +abs y01-y02 /k; F 0; else if E 0 if F 0 X X+k; m linspace X-k,X,1000 ; n Y; F F- y02-y01 ; plot m,n,r ; hold on; else Y Y+k; p X; q linspace Y-k,Y ; F F+ x02-x01 ; plot p,q,r ; hold on; end E E-1; else u 0; end endelse global f

23、la; x03 str2double get handles.x3,string ; x04 str2double get handles.x4,string ; y03 str2double get handles.y3,string ; y04 str2double get handles.y4,string ; b str2double get handles.buchang,string ; j str2double get handles.jcq,string ; R str2double get handles.r,string ; l y04-y03 2+ x04-x03 2 0

24、.5;m y04-y03 /l;n x03-x04 /l;xx x03+x04 /2+ R2-l2/4 0.5*m;yy y03+y04 /2+ R2-l2/4 0.5*n;if x03 xx&xx x04&y03 yy&y04 yy errordlg 请输入第二一象限的顺圆弧 ;else %第二象限的顺圆插补 xi x03;yi y03; jvx 0; jvy 0; xj fix xx-x03 /b ;yj fix yy+R-y03 /b ; %第二象限的计数器 m 2j; k 1; while xj 0|yj 0 if xj 0 jvx jvx+yi-yy; end if yj 0 jvy

25、 jvy+xx-xi; end flag 0; if jvx m xj xj-1;flag 1; xi xi+b; jvx mod jvx,m ; end if jvy m yj yj-1;flag 1; yi yi+b; jvy mod jvy,m ; end if flag 1 XC k xi; YC k yi; k k+1; end endend xi xx;yi yy+R;xii xx;yii yy+R; %第一象限顺圆插补 jvx 0; jvy 0; xn fix x04-xx /b ;yn fix yy+R-y04 /b ; %第一象限的计数器 m 2j; axis auto; w

26、hile xn 0|yn 0 if xn 0 jvx jvx+yi-yy; end if yn 0 jvy jvy+xi-xx; end flag 0; if jvx m xn xn-1;flag 1; xi xi+b; jvx mod jvx,m ; end if jvy m yn yn-1;flag 1; yi yi-b; jvy mod jvy,m ; end if flag 1 XC k xi; YC k yi; k k+1; end end a pi-atan abs y03-yy / x03-xx ; b atan abs y04-yy / x04-xx ; alpha b:pi/

27、100:a; XQ xx+R*cos alpha ; YQ yy+R*sin alpha ; plot XQ,YQ hold on; plot xx,yy,Ro ; if fla 0 fla fla+1; elseif fla 1 line x03,XC 1 ,y03,YC 1 ,color,r ; fla fla+1; elseif fla k-2 line XC fla ,XC fla+1 ,YC fla ,YC fla+1 ,color,r ; fla fla+1; else errordlg 插补结束 ; fla 0; endendfunction buchang_Callback h

28、Object, eventdata, handles function buchang_CreateFcn hObject, eventdata, handles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;endfunction jcq_Callback hObject, eventdata, handles function jcq_CreateFcn hObject, eventdata, h

29、andles if ispc & isequal get hObject,BackgroundColor , get 0,defaultUicontrolBackgroundColor set hObject,BackgroundColor,white ;end心得体会本次课设是在考研结束后的一周内做完的,时间其实应该是很够的,但是由于本人不善于编程,所以最后完成得很仓促。通过这次课设,我对matlab的操作有了更深的认识,对相关函数语句还有逻辑循环套用的应用有了更深的理解。而且此次课设,让我对逐点比较法直线插补和DDA圆弧插补有了感性和理性的全面认识,对我学习数控机床这门课也有非常大的帮助。

30、最后,遇到困难不要着急,静下心来总有解决办法精品开始E E-1YNY向正Y方向前进一步F F+ x02-x01 向正X方向前进一步F F- y02-y01 F 0E 0N结束E abs x01-x02 +abs y01-y02 /k 总步数 F 0 (判别函数)初始化,输入起点x01、y01,终点x02、y02,步长k2、DDA法圆弧插补xm fix xx-x03 /b ;ym fix yy+R-y03 /b Yjvx 0;jvy 0m 2jxm 0?jvx jvx+yj-yyYNym 0?jvy jvy+xx-xjYjvx溢出? 0?+X前进一步xm xm-1Yjvy溢出? 0?+Y前进一步ym ym-1xm 0|ym 0?N二一象限顺圆?计算圆心坐标(xx,yy)xj x03,yj y03初始化,输入起点坐标(xr03,y03),终点坐标 x04,y04 半径R步长b和寄存器位数j开始NY+X前进一步xn xn-1-Y前进一步yn yn-1xn fix x04-xx /b ;yn fix yy+R-y04 /b ;Nxn 0?jvx jvx+yj-yyYNyn 0?jvy jvy+xj-xxYjvx溢出? 0?Yjvy溢出? 0?xn 0|yn 0?NY结束

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 教育教学 > 成人教育


备案号:宁ICP备20000045号-2

经营许可证:宁B2-20210002

宁公网安备 64010402000987号