基于51单片机的激光雕刻机

ID:63888 · 发表于 2016-11-7 15:10

看了许多电子爱好者做的激光雕刻机，我很眼热，可惜都是使用arduino的，本人不会arduino，只会些单片机，而且还是半吊子，加上套件比较贵，所有加起来都有两百元了，所有计划被耽搁下来，忽然有一条浏览网页的时候，看到有人使用单片机就做出来了激光雕刻机，我也想试试，经过一段时间的购买材料，搜集资料，因为本人的编写程序的水平太渣了，没办法只能使用网上找的上位机和程序，终于完成了这个东西，让我们来看看吧
雕刻过程视频地址：http://v.youku.com/v_show/id_XMTU4MTg5MjY0NA==.html

激光雕刻机图

整体图

使用的STC单片机，使用此款单片机是因为其RAM内存大，

资料下载：

资料.rar (565.22 KB, 下载次数: 1083)

SetupLaser.rar (8.19 MB, 下载次数: 1084)

51单片机源程序：

/*z地址定义
50 1=x+，2=x-，3=y+,4=y-
51 前进后退步数高
52 前进后退步数低
53
54/55 字宽
56
57 弱光开关
58/59 激光强度
60 x轴速度
61 y轴速度
62 开始打印0,57
63 暂停
64 停止标志
65
66 左右标记
100开始时灰度图数据
*/
#include <reg52.h>
#define uint unsigned int
#define uchar unsigned char
#define N z[60] //X速度
#define M z[61] //Y速度
sbit a=P1^3;//步进电机接线定义移动激光头
sbit a_=P1^2;
sbit b=P1^1;
sbit b_=P1^0;
sbit xa=P1^4;
sbit xa_=P1^5;
sbit xb=P1^6;
sbit xb_=P1^7;
/*sbit a=P1^4;//步进电机接线定义移动底板
sbit a_=P1^5;
sbit b=P1^6;
sbit b_=P1^7;
sbit xa=P1^3;
sbit xa_=P1^2;
sbit xb=P1^1;
sbit xb_=P1^0; */
sbit jg=P2^0;
sbit led=P2^1;//指示灯
uchar xdata z[500]={0};//缓存
uchar buff[3];//串口缓存
uchar x1,x0,y1,y0,cont2=0;
uchar xfb=4,yfb=4;//走步标志位
unsigned char HighRH = 0; //高电平重载值的高字节
unsigned char HighRL = 0; //高电平重载值的低字节
unsigned char LowRH = 0; //低电平重载值的高字节
unsigned char LowRL = 0; //低电平重载值的低字节
void delayms(uint xms)
{
uint i,j;
for(i=xms;i>0;i--) //i=xms即延时约xms毫秒
for(j=110;j>0;j--);
}
/* 配置并启动PWM，fr-频率，dc-占空比 */
void ConfigPWM(unsigned int fr, unsigned char dc)
{
unsigned int high, low;
unsigned long tmp;
tmp = (11059200/12) / fr; //计算一个周期所需的计数值
high = (tmp*dc) / 100; //计算高电平所需的计数值
low = tmp - high; //计算低电平所需的计数值
high = 65536 - high + 12; //计算高电平的重载值并补偿中断延时
low = 65536 - low + 12; //计算低电平的重载值并补偿中断延时
HighRH = (unsigned char)(high>>8); //高电平重载值拆分为高低字节
HighRL = (unsigned char)high;
LowRH = (unsigned char)(low>>8); //低电平重载值拆分为高低字节
LowRL = (unsigned char)low;
TMOD &= 0xF0; //清零T0的控制位
TMOD |= 0x01; //配置T0为模式1
TH0 = HighRH; //加载T0重载值
TL0 = HighRL;
ET0 = 1; //使能T0中断
TR0 = 1; //启动T0
jg = 1; //输出低电平，关闭激光
}
/* 关闭PWM */
void ClosePWM()
{
TR0 = 0; //停止定时器0
ET0 = 0; //禁止定时器0中断
jg = 1; //输出低电平，关闭激光
}
/* T0中断服务函数，产生PWM输出 */
void InterruptTimer0() interrupt 1
{
if (jg == 1) //当前输出为低电平时，装载高电平值并输出高电平
{
TH0 = LowRH;
TL0 = LowRL;
jg = 0;
}
else //当前输出为高电平时，装载低电平值并输出低电平
{
TH0 = HighRH;
TL0 = HighRL;
jg = 1;
}
}
void xfor(uint i) //x轴前进函数，前进多少步
{
while(1)
{
if(xfb==4)
{
xa=xb=1;
xb_=xa_=0;
xfb=1;
i--;
delayms(N);
if(i==0){xa=xb=0; break;}
}
if(xfb==1)
{
xb=xa_=1;
xa=xb_=0;
xfb=2;
i--;
delayms(N);
if(i==0){xa_=xb=0; break;}
}
if(xfb==2)
{
xa_=xb_=1;
xb=xa=0;
xfb=3; //走步标志位
i--;
delayms(N);
if(i==0){xa_=xb_=0; break;}
}
if(xfb==3)
{
xa_=xb=0;
xb_=xa=1;
xfb=4;
i--;
delayms(N);
if(i==0){xa=xb_=0; break;}
}
}
}
void xbac(uint i) //xxx后退函数
{
while(1)
{
if(xfb==1)
{
xa_=xb=0;
xb_=xa=1;
xfb=4;
i--; //走步标志位
delayms(N);
if(i==0){xa=xb_=0; break;}
}
if(xfb==4)
{
xa_=xb_=1;
xb=xa=0;
xfb=3;
i--;
delayms(N);
if(i==0){xa_=xb_=0; break;}
}
if(xfb==3)
{
xb=xa_=1;
xa=xb_=0;
xfb=2; //走步标志位
i--;
delayms(N);
if(i==0){xa_=xb=0; break;}
}
if(xfb==2)
{
xa=xb=1;
xb_=xa_=0;
xfb=1;
i--;
delayms(N);
if(i==0){xa=xb=0; break;}
}
}
}
void yfor(uint i) //y轴前进函数
{
while(1)
{
switch(yfb)
{
case 4:{a=b=1; b_=a_=0; yfb=1; i--; delayms(M); if(i==0){a=b=0;break;}}
case 1:{b=a_=1; a=b_=0; yfb=2; i--; delayms(M); if(i==0){a_=b=0;break;}}
case 2:{a_=b_=1; b=a=0; yfb=3; i--; delayms(M); if(i==0){a_=b_=0;break;}}
case 3:{b_=a=1; a_=b=0; yfb=4; i--; delayms(M); if(i==0){a=b_=0;break;}}
}
if(i==0) break;
}
}
void ybac(uint i) //yy后退函数
{
while(1)
{
switch(yfb)
{
case 1:{a=b_=1; b=a_=0; yfb=4; i--; delayms(M); if(i==0){a=b_=0;break;}}
case 4:{b_=a_=1; a=b=0; yfb=3; i--; delayms(M); if(i==0){a_=b_=0;break;}}
case 3:{a_=b=1; b_=a=0; yfb=2; i--; delayms(M); if(i==0){a_=b=0;break;}}
case 2:{b=a=1; a_=b_=0; yfb=1; i--; delayms(M); if(i==0){a=b=0;break;}}
}
if(i==0) break;
}
}
void dazi(uint zik)//打印函数 ******打印函数已更改******
{
uint x;
jg=0;
for(x=0;x<zik;x++)//执行zik个循环，x轴右移zik步
{
while(z[63]); //暂停等待
if(z[64]==1) break;//停止标志跳出循环
SBUF=255; // 每开始打印一个点，向上位机发送255，上位机进度显示用
jg=0; //开激光
delayms((z[99+x]*(z[58]*256+z[59]))/100);
jg=1; //关闭激光
if(z[66]==1)
{
xbac(1);
}
else
{
xfor(1);
}
}
if(z[64==1]) z[64]=0;
else{yfor(1);} //y轴进一行
z[62]=0; //一行打印完成
SBUF=1; //发送信息，表示打印一行完成
}
/* 串口配置函数，baud-通信波特率 */
void ConfigUART(unsigned int baud)
{
SCON = 0x50; //配置串口为模式1
TMOD &= 0x0F; //清零T1的控制位
TMOD |= 0x20; //配置T1为模式2
TH1 = 256 - (11059200/12/32)/baud; //计算T1重载值
TL1 = TH1; //初值等于重载值
ET1 = 0; //禁止T1中断
ES = 1; //使能串口中断
TR1 = 1; //启动T1
}
void chuanlo() interrupt 4
{
if(RI)
{
buff[cont2]=SBUF;//每次3字节，地址高，地址低，数据，，
cont2++;
if(cont2==3)//每收3个字节，把数据写入地址中
{
z[(buff[0]*256)+buff[1]]=buff[2];
cont2=0;
SBUF=0; //*****************在这里加入这行代码测试一下*******************************
}
RI=0;
}
if(TI)
{
TI=0;
}
}
main()
{
EA=1;
P0=0xff;
ConfigUART(9600) ;
z[60]=15;//默认的参数
z[61]=15;
z[56]=1;
z[62]=0;
jg=0;
cont2=0;
while(1)
{
// *****此处已更改******
if(z[57]==100){ConfigPWM(100, 98);delayms(10);} //上位机指令处理，打开弱光定位，频率100Hz，占空比98%
else if(z[57]==1) jg=0; //打开强光
else { ClosePWM(); delayms(10);}
if(cont2!=0) led=0; else led=1;//指示通信是否可用
if(z[50]==1){xfor(z[51]*256+z[52]);z[50]=0;}//x+
if(z[50]==2){xbac(z[51]*256+z[52]);z[50]=0;}//x-
if(z[50]==3){yfor(z[51]*256+z[52]);z[50]=0;}//y+
if(z[50]==4){ybac(z[51]*256+z[52]);z[50]=0;}//y-
if(z[62])//开始打印标志
{
dazi(z[54]*256+z[55]);
}
}
}

