100分求千行C语言程序源代码

俄罗斯方块，有你的名字：

#include <stdio.h>

#include <dos.h>

#include <conio.h>

#include <graphics.h>

#include <stdlib.h>

#include <time.h>

#include <math.h>

#ifdef __cplusplus

#define __CPPARGS ...

#else

#define __CPPARGS

#endif

#define MINBOXSIZE 23

#define BGCOLOR 7

#define GX 200

#define GY 10

#define SJNUM 1000

#define VK_LEFT 0x4b00

#define VK_RIGHT 0x4d00

#define VK_DOWN 0x5000

#define VK_UP 0x4800

#define VK_HOME 0x4700

#define VK_END 0x4f00

#define VK_SPACE 0x3920

#define VK_ESC 0x011b

#define VK_ENTER 0x1c0d

#define F_DONG 0

#define F_NAN 1

#define F_XI 2

#define F_BEI 3

#define NEXTCOL 20

#define NEXTROW 12

#define MAXROW 14

#define MAXCOL 20

#define SCCOL -16

#define SCROW -16

int gril[22][16];

int col=1,row=7;

int boxfx=0,boxgs=0;

int nextboxfx=0,nextboxgs=0,maxcol=22;

int minboxcolor=6,nextminboxcolor=6;

int num=0;

int dj=0,gamedj[10]={18,16,14,12,10,8,6,4,2,1};

int boxstr[7][4][16]={{

{1,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0},

{0,1,0,0,1,1,0,0,1,0,0,0,0,0,0,0},

{1,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0},

{0,1,0,0,1,1,0,0,1,0,0,0,0,0,0,0}},

{

{0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0},

{1,0,0,0,1,1,0,0,0,1,0,0,0,0,0,0},

{0,1,1,0,1,1,0,0,0,0,0,0,0,0,0,0},

{1,0,0,0,1,1,0,0,0,1,0,0,0,0,0,0}},

{

{1,1,0,0,0,1,0,0,0,1,0,0,0,0,0,0},

{1,1,1,0,1,0,0,0,0,0,0,0,0,0,0,0},

{1,0,0,0,1,0,0,0,1,1,0,0,0,0,0,0},

{0,0,1,0,1,1,1,0,0,0,0,0,0,0,0,0}},

{

{1,1,0,0,1,0,0,0,1,0,0,0,0,0,0,0},

{1,0,0,0,1,1,1,0,0,0,0,0,0,0,0,0},

{0,1,0,0,0,1,0,0,1,1,0,0,0,0,0,0},

{1,1,1,0,0,0,1,0,0,0,0,0,0,0,0,0}},

{

{0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0},

{0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0},

{0,1,0,0,0,1,0,0,0,1,0,0,0,1,0,0},

{0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0}},

{

{1,1,0,0,1,1,0,0,0,0,0,0.0,0,0,0},

{1,1,0,0,1,1,0,0,0,0,0,0.0,0,0,0},

{1,1,0,0,1,1,0,0,0,0,0,0.0,0,0,0},

{1,1,0,0,1,1,0,0,0,0,0,0.0,0,0,0}},

{

{0,0,0,0,1,1,1,0,0,1,0,0,0,0,0,0},

{1,0,0,0,1,1,0,0,1,0,0,0,0,0,0,0},

{0,1,0,0,1,1,1,0,0,0,0,0.0,0,0,0},

{0,1,0,0,1,1,0,0,0,1,0,0,0,0,0,0}}

};

void boxrad()

{

minboxcolor=nextminboxcolor;

boxgs=nextboxgs;

boxfx=nextboxfx;

srand(time(0));

nextminboxcolor=rand()%14+1;

if(nextminboxcolor==1||nextminboxcolor==7||nextminboxcolor==8)

nextminboxcolor=14;

nextboxfx=F_DONG;

srand(time(0));

nextboxgs=rand()%7;

}

void init(int gdrive,int gmode){

int errorcode;

initgraph(&gdrive,&gmode,"..bgi");

errorcode=graphresult();

if(errorcode!=grOk){

printf("error of: %s",grapherrormsg(errorcode));

exit(1);

}

}

