籃球比賽計分器51單片機程序，前段時間幫別人搞畢設用普中的開發板

ID:287575 · 發表于 2018-6-6 22:17

前段時間幫別人搞畢設用普中的開發板進行了驗證，下面是按鍵說明與接線圖：

單片機源程序如下:

#include<reg51.h>
#include<intrins.h>
#define uint unsigned int
#define uchar unsigned char
//uchar code table[10] = {0x03, 0x9f, 0x25, 0x0d, 0x99, 0x49, 0x41, 0x1f, 0x01, 0x09};
//這三個引腳參考資料
sbit E=P2^7; //1602使能引腳
sbit RW=P2^5; //1602讀寫引腳
sbit RS=P2^6; //1602數據/命令選擇引腳
sbit beep=P1^5; //蜂鳴器
bit beep_flag;
sbit start_game=P3^7;
sbit pause=P3^6;
bit run_off;
uchar game_time_min=12;
uchar game_time_sec=0;
uchar game_num=1;
sbit P24=P2^4;
sbit P23=P2^3;
sbit P22=P2^2;
sbit P21=P2^1;
sbit P20=P2^0;
#define FOSC 11059200L
#define T1MS (65536-FOSC/12/1000) //1ms timer calculation method in 12T mode
uint count,count1,count2;
uchar r_b,r_s,r_g,b_s,b_b,b_g; //紅分和黑分的百十個
bit h_h; //紅黑方加減分標志
uchar second_s,second_g; //倒計時的十和個
bit updata=0;
#define left 15
#define right 3
#define add_score 7
#define sub_score 11
#define start 14
#define stop 2
bit start_24sec=0;
bit game_over;
void add_score_function();
void sub_score_function();
void redisplay();
/********************************************************************
* 名稱 : Delay_1ms()
* 功能 : 延時子程序，延時時間為 1ms * x
* 輸入 : x (延時一毫秒的個數)
* 輸出 : 無
***********************************************************************/
void Delay_1ms(uint i)//1ms延時
{
uchar x;
uint j;
for(j=0;j<i;j++)
for(x=0;x<=148;x++)
;
}
/********************************************************************
* 名稱 : delay()
* 功能 : 延時,延時時間大概為140US。
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void delay()
{
int i,j;
for(i=0; i<=10; i++)
for(j=0; j<=2; j++)
;
}
/********************************************************************
* 名稱 : enable(uchar del)
* 功能 : 1602命令函數
* 輸入 : 輸入的命令值
* 輸出 : 無
***********************************************************************/
void enable(uchar del)
{
P0 = del;
RS = 0;
RW = 0;
E = 0;
delay();
E = 1;
delay();
}
/********************************************************************
* 名稱 : write(uchar del)
* 功能 : 1602寫數據函數
* 輸入 : 需要寫入1602的數據
* 輸出 : 無
***********************************************************************/
void write(uchar del)
{
P0 = del;
RS = 1;
RW = 0;
E = 0;
delay();
E = 1;
delay();
}
/********************************************************************
* 名稱 : L1602_init()
* 功能 : 1602初始化，請參考1602的資料
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void L1602_init(void)
{
enable(0x01);
enable(0x38);
enable(0x0c);
enable(0x06);
enable(0xd0);
}
/********************************************************************
* 名稱 : L1602_char(uchar hang,uchar lie,char sign)
* 功能 : 改變液晶中某位的值，如果要讓第一行，第五個字符顯示"b" ，調用該函數如下
L1602_char(1,5,'b')
* 輸入 : 行，列，需要輸入1602的數據
* 輸出 : 無
***********************************************************************/
void L1602_char(uchar hang,uchar lie,char sign)
{
uchar a;
if(hang == 1) a = 0x80;
if(hang == 2) a = 0xc0;
a = a + lie - 1;
enable(a);
write(sign);
}
/********************************************************************
* 名稱 : L1602_string(uchar hang,uchar lie,uchar *p)
* 功能 : 改變液晶中某位的值，如果要讓第一行，第五個字符開始顯示"ab cd ef" ，調用該函數如下
L1602_string(1,5,"ab cd ef;")
* 輸入 : 行，列，需要輸入1602的數據
* 輸出 : 無
***********************************************************************/
void L1602_string(uchar hang,uchar lie,uchar *p)
{
uchar a;
if(hang == 1) a = 0x80;
if(hang == 2) a = 0xc0;
a = a + lie - 1;
enable(a);
while(1)
{
if(*p == '\0') break;
write(*p);
p++;
}
}
/********************************************************************
* 名稱 : Keyscan()
* 功能 : 實現按鍵的讀取。下面這個子程序是按處理矩陣鍵盤的基本方法處理的。
* 輸入 : 無
* 輸出 : 按鍵值
***********************************************************************/
uchar keyscan(void)
{
uchar temp;
P21=1;
if(P24==0) {temp=right; goto next;}
if(P23==0) {temp=sub_score; goto next;}
if(P22==0) {temp=stop; goto next;}
P20=1; P21=0;
if(P24==0) {temp=left; goto next;}
if(P23==0) {temp=add_score; goto next;}
if(P22==0) {temp=start; goto next;}
temp=0xff;
next:
while((P2&0x1c)!=0x1c); //等待按鍵釋放
return temp;
}
/********************************************************************
* 名稱 : Main()
* 功能 : 主函數
* 輸入 : 無
* 輸出 : 無
***********************************************************************/
void Main(void)
{
uchar Key_Value,temp; //讀出的鍵值
TMOD = 0x01; //set timer0 as mode1 (16-bit)
TL0 = T1MS; //initial timer0 low byte
TH0 = T1MS >> 8; //initial timer0 high byte
//TR0 = 1; //timer0 start running
ET0 = 1; //enable timer0 interrupt
EA = 1; //open global interrupt switch
start_game=1; //pull high
pause=1; //pull high
L1602_init();
//draw some picturs
for(temp=1; temp<17; temp++)
{
L1602_string(1,temp,"O");
if((temp-1)!=0)
{L1602_string(1,temp-1," ");}
Delay_1ms(200);
}
L1602_string(1,1,"Basketball score");
L1602_string(2,5,"Recorder");
Delay_1ms(4000);
//end draw some pictures
begin:
L1602_string(2,1,"Fir 12:00 24 Sec");
second_s=2; second_g=4;
L1602_char(1,11,second_s+48);
L1602_char(1,12,second_g+48);
h_h=1;
L1602_string(1,1,"->R:000 B:000");
while(1)
{
if(updata)
{
updata=0;
redisplay();
L1602_char(2,11,second_s+48);
L1602_char(2,12,second_g+48);
}
if((second_s==0)&&(second_g<=3))
{beep_flag=1;}
if((game_time_min==0)&&(game_time_sec<=2))
{beep_flag=1;}
if(start_game==0)
{
Delay_1ms(15);
if(start_game==0)
{
while(start_game==0);
if(game_over)
{
game_over=0; game_num=1;
game_time_min=12; game_time_sec=0;
ET0=1; EA=1;
goto begin;
}
run_off=1;
}
}
if(pause==0)
{
Delay_1ms(15);
if(pause==0)
{
while(pause==0);
run_off=0;
}
}
if(run_off) {TR0=1;}
P2&=0xfc;
P2|=0x1c;
temp=P2&0x1c;
if(temp!= 0x1c)
{
Delay_1ms(15); //按鍵消抖
P2&=0xfc;
P2|=0x1c;
temp=P2&0x1c;
if(temp != 0x1c)
{
Key_Value = keyscan();
switch(Key_Value)
{
case left: //
{
h_h=1;
redisplay();
L1602_string(1,1,"->");
L1602_string(1,10," ");
break;
}
case right:
{
h_h=0;
redisplay();
L1602_string(1,1," ");
L1602_string(1,10,"->");
break;
}
case add_score:
{
add_score_function();
break;
}
case sub_score:
{
sub_score_function();
break;
}
case start:
{
start_24sec=1;
break;
}
case stop:
{
start_24sec=0;
second_s=2;
second_g=4;
updata=1;
beep=0;
break;
}
default: break;
}
}
}
}
}
//*******************************************
void add_score_function()
{
if(h_h==0)
{
if(++b_g==10)
{
b_g=0;
if(++b_s==10)
{
b_s=0;
if(++b_b==10)
b_b=0;
}
}
redisplay();
L1602_char(1,14,b_b+48);
L1602_char(1,15,b_s+48);
L1602_char(1,16,b_g+48);
}
else
{
if(++r_g==10)
{
r_g=0;
if(++r_s==10)
{
r_s=0;
if(++r_b==10)
r_b=0;
}
}
redisplay();
L1602_char(1,5,r_b+48);
L1602_char(1,6,r_s+48);
L1602_char(1,7,r_g+48);
}
}
//*********************************************
void sub_score_function()
{
if(h_h==0)
{
if(b_g!=0)
{b_g--;}
else
{
if(b_s!=0)
{
b_s--; b_g=9;
}
else
{
if(b_b!=0)
{b_b--; b_s=9; b_g=9;}
}
}
redisplay();
L1602_char(1,14,b_b+48);
L1602_char(1,15,b_s+48);
L1602_char(1,16,b_g+48);
}
else
{
if(r_g!=0)
{r_g--;}
else
{
if(r_s!=0)
{
r_s--; r_g=9;
}
else
{
if(r_b!=0)
{r_b--; r_s=9; r_g=0;}
}
}
redisplay();
L1602_char(1,5,r_b+48);
L1602_char(1,6,r_s+48);
L1602_char(1,7,r_g+48);
}
}
//***************************************************
void redisplay()
{
uchar temp,temp1;
temp=game_time_min/10;
temp1=game_time_min%10;
L1602_char(2,5,temp+48); L1602_char(2,6,temp1+48);
temp=game_time_sec/10;
temp1=game_time_sec%10;
L1602_char(2,8,temp+48); L1602_char(2,9,temp1+48);
}
//-----------------------------------------------
/* Timer0 interrupt routine */
void tm0_isr() interrupt 1 using 1
{
TL0 = T1MS; //reload timer0 low byte
TH0 = T1MS >> 8; //reload timer0 high byte
if(beep_flag)
{
if(++count1==4)
{
count1=0;
beep=!beep;
}
}
else
{beep=0;}
if (++count== 1000) //1ms * 1000 -> 1s
{
count = 0; //reset counter
updata=1;
if(start_24sec) //24秒到計時
{
if(second_g!=0)
{second_g--;}
else
{
if(second_s!=0)
{
second_s--;
second_g=9;
}
else
{
start_24sec=0;
second_s=2;second_g=4;
beep=0; beep_flag=0;
}
}
}
if(run_off) //正常計時
{
if(game_time_sec!=0)
{game_time_sec--;}
else
{
if(game_time_min!=0)
{
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

所有資料51hei提供下載:

籃球比賽計分器.rar (159.04 KB, 下載次數: 78)

ID:347913 · 發表于 2018-6-10 13:00

我想問下我用普中學習板運行這個程序，端口也改了，計時開始和停止都正常，但矩陣鍵盤沒反應，怎么辦

ID:287575 · 發表于 2018-6-12 23:30

默默的注意發表于 2018-6-10 13:00
我想問下我用普中學習板運行這個程序，端口也改了，計時開始和停止都正常，但矩陣鍵盤沒反應，怎么辦

矩陣接線正確嗎？正確應該沒問題，我是反復試過的，你把接線拍個圖發來，我看一下

ID:372149 · 發表于 2018-7-21 20:52

*** WARNING L15: MULTIPLE CALL TO SEGMENT
樓主有錯誤哇

ID:287575 · 發表于 2018-8-4 12:17

anshenghhhhh 發表于 2018-7-21 20:52
*** WARNING L15: MULTIPLE CALL TO SEGMENT
樓主有錯誤哇

不可能有錯誤的，已經燒到板子正常工作的

ID:426562 · 發表于 2018-11-17 18:21

樓主請問我用的2.2的板子，但是計時程序一直沒反應咋回事啊？其他功能是好的

ID:426241 · 發表于 2018-12-6 15:02

請問樓主這是需要多少個按鍵

ID:428761 · 發表于 2018-12-7 19:35

老哥，為什么我的1602顯示器顯示的比分很奇怪？？？

ID:537660 · 發表于 2019-5-21 10:11

你好~想問一下如果想中場比分交換的話，要怎么加代碼

ID:403027 · 發表于 2019-5-21 17:05

正想學習ESP8266，謝謝樓主

ID:543123 · 發表于 2019-6-4 08:25

有電路圖嗎樓主

ID:693873 · 發表于 2020-2-22 19:15

默默的注意發表于 2018-6-10 13:00
我想問下我用普中學習板運行這個程序，端口也改了，計時開始和停止都正常，但矩陣鍵盤沒反應，怎么辦

我也是哎

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

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

籃球比賽計分器51單片機程序，前段時間幫別人搞畢設用普中的開發板

評分