复制代码

电路图，其中采用USB转TTL连接电脑，就是普通的串口连接

采用另外的电路板来方便驱动模块连接电机

最小单片机电路

USB转TTL

激光驱动板，使用ULN2003，这是以前制作的方便单片机控制外设

L298N模块

上位机

使用激光雕刻机雕刻的图片，看着还行吧，不过只能使用颜色深一点的纸来打印，我使用
的事快递盒子

当然还有一些小问题要说一下，就是图片的问题，以下面这张图为例，这是网上下载的图片，最好图片小一点，长宽要在电机长度范围内

如果直接用软件添加图片就会出现这种现象，这种情况会使打印时间变得很长，往往都是一个多小时以上，而我则想了办法，改用抖动算法，可是这个软件没有这个功能，怎么办呢，用别的软件

别人的激光雕刻软件用这个功能

我就导入图片，然后灰度化，选择最合适的图片，然后使用QQ的截图功能，将抖动完成的图片保存下来

这是截图好的

然后使用我们用的软件，添加图片就可以用了，以前要用一个小时，现在只要半小时了，网上下载的图片最好是白色背景，否则就会浪费时间打印这些多余的背景，那些黑色就是

抖动软件就在附件那里，需要的可以下载
还有就是在打印之前要使用软件的方向键控制电机的前后左右是否能正常转动，如不能则需要调整，电机的方向倒过来的可以将电机驱动模块的输入端几根线调换位置，以到达正常运动，而且打印之前使用弱光定位，然后X轴移动到最左，Y轴移动到最外，使激光的光线照到纸张的左上角，以到达打印范围最大化还有就是激光强度不要太高，太高不仅会将纸张烧穿而且还会导致打印时间变长，像我一般是选择20-30左右
再有就是我的单片机是使用USB转TTL模块的供电的，而激光和电机是使用单独供电的，并且电机和激光的电源与单片机的电源共地，因为电机和激光需要许多电流，共用一个电源会导致系统不稳定的，激光和电机的电源我使用的是手机充电器，将手机充电线改造成电源线
成本
支架一套    25元
激光散热器一个 9元
激光一个    32元
二相四线电机两个 36元
L298N模块两个    13元
STC单片机一个    6元
其余材料为以前所拥有的，未记，不过也不会太多，支架可以自己制作，当然看自己的能力了，电机可以用电脑光驱的电机

