基于AT89c51单片机制作的俄罗斯方块游戏 T6963C液晶显示源码

helendcany

基于AT89c51单片机制作的俄罗斯方块游戏 T6963C液晶显示源码
. p. M/ k3 d9 M+ U8 F% ^7 O4 y8 U
/ T- e! ?  p' p4 t3 c- r
' }: z) `7 I/ t! F注明：只能按2键往左移
! Z; @$ }* m9 f. z( a9 B         按4键往右移
         按8键变换
5 R2 ^  G0 U% j3 V% Q* B        无快速下降键

部分源码预览：
- V* |( b6 A- G' F- k5 X#include "t6963c.h"
#include "typedef.h"
- R" R! O! z) w#include "key.h"
7 S/ i1 ?/ k, A' M
#define X_START 5
#define Y_START 0
#define MIN_SLOW_SPEED  300
+ J7 T& Q! ~# M#define BX_START  30
#define BY_START  15
1 i6 [' V* Y2 d  \#define Nothing   100
/ j, D6 i, R, f, }6 ^9 N6 W! E
) r2 P$ O" L; w; M
//全局数据
4 l0 P) z2 s9 h# h( r3 x3 ~code uchar Game_Char[]={0x27,0x41,0x4d,0x45};
3 r% V- R! V' ^# g7 Tcode uchar Over_Char[]={0x2f,0x56,0x45,0x52};

static uchar xx,yy;         //方块的位置
" S: L' [" z" _$ `4 x. m; qstatic uint  Game_Score=0;
static uchar xdata Platform[14][21];    //游戏平台数据
static uchar This_shape;                                //当前形状
static uchar Next_shape=0;
static uint  Game_Speed=MIN_SLOW_SPEED;         //等级速度，正常情况，方块下降的速度
static uchar Game_Stop=1;
- W; u! W1 n4 F8 h6 U2 Cstatic uchar Game_Level=0;

2 r9 D9 `& \( P6 [4 {( n/////////////////////////////////////////////////////////////////////////////////
2 l+ U$ y% t7 a( k/ y4 f/////////////////////////////////////////////////////////////////////////////////
/////////方块形状的定义//////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////
4 t/ d0 X, e; T) [, }struct POINT{
1 a( s8 @% z" G              uchar x;
              uchar y;
             };

: m/ b$ j' [& N  |, ]4 W6 fstruct SHAPE{
$ b) u. i: g! D7 S$ q$ x! w               struct POINT point[4];
% X. W/ p& d% d: [  H7 \( g                           uchar next;        //下一个形状
                         }

: \' l/ [1 S' v8 N. [5 j% G1 h/ q
+ T- }/ i  i. q( l* `8 r. Uxdata shape[19]={

* [* H: ?; F/ P0 o# j& X5 f                   { 1,0,0,1,1,1,2,1,1  },
                                   { 1,0,1,1,2,1,1,2,2  },
                                   { 0,0,1,0,2,0,1,1,3  },
                                   { 1,0,0,1,1,1,1,2,0  },
( l0 \& J4 V& S5 O# X0 ^
                                   { 1,0,2,0,1,1,1,2,5  },
5 J- b1 ?6 f% W6 N. _) l                                   { 0,0,1,0,2,0,2,1,6  },
9 k7 |% L+ R" ]                                   { 2,0,2,1,2,2,1,2,7  },
                                   { 0,0,0,1,1,1,2,1,4  },
0 K3 U& q' Z# R3 }; S) b0 N; u
+ Z% J1 s; H. R8 u! C+ D8 q                                   { 1,0,2,0,2,1,2,2,9  },
                                   { 2,0,0,1,1,1,2,1,10 },
& S% C( M+ d* V+ _                                   { 1,0,1,1,1,2,2,2,11 },
                                   { 0,0,1,0,2,0,0,1,8  },

8 A. v4 @6 F2 p9 V7 u( v# }1 K                                   { 0,0,0,1,1,1,1,2,13 },
                                   { 1,0,2,0,0,1,1,1,12 },
) {: u% |  h3 f9 j% S0 S1 y! a! l
                                   { 2,0,1,1,2,1,1,2,15 },
                                   { 0,0,1,0,1,1,2,1,14 },
  T; x# o! @& P3 D6 e% L
" B; u# u0 e4 t9 ^% V                                   { 1,0,1,1,1,2,1,3,17 },
% }) E! T. k6 l                                   { 0,1,1,1,2,1,3,1,16 },

                                   { 1,0,2,0,1,1,2,1,18 },         
" k' D( a* ~& ?5 L( M8 j3 i& \
                                };   

////////////////////////////////////////////////////////////////////////////
//**************************************************************************
//= 函数原型:void Init_GamePlatform()
//= 功    能: 初始化游戏平台
//= 参    数: 无                        
+ @& a$ D" h; n/ Z: k: G% n//= 返 回 值: 无
//= 函数性质：公有函数
//= 注    意：
//***************************************************************************
void Show_score(uchar);
% \0 b  B8 E1 C4 F$ dvoid Init_GamePlatform()
{
  uchar i;
$ q4 c3 P$ R. H/ }7 {! T" \( T  uchar j;
  o$ `8 K+ {0 m9 T$ U: x9 P  uchar N_Hanzi;
7 D2 }" N" ~# M& m  M  f5 I
" `0 Y( Y- V9 M4 j  Wr_line(1,33,13,64,1 );        //初始化游戏平台边界        画游戏区域
! v2 A& D! L) ]- c  Wr_line(1,33,14,64,1 );   //画上横线
: n* x& S/ m7 O  Wr_line(0,33,15,100,1);
  Wr_line(0,34,15,100,1);  //画左竖线
6 I/ f( ]' z. W& O3 {  Wr_line(1,33,115,64,1);  
) R# n4 B8 e$ O/ f' ^0 O7 f  Wr_line(1,33,116,64,1);  //画下横线
  Wr_line(0,95,15,100,1);
  Wr_line(0,96,15,100,1);  //画右竖线
4 I" }; d2 y0 t+ w2 @/ w//--------------------------------------------------------
* e7 ]: P5 O2 }( d: b, T0 |* j$ C  for(i=1;i<13;i++)                //游戏平台数据清零
  {
    for(j=0;j<20;j++)
  k) C, u' ~2 u2 |          {
            Platform[j]=0;
          }
