理工大学数控技术大作业说明书文档格式.docx

理工大学数控技术大作业说明书文档格式.docx

《理工大学数控技术大作业说明书文档格式.docx》由会员分享，可在线阅读，更多相关《理工大学数控技术大作业说明书文档格式.docx（7页珍藏版）》请在冰豆网上搜索。

易语言

1、程序流程框图

（1）、逐点比较法直线插补

二、源程序代码（易语言）

.程序集窗口程序集1

.子程序_按钮1_被单击

画板1.画笔颜色＝#红色

x0＝到整数（编辑框2.内容）×

100

y0＝到整数（编辑框1.内容）×

x＝x0

y＝y0

xe＝到整数（编辑框3.内容）×

ye＝到整数（编辑框4.内容）×

x1＝x0

y1＝y0

画板1.画直线（x0,y0,xe,ye）

f＝（y－y0）×

（xe－x0）－（x－x0）×

（ye－y0）

时钟1.时钟周期＝1000

_时钟1_周期事件（）

.子程序_时钟1_周期事件

.若是真（f≥0）

x＝x1＋100

y＝y1

画板1.画直线（x1,y1,x,y）

f＝f－（ye×

100－y0×

100）

x1＝x

y1＝y

.若是真结束

.若是真（f＜0）

y＝y1＋100

x＝x1

f＝f＋xe×

100－x0×

.若是真（x1＝xe且y1＝ye）

画板1.画笔颜色＝#白色

.若是真（时钟1.时钟周期＝0）

_时钟1_周期事件（）

.子程序_按钮3_被单击

时钟1.时钟周期＝0

.子程序_按钮2_被单击

x5＝到整数（编辑框5.内容）×

x6＝到整数（编辑框6.内容）×

x7＝到整数（编辑框7.内容）×

x8＝到整数（编辑框8.内容）×

画板1.画椭圆（x5,x6,x7,x8）

r＝（x7－x5）÷

2

i＝x7

j＝x6＋r

时钟2.时钟周期＝1000

_时钟2_周期事件（）

.子程序_时钟2_周期事件

.若是真（k≥0且i≥（x5＋x7）÷

2且j≤（x8＋x6）÷

2）

i1＝i－100

j1＝j

画板1.画直线（i,j,i1,j1）

k＝（i1－r－x5）×

（i1－r－x5）＋（x8－r－j1）×

（x8－r－j1）－r×

r

i＝i1

j＝j1

.若是真（k＜0且i≥（x5＋x7）÷

i1＝i

j1＝j－100

.若是真（k≥0且i＜（x5＋x7）÷

j1＝j＋100

k＝（（x5＋x7）÷

2－i1）×

（（x5＋x7）÷

2－i1）＋（（x6＋x8）÷

2－j1）×

（（x6＋x8）÷

2－j1）－r×

.若是真（k＜0且i＜（x5＋x7）÷

2且j＞（x8＋x6）÷

i1＝i＋100

2－i1）＋（j1－（x6＋x8）÷

2）×

（j1－（x6＋x8）÷

2）－r×

（i1－r－x5）＋（j1－（x6＋x8）÷

3、运行程序界面：

（1）逐点比较法直线插补

（2）逐点比较法整圆插补：

4.程序利用简单介绍：

在易语言程序利用界面中，其坐标系远点在画板左上角，向右为x正半轴，向下为y正半轴，所以这里所输入的坐标值只能是非负值。

点击易语言软件界面的运行按钮，即会出现插补界面，例如输入起始点为（2,0），终点为（8,9）。

点击直线插补按钮就可以够出现起始点为（2，0）终止点为（8,9）的直线和它的插补轨迹。

在实现整圆乃至椭圆的插补轨迹时，需要输入圆或椭圆的外切矩形的左上角和右下角的坐标值，即能够完成整圆和椭圆的插补轨迹。

例如，点击易语言软件界面的运行按钮，即会出现插补界面，输入左上角坐标值为（1，1），右下角坐标值为（9，9），点击圆弧插补按钮，就会出现整圆和它的插补轨迹。

注意：

为了看清楚插补轨迹，咱们已经将图比例放大了100倍，所以此处的坐标值不易太大，不然会超出界面，看不到图。

5.心得体会：

由于时刻紧迫，咱们组只做了逐点比较法的直线和整圆的查补，咱们完尽是用自己学习的编程方式，所以还有很多缺点，请您谅解！

请老师指导咱们再接再厉，谢谢老师！