ID:235410 · 发表于 2017-10-21 00:54

会3d打印，就是不会激光雕刻，多谢大神分享，我想激光头功率可以再大吗，做到机关切割纸板等，还有那个软件挺好，是怎么实时控制的呢？是用的USB转TTL串口吗？打算好好学习一下大神的作品。

ID:668822 · 发表于 2019-12-20 00:35

楼主你好！照你的做了一个，程序下载成功后和上位机通信无反应。换了几个雕刻软件都一样。
所有元件均为好的。我对程序是个半吊子。
孤独的我两星期了还没解决这个问题，诚恳高手给予帮助！

ID:668822 · 发表于 2019-12-21 20:00

ws1zxm 发表于 2019-12-20 00:35
楼主你好！照你的做了一个，程序下载成功后和上位机通信无反应。换了几个雕刻软件都一样。
所有元件均为好 ...

各位黑友；经实践程序是完全正确的。致于和上位机通信无反应，是要用楼主的上位机软件才可行。
也就是说要下载楼主提供的软件！

ID:151661 · 发表于 2016-12-20 15:52

做过arduino的，有机会也做一个这样的。

ID:160984 · 发表于 2017-1-9 17:36

谢谢大师分享

ID:147215 · 发表于 2017-1-14 08:38

谢谢分享！，，，，

