机床数控技术课程设计报告

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

2、步插补：圆弧连续插补：4.圆弧单步插补：四、程序流程图1.PL1：逐点比拟法插补第1象限直线逐点比拟法插补直线的过程为每进给一步需完成偏差判别，坐标进给，偏差计算，终点判别四个步骤，具体流程如图1 所示。开场E=E-1YNY向正Y方向前进一步F=F+(*02-*01)向正*方向前进一步F=F-(y02-y01)F=0E0N完毕E=(abs(*01-*02)+abs(y01-y02)/k (总步数)F=0 判别函数初始化，输入起点*01、y01，终点*02、y02，步长k2、DDA法圆弧插补*m=fi*(*-*03)/b);ym=fi*(yy+R-y03)/b)Yjv*=0;jvy=0m=2j*

3、m0？jv*=jv*+yj-yyYNym0？jvy=jvy+*-*jYjv*溢出？0？+*前进一步*m=*m-1Yjvy溢出？0？+Y前进一步ym=ym-1*m0|ym0N二一象限顺圆？计算圆心坐标*,yy*j=*03,yj=y03初始化，输入起点坐标*r03,y03，终点坐标(*04,y04) 半径R步长b和存放器位数j开场NY+*前进一步*n=*n-1-Y前进一步yn=yn-1*n=fi*(*04-*)/b);yn=fi*(yy+R-y04)/b);N*n0？jv*=jv*+yj-yyYNyn0？jvy=jvy+*j-*Yjv*溢出？0？Yjvy溢出？0？*n0|yn0NY完毕五程序及变量

4、说明Matlabfunction varargout = c*y_050910610(varargin)gui_Singleton = 1;gui_State = struct(gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_OpeningF, c*y_050910610_OpeningF, . gui_OutputF, c*y_050910610_OutputF, . gui_LayoutF, , . gui_Callback, );if nargin & ischar(varargin1) gui_State.gui_C

5、allback = str2func(varargin1);endif nargout varargout1:nargout = gui_mainf(gui_State, varargin:);else gui_mainf(gui_State, varargin:);endfunction c*y_050910610_OpeningF(hObject, eventdata, handles, varargin)global uu=0;global fla;fla=0;handles.output = hObject;guidata(hObject, handles);function vara

