C语言写俄罗斯方块源码——————【Badboy】

#include <graphics.h>

#include <stdio.h>

#include <stdlib.h>

char x,y,ty,ty1,zhuan,line1=0,line2=0,ss[16],hol[10][29]={0},a[4][2]={0};

int score1=0,speed=1000;

void unit(char,char,char); void dl(int);

void block(char); void fuzi(char,char);

void up(void); void down(void);

void left(void); void right(void);

char fx(char,char,char); char fy(char,char,char);

char max1(char,char,char); char min1(char,char,char);

void score(void); void xiao(void);

void save(void);

main()

{

char cycy=0,i,j,b,ci;

initgraph(VGA,VGAHI,"c://tc//egavga.bgi");

getch();

setfillstyle(1,7);

setcolor(7);

bar(200,10,350,430);

setcolor(15);rectangle(198,8,352,432);

x=4;ty=0;zhuan=0;y=1;

do

{

fuzi(ty,zhuan);

block(14);

score();

for(ci=0;ci<10;ci++)

{

if(kbhit()!=0)

b=getch();

else

b=0;

if(b==13)

break;

switch(b)

{

case 72: up(); break;

case 75: left(); break;

case 77: right(); break;

case 80: down(); break;

}

dl(speed/2);

}

j=max1(a[3][1],a[1][1],a[2][1]);

if((j>=27)||(hol[a[0][0]][a[0][1]+1]+hol[a[1][0]][a[1][1]+1]+hol[a[2][0]][a[2][1]+1]+hol[a[3][0]][a[3][1]+1]

>=1))

{

hol[a[0][0]][a[0][1]]=1;hol[a[1][0]][a[1][1]]=1;

hol[a[2][0]][a[2][1]]=1;hol[a[3][0]][a[3][1]]=1;

y=2;

x=5;



do

{

randomize();

ty1=random(100);

ty1%=7;

if(ty1==0)

ty1=7;

}

while(ty==ty1);

ty=ty1;

j=0;

xiao();

}

else

{

block(0);

y++;

}

for(i=0;i<10;i++)

if(hol[i][0]==1)

{

cycy=1;

getch();

break;

}

if(cycy==1)

{

cycy=0;

break;

}

}

while(b!=13);

getch();

closegraph();

save();

getch();

}

void unit(char x,char y,char color)

{

setfillstyle(1,color);

setcolor(color);

bar(200+x*15,10+y*15,200+(x+1)*15-2,10+(y+1)*15-2);

}

void block(char color)

{

char i,t;

for(i=0;i<4;i++)

unit(a[i][0],a[i][1],color);

}

void dl(int a)

{

int r,n;

for(r=0;r<a;r++)

for(n=0;n<30000;n++)

{

n++;

n--;

}

}

char fx(char x0,char y0,char n)

{

char x1,x2,y1,y2;

x1=y0+x-y;

y1=x+y-x0;

if(n==0)

return(x0);

if(n==1)

return(x1);

if(n>=2)

{

x2=y1+x-y;

y2=x+y-x1;

if(n==2)

return(x2);

else

{

x1=y2+x-y;

y1=x+y-x2;

if(n==3)

return(x1);

}

}

}

char fy(char x0,char y0,char n)

{

char x1,x2,y1,y2;

x1=y0+x-y;

y1=x+y-x0;

if(n==0)

return(y0);

if(n==1)

return(y1);

if(n>=2)

{

x2=y1+x-y;

y2=x+y-x1;

if(n==2)

return(y2);

else

{

x1=y2+x-y;

y1=x+y-x2;

if(n==3)

return(y1);

}

}

}

void left()

{

char j;

fuzi(ty,zhuan);

block(0);

j=min1(a[3][0],a[1][0],a[2][0]);

if((j>=1)&&(hol[a[0][0]-1][a[0][1]]==0)&&(hol[a[1][0]-1][a[1][1]]==0)&&(hol[a[2][0]-1][a[2][1]]==0)&&(hol[a[3][0]-1]

[a[3][1]]==0))

{

j--;

x--;

}

fuzi(ty,zhuan);

block(14);

}

void right()

{

char j;

fuzi(ty,zhuan);

block(0);

j=max1(a[3][0],a[1][0],a[2][0]);

if((j<9)&&(hol[a[0][0]+1][a[0][1]]==0)&&(hol[a[1][0]+1][a[1][1]]==0)&&(hol[a[2][0]+1][a[2][1]]==0)&&(hol[a[3][0]+1]

[a[3][1]]==0))

{

j++;

x++;

}

fuzi(ty,zhuan);

block(14);

}

void fuzi(char n,char zhuan)