void f24(int x,int y)

{

static int flag=0;

int i,j,m,k;

int n;

int a[2][66]={{0x00,0x00,0x00,0x00,0x30,0x00,

0x00,0x30,0x00,0x00,0x30,0x00,0x00,0x30,

0x00,0x00,0x30,0xF0,0x04,0x30,0x78,0x0C,

0x30,0x18,0x0C,0x31,0x00,0x0C,0x31,0x80,

0x0C,0x33,0x80,0x0C,0x13,0x00,0x08,0x07,

0x00,0x00,0x06,0x00,0x00,0x0C,0x00,0x00,

0x18,0x00,0x00,0x38,0x00,0x00,0x60,0x00,

0x01,0xC0,0x00,0x03,0x80,0x00,0x0E,0x00,

0x00,0x38,0x00,0x00},

{0x01,0x80,0x00,0x03,0x80,0x00,

0x07,0x06,0x00,0x2E,0x1F,0x00,0x38,0x76,

0x00,0x33,0x66,0x1E,0x13,0x7F,0xFE,0x13,

0x76,0xC6,0x13,0x64,0xC6,0x13,0x7C,0x86,

0x17,0x60,0xBC,0x3F,0x6C,0x9C,0x33,0x6E,

0x8C,0x32,0x7E,0x80,0x06,0xF0,0x80,0x06,

0x60,0x80,0x0C,0x00,0x80,0x0C,0x00,0x80,

0x18,0x00,0x80,0x10,0x00,0x80,0x00,0x00,

0x80,0x00,0x00,0x80} };

flag=(++flag)%2;

for(i=0;i<66;i+=3)

for(k=i;k<i+3;k++)

for(j=0;j<8;j++)

{

n=pow(2,7-j);

m=a[flag][k]/n;

a[flag][k]=a[flag][k]%n;

if(m&&(j+(k-i)*8)!=24&&(j+(k-i)*8)!=23&&(j+(k-i)*8)!=0)

putpixel(x+j+(k-i)*8,y+i/3,1);

}

}

void cls()

{

setfillstyle(SOLID_FILL,0);

setcolor(0);

bar(0,0,640,480);

}

void clscr(int a,int b,int c,int d,int color){

setfillstyle(SOLID_FILL,color);

setcolor(color);

bar(a,b,c,d);

}

void minbox(int asc,int bsc,int color,int bdcolor){

int a=0,b=0;

a=SCCOL+asc;

b=SCROW+bsc;

clscr(a+1,b+1,a-1+MINBOXSIZE,b-1+MINBOXSIZE,color);

if(color!=BGCOLOR){

f24(a,b+1);

setcolor(bdcolor);

line(a+1,b+1,a-1+MINBOXSIZE,b+1);

line(a+1,b+1,a+1,b-1+MINBOXSIZE);

line(a-1+MINBOXSIZE,b+1,a-1+MINBOXSIZE,b-1+MINBOXSIZE);

line(a+1,b-1+MINBOXSIZE,a-1+MINBOXSIZE,b-1+MINBOXSIZE);

}

}

void txt(int a,int b,char *txt,int font,int color){

setcolor(color);

settextstyle(0,0,font);

outtextxy(a,b,txt);

}

void win(int a,int b,int c,int d,int bgcolor,int bordercolor){

clscr(a,b,c,d,bgcolor);

setcolor(bordercolor);

line(a,b,c,b);

line(a,b,a,d);

line(a,d,c,d);

line(c,b,c,d);

}

void funbox(int a,int b,int color,int bdcolor){

int i,j;

int boxz[4][4];

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

boxz[i/4][i%4]=boxstr[boxgs][boxfx][i];

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

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

if(boxz[i][j]==1)

minbox((j+row+a)*MINBOXSIZE,(i+col+b)*MINBOXSIZE,color,bdcolor);

}

