俄罗斯方块C语言代码多少行(俄罗斯方块c语言代码)
大家好,飞飞今天来为大家解答以下的问题,关于俄罗斯方块C语言代码多少行,俄罗斯方块c语言代码这个很多人还不知道,那么下面让我带着大家一起来看看吧!
1、俄罗斯方块C源代码#include
2、游戏等级、得分和游戏速度int flag,next; //当前要操作的方块类型序号,下一个方块类型序号void gtxy(int m, int n); //以下声明要用到的自编函数void gflag( ); //获得下一方块序号void csh( ); //初始化界面void start( ); //开始部分void prfk ( ); //打印方块void clfk( ); //清除方块void mkfk( ); //制作方块void keyD( ); //按键操作int ifmov( ); //判断方块能否移动或变体void clHA( ); //清除满行的方块void clNEXT( ); //清除边框外的NEXT方块int main( ){ csh( ); while(1) {start( ); //开始部分 while(1) { prfk( ); Sleep(speed); //延时 clfk( ); Tb=x;Tc=flag; //临存当前x坐标和序号,以备撤销操作 keyD( ); y++; //方块向下移动 if (ifmov( )==0) { y--; prfk( ); dlHA( ); break;} //不可动放下,删行,跨出循环 } for(i=y-2;i 3、将下一方块序号临时操作 x=ZL+WID+6; y=ZL+10; prfk( ); //给x,y赋值,在框外打印出下一方块 flag=Ta; x=ZL+WID/2; y=ZL-1; //取回当前方块序号,并给x,y赋值}void prfk ( ) //打印俄罗斯方块{ for(i=0;i<4;i++) {b[i]=1; } //数组b[4]每个元素的值都为1 mkfk ( ); //制作俄罗斯方块 for( i= x-2; i<=x+4; i+=2 ) //打印方块 { for(j=y-2;j<= y+1;j++) { if( a[i][j]==1 && j>ZL ){ gtxy(i,j); printf("□"); } } } gtxy(ZL+WID+3,ZL+1); printf("level : %d",level); //以下打印菜单信息 gtxy(ZL+WID+3,ZL+3); printf("score : %d",score); gtxy(ZL+WID+3,ZL+5); printf("speed : %d",speed);}void clfk( ) //清除俄罗斯方块{ for(i=0;i<4;i++) { b[i]=0; } //数组b[4]每个元素的值都为0 mkfk ( ); //制作俄罗斯方块 for( i=x-2; i<=x+4; i+=2 ) //清除方块 { for(j=y-2;j<=y+1;j++){ if( a[i][j]==0 && j>ZL ){ gtxy(i,j); printf(" "); } } }}void mkfk( ) //制作俄罗斯方块{ a[x][ y]=b[0]; //方块中心位置状态: 1-有,0-无 switch(flag) //共6大类。 4、19种小类型 { case 1: { a[x][y-1]=b[1]; a[x+2][y-1]=b[2]; a[x+2][y]=b[3]; break; } //田字方块 case 2: { a[x-2][y]=b[1]; a[x+2][y]=b[2]; a[x+4][y]=b[3]; break; } //直线方块:---- case 3: { a[x][y-1]=b[1]; a[x][y-2]=b[2]; a[x][y+1]=b[3]; break; } //直线方块: | case 4: { a[x-2][y]=b[1]; a[x+2][y]=b[2]; a[x][y+1]=b[3]; break; } //T字方块 case 5: { a[x][y-1]=b[1]; a[x][y+1]=b[2]; a[x-2][y]=b[3]; break; } //T字顺时针转90度 case 6: { a[x][y-1]=b[1]; a[x-2][y]=b[2]; a[x+2][y]=b[3]; break; } //T字顺转180度 case 7: { a[x][y-1]=b[1]; a[x][y+1]=b[2]; a[x+2][y]=b[3]; break; } //T字顺转270度 case 8: { a[x][y+1]=b[1]; a[x-2][y]=b[2]; a[x+2][y+1]=b[3]; break; } //Z字方块 case 9: { a[x][y-1]=b[1]; a[x-2][y]=b[2]; a[x-2][y+1]=b[3]; break; } //Z字顺转90度 case 10: { a[x][y-1]=b[1]; a[x-2][y-1]=b[2]; a[x+2][y]=b[3]; break; } //Z字顺转180度 case 11: { a[x][y+1]=b[1]; a[x+2][y-1]=b[2]; a[x+2][ y]=b[3]; break; } //Z字顺转270度 case 12: { a[x][y-1]=b[1]; a[x][y+1]=b[2]; a[x-2][y-1]=b[3]; break; } //7字方块 case 13: {a[x-2][y]=b[1]; a[x+2][y-1]=b[2]; a[x+2][y]=b[3]; break; } //7字顺转90度 case 14: { a[x][y-1]=b[1]; a[x][y+1]=b[2]; a[x+2][y+1]=b[3]; break; } //7字顺转180度 case 15: { a[x-2][y]=b[1]; a[x-2][y+1]=b[2]; a[x+2][y]=b[3]; break; } //7字顺转270度 case 16: { a[x][y+1]=b[1]; a[x][y-1]=b[2]; a[x+2][y-1]=b[3]; break; } //倒7字方块 case 17: { a[x-2][y]=b[1]; a[x+2][y+1]=b[2]; a[x+2][y]=b[3]; break; } //倒7字顺转90度 case 18: { a[x][y-1]=b[1]; a[x][y+1]=b[2]; a[x-2][y+1]=b[3]; break; } //倒7字顺转180度 case 19: { a[x-2][y]=b[1]; a[x-2][y-1]=b[2]; a[x+2][y]=b[3]; break; } //倒7字顺转270度 }}void keyD( ) //按键操作{ if (kbhit( )) { int key; key=getch(); if (key==224) { key=getch(); if (key==75) { x-=2; } //按下左方向键,中心横坐标减2 if (key==77) { x+=2; } //按下右方向键,中心横坐标加2 if (key==72) //按下向上方向键,方块变体 { if (flag>=2 && flag<=3 ) { flag++; flag%=2; flag+=2; } if ( flag>=4 && flag<=7 ) { flag++; flag%=4; flag+=4; } if (flag>=8 && flag<=11 ) { flag++; flag%=4; flag+=8; } if (flag>=12 && flag<=15 ) { flag++; flag%=4; flag+=12; } if ( flag>=16 && flag<=19 ) { flag++; flag%=4; flag+=16; } } } if (key==32) //按空格键。 5、暂停 { prfk( ); while(1) { if (getch( )==32) { clfk( );break;} } } //再按空格键,继续游戏 if (ifmov( )==0) { x=Tb; flag=Tc; } //如果不可动,撤销上面操作 else { prfk( ); Sleep(speed); clfk( ); Tb=x;Tc=flag;} //如果可动。 6、执行操作 }}int ifmov( ) //判断能否移动{ if (a[x][y]!=0) { return 0; } //方块中心处有图案返回0,不可移动 else{ if ( (flag==1 && ( a[x][ y-1]==0 && a[x+2][y-1]==0 && a[x+2][y]==0 ) ) || (flag==2 && ( a[x-2][y]==0 && a[x+2][y]==0 && a[x+4][y]==0 ) ) || (flag==3 && ( a[x][y-1]==0 && a[x][y-2]==0 && a[x][y+1]==0 ) ) || (flag==4 && ( a[x-2][y]==0 && a[x+2][y]==0 && a[x][y+1]==0 ) ) || (flag==5 && ( a[x][y-1]==0 && a[x][y+1]==0 && a[x-2][y]==0 ) ) || (flag==6 && ( a[x][ y-1]==0 && a[x-2][y]==0 && a[x+2][y]==0 ) ) || (flag==7 && ( a[x][y-1]==0 && a[x][y+1]==0 && a[x+2][y]==0 ) ) || (flag==8 && ( a[x][y+1]==0 && a[x-2][y]==0 && a[x+2][y+1]==0 ) ) || (flag==9 && ( a[x][y-1]==0 && a[x-2][y]==0 && a[x-2][y+1]==0 ) ) || (flag==10 && ( a[x][y-1]==0 && a[x-2][y-1]==0 && a[x+2][y]==0 ) ) || (flag==11 && ( a[x][y+1]==0 && a[x+2][y-1]==0 && a[x+2][y]==0 ) ) || (flag==12 && ( a[x][y-1]==0 && a[x][y+1]==0 && a[x-2][y-1]==0 ) ) || ( flag==13 && ( a[x-2][y]==0 && a[x+2][y-1]==0 && a[x+2][y]==0 ) ) || ( flag==14 && ( a[x][y-1]==0 && a[x][y+1]==0 && a[x+2][y+1]==0 ) ) || (flag==15 && ( a[x-2][y]==0 && a[x-2][y+1]==0 && a[x+2][y]==0 ) ) || (flag==16 && ( a[x][y+1]==0 && a[x][y-1]==0 && a[x+2][y-1]==0 ) ) || ( flag==17 && ( a[x-2][y]==0 && a[x+2][y+1]==0 && a[x+2][y]==0 ) ) || (flag==18 && ( a[x][y-1]==0 &&a[x][y+1]==0 && a[x-2][y+1]==0 ) ) || (flag==19 && ( a[x-2][y]==0 && a[x-2][y-1]==0 && a[x+2][y]==0 ) ) ) { return 1; } } return 0; //其它情况返回0}void clNEXT( ) //清除框外的NEXT方块{ flag = next; x=ZL+WID+6; y=ZL+10; clfk( ); }void clHA( ) //清除满行的方块{ int k, Hang=0; //k是某行方块个数, Hang是删除的方块行数 for(j=ZL+HEI-1;j>=ZL+1;j--) //当某行有WID/2-2个方块时,则为满行 { k=0; for(i=ZL+2;i 7、横坐标由左至右依次判断是否满行 { k++; //下面将操作删除行 if (k==WID/2-2) { for(k=ZL+2;k 8、得100分 if ( Hang>0 && (score%500==0 || score/500> level-1 ) ) //得分满500速度加快升一级 { speed-=20; level++; if(speed<200)speed+=20; } }。 本文分享完毕,希望对大家有所帮助哦。 免责声明:本文由用户上传,与本网站立场无关。财经信息仅供读者参考,并不构成投资建议。投资者据此操作,风险自担。 如有侵权请联系删除!
-
2025年6月20日,——在世界文化遗产地河南洛阳的光影流转之间,2025年新浪微博旅游之夜盛大举行。作为国内首个...浏览全文>>
-
2025年6月20日,——在世界文化遗产地河南洛阳的光影流转之间,2025年新浪微博旅游之夜盛大举行。作为国内首个...浏览全文>>
-
QQ多米试驾线下预约活动为了让更多用户感受QQ多米的独特魅力,我们特别推出了线下试驾预约活动。这不仅是一次...浏览全文>>
-
阜阳长安启源A07以其卓越的性能和豪华配置吸引了众多消费者的目光。作为一款定位高端市场的新能源车型,长安启...浏览全文>>
-
【安徽淮南大众CC新车报价2025款大公开】大众CC作为一款兼具运动感与豪华质感的轿跑车型,一直深受消费者喜爱...浏览全文>>
-
2025款长安猎手K50在安徽淮南地区的最新价格已新鲜出炉,为准备购车的朋友带来全面解析。这款车型以其高性价比...浏览全文>>
-
在安徽滁州购买长安猎手K50时,了解其落地价和省钱技巧至关重要。长安猎手K50是一款实用性强的皮卡车型,适合...浏览全文>>
-
途锐新能源是大众旗下的一款高端插电混动SUV,目前在安徽阜阳地区有售。其官方指导价约为58万元起,但实际成交...浏览全文>>
-
2025款大众CC作为一款兼具运动与豪华的中型轿车,备受关注。目前市场指导价大约在25万至35万元之间,具体价格...浏览全文>>
-
2024款探岳X作为一款备受关注的中型SUV,在市场上以其时尚的设计和出色的性能吸引了众多消费者。根据最新市场...浏览全文>>
- QQ多米试驾线下预约
- 安徽滁州长安猎手K50落地价,买车省钱秘籍
- 淮南大众CC新款价格2025款多少钱?买车攻略一网打尽
- 瑞虎8 PRO试驾,畅享豪华驾乘,体验卓越性能
- 安徽阜阳长安启源A05多少钱 2025款落地价,换代前的购车良机,不容错过
- 保时捷Macan试驾的流程是什么
- 安徽淮南大众ID.3多少钱?购车攻略在此
- 阜阳揽巡落地价,豪华配置超值价来袭
- 安徽池州威然 2024新款价格与配置的完美平衡
- 奇瑞瑞虎9试驾,新手必知的详细步骤
- QQ多米价格,换代前的购车良机,不容错过
- 池州迈腾GTE新款价格2022款多少钱?选车秘籍与优惠全公开
- 岚图追光多少钱 2024款落地价走势,近一个月最低售价25.28万起,性价比凸显
- 天津滨海威然 2024新款价格,最低售价28.98万起,入手正当时
- 蚌埠途昂新款价格2025款多少钱?购车必看
- 坦克400预约试驾全攻略
- 天津滨海ID.7 VIZZION价格,各配置车型售价全揭晓,性价比之王
- 安庆帕萨特最新价格2025款,最低售价12.35万起,入手正当时
- 亳州宝来新款价格2025款多少钱?选车指南与落地价全解析
- 生活家PHEV 2025新款价格,最低售价63.98万起现在该入手吗?