找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 21910|回复: 13
收起左侧

基于C语言的51单片机直线圆弧插补程序

  [复制链接]
ID:77496 发表于 2015-5-9 17:27 | 显示全部楼层 |阅读模式
经过几天的钻研和调试,终于在51单片机上实现了二轴联动,通过调用line(x1,y1,x2,y2,v)函数以及cytu(x1,y1,x2,a,b,r,v)和cyao(x1,y1,x2,a,b,r,v)三个命令便可实现任意圆弧和直线的插补,注意任意二字,比如直线命令,可以是水平线可以是竖直线,可以是从左往右也可从右往左,可以当做一个绘图仪使用,如果愿意进一步升级,简单修改加个Z轴做成数控铣床的控制器亦未尝不可。下面是整个源程序,有兴趣的可以参考参考。

#include <REG51.h>
#include <FLOAT.h>
#include <MATH.h>
sbit mai0=P1^0;
sbit mai1=P1^1;
sbit shuru=P0^0;
sbit dir0=P1^6;
sbit dir1=P1^7;
void delay(unsigned int t){
         unsigned int g;
                      while(t!=0){
                       for(g=0;g++;g<600);
           t--;
           }
        }
void mc_p0(signed long m0,unsigned int n0)
                       {if(m0<0){
               m0=-m0;
         dir0=1;
         }
      else{dir0=0;}
      while(m0--!=0){
                     mai0=0;
                     delay(n0/2);
            mai0=1;
            delay(n0/2);
                 }
        }
void mc_p1(signed long m1,unsigned int n1)
                       {if(m1<0){
               m1=-m1;
         dir1=1;
         }
      else{dir1=0;}
      while(m1--!=0){mai1=0;
                     delay(n1/2);
            mai1=1;
            delay(n1/2);
                 }
        }

void line(float x0,float y0,float x1,float y1,unsigned int v0){
     float k=0;
     float x=0;
     float y=0;
     float ys=0;
     signed long yc=0;
     x=x0;
     ys=y0;
     k=(y1-y0)/(x1-x0);
     if(x0==x1){
                mc_p1((y1-y0)*2,50000/v0);}
     if(y0==y1){
                mc_p0((x1-x0)*2,50000/v0);}
     if((x0!=x1)&&(y0!=y1)){
       if(x0<x1){    while(x<x1){
              mc_p0(2,50000/v0);
        x=x+1;
        y=k*(x-x1)+y1;
        yc=y-ys;
        ys=y;
        mc_p1(yc*2,50000/v0);
           }
        }
       if(x0>x1){    while(x>x1){
              mc_p0(-2,50000/v0);
        x=x-1;
        y=k*(x-x1)+y1;
        yc=y-ys;
        ys=y;
        mc_p1(yc*2,50000/v0);
           }
        }
           }
     }


void cytu(float x3,float y3,float x4,float a1,float b1,
          float r1,unsigned int v1){
                float xx;
          float yy;
          float yys;
          signed int yyc;
    xx=x3;
    yys=y3;
    if(x3<x4){
        while(xx<x4){
              mc_p0(2,50000/v1);
        xx=xx+1;
        yy=b1+sqrt(r1*r1-(xx-a1)*(xx-a1));
        yyc=yy-yys;
        yys=yy;
        mc_p1(yyc*2,50000/v1);
          }
           }
     if(x3>x4){
        while(xx>x4){
              mc_p0(-2,50000/v1);
        xx=xx-1;
        yy=b1+sqrt(r1*r1-(xx-a1)*(xx-a1));
        yyc=yy-yys;
        yys=yy;
        mc_p1(yyc*2,50000/v1);
        
          }
           }
        }