- B# ~' F' A4 w" Q   }
" n1 f5 I6 X! [   for(i=1;i<13;i++)
. x0 E/ f6 w; Y   {
2 t$ _) g4 M+ D/ y% ]( g6 |      Platform[20]=1;   //游戏平台最下面一行的每一个方块位置为１，作为下边界
- T! D. e3 T+ S# v        }

   for(j=0;j<20;j++)                //游戏平台左右方块位置置１，作为左右边界
   {
$ ~2 I" o& A- d. j& H      Platform[0][j]=1;
. Y5 q, L: m4 @0 h          Platform[13][j]=1;
   }
# x( N5 R9 J* w# s7 i) G//---------------------------------------------------------
  N_Hanzi=0;            
( g; {6 x, p& x$ `( p  for(j=3;j<=12;j=j+2)           //
2 e0 ^# X( f) }  {
     hanzhi(1,j,N_Hanzi,1);
         N_Hanzi++;   //指向下一个汉字
4 M9 e" L: `0 G  C  }
$ p8 N/ T1 B$ F  _$ g2 a
6 ^! x6 F3 e  z  q. {5 p9 j  hanzhi(13,3,6,1);         //输入“分”汉字
" B. v* R1 }) p9 f5 g+ w/ W  hanzhi(13,8,8,1);   //输入“级”汉字

  Show_score(0);        //显示初始分数
$ b$ L4 S! E5 Z/ t$ ?- @  Show_num(13,11,Game_Level);         //显示初始等级水平
  Game_Speed=MIN_SLOW_SPEED/(Game_Level+1);  //根据水平确定速度

: x8 n' A: g. F4 @; e* h: H//------------------------------------------------------------------
+ S- M" C4 d* ]' y/ u- e  Game_Score=0;
# ]. u  A0 |0 X  xx=X_START ;
! G8 b5 T- v- t  yy=Y_START ;
' [& o2 d4 G8 ~& U& x$ |/ s}
' I* P+ [; J8 k$ H2 F! e////////////////////////Init_Game/////////////////////
% v5 e) g6 ?+ }- [" I- [void Init_Game()
1 v) n- j4 |) @6 G; E% H' y8 ^{
0 N! r; d9 `% M, J  Game_Stop=1;
1 L! u7 v  r9 ]6 w; z  o1 ~  Init_GamePlatform();
2 C4 m! [6 ]( f4 s1 r  hanzhi(7,3,9,1);         //输入“按”汉字
) u% N# Q% G: h  Show_num(7,6,7);         //显示7
9 A' ^0 s& Q# u; H4 f# @0 G$ R: @  hanzhi(7,8,10,1);         //输入“开”汉字
  hanzhi(7,10,11,1);         //输入“始”汉字
}
! V+ {3 I& G" _//**************************************************************************
2 y$ ?$ V* ^( k8 U//= 函数原型:void XiaoFengKuai(uchar x,uchar y,uchar mode)
5 A4 P2 g) K6 H6 P//= 功    能: 显示一个小方块
//= 参    数: 小方块的横x，坚坐标y,mode=1:显示小方块,mode=0:删除小方块                        
//= 返 回 值:
' H' W; @4 J/ B' l7 e3 J//= 函数性质：私有函数
//= 注    意：
//***************************************************************************
/ q( l- U& Y# Yvoid XiaoFengKuai(uchar x,uchar y,bit mode)
8 H1 j: s2 N/ O! {; a{
: Z( _6 ?+ M0 ?7 d) P) b& K   uchar x1=5*x+BX_START;        //将方块在平台的位置转化成ＬＣＤ的点坐标(地址转换）
/ J1 ^5 J% m: ]/ A. a  _   uchar y1=5*y+BY_START;         
7 ]9 O2 C2 Y3 x2 f3 ?1 T2 a7 o   uchar i;

- R( A& E$ _. k" y5 ]2 u3 ?   if(mode==1)
   {

       for(i=0;i<5;i++)
) ^. d5 a( n- a       {
          Point(x1+i,y1,1); //画一条横线
       }


               y1+=4;

9 ]# {* u; N% K* o9 Z        for(i=0;i<5;i++)
        {
& \; o2 [% O0 l, Q- _+ c( K" l           Point(x1+i,y1,1); //画第二条横线
: ^0 M! [, w: g+ m# {         }
: v6 D$ O) x1 S2 l$ S
        for(i=0;i<5;i++)
        {
$ y& {, K9 u* I( d           Point(x1,y1-i,1); //画第1条坚线
* M4 F3 V2 P8 o* i1 f         }

         x1+=4;

        for(i=0;i<5;i++)
% l3 f8 M2 F. u! R        {
& d  l+ M/ k5 u7 {           Point(x1,y1-i,1); //画第2条坚线
  c6 s9 f1 t0 q/ j$ W         }

( @! [8 E9 j7 g" j$ n' T3 V( W        y1-=4;
        for(i=0;i<5;i++)
' D) A% U6 ^7 d, N' |1 q0 w        {
/ g; J: H8 @$ B- y6 i: m           Point(x1-i,y1+i,1); //画斜线
8 S  S3 E  C. n0 t% e" l, D6 i- ?# `) f        }
' s+ z: ~- \3 H+ g; D1 e   }

  else
