可以用proteus仿真的keilc俄罗斯方块程序.docxVIP

//源程序大公开// // (c) Copyright 2001 — 2005 xuwenj un // // All Rights Reserved // // V1.00 // //- // //标 题：俄罗斯方块程序 ？ // // 文件名：xwj_fk.c // // 版本:V1.00 // //修改人：徐文军 E-mail: xuwenjun@21 // // 日 期：05-05-13 // //描 述：俄罗斯方块程序 ？ 〃 //声明:// //以下代码仅免费提供给学习用途，但引用或修改后必须在文件中声明出处 .// //如用于商业用途请与作者联系 .E-mail： xuwenjun@21 // //有问题请 mailto xuwenjun@21 欢迎与我交流！ // //- // //老版本：无老版本文件名：〃 //创建人:徐文军 E-mail： xuwenjun@21 // // 日 期：05-05-13 // //描述:// TOC \o 1-5 \h \z // 1、功能完整，直接使用 // // 2、模块独立性强，移植方便，外部仅 init和move函数，修改显示和输入即可 // // 3、对减少内存占用、尽量减少屏幕操作进行适当优化 // // 4、新方块生成高度随机，绝对无规律 // // 5、仿真环境为 Keil7.5+Proteus6.5,可以联机也可脱机运行 // // code SIZE = 1845 ----// // con stANT SIZE = 326 ---- // // data SIZE = 16 19 // // idata SIZE = 50 ---- // // bit SIZE = 1 1 // //- // #include stdlib.h #i nclude xwj」cd16.h // 字符液晶控制函数声明 // #i nclude xwj」cd6963.h // T6963C 公用函数 #i nclude xwj_hlkey.h // P1 口行列式键盘 // #i nclude xwj_serial.h // 串口函数集 #i nclude cha nge.h // 数制转换 #in clude xwj_fk.h // 俄罗斯方块程序 #defi ne ulong un sig ned long #defi ne uint un sig ned int #defi ne uchar un sig ned char exter n void delay (un sig ned int x); //- 俄罗斯方块内部函数 // void fk_dot(uchar x,uchar y); // 显示 1 个方块点 void fk_cldot(uchar x,uchar y); // 清除 1 个方块点 void fk_show(void); // 显示分数 void fk_reffk(void); // 刷新方块 void fk_refnew(void); // 刷新预览方块 void fk_refli ne(yy); // 刷新 1 行背景 bit fk_chk(void); // 冲突检查 void fk_n ew(void); // 产生新方块 void fk_add(void); // 方块合并 /* //- 俄罗斯方块公用函数 // void fk_i nit(void); // 方块初始化 void fk_move (un sig ned char mode); // 移动方块 */ //- // #define FULLMAP OxOfff /* 掩码 */ #define LINEGUAN 20 /*20 行过一关 */ #define NEWX 15 /* 预览方块 X位置*/ #define NEWY 12 /* 预览方块 Y位置*/ #define LINEMAX 21 /* 屏幕最高 21 行*/ uint idata fk_map[LINEMAX+4]; // 背景映象 uchar fk_x,fk_y,fk_r; // 方块左右、高度、方向 uchar fk_type; // 方块形状 uchar fk_oldx,fk_oldy,fk_oldr; // 方块上次左右、高度、方向 uchar fk_n ewtype,fk_ newr; // 新方块形状、方向 uint score; // 总分 uint line; // 总行数 uchar speed; //速度 uchar moven; //速度相关计数器 uchar automapn; // 随机方块的行数 bit fk_run; //俄罗斯方坑蜗吩诵? uchar c