單片機(jī)俄羅斯方塊源碼通過(guò)LCD12864實(shí)現(xiàn)

ID:307334 · 發(fā)表于 2018-4-26 17:37

俄羅斯方塊通過(guò)LCD12864實(shí)現(xiàn)，全部源碼，超清晰注釋.

單片機(jī)源程序如下:

/*******************************************************
* 文件名稱(chēng)：Tetris.c
* 單片機(jī)：STC89C52RC
* 簡(jiǎn) 述：使用LCD12864顯示的俄羅斯方塊程序
* 功能：計(jì)分，下一個(gè)方塊預(yù)覽，歡迎結(jié)束界面，長(zhǎng)按連續(xù)左右移，暫停（按鍵Left+Turn）
* 作者：劉琦
* 完成日期：2015年4月21日
* IO口設(shè)定：按鍵
sbit key_sr_left=P3^7;
sbit key_sr_turn=P3^6;
sbit key_sr_right=P3^5;
sbit key_sr_down=P3^4;
LCD12864
sbit RS_Port=P1^0;
sbit RW_Port=P1^1;
sbit E_Port=P2^5;
sbit PSB_Port=P1^2;
sbit RST_Port=P1^4;
數(shù)碼管鎖存器
sbit dula=P2^6;
sbit wela=P2^7;
*******************************************************/
/*****************************頭文件區(qū)*****************************************************/
#include<reg52.h>
//#include"STC15F2K60S2.h"
#include"task_key.h"
#include"task_activation.h"
#include"12864b.h"
#include"TaskBlock.h"
#include"Block.h"
/*****************************宏定義區(qū)*****************************************************/
//需要判斷是否刷新的任務(wù)總數(shù)
//1KeyLeft,2KeyTurn,3KeyRight,4KeyDown,5TaskGoingDown,6KeyPause
#define NUM_TASK_FLAG 7
//需要定時(shí)刷新的任務(wù)總數(shù)
//1TaskGoingDown,2KeyService
#define NUM_TASK_REFRESH 3
//刷新頻率
#define TIME_PER_SEC 200 //每次進(jìn)入中斷的頻率，200Hz
#define TIME_CLOCK 11059200 //晶振頻率
#define TIME_KEY_SERVICE_50HZ TIME_PER_SEC/50 //按鍵服務(wù)頻率，0.02s
#define TIME_TASKGOINGDOWN_2HZ TIME_PER_SEC/2 //下落頻率，0.5s
/******************************子函數(shù)聲明區(qū)***********************************************/
void initial_myself(void);
void initial_peripheral(void);
void delay100ms(void);
/******************************全局變量定義區(qū)***********************************************/
unsigned char uc_state=1;//狀態(tài)標(biāo)示:1歡迎界面，2等待開(kāi)始界面，3下落界面，4死亡界面，5暫停界面
enum Block{S1,S2,Z1,Z2,L1,L2,L3,L4,J1,J2,J3,J4,I1,I2,O1,T_1,T_2,T_3,T_4}enumBlock;//方塊編號(hào)
unsigned char ucBlockNow=0;//當(dāng)前方塊
unsigned char ucBlockNext=0;//下一個(gè)方塊
unsigned char ucFlagScreenChange=1;//界面變更標(biāo)志，界面更改時(shí)置1，激活task_activation
unsigned char ucCoordinate[2];//方塊的旋轉(zhuǎn)點(diǎn)坐標(biāo)，橫H，豎S
unsigned char xdata ucxMap[10][20];//整張屏幕的標(biāo)記地圖，用來(lái)記錄未消除方塊位置，有方塊則為1
unsigned char ucxBlockPosition[4][2];//方塊的4個(gè)小方塊坐標(biāo),[0][0],[0][1]為旋轉(zhuǎn)點(diǎn)坐標(biāo)H,S
unsigned int uc_delay_task_cnt[NUM_TASK_REFRESH];//任務(wù)刷新延遲
unsigned char uc_flag_taskrefresh[NUM_TASK_FLAG];//任務(wù)刷新標(biāo)志
unsigned long int ucScore=0;//得分
/******************************主函數(shù)開(kāi)始***********************************************/
void main(void)
{
unsigned char i=0;
initial_myself();
delay100ms();
initial_peripheral();
while(1)
{
if(ucFlagScreenChange==1)//界面變更標(biāo)志為1時(shí)，進(jìn)行任務(wù)激活，防止一直刷新界面
{
task_activation(uc_state);
ucFlagScreenChange=0;
}
if(uc_delay_task_cnt[2]==0)//20HZ頻率刷新key_service
{
task_key_service();
ET0=0;//在中斷中也有可能變化的變量在更改前時(shí)先關(guān)閉中斷
uc_delay_task_cnt[2]=TIME_KEY_SERVICE_50HZ;//延遲重置
ET0=1;
}
if(uc_flag_taskrefresh[5]&&uc_delay_task_cnt[1]==0)//需要時(shí),2HZ頻率刷新TaskGoingDown
{
if(!TaskGoingDown())//下落失敗
{
//將當(dāng)前方塊位置寫(xiě)入Map
for(i=0;i<4;i++)
{
ucxMap[ ucxBlockPosition[i][0] ][ ucxBlockPosition[i][1] ]=1;
}
//調(diào)用消除方塊函數(shù)
TaskClear();
}
ET0=0;//在中斷中也有可能變化的變量在更改前時(shí)先關(guān)閉中斷
uc_delay_task_cnt[1]=TIME_TASKGOINGDOWN_2HZ;//延遲重置
ET0=1;
}
}
}
//中斷函數(shù)
void timer0(void) interrupt 1
{
unsigned char i;
TR0=0;
TH0=255-TIME_CLOCK/TIME_PER_SEC/12/256;
TL0=255-TIME_CLOCK/TIME_PER_SEC/12%256;
//task_delay[]減到0時(shí)，相應(yīng)的函數(shù)準(zhǔn)備就緒
for(i=0;i<NUM_TASK_REFRESH;i++)
{
if(uc_delay_task_cnt[i]!=0)//延遲不為0時(shí)才減
{uc_delay_task_cnt[i]--;};
}
task_key_scan();//按鍵掃描函數(shù)，放在中斷中，保證準(zhǔn)時(shí)掃描
TR0=1;
}
//初始化區(qū)
void initial_myself(void)//第一區(qū) 初始化單片機(jī)
{
unsigned char i;
for(i=0;i<NUM_TASK_REFRESH;i++)uc_delay_task_cnt[i]=0;//初始化讓所有任務(wù)就緒
TMOD=0X21; //定時(shí)器0為16位不自動(dòng)重裝，用來(lái)定時(shí)；定時(shí)器1為8位自動(dòng)重裝，用來(lái)產(chǎn)生隨機(jī)數(shù)
TH0=255-TIME_CLOCK/TIME_PER_SEC/12/256;
TL0=255-TIME_CLOCK/TIME_PER_SEC/12%256;
TH1=0;
TL1=0;
}
void initial_peripheral(void) //第二區(qū) 初始化外圍
{
Lcd_Init();//初始化12864
EA=1; //開(kāi)總中斷
ET0=1; //允許定時(shí)器0中斷，定時(shí)器1無(wú)需開(kāi)啟中斷
TR0=1; //啟動(dòng)定時(shí)器0
TR1=1; //啟動(dòng)定時(shí)器1
}
void delay100ms(void) //@11.0592MHz
{
unsigned char i, j, k;
;
;
i = 5;
j = 52;
k = 195;
do
{
do
{
while (--k);
} while (--j);
} while (--i);
}