void nextfunbox(int a,int b,int color,int bdcolor){

int i,j;

int boxz[4][4];

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

boxz[i/4][i%4]=boxstr[nextboxgs][nextboxfx][i];

clscr((a-1)*MINBOXSIZE,(b-1)*MINBOXSIZE,(3+a)*MINBOXSIZE,(4+b)*MINBOXSIZE,2);

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

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

if(boxz[i][j]==1)

minbox((j+a)*MINBOXSIZE,(i+b)*MINBOXSIZE,color,bdcolor);

}

#define TIMER 0x1c

int TimerCounter=0;

void interrupt ( *oldhandler)(__CPPARGS);

void interrupt newhandler(__CPPARGS){

TimerCounter++;

oldhandler();

}

void SetTimer(void interrupt (*IntProc)(__CPPARGS)){

oldhandler=getvect(TIMER);

disable();

setvect(TIMER,IntProc);

enable();

}

void delcol(int a){

int i,j;

for(i=a;i>1;i--)

for(j=1;j<15;j++){

minbox(j*MINBOXSIZE,i*MINBOXSIZE,BGCOLOR,BGCOLOR);

gril[i][j]=gril[i-1][j];

if(gril[i][j]==1)

minbox(j*MINBOXSIZE,i*MINBOXSIZE,minboxcolor,0);

}

}

void delete(){

int i,j,zero,delgx=0;

char *nm="00000";

for(i=1;i<21;i++){

zero=0;

for(j=1;j<15;j++)

if(gril[i][j]==0)

zero=1;

if(zero==0){

delcol(i);

delgx++;

}

}

num=num+delgx*delgx*10;

dj=num/10000;

sprintf(nm,"%d",num);

clscr(456,173,500,200,2);

txt(456,173,"Score :",1,4);

txt(456,193,nm,1,4);

}

void KillTimer(){

disable();

setvect(TIMER,oldhandler);

enable();

}

int downok(){

int i,j,k=1,a[4][4];

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

a[i/4][i%4]=boxstr[boxgs][boxfx][i];

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

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

if(a[i][j] && gril[col+i+1][row+j])

k=0;

return(k);

}

int leftok(){

int i,j,k=1,a[4][4];

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

a[i/4][i%4]=boxstr[boxgs][boxfx][i];

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

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

if(a[i][j] && gril[col+i][row+j-1])

k=0;

return(k);

}

int rightok(){

int i,j,k=1,a[4][4];

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

a[i/4][i%4]=boxstr[boxgs][boxfx][i];

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

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

if(a[i][j] && gril[col+i][row+j+1])

k=0;

return(k);

}

int upok(){

int i,j,k=1,a[4][4];

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

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

a[i/4][i%4]=boxstr[boxgs][boxfx+1][i];

for(i=3;i>=0;i--)

for(j=3;j>=0;j--)

if(a[i][j] && gril[col+i][row+j])

k=0;

return(k);

}

void setgril(){

int i,j,a[4][4];

funbox(0,0,minboxcolor,0);

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

a[i/4][i%4]=boxstr[boxgs][boxfx][i];

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

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

if(a[i][j])

gril[col+i][row+j]=1;

col=1;row=7;

}

void gameover(){

int i,j;

for(i=20;i>0;i--)

for(j=1;j<15;j++)

minbox(j*MINBOXSIZE,i*MINBOXSIZE,2,0);

txt(56,206,"Game Over",4,0);

txt(53,203,"Game Over",4,4);

}