# Q; k. J) ?" U: K: J' r  {
6 Q5 ~8 Z2 H, N& @- {5 D( h             for(i=0;i<5;i++)
# x( l. m; v1 y* {; k8 v        {
1 s9 G+ l- {# j3 H          Point(x1+i,y1,0); //画一条横线
9 v7 Q& w7 a  F9 Z8 O! l8 s              }
, ]4 ]8 |6 J9 ]
$ _/ d3 \( t" S7 V! c( r' R% b               y1+=4;
        for(i=0;i<5;i++)
: w/ J- O- J/ v         {
           Point(x1+i,y1,0); //画第二条横线
1 S; z2 v9 V0 o) v$ e# P  R3 ?) L/ t         }
. w6 b* I0 o9 G* w
         for(i=0;i<5;i++)
4 ~, z( @1 O) X# H0 ~         {
4 q: Y7 {7 _  P% ]            Point(x1,y1-i,0); //画第1条坚线
          }
0 v- B( F5 ~) `; {+ l# y
         x1+=4;
% Z5 F  d0 g* K1 k7 D        for(i=0;i<5;i++)
& b% d. s2 u& U$ E3 T          {
             Point(x1,y1-i,0); //画第2条坚线
          }
/ d3 w. S4 d3 [, y! S1 Q- g
0 I: p" n$ m& N( W        y1-=4;
        for(i=0;i<5;i++)
+ G5 ~1 `6 c+ ?( V         {
' y7 u8 x. V5 Y' c5 j- F           Point(x1-i,y1+i,0); //画斜线
         }
  o& o$ v; {/ i        }
}
//////////////////////////////////////////////////////////////////////////
////////////////左冲突检测//////////////////////////////////////////////
6 F, C. m( ^8 U2 l9 ]; ~1 Ibit Left_Anti()
0 ]8 S! V; y- w{
5 q# ?8 `* ?8 ?* F( G  q! A  uchar i;
  for(i=0;i<4;i++)
/ }+ {5 b- D% C- F, V( m0 Y. S        {
, e& m: U3 c& R1 ~. i0 ~          if(Platform[xx+shape[This_shape].point.x-1][yy+shape[This_shape].point.y]==1)
3 n" G+ p5 H  C% V# h1 P            return 1;
        }
  return 0;
}           

////////////////右冲突检测///////////////////////////////////////////
6 ]. X. o9 D( Qbit Right_Anti()
{
  uchar i;
2 K' A8 t: z0 ^# [( v0 m8 l' X  q2 z  for(i=0;i<4;i++)
: _6 ^4 J' U1 \        {
          if(Platform[xx+shape[This_shape].point.x+1][yy+shape[This_shape].point.y]==1)
( O# e2 T2 F) X- j# S            return 1;
- F/ J% p4 u1 P6 m9 P' k- |( \        }                           
  return 0;

4 z* _. M: u0 d0 i7 y' H$ z& }, V}

5 l. D( s( L# _////////////////////////////////////////下冲突检测//////////////////////////
bit Bottom_Anti()
/ R9 J4 y" p$ Z& F{
   uchar i;
   for(i=0;i<4;i++)
3 Y- M- q- L" p2 u( W; h( @        {
/ B5 n4 E* f8 r1 L' [' ~, |3 }5 D* r          if(Platform[xx+shape[This_shape].point.x][yy+shape[This_shape].point.y+1]==1)
            return 1;
    }
, b. @7 y, U! o& z+ w  return 0;                          
1 ]2 m0 u  a. q}
//////////////////////////////////改变形状时产生的冲突检测////////////////////
bit Change_Shape_Anti()
{
  p  ~  X$ d  t9 \0 o   uchar i;
   for(i=0;i<4;i++)
6 o8 q9 W6 k/ b5 ^& L        {
) D' b" {: k* l/ B3 p' O5 Q          if(Platform[xx+shape[shape[This_shape].next].point.x][yy+shape[shape[This_shape].next].point.y]==1)
            return 1;           //检测一个形状的冲突情况
    }
- B3 i- G6 j# N( G; G) M   return 0;
}
//////////////////////////////////产生一个随机数,返回一个随机数///////////////
; P0 d# G9 m" S2 l, l% [+ C1 e6 t$ luchar Random()
{
" P5 m8 v# a+ |) F: o( R1 H  static uchar m;
  m+=49;
  return (m%19);
}

