俄罗斯方块代码—

用codeblock实现不了，缺少库函数，windows的kpi。555
现在还么解决办法，不过代码挺好的，贴吧大神多。
2017-5-2

#include<windows.h>
#include<time.h>
#include<stdlib.h>#define W 14 //游戏区域宽度
#define H 20 //游戏区域高度
#define W1 6 //右边状态栏宽度
#define BSIZE 25 //游戏方格边长
#define Y1 6 //放置照片的纵坐标
#define Y2 12 //分数显示栏顶端纵坐标
#define Y3 15 //等级显示栏顶端纵坐标
#define Y4 21 //帮助栏顶端纵坐标
#define Cur_x W/2-1 //游戏方块初始状态左上角横坐标
#define Cur_y 1 //初始状态左上角纵坐标
#define BgColor RGB(0xF5,0xF5,0xDC) //米色
#define FgColor RGB(255,153,204) //粉红
#define RED RGB(255,0,0)
#define ORANGE RGB(250,128,10)
#define YELLOW RGB(255,255,0)
#define GREEN RGB(0,255,0)
#define CYAN RGB(0,255,255)
#define LIGHT_BLUE RGB(0xA6,0xCA,0xF0) //天蓝色
#define PURPLE RGB(255,0,255)
#define MS_NEWBLOCK WM_USER+1  // 消息ID，产生新的【方块】int score=0,level=0,level_step=100; //分数等级以及每等级所需分数的定义及初始化
int top=H-1; //最顶端的纵坐标
int x,y; //方块当前位置的横坐标及纵坐标
int cur_boxnum,next_boxnum; //cur_boxnum是当前方块编号，next_boxnum是下一个方块编号struct BOARD
{int var; //状态，1代表已被占用，0代表未被占用int color; //颜色
}board[H][W]; //定义游戏主板，H行N列struct BLOCK
{int a[4][2]; //定义方块形状的数组int color; //方块颜色int next; //下一个方块的号码
};struct BLOCK block[19]=
{  //初始化各个游戏方块{1,1,1,2,1,3,2,3,RED,1},{0,2,1,2,2,2,0,3,RED,2},{0,1,1,1,1,2,1,3,RED,3},{2,1,0,2,1,2,2,2,RED,0},{1,1,1,2,0,3,1,3,ORANGE,5},{0,1,0,2,1,2,2,2,ORANGE,6},{1,1,2,1,1,2,1,3,ORANGE,7},{0,2,1,2,2,2,2,3,ORANGE,4},{1,1,0,2,1,2,2,2,YELLOW,9},{1,1,1,2,2,2,1,3,YELLOW,10},{0,2,1,2,2,2,1,3,YELLOW,11},{1,1,0,2,1,2,1,3,YELLOW,8},{1,1,1,2,2,2,2,3,GREEN,13},{1,2,2,2,0,3,1,3,GREEN,12},{2,1,1,2,2,2,1,3,CYAN,15},{0,2,1,2,1,3,2,3,CYAN,14},{1,0,1,1,1,2,1,3,LIGHT_BLUE,17},{0,2,1,2,2,2,3,2,LIGHT_BLUE,16},{1,1,2,1,1,2,2,2,PURPLE,18},
};void Paint(HDC hdc,HPEN hpen) //此函数用于初始化界面
{int i,j;HPEN hpen1; //定义画笔，用于绘制分隔线HBRUSH hbrush=CreateSolidBrush(BgColor); //定义画刷并赋初值，画刷颜色采用背景色hpen1=CreatePen(PS_DASHDOTDOT,3,FgColor); //给画笔赋初值，颜色为前景色，线宽为3，双点划线SelectObject(hdc,hpen1); //选择画笔MoveToEx(hdc,W*BSIZE,0,NULL); //将光标移动到(W*BSIZE,0)处LineTo(hdc,W*BSIZE,H*BSIZE); //从光标所在位置画线到(W*BSIZE,H*BSIZE)处DeleteObject(hpen1); //删除之前所选用的画笔SelectObject(hdc,hpen); //重新选择画笔SelectObject(hdc,hbrush); //选择画刷for(i=1;i<H-1;i++)  //绘制游戏区域方格线for(j=1;j<W-1;j++)Rectangle(hdc,j*BSIZE,i*BSIZE,(j+1)*BSIZE,(i+1)*BSIZE);for(i=1;i<5;i++)  //绘制右边状态栏游戏预览区域方格线for(j=W+1;j<W+W1-1;j++)Rectangle(hdc,j*BSIZE,i*BSIZE,(j+1)*BSIZE,(i+1)*BSIZE);Rectangle(hdc,(W+1)*BSIZE,Y2*BSIZE,(W+W1-1)*BSIZE,(Y2+2)*BSIZE); //绘制分数栏方格线Rectangle(hdc,(W+1)*BSIZE,Y3*BSIZE,(W+W1-1)*BSIZE,(Y3+2)*BSIZE); //绘制等级栏方格线Rectangle(hdc,(W+1)*BSIZE,Y4*BSIZE,(W+W1-1)*BSIZE,(Y4+4)*BSIZE); //绘制帮助栏方格线TextOut(hdc,(W+2)*BSIZE,(Y2+0.2)*BSIZE,"分    数",8); //输出文字TextOut(hdc,(W+2)*BSIZE,(Y3+0.2)*BSIZE,"等    级",8); //同上DeleteObject(hpen); //删除画笔DeleteObject(hbrush); //删除画刷
}void ShowScore(HDC hdc) //显示分数的函数
{char score_str[4]; //定义字符串用于保存分数值wsprintf(score_str,"%3d",score); //将数字score转换成字符串后保存到score_str之中TextOut(hdc,(W+2.5)*BSIZE,(Y2+1.2)*BSIZE,score_str,3); //在游戏板上显示分数
}void ShowLevel(HDC hdc) //显示等级的，具体同上
{char level_str[4];wsprintf(level_str,"%3d",level);TextOut(hdc,(W+2.5)*BSIZE,(Y3+1.2)*BSIZE,level_str,3);
}void ShowHelp(HDC hdc) //显示帮助的，该函数只在初始化界面时调用
{char help1[]="↑ - 旋转",help2[]="↓ - 下移",help3[]="← - 左移",help4[]="→ - 右移";TextOut(hdc,(W+1.8)*BSIZE,(Y4+0.2)*BSIZE,help1,9);TextOut(hdc,(W+1.8)*BSIZE,(Y4+1.2)*BSIZE,help2,9);TextOut(hdc,(W+1.8)*BSIZE,(Y4+2.2)*BSIZE,help3,9);TextOut(hdc,(W+1.8)*BSIZE,(Y4+3.2)*BSIZE,help4,9);
}void EraseBox(HDC hdc,HPEN hpen,int x,int y,int num) //清除(x,y)处编号为num，的方块
{int i;HBRUSH hbrush=CreateSolidBrush(BgColor);SelectObject(hdc,hpen);SelectObject(hdc,hbrush);for(i=0;i<4;i++)//用背景色填充方块所在区域，使方块隐藏Rectangle(hdc,(x+block[num].a[i][0])*BSIZE,(y+block[num].a[i][1])*BSIZE,(x+block[num].a[i][0]+1)*BSIZE,(y+block[num].a[i][1]+1)*BSIZE);DeleteObject(hpen);DeleteObject(hbrush);
}void ShowBox(HDC hdc,HPEN hpen,int x,int y,int num) //显示(x,y)处编号为num，的方块
{int i;HBRUSH hbrush;hbrush=CreateSolidBrush(block[num].color); //创建画刷，颜色和方块颜色相同SelectObject(hdc,hpen);SelectObject(hdc,hbrush);for(i=0;i<4;i++) //显示方块的过程Rectangle(hdc,(x+block[num].a[i][0])*BSIZE,(y+block[num].a[i][1])*BSIZE,(x+block[num].a[i][0]+1)*BSIZE,(y+block[num].a[i][1]+1)*BSIZE);DeleteObject(hpen);DeleteObject(hbrush);
}void SetFullRow(HDC hdc,HPEN hpen) //满行处理函数
{int i,ii,j;int org_top=top;int flag=0;HBRUSH hbrush;SelectObject(hdc,hpen);for(i=y;i<y+4;i++) //从y行开始，从上到下遍历游戏区域{if(i<=0||i>=H-1) continue; //越界了，就跳出本次循环for(j=1;j<W-1;j++)if(!board[i][j].var) break; //一旦该行有一个为空，即跳出if(j==W-1) //找到满行了{for(ii=i;ii>=top;ii--) //重置游戏区域各个方格的状态，top为最顶端，i为找到的满行for(j=1;j<W-1;j++)board[ii][j]=board[ii-1][j];top++;score+=10; //分数加10flag=1; //标志符}}if(flag) //如果有满行，则重绘主板{for(i=org_top;i<y+4;i++) //原来的最顶端{if(i<=0||i>=H-1) continue; //越界了，就跳出本次循环for(j=1;j<W-1;j++){ //注意这里绘制主板时，每次都要选择不同的画刷，用完后一定要删除hbrush=CreateSolidBrush(board[i][j].color);SelectObject(hdc,hbrush);Rectangle(hdc,j*BSIZE,i*BSIZE,(j+1)*BSIZE,(i+1)*BSIZE);DeleteObject(hbrush);}}if(level!=score/level_step) //这里是程序优化部分，也可省略level=score/level_step;ShowScore(hdc); //更新分数ShowLevel(hdc); //更新等级}DeleteObject(hpen);
}void ChangeVar(void) //改变游戏主板的状态
{int i;for(i=0;i<4;i++){board[y+block[cur_boxnum].a[i][1]][x+block[cur_boxnum].a[i][0]].var=1; //状态置1,表示有方块填充board[y+block[cur_boxnum].a[i][1]][x+block[cur_boxnum].a[i][0]].color=block[cur_boxnum].color;}
}BOOL CanMove(void) //判断方块是否能移动
{int i;for(i=0;i<4;i++)if(board[y+block[cur_boxnum].a[i][1]][x+block[cur_boxnum].a[i][0]].var) //如果该位置以及有方块填充，则不能移动return FALSE;return TRUE;
}LRESULT CALLBACK WndProc(HWND,UINT,WPARAM,LPARAM); //窗口过程函数的声明
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hprevInstance,PSTR szCmdLine,int iCmdShow) //入口函数，即主函数
{ //各个形参所代表的意思请自行查阅资料int screenwide,screenhight; //定义变量来保存屏幕宽度和高度char AppName[]="Tetris"; //定义并初始化窗口类名HWND hwnd; //定义窗口句柄MSG msg; //定义消息结构体WNDCLASSEX wndclass; //定义窗口类wndclass.cbSize=sizeof(wndclass); //窗口类大小wndclass.style=CS_HREDRAW|CS_VREDRAW; //窗口类风格wndclass.lpfnWndProc=WndProc; //窗口过程函数为WndProcwndclass.cbClsExtra=0; //窗口类无扩展wndclass.cbWndExtra=0; //窗口实例无扩展wndclass.hInstance=hInstance; //当前实例句柄为hInstancewndclass.hIcon=LoadIcon(NULL,IDI_APPLICATION); //采用默认图标wndclass.hCursor=LoadCursor(NULL,IDC_ARROW); //默认光标，光标进入窗口区域时，将显示为箭头wndclass.hbrBackground=CreateSolidBrush(BgColor); //窗口背景色wndclass.lpszMenuName=NULL; //窗口类无菜单wndclass.lpszClassName=AppName; //窗口类名wndclass.hIconSm=LoadIcon(NULL,IDI_APPLICATION); //采用默认小图标if(!RegisterClassEx(&wndclass)) //窗口类的注册{MessageBeep(0);return FALSE;}screenwide=GetSystemMetrics(SM_CXFULLSCREEN); //获取屏幕宽度，即横向分辨率screenhight=GetSystemMetrics(SM_CYFULLSCREEN); //获取屏幕高度hwnd=CreateWindow( //创建窗口AppName, //窗口类名"俄罗斯方块", //窗口实例标题名WS_OVERLAPPEDWINDOW,(screenwide-(W+W1)*BSIZE)/2, //窗口左上角横坐标(screenhight-H*BSIZE)/2, //左上角纵坐标(W+W1)*BSIZE, //窗口宽度(H+1)*BSIZE, //窗口高度，注意包含了标题栏NULL, //窗口无父窗口NULL, //窗口无住菜单hInstance, //当前应用程序实例句柄NULL //这个值一般置NULL，具体请自行查询);if(!hwnd) return FALSE; //创建失败则退出程序ShowWindow(hwnd,iCmdShow); //显示窗口UpdateWindow(hwnd); //刷新窗口MessageBox(hwnd," 峰哥哥制作","开始",MB_OK); //弹出框SetTimer(hwnd,1,500,NULL); //设置一个500毫秒触发一次的定时器，具体参数所代表意义请自行查询while(GetMessage(&msg,NULL,0,0)) //消息循环，用于从消息队列中获取消息{TranslateMessage(&msg);DispatchMessage(&msg);}return msg.wParam; //注意这一步不能少
}LRESULT CALLBACK WndProc(HWND hwnd,UINT iMsg,WPARAM wParam,LPARAM lParam)
{ //定义窗口过程函数int i,j;int old_boxnum; //用于保存之前的方块号HDC hdc; //定义DC句柄，DC里包含绘图默认的一些属性PAINTSTRUCT ps; //定义绘图结构，此结构包含的信息应用程序使用来绘制一个拥有该应用窗口客户区HPEN hpen=CreatePen(PS_SOLID,1,FgColor); //选择画刷，用背景色作画刷switch(iMsg) //消息处理的过程{case WM_CREATE: ////当一个应用程序使用函数CreateWindow或CreateWindowEx来创建一个窗口时，//系统将发送该消息给此新建窗口过程。该消息将在创建窗口之后，显示窗口//之前发送该消息，该消息将在CreateWindow或CreateWindowEx函数返回之前发送。for(i=1;i<H;i++) //初始化状态，讲两竖边状态初始化为1board[i][0].var=board[i][W-1].var=1;for(j=1;j<W-1;j++) //将最底部状态置1board[H-1][j].var=1;for(i=1;i<H-1;i++) //将游戏区域状态置0for(j=1;j<W-1;j++){board[i][j].var=0;board[i][j].color=BgColor;}srand((unsigned)time(NULL)); //初始化随机数发生器cur_boxnum=rand()%19; //赋初值next_boxnum=rand()%19; //赋初值x=Cur_x; //初始化方块横坐标y=Cur_y; //初始化方块纵坐标return 0; //直接退出窗口过程函数case WM_PAINT: //绘制界面，当应用程序适用UpdateWindow刷新窗口时，第一次发送该消息hdc=BeginPaint(hwnd,&ps); //给DC句柄赋初值Paint(hdc,hpen); //调用Paint函数绘制界面ShowScore(hdc); //显示分数ShowLevel(hdc); //显示等级ShowHelp(hdc); //显示帮助栏ShowBox(hdc,hpen,x,y,cur_boxnum); //显示游戏区域中的游戏方块ShowBox(hdc,hpen,W+1,1,next_boxnum); //显示右边状态栏的游戏方块EndPaint(hwnd,&ps); //EndPaint函数标记指定窗口的绘画过程结束；这个函数在每次调用BeginPaint函数之后被请求，但仅仅在绘画完成以后。return 0;case WM_TIMER: //定时器消息，每0.5秒接受到一次hdc=GetDC(hwnd); //该函数检索一指定窗口的客户区域或整个屏幕的显示设备上下文环境的句柄，以后可以在GDI函数中使用该句柄来在设备上下文环境中绘图。y++; //y增1if(CanMove()) //如果能移动，则擦除原来位置方块，显示新位置方块，相当于是方块下落{EraseBox(hdc,hpen,x,y-1,cur_boxnum);ShowBox(hdc,hpen,x,y,cur_boxnum);}else //如果不能移动，则到底了，y恢复之前的值，并发送MS_NEWBLOCK产生新的方块{y--;SendMessage(hwnd,MS_NEWBLOCK,0,0);}ReleaseDC(hwnd,hdc); //数释放设备上下文环境（DC）供其他应用程序使用return 0;case WM_KEYDOWN: //当按下键时，会发送该消息hdc=GetDC(hwnd);switch((int)wParam) //判断具体按下的键{case VK_UP:old_boxnum=cur_boxnum; //保存当前方块号cur_boxnum=block[cur_boxnum].next; //方块号变为下一个方块号if(CanMove()){EraseBox(hdc,hpen,x,y,old_boxnum);ShowBox(hdc,hpen,x,y,cur_boxnum);}elsecur_boxnum=old_boxnum; //恢复之前的值break;case VK_DOWN:y++;if(CanMove()){EraseBox(hdc,hpen,x,y-1,cur_boxnum);ShowBox(hdc,hpen,x,y,cur_boxnum);}else{y--;SendMessage(hwnd,MS_NEWBLOCK,0,0); //不能下移，就到底了，产生新的方块}break;case VK_LEFT:x--; //横坐标减小1if(CanMove()) //如果能移动，则下移，不能移动则恢复之前坐标{EraseBox(hdc,hpen,x+1,y,cur_boxnum);ShowBox(hdc,hpen,x,y,cur_boxnum);}elsex++;break;case VK_RIGHT: //同上x++;if(CanMove()){EraseBox(hdc,hpen,x-1,y,cur_boxnum);ShowBox(hdc,hpen,x,y,cur_boxnum);}elsex--;break;}ReleaseDC(hwnd,hdc);return 0;case MS_NEWBLOCK:hdc=GetDC(hwnd);if(top>y+block[cur_boxnum].a[0][1])top=y+block[cur_boxnum].a[0][1]; //确定最高点ChangeVar(); //改变游戏主板状态SetFullRow(hdc,hpen); //满行处理cur_boxnum=next_boxnum;x=Cur_x; //重置方块坐标y=Cur_y;hpen=CreatePen(PS_SOLID,1,FgColor);srand((unsigned)time(NULL)); //初始化随机数发生器next_boxnum=rand()%19;EraseBox(hdc,hpen,W+1,1,cur_boxnum); //清除右边状态栏的方块ShowBox(hdc,hpen,W+1,1,next_boxnum); //显示右边状态栏的方块ShowBox(hdc,hpen,Cur_x,Cur_y,cur_boxnum); //显示游戏主板顶部方块if(!CanMove()) //刚移开始就不能移动，则结束程序退出{KillTimer(hwnd,1);MessageBox(hwnd,"  退出游戏","退出",MB_OK);PostQuitMessage(0);}ReleaseDC(hwnd,hdc);return 0;case WM_DESTROY: //退出游戏KillTimer(hwnd,1);PostQuitMessage(0);return 0;}return DefWindowProc(hwnd,iMsg,wParam,lParam); //窗口默认处理，当消息处理函数未处理消息时就调用该函数进行处理
}