{

a[0][0]=x;

a[0][1]=y;

n=n%7;

if(n==0)

n=7;

zhuan=zhuan%4;

switch (n)

{

case 1: a[1][0]=fx(x-1,y,zhuan);a[1][1]=fy(x-1,y,zhuan);

a[2][0]=fx(x,y+1,zhuan);a[2][1]=fy(x,y+1,zhuan);

a[3][0]=fx(x,y+2,zhuan);a[3][1]=fy(x,y+2,zhuan);

break;

case 2: a[1][0]=fx(x-1,y,zhuan);a[1][1]=fy(x-1,y,zhuan);

a[2][0]=fx(x,y-1,zhuan);a[2][1]=fy(x,y-1,zhuan);

a[3][0]=fx(x,y-2,zhuan);a[3][1]=fy(x,y-2,zhuan);

break;

case 3: a[1][0]=fx(x-1,y-1,zhuan);a[1][1]=fy(x-1,y-1,zhuan);

a[2][0]=fx(x,y+1,zhuan);a[2][1]=fy(x,y+1,zhuan);

a[3][0]=fx(x-1,y,zhuan);a[3][1]=fy(x-1,y,zhuan);

break;

case 4: a[1][0]=fx(x-1,y,zhuan);a[1][1]=fy(x-1,y,zhuan);

a[2][0]=fx(x-1,y+1,zhuan);a[2][1]=fy(x-1,y+1,zhuan);

a[3][0]=fx(x,y-1,zhuan);a[3][1]=fy(x,y-1,zhuan);

break;

case 5: a[1][0]=fx(x-1,y,zhuan);a[1][1]=fy(x-1,y,zhuan);

a[2][0]=fx(x,y-1,zhuan);a[2][1]=fy(x,y-1,zhuan);

a[3][0]=fx(x,y+1,zhuan);a[3][1]=fy(x,y+1,zhuan);

break;

case 6: a[1][0]=fx(x,y+1,zhuan);a[1][1]=fy(x,y+1,zhuan);

a[2][0]=fx(x,y-1,zhuan);a[2][1]=fy(x,y-1,zhuan);

a[3][0]=fx(x,y-2,zhuan);a[3][1]=fy(x,y-2,zhuan);

break;

case 7: a[1][0]=fx(x-1,y,zhuan);a[1][1]=fy(x-1,y,zhuan);

a[2][0]=fx(x,y-1,zhuan);a[2][1]=fy(x,y-1,zhuan);

a[3][0]=fx(x-1,y-1,zhuan);a[3][1]=fy(x-1,y-1,zhuan);

break;

}

}

void up()

{

char j,k;

fuzi(ty,zhuan);

block(0);

zhuan++;

zhuan=zhuan%4;

fuzi(ty,zhuan);

j=min1(a[3][0],a[1][0],a[2][0]);

k=max1(a[3][0],a[1][0],a[2][0]);

if((k<=9)&&(j>=0))

{

if((hol[a[0][0]][a[0][1]]==0)&&(hol[a[1][0]][a[1][1]]==0)&&(hol[a[2][0]][a[2][1]]==0)&&(hol[a[3][0]][a[3]

[1]]==0))

block(14);

else

{

zhuan+=3;

zhuan%=4;

fuzi(ty,zhuan);

block(14);

}

}

else

{

zhuan+=3;

zhuan%=4;

fuzi(ty,zhuan);

block(14);

}

}

void down(void)

{

char j,cy=0;

fuzi(ty,zhuan);

block(0);

j=max1(a[3][1],a[2][1],a[1][1]);

while(j<28)

{

j=max1(a[3][1],a[1][1],a[2][1]);

if((j>=27)||(hol[a[0][0]][a[0][1]+1]==1)||(hol[a[1][0]][a[1][1]+1]==1)||(hol[a[2][0]][a[2][1]+1]==1)||(hol[a

[3][0]][a[3][1]+1]==1))

{

hol[a[0][0]][a[0][1]]=1;

hol[a[1][0]][a[1][1]]=1;

hol[a[2][0]][a[2][1]]=1;

hol[a[3][0]][a[3][1]]=1;

block(14);

xiao();

y=2;

x=5;

do

{

randomize();

ty1=random(100);

ty1%=7;

if(ty1==0)

ty1=7;

}

while(ty1==ty);

ty=ty1;

j=0;

fuzi(ty,zhuan);

block(14);

cy=1;

}

else

{

dl(speed/4);

fuzi(ty,zhuan);

block(0);

y++;

}

if(cy==1)

{

cy=0;

break;

}

fuzi(ty,zhuan);

block(14);

}

}

void xiao(void)

{

char jj,y1,r,x1,y2;

for(jj=0;jj<4;jj++)

{

for(y1=27;y1>0;y1--)

{

r=0;

for(x1=0;x1<10;x1++)

{

if(hol[x1][y1]==1)

r++;

}

if(r==10)

{

line1++;

for(x1=0;x1<10;x1++)

{

unit(x1,y1,0);

hol[x1][y1]=0;

}

for(y2=y1-1;y2>0;y2--)

{

for(x1=0;x1<10;x1++)

{

if(hol[x1][y2]==1)

{

hol[x1][y2]=0;

unit(x1,y2,0);

unit(x1,y2+1,14);

hol[x1][y2+1]=1;

}

}

}

}

}

}

}

char max1(char a,char b,char c)

{

char max3;

if(a>=b)

max3=a;

else

max3=b;

if(max3<c)

max3=c;

return(max3);

}

char min1(char a,char b,char c)

{

char min;

if(a<=b)

min=a;

else

min=b;



if(min>c)

min=c;

return(min);

}

void score(void)

{

char a,b=1;

setcolor(0);

outtextxy(20,20,ss);

setcolor(14);

for(a=0;a<line1-line2;a++)

b*=2;

score1+=b-1;

if(b>1)

speed-=2;

line2=line1;

sprintf(ss,"Your score:%d.",score1);

outtextxy(20,20,ss);

}

void save(void)

{

FILE * fp;

int i;

i=0;

fp=fopen("bloscore.txt","rb+");

i=(int)(fgetc(fp))-48;

if(fp=NULL)

i=0;

fclose(fp);

if(i<score1)

{

fp=fopen("bloscore.txt","wb+");

fprintf(fp,"%d",score1);

fclose(fp);

printf("Your score: %d are the highest!",score1);

}

getch();

}