//////////////计分函数,参数为 消行行数n///////////////////////////////////////
: N+ z6 s5 s( N9 @0 w9 w
void Show_score(uchar n)
{
  Game_Score=Game_Score+10*n;

  if(Game_Score<10)
$ P1 E9 ^/ z1 H; J" W6 b  {
     Show_num(13,6,Game_Score%10);                //显示个位
) m% @& A( J: p- G: K* B  }
  else if(Game_Score<100)
  {  
, U% ~1 G5 c! Y1 P" i     Show_num(14,6,Game_Score%10);
         Show_num(13,6,Game_Score/10%100);        //显示个位,十位
4 S; ?" w5 w) U+ L% M/ a  }
) c6 ^1 r6 i( R( M6 J) u* y  else if(Game_Score<1000)
- m5 s/ j9 B6 ^. K# Q0 n2 t, y  {
) [- |# R0 c  E/ }1 Z     Show_num(14,6,Game_Score%10);
         Show_num(13,6,Game_Score/10%10);
$ V/ m) j" ?5 ^0 g; a1 u! z, l         Show_num(12,6,Game_Score/100%10);        //显示个位 ,十位,百位
8 ?5 b$ }3 ]5 [  }
9 K: s5 h5 V, O  else
4 w+ V; J7 m- v# A5 ^- ~. p" \  {  
; @( S% C) y8 F' Q/ g; m9 T& P         Show_num(15,6,Game_Score%10);
8 h! N4 g* {- O7 r2 y# ^0 c3 c: l2 D* d& J         Show_num(14,6,Game_Score/10%10);
         Show_num(13,6,Game_Score/100%10);        //显示个位 ,十位,百位,千位
         Show_num(12,6,Game_Score/1000);
  }

  if(Game_Score%1000==0)
  F9 k' H: Y( C# i1 h9 Q. ]+ ?  {
