基于c51單片機的傳送帶產(chǎn)品計數(shù)的設(shè)計含源代碼,仿真圖

ID:222877 · 發(fā)表于 2017-7-27 21:47

基于C51的傳送帶產(chǎn)品計數(shù)器的設(shè)計
包括 keil 源代碼以及protues仿真
實物也有做出來
都是自己辛辛苦苦做的
希望大家多多指教

實物圖：

實物圖

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

protues 仿真圖

keil 代碼截圖

單片機源程序如下:

#include <reg51.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long
//用液晶屏顯示參數(shù)
uchar code zifx0[]="0123456789abcdef";
uchar code zifu0[]="Now Number:0000";
uchar code zifu1[]="Set Number:0000";
sbit RS=P3^1; //寫信號
sbit RWW=P3^3; //讀信號
sbit E=P3^4; //使能信號
#define e1 E=1
#define rd1 RWW=1
#define rs1 RS=1
#define e0 E=0
#define rd0 RWW=0
#define rs0 RS=0
#define PP P1
//延時函數(shù)ms
void _delay_ms(uint t)
{
uint i,j;
for(i=0;i<t;i++)
for(j=0;j<120;j++);
}
//延時函數(shù)us
void _delay_us(uchar t)
{
while(t>0)t--;
}
//寫1602控制字
void lcd1602_writecrtl(uchar dat)
{
rd0;//讀信號置0
rs0;//寫信號置0
_delay_us(5);
PP=dat;
e1;//使能信號置1
_delay_us(5);
e0;//使能信號置0
}
//寫1602數(shù)據(jù)
void lcd1602_writenumber(uchar dat)
{
rd0;//讀信號置0
rs1;//寫信號置1
_delay_us(5);
PP=dat;
e1;//使能信號置1
_delay_us(5);
e0;//使能信號置0
}
//1602初始化
void lcd1602_init()
{
lcd1602_writecrtl(0x38); //顯示模式
lcd1602_writecrtl(0x06); //顯示光標(biāo)移動位置
lcd1602_writecrtl(0x0c); //顯示開及光標(biāo)設(shè)置
lcd1602_writecrtl(0x01); //顯示清屏
}
//顯示地址
void lcd1602_adr(uchar dat)
{
lcd1602_writecrtl(0x80 | dat);
}
//行顯示-
void LCD1602_string(uchar hang,uchar lie,uchar const *p)
{
uchar a;
if(hang == 1) a = 0x00;
if(hang == 2) a = 0x40;
a = a + lie - 1;
lcd1602_adr(a);
while(1)
{
if(*p == '\0') break;
lcd1602_writenumber(*p);
p++;
}
}
uint keyn1=16;//按鍵值
uint keyn=16;//緩沖
#define PK P2
//按鍵掃描
void key_z()
{
PK=0X0F;
if(!(PK==0X0F))
{
if(!(PK==0X0F))
{
keyn1=0;
keyn=0;
PK=0X0F;
if(PK==0X0E) keyn1=0;
if(PK==0X0D) keyn1=1;
if(PK==0X0B) keyn1=2;
if(PK==0X07) keyn1=3;
PK=0XF0;
if(PK==0XE0) keyn=0+keyn1;
if(PK==0XD0) keyn=4+keyn1;
if(PK==0XB0) keyn=8+keyn1;
if(PK==0X70) keyn=12+keyn1;
switch(keyn)
{
case 0: keyn1=1; break;
case 4: keyn1=2; break;
case 8: keyn1=3; break;
case 12:keyn1=10; break;
case 1: keyn1=4; break;
case 5: keyn1=5; break;
case 9: keyn1=6; break;
case 13:keyn1=11; break;
case 2: keyn1=7; break;
case 6: keyn1=8; break;
case 10:keyn1=9;break;
case 14:keyn1=12;break;
case 3: keyn1=14;break;//*
case 7: keyn1=0;break;
case 11:keyn1=15;break;//#
case 15:keyn1=13;break;
}
}
else keyn1=16;
PK=0X0F;while((!(PK==0X0F)));
}
}//LED
sbit led1=P0^0;
sbit beer=P3^5;
sbit out=P3^6;
sbit k1=P3^7;
sbit P32=P3^2;
//變量
uint now=0;
uint set=10;
uint bzbu=0;//設(shè)置
uint bz=0;//模式
uint qidong=0;//運行
//顯示控制
void dis()
{
//now
lcd1602_adr(0x0B);
lcd1602_writenumber(0x30+now%10000/1000);
lcd1602_writenumber(0x30+now%1000/100);
lcd1602_writenumber(0x30+now%100/10);
lcd1602_writenumber(0x30+now%10);
//set
lcd1602_adr(0x4B);
lcd1602_writenumber(0x30+set%10000/1000);
lcd1602_writenumber(0x30+set%1000/100);
lcd1602_writenumber(0x30+set%100/10);
lcd1602_writenumber(0x30+set%10);
if(bz==0)lcd1602_writenumber(' ');
if(bz==1)lcd1602_writenumber('<');
//啟動
if(bz==0)
{
if(k1==0){qidong=(qidong+1)%2;if(qidong==1){led1=0;;out=0;}else {led1=1;out=1;}while(k1==0);}
}
//啟動
if(qidong==1)
{
if(now>=set){qidong=0;led1=1;out=1;beer=0;_delay_ms(500); }
}
//啟動
if(qidong==0)
{
beer=1;
}
}
//按鍵功能函數(shù)
void key()
{
//掃描
key_z();
if(keyn1<16)
{
if((keyn1<10)&&(bz==1))
{
if(bzbu==0){set=keyn1;}
if(bzbu==1){set=set*10+keyn1;}
if(bzbu==2){set=set*10+keyn1;}
if(bzbu==3){set=set*10+keyn1;}
bzbu=(bzbu+1)%4;
}
if((keyn1==0x0a)&&(bz==0)){now=0;}//復(fù)位
if((keyn1==0x0b)&&(bz==1)){set=0;}//復(fù)位輸入
if((keyn1==0x0c)&&(qidong==0)){bz=1;}//設(shè)置
if(keyn1==0x0d){bz=0;}//退出
keyn1=16;
}
}
//-----------------------
void main()
{
_delay_us(10);
_delay_ms(10);
//中斷允許
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復(fù)制代碼

所有資料51hei提供下載（傳送帶計數(shù)的仿真和源碼，還有我寫的4個試驗源碼仿真一起奉上）:

基于C51的傳送帶產(chǎn)品計數(shù)器的設(shè)計.rar (423.03 KB, 下載次數(shù): 309)

ID:262662 · 發(fā)表于 2017-12-17 14:52

給力給力給力

ID:262534 · 發(fā)表于 2017-12-21 14:47

好資料，51黑有你更精彩!!!

ID:355897 · 發(fā)表于 2018-6-21 11:53

很有用

ID:355905 · 發(fā)表于 2018-6-21 12:12

很好的

ID:255925 · 發(fā)表于 2018-6-26 11:11

有電路圖和元器件清單嗎

ID:379641 · 發(fā)表于 2018-7-26 21:51

好資料，51黑有你更精彩!!!

ID:381237 · 發(fā)表于 2018-8-10 22:30

感謝樓主，這個可以正常使用，只是發(fā)現(xiàn)脈沖頻率稍高點誤差會很大。

ID:104477 · 發(fā)表于 2018-8-16 19:17

淘寶計數(shù)器才二三十塊一個，做這個成本都不止了

ID:559602 · 發(fā)表于 2019-6-11 08:53

真的很好了，很有用，極力推薦

ID:146041 · 發(fā)表于 2019-6-12 22:21

真是太有用，樓主很強大

ID:658584 · 發(fā)表于 2019-12-8 00:04

真的很好了，很有用，極力推薦

ID:767658 · 發(fā)表于 2020-6-2 16:58

感謝樓主，666

ID:773476 · 發(fā)表于 2020-6-9 00:22

請問一下模擬技術(shù)那里的是什么

ID:980554 · 發(fā)表于 2021-11-13 11:14

我想問一下仿真軟件怎么獲取

ID:1102057 · 發(fā)表于 2023-12-1 17:35

樓主可以出一個講解教程嗎

帳號		自動登錄	找回密碼
密碼			立即注冊

基于c51單片機的傳送帶產(chǎn)品計數(shù)的設(shè)計 含源代碼,仿真圖

評分

基于c51單片機的傳送帶產(chǎn)品計數(shù)的設(shè)計含源代碼,仿真圖