开发工具:
文件大小: 32kb
下载次数: 0
上传时间: 2008-12-23
详细说明：
查看文章 C语言写的俄罗斯方块 #include #include #include #define UP 0x4800 #define DOWN 0x5000 #define LEFT 0x4b00 #define RIGHT 0x4d00 #define ESC 0x011b #define SPACE 0x3920 int a[7][7],b[4][4]; initialize() { int driver,gmode; driver=VGA; gmode=VGAHI; initgraph(&driver,&gmode,""); } fangkuai(int x,int y) { int p[8]; x=x*20+10; y=y*20+10; p[0]=x;p[1]=y; p[2]=x+20;p[3]=y; p[4]=x+20;p[5]=y+20; p[6]=x;p[7]=y+20; setcolor(GREEN); setfillstyle(SOLID_FILL,DARKGRAY); fillpol y(4,p); drawpoly(4,p); } xiantiao(int wid,int deg,int x,int y,int z) { int i; setcolor(RED); if(deg==0) { for(i=0;i"); while(1) { key=bioskey(0); if(ESC==key) break; top=0; up=4; xm=ym=4; clr(15,10,19,14); drawall(15,10); bar(250,250,290,290); for(i=0;i<4;i++) for(j=0;j<4;j++) { itoa(b[ i][j],s,10); moveto(250+i*10,250+j*10); outtext(s); } for(i=0;i<4;i++) { count=0; for(j=0;j<4;j++) { if(b[ i][j]==0) count=count+1; } if(count==4) xm--; } for(j=0;j<4;j++) { count=0; for(i=0;i<4;i++) { if(b[ i][j]==0) count=count+1; } if(count==4) ym--; } for(i=0;i<4;i++) for(j=0;j<4;j++) if(b[ i][j]==1) fangkuai(up+i,top+j); while(1) { for(i=0;i<4;i++) for(j=0;j<4;j++) if(b[ i][j]==1&&c[up+i][top+j]==1) break; bar(400,100,520,310); for(i=0;i<12;i++) for(j=0;j<21;j++) { moveto(400+10*i,100+10*j); itoa(c[ i][j],s,10); outtext(s); } key=bioskey(0); if(ESC==key) break; if(LEFT==key) { count=0; for(j=0;j=0;i--) { if(b[ i][j]==1) break; } if(c[up+i+1][top+j]==1) break; else count=count+1; } if(count==ym) { clr(up,top,up+xm+1,top+ym); for(i=up+xm-1;i>=up;i--) for(j=top+ym-1;j>=top;j--) if(b[i-up][j-top]==1) { c[ i][j]=0; c[i+1][j]=1; } for(i=up;i<=up+xm;i++) for(j=top;ji) count=i; if(count1>j) count1=j; if(ym=0;j--) { if(b[ i][j]==1) break; } if(c[up+i][top+j+1]==1) break; else count=count+1; } if(count==xm) { clr(up,top,xm+up,top+ym+1); for(j=top+ym-1;j>=top;j--) for(i=up;i=0;count1--) for(j=1;j<11;j++) { if(count1==0) c[j][count1]=0; else c[j][count1]=c[j][count1-1]; } score++; bar(300,100,350,110); moveto(300,100); outtext(itoa(score,s,10)); setfillstyle(SOLID_FILL,LIGHTBLUE); bar(1*20+10,0,11*20+10,20*20+10); for(i=0;i<20;i++) for(j=1;j<11;j++) { if(c[j][ i]==1) fangkuai(j,i); } } } } } } } ...展开收缩
(系统自动生成,下载前可以参看下载内容)
下载文件列表
相关说明
- 本站资源为会员上传分享交流与学习,如有侵犯您的权益,请联系我们删除.
- 本站是交换下载平台，提供交流渠道，下载内容来自于网络，除下载问题外，其它问题请自行百度。
- 本站已设置防盗链，请勿用迅雷、QQ旋风等多线程下载软件下载资源，下载后用WinRAR最新版进行解压.
- 如果您发现内容无法下载，请稍后再次尝试；或者到消费记录里找到下载记录反馈给我们.
- 下载后发现下载的内容跟说明不相乎，请到消费记录里找到下载记录反馈给我们，经确认后退回积分.
- 如下载前有疑问，可以通过点击"提供者"的名字，查看对方的联系方式，联系对方咨询.