6、rgout = c*y_050910610_OutputF(hObject, eventdata, handles) varargout1 = handles.output;function *1_Callback(hObject, eventdata, handles)global *01;*01=str2double(get(handles.*1,string);function *1_CreateF(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicont

7、rolBackgroundColor) set(hObject,BackgroundColor,white);endfunction *2_Callback(hObject, eventdata, handles)global *02;*02=str2double(get(handles.*2,string);function *2_CreateF(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObje

8、ct,BackgroundColor,white);endfunction y1_Callback(hObject, eventdata, handles)global y01;y01=str2double(get(handles.y1,string);function y1_CreateF(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);end

9、function y2_Callback(hObject, eventdata, handles)global y02;y02=str2double(get(handles.y2,string);function y2_CreateF(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction *3_Callback(hObject,

10、 eventdata, handles)global *03;*03=str2double(get(handles.*3,string);function *3_CreateF(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction y3_Callback(hObject, eventdata, handles)global y0

11、3;y03=str2double(get(handles.y3,string);function y3_CreateF(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction *4_Callback(hObject, eventdata, handles)global *04;*04=str2double(get(handles.

12、*4,string);function *4_CreateF(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(handles.y4,string);function y4_Create

13、F(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_CreateF(hObject, eventdata, handles)if isp

14、c & 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;*01=str2double(get(handles.*1,string);*02=str2dou

15、ble(get(handles.*2,string);y01=str2double(get(handles.y1,string);y02=str2double(get(handles.y2,string);*=linspace(*01,*02,1000);y=(y02-y01)/(*02-*01)*(*-*01)+y01;plot(*,y,b);hold on;s=1;function circular_arc_Callback(hObject, eventdata, handles)grid on;*03=str2double(get(handles.*3,string);*04=str2d

16、ouble(get(handles.*4,string);y03=str2double(get(handles.y3,string);y04=str2double(get(handles.y4,string);R=str2double(get(handles.r,string);l=sqrt(y04-y03).2+(*04-*03).2);k=sqrt(R2-(l2)/4);*0=(*03+*04)/2+(y04-y03)*k)/l;y0=(y03+y04)/2-(*04-*03)*k)/l;*=linspace(*03,*04,1000);y=y0+sqrt(R2-(*-*0).2);plo

17、t(*,y,b);a*is equal;hold on;global ss=0;function l*cb_Callback(hObject, eventdata, handles)global s F * Y;if s=1 *01=str2double(get(handles.*1,string); *02=str2double(get(handles.*2,string); y01=str2double(get(handles.y1,string); y02=str2double(get(handles.y2,string); k=str2double(get(handles.buchan

18、g,string); *=*01;Y=y01; F=0; E=(abs(*01-*02)+abs(y01-y02)/k; while E0 if F=0 *=*+k; m=linspace(*-k,*,100); n=Y; F=F-(y02-y01); plot(m,n,r); else Y=Y+k; p=*; q=linspace(Y-k,Y,100); F=F+(*02-*01); plot(p,q,r); end E=E-1; endelse *03=str2double(get(handles.*3,string); *04=str2double(get(handles.*4,stri

19、ng); 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+(*04-*03)2)0.5; m=(y04-y03)/l; n=(*03-*04)/l; *=(*03+*04)/2+(R2-l2/4)0.5*m; yy=(y03+y04)

20、/2+(R2-l2/4)0.5*n;if (*03=*&*=yy&y04=yy) errordlg(请输入第二一象限的顺圆弧);else *i=*03;yi=y03;*ii=*03;yii=y03; jv*=0; jvy=0; *j=fi*(*-*03)/b);yj=fi*(yy+R-y03)/b); %计算步数 m=2j; %模 while (*j0|yj0) if *j0 jv*=jv*+yi-yy; end if yj0 jvy=jvy+*-*i; end flag=0; if(jv*m) *j=*j-1;flag=1; *i=*i+b; jv*=mod(jv*,m); end if(j

21、vym) yj=yj-1;flag=1; yi=yi+b; jvy=mod(jvy,m); end if flag=1 line(*ii,*i,yii,yi,color,r); hold on; *ii=*i; yii=yi; end endend line(*i,*,yi,yy+R,color,r); *i=*;yi=yy+R;*ii=*;yii=yy+R; jv*=0; jvy=0; *j=fi*(*04-*)/b);yj=fi*(yy+R-y04)/b); m=2j; a*is auto; while (*j0|yj0) if *j0 jv*=jv*+yi-yy; end if yj0

22、jvy=jvy+*i-*; end flag=0; if(jv*m) *j=*j-1;flag=1; *i=*i+b; jv*=mod(jv*,m); end if(jvym) yj=yj-1;flag=1; yi=yi-b; jvy=mod(jvy,m); end if flag=1 line(*ii,*i,yii,yi,color,r); *ii=*i; yii=yi; hold on; end end endfunction dbcb_Callback(hObject, eventdata, handles)global * Y F u E s;if s=1 *01=str2double

23、(get(handles.*1,string); y01=str2double(get(handles.y1,string); *02=str2double(get(handles.*2,string); y02=str2double(get(handles.y2,string); k=str2double(get(handles.buchang,string); if u=0 *=*01; Y=y01; u=u+1; E=(abs(*01-*02)+abs(y01-y02)/k; F=0; else if E0 if F=0 *=*+k; m=linspace(*-k,*,1000); n=

24、Y; F=F-(y02-y01); plot(m,n,r); hold on; else Y=Y+k; p=*; q=linspace(Y-k,Y); F=F+(*02-*01); plot(p,q,r); hold on; end E=E-1; else u=0; end endelse global fla; *03=str2double(get(handles.*3,string); *04=str2double(get(handles.*4,string); y03=str2double(get(handles.y3,string); y04=str2double(get(handle

25、s.y4,string); b=str2double(get(handles.buchang,string); j=str2double(get(handles.jcq,string); R=str2double(get(handles.r,string); l=(y04-y03)2+(*04-*03)2)0.5;m=(y04-y03)/l;n=(*03-*04)/l;*=(*03+*04)/2+(R2-l2/4)0.5*m;yy=(y03+y04)/2+(R2-l2/4)0.5*n;if (*03=*&*=yy&y04=yy) errordlg(请输入第二一象限的顺圆弧);else %第二象

26、限的顺圆插补 *i=*03;yi=y03; jv*=0; jvy=0; *j=fi*(*-*03)/b);yj=fi*(yy+R-y03)/b); %第二象限的计数器 m=2j; k=1; while (*j0|yj0) if *j0 jv*=jv*+yi-yy; end if yj0 jvy=jvy+*-*i; end flag=0; if(jv*m) *j=*j-1;flag=1; *i=*i+b; jv*=mod(jv*,m); end if(jvym) yj=yj-1;flag=1; yi=yi+b; jvy=mod(jvy,m); end if flag=1 *C(k)=*i; YC

27、(k)=yi; k=k+1; end endend *i=*;yi=yy+R;*ii=*;yii=yy+R; %第一象限顺圆插补 jv*=0; jvy=0; *n=fi*(*04-*)/b);yn=fi*(yy+R-y04)/b); %第一象限的计数器 m=2j; a*is auto; while (*n0|yn0) if *n0 jv*=jv*+yi-yy; end if yn0 jvy=jvy+*i-*; end flag=0; if(jv*m) *n=*n-1;flag=1; *i=*i+b; jv*=mod(jv*,m); end if(jvym) yn=yn-1;flag=1; yi=yi-b; jvy=mod(jvy,m); end if flag=1 *C(k)=*i; YC(k)=yi; k=k+1; end end a=pi-atan(abs(y03-yy)/(*03-*); b=atan(abs(y04-yy)/(*04-*); alpha=b:pi/10