机床数控技术课程设计.docx

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

2、行截图1.直线连续插补：2.直线单步插补：3.圆弧连续插补：4.圆弧单步插补：四、程序流程图1.PL1：逐点比较法插补第1象限直线逐点比较法插补直线的过程为每进给一步需完成偏差判别，坐标进给，偏差计算，终点判别四个步骤，具体流程如图1 所示。开始E=E-1YNY向正Y方向前进一步F=F+(x02-x01)向正X方向前进一步F=F-(y02-y01)F=0E0N结束E=(abs(x01-x02)+abs(y01-y02)/k (总步数)F=0 （判别函数）初始化，输入起点x01、y01，终点x02、y02，步长k2、DDA法圆弧插补五程序及变量说明（Matlab）gui_Singleton =

3、1;gui_State = struct(gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_LayoutFcn, , . gui_Callback, );if nargin & ischar(varargin1) gui_State.gui_Callback = str2func(varargin1);endif nargout varargout1:nargout = gui_mainfcn(gui_State, varargin:);else gui_mainfcn(gui_State, varargin:);endglo

4、bal uu=0;global fla;fla=0;handles.output = hObject;guidata(hObject, handles);varargout1 = handles.output;function x1_Callback(hObject, eventdata, handles)global x01;x01=str2double(get(handles.x1,string);function x1_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor),

5、 get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction x2_Callback(hObject, eventdata, handles)global x02;x02=str2double(get(handles.x2,string);function x2_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBack

6、groundColor) set(hObject,BackgroundColor,white);endfunction y1_Callback(hObject, eventdata, handles)global y01;y01=str2double(get(handles.y1,string);function y1_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,Ba

7、ckgroundColor,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(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfun

8、ction 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(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction y3_Callback(hObject,

9、eventdata, handles)global y03;y03=str2double(get(handles.y3,string);function y3_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction x4_Callback(hObject, eventdata, handles)global x

10、04;x04=str2double(get(handles.x4,string);function x4_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction y4_Callback(hObject, eventdata, handles)global y04;y04=str2double(get(handl

11、es.y4,string);function y4_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction r_Callback(hObject, eventdata, handles)global R;R=str2double(get(handles.r,string);function r_CreateFc

12、n(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction clear_Callback(hObject, eventdata, handles)cla;function straightline_Callback(hObject, eventdata, handles)global s;grid on;x01=str2doubl

13、e(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(x,y,b);hold on;s=1;function circular_arc_Callback(hObject, eventdata, handles)grid on;x03=str2dou

14、ble(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).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,

15、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(get(handles.x2,string); y01=str2double(get(handles.y1,string); y02=str2double(get(handles.y2,stri

16、ng); k=str2double(get(handles.buchang,string); X=x01;Y=y01; F=0; E=(abs(x01-x02)+abs(y01-y02)/k; while E0 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-k,Y,100); F=F+(x02-x01); plot(p,q,r); end E=E-1; endelse x03=str2double(get(handles.x3,string)

17、; 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.5; m=(y04-y03)/l; n=(x03-x04)/l; xx=(x0

18、3+x04)/2+(R2-l2/4)0.5*m; yy=(y03+y04)/2+(R2-l2/4)0.5*n;if (x03=xx&xx=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; %模 while (xj0|yj0) if xj0 jvx=jvx+yi-yy; end if yj0 jvy=jvy+xx-xi; end flag=0; if(jvxm) xj=xj-1;

19、flag=1; xi=xi+b; jvx=mod(jvx,m); end if(jvym) 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;yi=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; whil

20、e (xj0|yj0) if xj0 jvx=jvx+yi-yy; end if yj0 jvy=jvy+xi-xx; end flag=0; if(jvxm) xj=xj-1;flag=1; xi=xi+b; jvx=mod(jvx,m); end if(jvym) yj=yj-1;flag=1; yi=yi-b; jvy=mod(jvy,m); end if flag=1 line(xii,xi,yii,yi,color,r); xii=xi; yii=yi; hold on; end end endfunction dbcb_Callback(hObject, eventdata, ha

21、ndles)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(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

22、if E0 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 fla; x03=str2double(get(handles.x3,string); x04=str2double(get(handles.x4,string); y03=str2double(get

23、(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.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=

24、xx&xx=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 (xj0|yj0) if xj0 jvx=jvx+yi-yy; end if yj0 jvy=jvy+xx-xi; end flag=0; if(jvxm) xj=xj-1;flag=1; xi=xi+b; jvx=mod(jvx,m); end if(jvym) yj=yj-1;flag=1;

25、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; while (xn0|yn0) if xn0 jvx=jvx+yi-yy; end if yn0 jvy=jvy+xi-xx; end flag=0; if(jvxm) xn=xn-1;flag=1; x

26、i=xi+b; jvx=mod(jvx,m); end if(jvym) 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/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+

27、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(hObject, eventdata, handles)function buchang_CreateFcn(hObject, eventdata, handles)if ispc & isequal(

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