復(fù)制代碼

/*******************************************************
* 文件名稱(chēng)：TaskBlock.c
* 單片機(jī)：STC89C52RC
* 簡(jiǎn) 述：方塊子程序，包含，下落，出新，消除，檢測(cè)
* 作者：劉琦
* 完成日期：2015年4月21日
*******************************************************/
#include<reg52.h>
#include"Tetris.h"
#include"Block.h"
#include"tetris.h"
#include"Score.h"
/*******************************************************
* 函數(shù) 名:TaskCheck(void)
* 功能描述:檢測(cè)
* 函數(shù)說(shuō)明:檢測(cè)左右移，下落，出新，旋轉(zhuǎn)
* 輸入?yún)?shù):無(wú)
* 返回值:成功失敗標(biāo)示，ucReturn
*******************************************************/
unsigned char TaskCheck(void)
{
unsigned char ucReturn=0;
unsigned char i=0;
//加入檢測(cè)部分,包括邊界檢測(cè)，碰撞檢測(cè)
//邊界檢測(cè)
for(i=0;i<4;i++)
{
if(ucxBlockPosition[i][0]>=0&&ucxBlockPosition[i][0]<=9 //檢測(cè)左右
&&ucxBlockPosition[i][1]>=0&&ucxBlockPosition[i][1]<=19) //檢測(cè)上下
{
ucReturn=1;
}
else
{
ucReturn=0;
return ucReturn;//如果邊界檢測(cè)失敗，就不進(jìn)行下面檢測(cè)，直接返回失敗
}
}
//碰撞檢測(cè)
for(i=0;i<4;i++)
{
if(ucxMap[ ucxBlockPosition[i][0] ][ ucxBlockPosition[i][1] ]!=0)//與地圖標(biāo)記位置進(jìn)行比較
{
ucReturn=0;
return ucReturn;
}
}
return ucReturn;
}
/*******************************************************
* 函數(shù) 名:unsigned char TaskGoingDown(void)
* 功能描述:方塊下落
* 函數(shù)說(shuō)明:
* 輸入?yún)?shù):無(wú)
* 返回值:ucResult，1無(wú)碰撞，0碰撞
*******************************************************/
unsigned char TaskGoingDown(void)
{
unsigned char ucCheck=0;
unsigned char ucResult=0;
ucCoordinate[1]++; //旋轉(zhuǎn)點(diǎn)坐標(biāo)，豎S+1
WriteBlockCoordinate(); //將其他三個(gè)小方塊坐標(biāo)寫(xiě)入數(shù)組
ucCheck=TaskCheck(); //檢測(cè)碰撞
if(ucCheck) //無(wú)碰撞
{
ucCoordinate[1]--; //坐標(biāo)復(fù)位
ChangeBlock(0); //在老位置消除方塊，只刷新有改變的位置，加快顯示速度
ucCoordinate[1]++; //坐標(biāo)+1
ChangeBlock(1); //在新位置畫(huà)方塊
ucResult=1;
}
else //有碰撞，則不變
{
ucCoordinate[1]--;
WriteBlockCoordinate();
ucResult=0;
}
return ucResult;
}
/*******************************************************
* 函數(shù) 名:unsigned char TaskComingNew(void)
* 功能描述:方塊出新
* 函數(shù)說(shuō)明:
* 輸入?yún)?shù):無(wú)
* 返回值:ucResult，1成功，0失敗
*******************************************************/
unsigned char TaskComingNew(void)
{
unsigned char ucCheck=0;
unsigned char ucResult=0;
//寫(xiě)入當(dāng)前方塊的相關(guān)信息
switch(ucBlockNow)
{
case 0:
enumBlock=S1;
ucCoordinate[0]=4;
ucCoordinate[1]=0;
break;
case 1:
enumBlock=Z1;
ucCoordinate[0]=4;
ucCoordinate[1]=0;
break;
case 2:
enumBlock=L1;
ucCoordinate[0]=4;
ucCoordinate[1]=1;
break;
case 3:
enumBlock=J1;
ucCoordinate[0]=4;
ucCoordinate[1]=1;
break;
case 4:
enumBlock=I1;
ucCoordinate[0]=5;
ucCoordinate[1]=0;
break;
case 5:
enumBlock=O1;
ucCoordinate[0]=5;
ucCoordinate[1]=0;
break;
case 6:
enumBlock=T_1;
ucCoordinate[0]=4;
ucCoordinate[1]=0;
break;
default:
break;
}
//檢測(cè)碰撞
WriteBlockCoordinate();
ucCheck=TaskCheck();
if(ucCheck) //成功
{
ChangeSmallBlock(0); //將預(yù)覽的方塊清除
ucBlockNext=TL1%7; //產(chǎn)生隨機(jī)數(shù)，作為預(yù)覽方塊
ChangeBlock(1); //畫(huà)新的方塊
ChangeSmallBlock(1); //畫(huà)新的預(yù)覽方塊
ucBlockNow=ucBlockNext;
ucResult=1;
}
else
{
ucResult=0;
}
return ucResult;
}
/*******************************************************
* 函數(shù) 名:void TaskClear(void)
* 功能描述:消除滿行
* 函數(shù)說(shuō)明:消除滿行，并出新
* 輸入?yún)?shù):無(wú)
* 返回值:無(wú)
*******************************************************/
void TaskClear(void)
{
char i=0,j=0,n=0;
unsigned char m=0;
unsigned char k=0;
unsigned char flag_man=1,flag_kong=1,flag_clear=0;//滿行、空行、待清除標(biāo)志
unsigned char man[4],count=0; //滿行位置數(shù)組，滿行數(shù)量
unsigned char kong=20; //空行位置
unsigned char oldkong=20; //用來(lái)儲(chǔ)存舊的空行位置
unsigned char ucResult=0;
//標(biāo)記出來(lái)滿行及第一個(gè)空行
for(i=19;i>=0;i--)
{
for(j=9;j>=0;j--)
{
if(ucxMap[j][i]==0)
{
flag_man=0;
}
else
{
flag_kong=0;
}
}
if(flag_man==1)
{
flag_clear=1;//激活消除標(biāo)記
man[k]=i;//標(biāo)記滿行
count++;
k++;
}
else if(flag_kong==1)
{
kong=i;
break;//檢測(cè)到第一個(gè)空行，就退出循環(huán)
}
flag_man=1;//將滿行標(biāo)志復(fù)位
flag_kong=1;
}
//計(jì)分
switch(count)
{
case 0:
ucScore=ucScore+100;
break;
case 1:
ucScore=ucScore+200;
break;
case 2:
ucScore=ucScore+400;
break;
case 3:
ucScore=ucScore+700;
break;
case 4:
ucScore=ucScore+1100;
break;
default:
break;
}
oldkong=kong;
//消除滿行
if(flag_clear==1)
{
while(count!=0)//至少有一個(gè)滿行，才進(jìn)行消除
{
//逐行下移
for(m=0;m<man[count-1]-kong-1;m++)
{
for(n=9;n>=0;n--)
……………………
…………限于本文篇幅余下代碼請(qǐng)從51黑下載附件…………