void cyao(float x5,float y5,float x6,float a2,float b2,
          float r2,unsigned int v2){
                float xxx;
          float yyy;
          float yyys;
          signed int yyyc;
    xxx=x5;
    yyys=y5;
    if(x5<x6){
        while(xxx<x6){
              mc_p0(2,50000/v2);
        xxx=xxx+1;
        yyy=b2-sqrt(r2*r2-(xxx-a2)*(xxx-a2));
        yyyc=yyy-yyys;
        yyys=yyy;
        mc_p1(yyyc*2,50000/v2);
          }
           }
     if(x5>x6){
        while(xxx>x6){
              mc_p0(-2,50000/v2);
        xxx=xxx-1;
        yyy=b2-sqrt(r2*r2-(xxx-a2)*(xxx-a2));
        yyyc=yyy-yyys;
        yyys=yyy;
        mc_p1(yyyc*2,50000/v2);
          }
           }
        }

void main (void){
                while(1){
         while(shuru==0){
       line(0,0,10,10,5); //直线命令,调用格式line(起点坐标x1,y1,终点坐标x2,y2,速度v)
       delay(100000);  //延时
       line(10,10,0,0,5);
       delay(100000);
       line(0,0,-20,0,5);
       delay(60000);
        cytu(-20,0,20,0,0,20,5); //位于本身圆心上面的圆弧命令,调用格式cytu(起点x1,y1,终点x2,圆心a,b,半径r,速度v)
       delay(60000);
        cyao(20,0,60,40,0,20,5);  //位于本身圆心下面的圆弧命令,调用格式cyao(起点x1,y1,终点x2,圆心a,b,半径r,速度v)
       delay(60000);
        cytu(60,0,20,40,0,20,5);
       delay(60000);
        cyao(20,0,-20,0,0,20,5); }


评分

参与人数 1黑币 +5 收起 理由
qgcwh + 5 很给力!

查看全部评分

回复

使用道具 举报

ID:81653 发表于 2015-6-18 19:53 | 显示全部楼层
这个是对应g代码的?
回复

使用道具 举报

ID:81653 发表于 2015-6-18 20:40 | 显示全部楼层
楼主在吗?
回复

使用道具 举报

ID:90474 发表于 2015-9-18 18:32 | 显示全部楼层
本帖最后由 yanzaihong 于 2015-9-19 11:52 编辑

楼主该程序,我遇到个问题。就是直线插补中当:如X0 = 0; Y0 = 0;  X1 = 40; Y1  = 20;  X1 的值小于Y1的值时,好像运行的不对!
回复

使用道具 举报

ID:98031 发表于 2015-12-21 00:23 | 显示全部楼层
等了好久终于等到了大神
回复

使用道具 举报

ID:168756 发表于 2017-3-7 11:33 | 显示全部楼层
谢谢,学习中
回复

使用道具 举报

ID:168756 发表于 2017-3-7 11:35 | 显示全部楼层
hippo6 发表于 2015-6-18 19:53
**** 作者被禁止或删除 内容自动屏蔽 ****

肯定要转译的,G代码是另一回事。也是G代码要下传下来,由单片机再翻成运作。
回复

使用道具 举报

ID:184537 发表于 2017-3-29 17:11 | 显示全部楼层
师傅 你太厉害了
回复

使用道具 举报

ID:193180 发表于 2017-5-17 19:18 | 显示全部楼层
你好,有原理图吗?我也想做一个来玩?
回复

使用道具 举报

ID:193180 发表于 2017-5-17 19:20 | 显示全部楼层
你好,我是初学者,也想做一个玩,能给张原理图吗,谢谢了
回复

使用道具 举报

ID:19250 发表于 2021-10-6 07:38 | 显示全部楼层
感谢无私共享,你的程序很有启发,为别人指出了一个方向。
回复

使用道具 举报

ID:401973 发表于 2022-4-24 12:41 | 显示全部楼层
正在研究
回复

使用道具 举报

ID:1026584 发表于 2022-5-30 20:56 | 显示全部楼层
请问这个是如何实现绘图的呢?
回复

使用道具 举报

ID:1030689 发表于 2022-11-24 21:46 | 显示全部楼层
这个正是我需要的
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表