' ~9 i/ g7 c1 Q5 J    if(Game_Score>0)
        {
       Game_Level++;
       if(Game_Level==10)
7 p& u: w$ S+ B5 S% T           {
              Game_Stop=1;
              hanzhi(7,5,12,1);         //        输出“太棒了"
          hanzhi(7,7,13,1);         
                  hanzhi(7,9,14,1);

! t9 _+ x. F3 \7 s" c( D8 g* S& |" f           }
       Show_num(13,11,Game_Level);         //显示水平
" T- F$ N( F1 j* b' \$ ?$ j6 f
% Q% j( ^$ I! Q( T+ s5 D: f) z    }
5 ~$ ~4 g8 X' [  f! ~  }
}
2 P" j2 H. }8 T9 d7 z+ `
//**************************************************************************
6 t8 \8 ~3 H2 i5 q: v, H//= 函数原型:void Undisplay_line()
//= 功    能: 消除行
//= 参    数: 无                        
+ X) ~* |6 r5 j" p1 F//= 返 回 值: 无
//= 函数性质：私有函数
//= 注    意：
//***************************************************************************   
void UnDisplay_line()
{
( X* }  W/ [. D" {   uchar Del_Line;      //标识要删除的行
1 \* u" ?" e( a/ L8 N& ]+ T% k; x: h; C   uchar Del_Line_Num=0;     //标识删除的行数
   uchar i,j,k;
- I& n& b$ h; }1 F   bit HavePoint;                    //标识一行中是否有空白点
$ L* b/ k; |3 z, L' g  d
   for(i=0;i<4;i++)
5 G' a; o" r% m   {
      for(j=1;j<13;j++)
- k) h+ i3 f# h3 p) o' S) c          {
             if(Platform[j][yy+i]==0)
                    break;                   //如果这一行中有一个为空，则退出这一行的循环
8 Q/ g) ?3 g; X; }9 b" ]5 Q0 {                 else if(j==12)
6 o, ~( W& w& q  X; o                 {
# v2 U/ |9 }" h( d) D                    Del_Line=yy+i;                 //确定要删除的行
                        if(Del_Line<20)
                        {
7 ~) n: [& ^" H' c) R$ d1 Q                           Del_Line_Num++;                   //计算共删除的行数
                        for(k=1;k<13;k++)
                        {
# N8 |+ K) D& [7 C3 @/ {8 ]1 {                            XiaoFengKuai(k,Del_Line,0);           //删除行
. D: ^- [$ E# i: E+ X  Y                                Platform[k][Del_Line]=0;         //平台数据清零
                        }
                        while(1)     //下移
; [3 m  J' p4 U* w' l8 f0 f- V
# y8 R, H  D6 t; u5 R2 D, V! _

…………限于本文篇幅 余下代码请从论坛下载附件…………

游客，如果您要查看本帖隐藏内容请回复

! K/ ^% C3 e" O" O

kinidrily

谢谢分享 楼主好人

yxlk

这个不错啊】

sunygd

确实不错