俄罗斯方块代码——c++实现相关推荐

用VB6写的一个简单俄罗斯方块代码
网络上有很多俄罗斯方块代码.它们大都为了视觉效果,程序比较复杂,不利于学习游戏编程.所以我写了个简单俄罗斯方块代码,尽量用VB本身的功能,没有复杂的DirectX. 下载(注意修改下载后的扩展名) m ...
一个画质很好的俄罗斯方块代码（c++）
最近网上有很多俄罗斯方块代码,但是我觉得画质不怎么好,于是改进了一下,希望对你有所帮助老样子,直接上源码: #include <iostream> #include <string ...
python标准库pygame_用python基础百行之内以pygame为库的俄罗斯方块代码
俄罗斯方块准备好久了,之前很多内容学的不太好,在网上找了找教程,结果都是用面向对象的方法,我要很仔细的看才能看懂,然而看懂了我自己还是不会写,于是我写了个仅仅用基础语法写明白的俄罗斯方块(if-eli ...
俄罗斯方块代码（c++）
找大佬的修改了一下上代码!! #include<iostream> #include<string> #include<ctime> #include< ...
python俄罗斯方块代码34行_python turtle实现俄罗斯方块基础版
本项目通过python自带库tkinter实现,无需安装第三方库本项目基于python3版本开发(如果你的是python2.x,运行可能会有问题) 一.基础界面 1 搭建基础窗体使用tkinter ...
Python小项目俄罗斯方块代码基于pygame编写
python实习作业或者期末作业,俄罗斯方块,基于pygame编写有很多小伙伴想要找一些小项目练练手,下面是我在闲暇时写的一个俄罗斯方块的一个小游戏,它是基于pygame板块来实现的这是它的首页界 ...
python俄罗斯方块代码34行_少儿编程分享：码趣君教你用Python编写俄罗斯方块（四）...
接下来要进入操作部分了坚持才能获得最后的成就感噢用移动变量处理用户输入 216. elif (event.key == K_LEFT or event.key == K_a): 217. movi ...
java俄罗斯方块七中图形类_shell脚本俄罗斯方块--代码真正详解
无意中看到代码,想仔细了解下源码实现,结果网上搜索都是抄袭的一个版本,有的就写了个开头的分析,没有具体代码分析.所以个人就花了点时间,详细分析了一下代码,在这里分享给大家. 排版不会弄,将就看吧,转载 ...
php俄罗斯方块代码,JavaScript实现俄罗斯方块游戏过程分析及源码分享_javascript技巧...
2)旋转, 需要数理逻辑, 一个点相对另外一个点旋转90度的问题. 3)定时和监听键盘事件机制让游戏自动运行下去. //开始 function begin(e){ e.disabled = true; ...

俄罗斯方块代码——c++实现

俄罗斯方块代码——c++实现相关推荐

最新文章

热门文章