激光雕刻机制作资料附单片机源程序

ID:384216 · 发表于 2020-8-28 22:32

这次发的比较完整，下位机的原理图，PCB，源代码都有，上位机由于整个工程压缩之后还是超过限制，所以只发了代码，大家可以参考一下，然后自己修改。

单片机源程序如下:

/*********************************************************************************
* 【版本】： 1.0
* 【实验平台】： QX-MCS51 单片机开发板
* 【外部晶振】： 11.0592mhz
* 【主控芯片】： STC89C52RC
* 【编译环境】： Keil μVisio4
* 【程序功能】：通过串口接收电脑指令并控制相关执行机构完成激光雕刻过程
* 【使用说明】：比特率9600，校验位：无停止位：1
**********************************************************************************/
/*【指令说明】/'A'雕刻指令////'B'x正转指令////'C'x反转指令////'D'y正转指令////'E'复位指令
**********************************************************************************/
/*预处理命令*/
#include <reg52.h> //包含单片机寄存器的头文件
#define uchar unsigned char
#define uint unsigned int
uchar num,a;
int xfwjs,yfwjs; //复位步数计数
int js2,js3; //复位计数
sbit xmz1=P2^0; //X轴脉冲引脚1
sbit xmz2=P2^1; //X轴脉冲引脚2
sbit ymz1=P2^2; //Y轴脉冲引脚1
sbit ymz2=P2^3; //Y轴脉冲引脚2
sbit dykg=P2^7; //激光开关引脚
uint xjs=0; //
//
uint yjs=0; //
//
void ms(uint ms)//延时函数
{
uint i,j;
for(i=ms;i>0;i--)
for(j=115;j>0;j--);
}
/*
********************************************************************************
** 函数名称： main(void)
** 函数功能：主函数
********************************************************************************
*/
void xf()//X正转函数
{
switch(xjs)
{
case 0:xjs=1;xmz1=1;xmz2=1; break;
case 1:xjs=2;xmz1=1;xmz2=0; break;
case 2:xjs=3;xmz1=0;xmz2=0; break;
case 3:xjs=0;xmz1=0;xmz2=1; break;
default:break;
}
ms(2);
}
void xz()//X反转函数
{
switch(xjs)
{
case 2:xjs=1;xmz1=1;xmz2=1; break;
case 3:xjs=2;xmz1=1;xmz2=0; break;
case 0:xjs=3;xmz1=0;xmz2=0; break;
case 1:xjs=0;xmz1=0;xmz2=1; break;
default:break;
}
ms(2);
}
void yf()//y正转函数
{
switch(yjs)
{
case 0:yjs=1;ymz1=1;ymz2=1; break;
case 1:yjs=2;ymz1=1;ymz2=0; break;
case 2:yjs=3;ymz1=0;ymz2=0; break;
case 3:yjs=0;ymz1=0;ymz2=1; break;
default:break;
}
ms(2);
}
void yz()//y反转函数
{
switch(yjs)
{
case 2:yjs=1;ymz1=1;ymz2=1; break;
case 3:yjs=2;ymz1=1;ymz2=0; break;
case 0:yjs=3;ymz1=0;ymz2=0; break;
case 1:yjs=0;ymz1=0;ymz2=1; break;
default:break;
}
ms(2);
}
void dk()//雕刻函数
{
dykg=0; //打开打印头
ms(25); //灼烧时间
dykg=1; //关闭打印头
}
void fw() //复位函数
{
for(js2=0;js2<xfwjs;js2++)
{
xf();
}
for(js3=0;js3<yfwjs;js3++)
{
yf();
}
xfwjs=0;
yfwjs=0;
}
void main()
{
TMOD=0x20; //用定时器设置串口波特率 9600
TH1=0xfd;
TL1=0xfd;
TR1=1;
REN=1; //串口初始化
SM0=0;
SM1=1;
EA=1; //开启总中断
ES=1;
xfwjs=0;
yfwjs=0;
while(1)
{
if(num==1) //判断是否有串口数据的传送
{
ES=0;
num=0;
if(a!='E')
{
SBUF=a; //返回单片机收到的指令到计算机
while(!TI);
TI=0;
}
ES=1;
}
}
}
void ser() interrupt 4
{
RI=0;
a=SBUF; //接收数据SBUF，即将计算机的数据接收。
switch(a) //判断串口接收的数据
{
case 'A':dk();break; //雕刻指令
case 'D':yz();yfwjs++;break; //y正转一步
case 'B':xz();xfwjs++;break; //X正转一步
case 'C':xf();xfwjs--;break; //X反转一步
case 'E':fw();break; //激光回到原点
case 'F':dk();xz();xfwjs++;break; //雕刻，X正转一步
case 'G':dk();xf();xfwjs--;break; //雕刻，X反转一步
default :break;
}
num=1;
}

复制代码

全部资料51hei下载地址：

激光雕刻机资料.zip (7.18 MB, 下载次数: 382)

ID:870445 · 发表于 2021-12-8 19:54

谢谢楼主的无私奉献

ID:87631 · 发表于 2022-2-12 10:23

真入门级，不错。要是搞个G代码的就更OK了

ID:1015469 · 发表于 2022-4-3 20:37

进来学习的，谢谢楼主的无私奉献

ID:981826 · 发表于 2022-4-15 17:23

谢谢楼主的无私奉献

ID:872228 · 发表于 2022-4-21 17:19

若有上位机更好!

ID:142383 · 发表于 2022-4-26 16:39

下载学习学习，感谢楼主的无私奉献！

ID:51321 · 发表于 2022-10-28 12:25

进来学习的，谢谢楼主的无私奉献

ID:1042619 · 发表于 2022-11-21 11:37

感谢楼主无私奉献！STC89C52RC的确经典，后面可以考虑升级到支持硬件USB下载、硬件USB仿真系列的STC8H8K64U，再也没有理由外接昂贵的PL2303,FT232 等 USB 转串口芯片了.支持您一把STC8H8K64U核心板-开天斧试试效果。

ID:281840 · 发表于 2023-7-13 03:01

谢谢！刚好想学电机控制@！

ID:321898 · 发表于 2023-7-13 07:32

谢谢楼主的无私奉献

ID:423454 · 发表于 2024-4-18 18:27

大佬这个上位机在哪里下载激光雕刻

帐号		自动登录	找回密码
密码			立即注册

激光雕刻机制作资料 附单片机源程序

评分

激光雕刻机制作资料附单片机源程序