《机床数控技术课程设计(可编辑).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结束
