




已阅读5页,还剩2页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
#include .uc_os_IIincludes.hOS_STK xdata Task1StackCPU_MAX_STK_SIZE;OS_STK xdata Task2StackCPU_MAX_STK_SIZE;sbit led1=P30;void Task1(void xdata * ppdata) reentrantppdata = ppdata;led1=0;while(1)led1=led1;OSTimeDlyHMSM(0, 0, 0, 500);void Task2(void xdata * ppdata) reentrantppdata = ppdata;while(1)snake12864();OSTimeDlyHMSM(0, 0, 0, 50);void InterruptInitial()/* set timer. 50ms, THTL = 3caf when cpu at 12MHz */TMOD |= 0x11;TH0 = 0x70;TL0 = 0x00;/* TR0 is set in OSStart() */ET0 = 1;main()InterruptInitial(); OSInit(); OSTaskCreate(Task1, (void xdata *)0, &Task1Stack0,2);OSTaskCreate(Task2, (void xdata *)0, &Task2Stack0,3); OSStart();#include .drivergraphcode.h#include .driverlcddriver.h#define uint unsigned int#define uchar unsigned char#define up 0x14#define down 0x44#define left 0x28#define right 0x22#define quit 0x11uchar bdata snake_flag;sbit gameover=snake_flag3;sbit food=snake_flag2;uchar num=0;uchar temp;uchar idata snake_len;uchar xdata snake2562;uchar idata snake_food2;uintmarker;ucharno_counter;void delayms(uint x)uint i;for(;x0;x-) for(i=0;i1500;i+);uchar getkey(void)uchar col_code,row_code;P2=0xf0;if(P2!=0xf0)delayms(5);if(P2!=0xf0)row_code=0xfe;while(row_code&0x10)P2=row_code;if(P2!=row_code)col_code=(P2&0xf0)|0x0f;return(row_code)|(col_code);elserow_code=(row_code1)|0x01;return(0);bit compare(uchar x,uchar y)uchar counter;for (counter=0;counter63) i=1;if(j63) j=1;while(!compare_flag);drawPoint(i,j,1);snake_food0=i;snake_food1=j;food=1;void snake_init(void)marker=0; /分数初值no_counter=0; /吃到的食物snake_len=3; /蛇长度drawPoint(31,30,1); /画蛇,位置drawPoint(32,30,1);drawPoint(33,30,1);snake00=33; /数组中的量snake10=32;snake20=31;snake01=30;snake11=30;snake21=30;snake_flag=0x10;drawRowLine(0,0,63,1);/横线drawRowLine(0,63,63,1);drawCollumLine(0,0,63,1);/竖线drawCollumLine(63,0,63,1);putstrxy(8,0,score);/右框显示的内容printf_number(8,1,0);putstrxy(8,2,按退出键);putstrxy(8,3,退出);void snake_refresh() /刷新蛇uchar k;for(k=snake_len;k0;k-) snakek0=snakek-10; snakek1=snakek-11;void snake_run(void)uchar i;snake_refresh();switch(snake_flag4)case(0x08):if(snake01=1)gameover=1;elsesnake01-;break;case(0x04):if(snake01=62)gameover=1;elsesnake01+;break;case(0x02):if(snake00=1)gameover=1;elsesnake00-;break;case(0x01):if(snake00=62)gameover=1;else snake00+;break;default:break;for(i=(snake_len);i0;i-)if(snake00=snakei0)&(snake01=snakei1)gameover=1;break;if(!gameover)if(snake00=snake_food0)&(snake01=snake_food1)food=0;snake_len+;no_counter+;marker=no_counter*100;printf_number(8,1,marker);else drawPoint(snakesnake_len0,snakesnake_len1,0);drawPoint(snake00,snake01,1);if(no_counter14)gameover=1;void snake_game(void)uchar key_code;charlcdfill( ); /显示清屏putstrxy(4,0, );putstrxy(4,1,贪吃蛇);putstrxy(4,2,by余世安);putstrxy(2,3,按任意键开始);while(getkey()=0);charlcdfill( ); /显示清屏snake_init(); /初始化doif(!food) set_food();/设置食物key_code=getkey();/判断按键switch(key_code)case 0:break;case up:if(snake_flag&0xf0)=0x40)break;snake_flag=(snake_flag&0x0f)|0x80;break;case down:if(snake_flag&0xf0)=0x80)break;snake_flag=(snake_flag&0x0f)|0x40;break;case left:if(snake_flag&0xf0)=0x10)break;snake_flag=(snake_flag&0x0f)|0x20;break;case right:if(snake_flag&0xf0)=0x20)break;snake_flag=(snake_flag&0x0f)|0x10;break;case quit:charlcdfill( ); /显示清屏return;default:break;snake_run(); /游戏进行delayms(10); /游戏速度if(gameover&(no_counter!=15)charlcdfill( );glcdfill(0);putstrxy(4,1,GAME OVER);putstrxy(0,3,按任意键重新开始);while(getkey()=0);return;if(gameover&(no_counter=15)charlcdfill( );glcdfill(0);putstrxy(0,1,Congratulation!);putstrxy(0,3,按任意键重新开始);while(getkey()=0);return; while(1
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 深基坑支护及现浇地下综合管廊结构综合施工组织设计(新技术)
- Boc-DODA-生命科学试剂-MCE
- 贵州国企招聘2025成黔集团高校毕业生招聘36人(一)笔试参考题库附带答案详解
- 浙江国企招聘2025浙江青嘉建设有限公司(国有控股企业)招聘5人笔试参考题库附带答案详解
- 保留灌肠操作护理
- 浙江国企招聘2025中国人寿保险股份有限公司宁波市分公司社会招聘9人笔试参考题库附带答案详解
- 2025重庆市设计院有限公司招聘29人笔试参考题库附带答案详解
- 2025西安寰宇卫星测控与数据应用有限公司招聘(5人)笔试参考题库附带答案详解
- 2025福建晟峵新能源发展有限公司招聘6人笔试参考题库附带答案详解
- 2025年晋江市新佳园物业发展有限公司招聘项目制工作人员14人笔试参考题库附带答案详解
- 《探究杠杆的平衡条件》说课稿(全国实验说课大赛获奖案例)
- 燃气设备维修保养合同范本
- 2024年江西省初中学业水平考试数学试题卷
- 海南红塔卷烟有限责任公司招聘考试试题及答案
- 七年级数学人教版下册第二单元测试卷-实数
- 2024年海南省财金集团有限公司招聘笔试冲刺题(带答案解析)
- SYT5405-2019酸化用缓蚀剂性能试验方法及评价指标
- 固体表面的吸附
- 内镜下内痔套扎治疗
- (正式版)JBT 14581-2024 阀门用弹簧蓄能密封圈
- 医疗器械销售公司介绍
评论
0/150
提交评论