ID:159575 · 发表于 2017-1-18 13:48

好啊，改天试试

ID:157110 · 发表于 2017-1-19 19:50

厉害啊恩

ID:163574 · 发表于 2017-2-6 21:26

正在做，支架搭好了，就差驱动了😁

ID:73762 · 发表于 2017-2-7 09:55

谢谢分享！，

ID:73762 · 发表于 2017-2-7 10:11

厉害啊楼主

ID:163711 · 发表于 2017-2-7 15:20

牛人！厉害啊！

ID:163574 · 发表于 2017-2-18 15:00

我的不懂什么问题，发送不了数据

ID:147920 · 发表于 2017-3-4 00:04

这个可以有，成本相对少点

谢谢分享

ID:194389 · 发表于 2017-4-28 06:49

一直想做一个，苦于没有思路，在打算开工。

ID:157057 · 发表于 2017-5-1 08:54

好东西！

ID:196326 · 发表于 2017-5-5 00:17

请问驱动stc单片机可以兼容用 A4988 或者 easydriver吗

ID:196326 · 发表于 2017-5-5 00:38

激光和电机单独供电是用什么电源适配器

ID:154074 · 发表于 2017-5-9 10:01

良心好贴！

ID:196311 · 发表于 2017-5-10 11:11

好东东，正想玩玩，做个记号等有钱了就来下载

ID:138004 · 发表于 2017-5-10 15:19

51单片机的激光雕刻机

ID:199111 · 发表于 2017-5-10 15:22

学单片机新手一枚。

ID:89356 · 发表于 2017-5-13 02:28

.学单片机新手一枚

ID:209421 · 发表于 2017-6-21 07:04

做的很好，学习学习

ID:232204 · 发表于 2017-9-10 11:40

赞赞赞

ID:231862 · 发表于 2017-9-10 15:46

大佬，你的上位机在哪下的，你的程序用微雕管家也能雕刻吗，我怎么连接不到设备呢，也是用51做的，用的你的程序

ID:238040 · 发表于 2017-10-9 16:25

为了下载这个资料，注册了这个账号，无奈黒币还不够

ID:201949 · 发表于 2017-10-17 10:28

不知stm32可以用这个上位机不？

ID:119341 · 发表于 2017-10-17 12:36

太好了，不错的帖子

ID:240522 · 发表于 2017-10-22 09:20

先作为了解吧，先把我的光立方做完在考虑做这个！！！

ID:187478 · 发表于 2017-10-22 15:49

好厉害

ID:243247 · 发表于 2017-10-26 20:57

厉害，厉害！

ID:225757 · 发表于 2017-11-1 20:33

厉害厉害，受教了

ID:245349 · 发表于 2017-11-2 21:57

学习了，特别关心上位机程序

ID:246491 · 发表于 2017-11-6 12:45

真的很好，只可惜黑币不够下载不了。

ID:246473 · 发表于 2017-11-10 08:35

这个能雕刻G代码吗？

ID:248054 · 发表于 2017-11-10 14:13

有百度云吗

ID:249055 · 发表于 2017-11-14 15:54

一直想做一个棒!

ID:248218 · 发表于 2017-11-16 01:20

我也想做

ID:243748 · 发表于 2017-11-16 11:09

下载了，文件打不怎么回事，用什么软件能打开？

ID:248218 · 发表于 2017-11-16 16:46

赞一个！楼主还在不，出一个具体点的教成呀

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

基于51单片机的激光雕刻机

评分

相关帖子