STM32單片機(jī)LCD240128搬貨物Proteus仿真程序

ID:475247 · 發(fā)表于 2020-4-2 10:24

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

#include <reg52.h>
#include <SS.h> //關(guān)卡的界面
#include <SB.h> //在此文件中定義了漢字編碼，用點(diǎn)陣液晶字模提取軟件
#define uchar unsigned char
#define uint unsigned int
sbit cd = P2^0; //=0，數(shù)據(jù)通道；=1，命令通道
sbit rd = P2^1; //=0，讀選通有效
sbit wr = P2^2; //=0，寫選通有效
sbit ce = P2^3;
sbit md = P2^4;
sbit rst= P2^5;
uchar renh=6, renl=4, bu=0, guan=1;
static uchar SB[8][10];
bit flag=1;
void wrdat(uchar) ;//寫數(shù)據(jù)
void wrcmd(uchar cmd); //寫命令
void wrdcmd(uchar dat1, cmd);//寫帶有一個(gè)參數(shù)的命令
void lcddcmd(uchar dat1,dat2,cmd); //寫帶有兩個(gè)參數(shù)的命令
void LCD24012864_init();
void dischar(uchar hang,uchar lie,uchar cha) ;//寫ASCII碼字符
void delay();
void disxg(); //顯示選關(guān)提示
void clear(); //清屏
void disphz(uchar count) ; //數(shù)字和漢字代碼寫入自定義字符存儲(chǔ)區(qū)
void dishan(uchar hang, lie,uchar bianma);//寫漢字代碼行,列，bianma漢字在自定義字符中的位置,
void disshu(uchar hang, lie, bianma);//寫數(shù)字代碼行,列，bianma漢字在自定義字符中的位置,
void bushu();
uchar key() ; //檢測(cè)按鍵
void tupian() //畫關(guān)卡地圖
{
uchar i,j;
for(i=0;i<8;i++)
for(j=0;j<10;j++)
{
dishan(2*i,2*j,han[map[guan-1][i][j]]);
SB[i][j]=map[guan-1][i][j];
if(SB[i][j]==0x07) SB[i][j]=0x00;
}
dishan(4,22,han[4]);
disshu(4,24,shu[0]);
disshu(4,25,shu[guan]);
dishan(4,26,han[5]);
bushu();
dishan(2*renh,2*renl,han[1]);
}
void shengli() //過(guò)關(guān)判斷
{
uchar i,j,s1=0,s2=0;
for(i=0;i<8;i++)
for(j=0;j<10;j++)
{
if(map[guan-1][i][j]==0x07) //檢視目標(biāo)
{
s1++; //目標(biāo)計(jì)數(shù)
if(SB[i][j]==0x02) s2++; //目標(biāo)上箱子計(jì)數(shù)
}
}
if(s1==s2) //目標(biāo)計(jì)數(shù)和目標(biāo)上箱子計(jì)數(shù)相同，則過(guò)關(guān)
{
dishan(2,20,han[10]); //顯示過(guò)關(guān)提示
dishan(2,22,han[11]);
dishan(2,24,han[12]);
dishan(2,26,han[5]);
disshu(2,28,shu[11]);
flag=0; //停止游戲
disxg(); //顯示選關(guān)提示
}
}
void xuanguan(uchar k) //選關(guān)處理
{
if((k==1||k==3)&&guan<3) {guan++;renh=6;renl=4;tupian();}
if((k==2||k==4)&&guan>1) {guan--;renh=6;renl=4;tupian();}
}
void huintfumubiao() //恢復(fù)目標(biāo)顯示，（被人踩的目標(biāo)）
{
uchar i,j;
for(i=0;i<8;i++)
for(j=0;j<10;j++)
{
if(map[guan-1][i][j]==0x07&&SB[i][j]!=0x02) //有目標(biāo)且沒(méi)有箱子
{
if(renh!=i||renl!=j) dishan(2*i,2*j,han[7]);
}
}
}
void game(uchar k) //游戲控制
{
if(k==1) //向上
{
if(SB[renh-1][renl]==0x00) //上面是空白
{
dishan(2*renh,2*renl,han[0]); //人原來(lái)的位置清0
renh--; //上移一行
dishan(2*renh,2*renl,han[1]); //人新位置顯示
bu++; //步數(shù)加1
}
else if((SB[renh-1][renl]==0x02)&&(SB[renh-2][renl]==0x00)) //上面是箱子，箱子上是空格
{
dishan(2*renh,2*renl,han[0]);dishan(2*(renh-1),2*renl,han[0]);
renh--;
dishan(2*renh,2*renl,han[1]);dishan(2*(renh-1),2*renl,han[2]);
SB[renh][renl]=0x00;SB[renh-1][renl]=0x02;
bu++;
}
}
if(k==4)
{
if(SB[renh+1][renl]==0x00)
{
dishan(2*renh,2*renl,han[0]);
renh++;
dishan(2*renh,2*renl,han[1]);
bu++;
}
else if((SB[renh+1][renl]==0x02)&&(SB[renh+2][renl]==0x00))
{
dishan(2*renh,2*renl,han[0]);dishan(2*(renh+1),2*renl,han[0]);
renh++;
dishan(2*renh,2*renl,han[1]);dishan(2*(renh+1),2*renl,han[2]);
SB[renh][renl]=0x00;SB[renh+1][renl]=0x02;
bu++;
}
}
if(k==2)
{
if(SB[renh][renl-1]==0x00)
{
dishan(2*renh,2*renl,han[0]);
renl--;
dishan(2*renh,2*renl,han[1]);
bu++;
}
else if((SB[renh][renl-1]==0x02)&&(SB[renh][renl-2]==0x00))
{
dishan(2*renh,2*renl,han[0]);dishan(2*renh,2*(renl-1),han[0]);
renl--;
dishan(2*renh,2*renl,han[1]);dishan(2*renh,2*(renl-1),han[2]);
SB[renh][renl]=0x00;SB[renh][renl-1]=0x02;
bu++;
}
}
if(k==3)
{
if(SB[renh][renl+1]==0x00)
{
dishan(2*renh,2*renl,han[0]);
renl++;
dishan(2*renh,2*renl,han[1]);
bu++;
}
else if((SB[renh][renl+1]==0x02)&&(SB[renh][renl+2]==0x00))
{
dishan(2*renh,2*renl,han[0]);dishan(2*renh,2*(renl+1),han[0]);
renl++;
dishan(2*renh,2*renl,han[1]);dishan(2*renh,2*(renl+1),han[2]);
SB[renh][renl]=0x00;SB[renh][renl+1]=0x02;
bu++;
}
}
huintfumubiao();
bushu();
shengli();
}
void clear() //清屏
{
uchar i,j;
for(i=0;i<8;i++)
for(j=0;j<15;j++)
{
dishan(2*i,2*j,han[0]); //寫0
}
}
void keychuli(uchar k) //按鍵處理
{
if(k==5) {flag=0;disxg();goto over;} //鍵值為5，“選關(guān)”
if(k==6) {flag=1;bu=0;renl=4;renh=6;clear();tupian();goto over;} //鍵值為5，“開(kāi)始”
if(k<5)
{
if(flag==0) xuanguan(k); //選關(guān)處理
else game(k); //游戲控制
}
over:
;
}
void main()
{
uchar k;
LCD24012864_init();
disphz(14); //寫入漢字
tupian();
while(1)
{
k=key();
if(k!=0) keychuli(k);
}
}
void wrdat(uchar dat) //寫數(shù)據(jù)
{
cd=0;
wr=0;
P0=dat;
wr=1;
}
void wrcmd(uchar cmd) //寫命令
{
cd=1;
wr=0;
P0=cmd;
wr=1;
}
void wrdcmd(uchar dat1, cmd) //寫帶有一個(gè)參數(shù)的命令
{
wrdat(dat1);
wrcmd(cmd);
}
void lcddcmd(uchar dat1,dat2,cmd) //寫帶有兩個(gè)參數(shù)的命令
{
wrdat(dat1);
wrdat(dat2);
wrcmd(cmd);
}
void LCD24012864_init()
{
ce=0;
md=0;
rst=1;
lcddcmd(0x00,0x10,0x40); //設(shè)置文本顯示區(qū)首地址
lcddcmd(30,0x00,0x41); //設(shè)置文本顯示區(qū)寬度
lcddcmd(0x00,0x00,0x42); //設(shè)置圖形顯示區(qū)首地址
lcddcmd(30,0x00,0x43); //設(shè)置圖形顯示區(qū)寬度
wrcmd(0xa2); //設(shè)置光標(biāo)形狀
wrcmd(0x80); //設(shè)置顯示方式，文本圖形“或”
wrcmd(0x9e); //設(shè)置光標(biāo)閃爍，不顯示，文本與圖形顯示
}
void dischar(uchar hang,uchar lie,uchar cha) //寫ASCII碼字符，hang字符行（=8圖形行），lie字符列（=8圖形列），chaASCII碼
{ //顯示ASCII碼時(shí)，16行x30列
uint address;
uchar dat1,dat2;
address=hang*30+lie+0x1000; //計(jì)算文本顯示區(qū)地址
dat1=address;
dat2=address>>8;
lcddcmd(dat1,dat2,0x24);//地址指針定位
wrdcmd(cha,0xc4); //寫字符，地址指針不變
}
void delay() //延時(shí)
{
uint x;
for(x=0;x<1000;x++);
}
void disxg() //顯示選關(guān)提示
{
dishan(0,22,han[8]);
dishan(0,24,han[9]);
dishan(0,26,han[5]);
disshu(0,28,shu[10]);
}
void disphz(uchar count) //count是要寫的漢字個(gè)數(shù) //數(shù)字和漢字代碼寫入自定義字符存儲(chǔ)區(qū)
{
uint i;
lcddcmd(0x03,0x00,0x22); //定義自定義字符（在GCRAM中）存儲(chǔ)區(qū)字節(jié)地址高5位為0x03，
lcddcmd(0x00,0x1c,0x24); //0x03<<11+0x0400=0x1c00（字節(jié)地址）
for(i=0;i<16*8*12/8;i++)
wrdcmd(shucode[i],0xc0); //寫數(shù)字（每個(gè)16*8）*12（0-9,:）到GCRAM
for(i=0;i<16*16*count/8;i++)
wrdcmd(hancode[i],0xc0); //寫漢字（每個(gè)16*16）*count到GCRAM
}
void dishan(uchar hang, lie,uchar bianma)//寫漢字代碼行,列，bianma漢字在自定義字符中的位置,
{
dischar(hang,lie,bianma);//每個(gè)漢字按左上，左下，右上，右下存放
dischar(hang+1,lie,bianma+1);
dischar(hang,lie+1,bianma+2);
dischar(hang+1,lie+1,bianma+3);
}
void disshu(uchar hang, lie, bianma)//寫數(shù)字漢字代碼行,列，bianma漢字在自定義字符中的位置,
{
dischar(hang,lie,bianma);//每個(gè)漢字按左上，左下，右上，右下存放
dischar(hang+1,lie,bianma+1);
}
uchar key() //檢測(cè)按鍵
{
uchar x,k=0;
P1=0xff;
x=P1;
if(x==0xff) //沒(méi)按鍵跳出
goto over;
else
{
delay(); //有按鍵，延時(shí)
P1=0xff;
x=P1;
if(x==0xff) //再測(cè)
goto over;wait: //等待按鍵釋放
P1=0xff;
x=P1;
if(x==0xff) goto over;
else goto wait;
}
}
over:
return k;
}