void call_key(int keyx){

switch(keyx){

case VK_DOWN: {

if(downok()){

col++;

funbox(0,0,minboxcolor,0);}

else{

funbox(0,0,minboxcolor,0);

setgril();

nextfunbox(NEXTCOL,NEXTROW,4,4);

boxrad();

nextfunbox(NEXTCOL,NEXTROW,nextminboxcolor,0);

delete();

}

break;

}

case VK_UP: {

if(upok())

boxfx++;

if(boxfx>3)

boxfx=0;

funbox(0,0,minboxcolor,0);

break;

}

case VK_LEFT:{

if(leftok())

row--;

funbox(0,0,minboxcolor,0);

break;

}

case VK_RIGHT:{

if(rightok())

row++;

funbox(0,0,minboxcolor,0);

break;

}

case VK_SPACE:

while(downok())

col++;

funbox(0,0,minboxcolor,0);

setgril();

nextfunbox(NEXTCOL,NEXTROW,4,4);

boxrad();

nextfunbox(NEXTCOL,NEXTROW,nextminboxcolor,0);

delete();

break;

default:

{

txt(423,53,"worng key!",1,4);

txt(428,80,"Plese Enter Anly Key AG!",1,4);

getch();

clscr(420,50,622,97,2);

}

}

}

void timezd(void){

int key;

SetTimer(newhandler);

boxrad();

nextfunbox(NEXTCOL,NEXTROW,nextminboxcolor,0);

for(;;){

if(bioskey(1)){

key=bioskey(0);

funbox(0,0,BGCOLOR,BGCOLOR);

if(key==VK_ESC)

break;

call_key(key);

}

if(TimerCounter>gamedj[dj]){

TimerCounter=0;

if(downok()){

funbox(0,0,BGCOLOR,BGCOLOR);

col++;

funbox(0,0,minboxcolor,0);

}

else {

if(col==1){

gameover();

getch();

break;

}

setgril();

delete();

funbox(0,0,minboxcolor,0);

col=1;row=7;

funbox(0,0,BGCOLOR,BGCOLOR);

nextfunbox(NEXTCOL,NEXTROW,4,4);

boxrad();

nextfunbox(NEXTCOL,NEXTROW,nextminboxcolor,0);

}

}

}

}

void main(void){

int i,j;

char *nm="00000";

init(VGA,VGAHI);

cls();

for(i=0;i<=MAXCOL+1;i++)

for(j=0;j<=MAXROW+1;j++)

gril[i][j]=0;

for(i=0;i<=MAXCOL+1;i++) {

gril[i][0]=1;

gril[i][15]=1;

}

for(j=1;j<=MAXROW;j++){

gril[0][j]=1;

gril[21][j]=1;

}

clscr(0,0,640,480,15);

win(1,1,639,479,2,15);

win(SCCOL+MINBOXSIZE-2,SCROW+MINBOXSIZE-2,SCCOL+15*MINBOXSIZE+2,SCROW+21*MINBOXSIZE+2,BGCOLOR,0);

srand(time(0));

nextboxgs=rand()%7;

nextboxfx=rand()%4;

sprintf(nm,"%d",num);

txt(456,173,"Score :",1,4);

txt(456,193,nm,1,4);

txt(456,243,"Next Box:",1,4);

timezd();

KillTimer();

closegraph();

}

源程序即是源码，源码就是指编写的最原始程序的代码。运行的软件是要经过编写的，程序员编写程序的过程中需要他们的“语言”。音乐家用五线谱，建筑师用图纸，那程序员的工作的语言就是“源码”了。人们平时使用软件时就是程序把“源码”翻译成我们可直观的形式表现出来供我们使用的。任何一个网站页面，换成源码就是一堆按一定格式书写的文字和符号，但我们的浏览器帮我们翻译成眼前的模样了。

1.计算机里面运行的所有东西都是用程序编出来的(包括操作系统,如Windows,还有Word等,网络游戏也一样),而编写程序要用到计算机语言,用计算机语言直接编出来的程序就叫源码,比如用VisualBasic编写的源码文件一般为.bas文件，而用C++编写的一般为.cpp文件，源代码不能直接在Windows下运行，必须编译后才能运行。源码经过编译处理后就可以直接在操作系统下运行了。

2.很多的站长都喜欢使用建网站的程序源码，因为可以很方便的修改，对于任何一个seo人员来说，都是非常好的一个切入点。

3.从字面意义上来讲,源文件是指一个文件,指源代码的集合.源代码则是一组具有特定意义的可以实现特定功能的字符(程序开发代码)。

4.“源代码”在大多数时候等于“源文件”。