《SDK下的俄罗斯方块程序分析-VC编程.txt.doc》由会员分享，可在线阅读，更多相关《SDK下的俄罗斯方块程序分析-VC编程.txt.doc（12页珍藏版）》请在金锄头文库上搜索。
1、 正文 / ToyBricks.cpp : Defines the entry point for the application. / #include stdafx.h /*/ /* 文 件 名: ToyBricks.c * 完成时间: 2001年9月 * 完成地点: 华东地质学院综合楼507机房 * 开发模式: SDK程序 * 开发环境: MS VC+ 6.0 * 作 者: 毛建忠 * 工作单位: 中国建设银行三水市(广东省)支行 * E - Mail: Mao_ */ /* 备注: * 这是一个简单的俄罗斯方块游戏程序，写程序时没有注释， * 这是我写程序时的一个坏习惯。 正在装载数据
2、 毕业有半年了，也就半年没有写 * 过程序，周末闲着没事，捡起那些旧程序看看，顺便加上一些注 * 释。很怀念在学校写程序的那段日子，很怀念。 */ /*/ #include #include #include #define CELL 15 / 【方格】的边长(pix) #define W 22 / 游戏区宽(22个【方格】边长) #define H 30 / 游戏区高(30个【方格】边长) #define MS_NEWBLOCK WM_USER+1 / 消息ID，产生新的【方块】 #define MS_DRAW WM_USER+2 LRESULT CALLBACK WndProc ( HWN
3、D, UINT, WPARAM, LPARAM);/*窗口过程处理 int WINAPI WinMain ( HINSTANCE hInstance, /当前实例句柄 HINSTANCE hPrevInstance, /前一实例句柄 PSTR szCmdLine, /指向程序命令行参数的指针 int iCmdShow) /应用程序开始执行窗口时显示方式用int类型标志 static char AppName=ToyBrick;/定义一个静态字符数组保存字符串ToyBrick(机应用程序名) HWND hwnd; /定义一个窗口句柄 MSG msg; /定义一消息结构体变量 WNDCLASSEX
4、 wndclass; /定义一窗口类结构变量，包含窗口类全部信息 int iScreenWide; /定义屏幕显示宽度 wndclass.cbSize = sizeof(wndclass);/窗口类对象大小 wndclass.style = CS_HREDRAW|CS_VREDRAW;/窗口类对象风格 wndclass.lpfnWndProc = WndProc;/窗口处理函数为WndProc wndclass.cbClsExtra = 0; /窗口类无扩展 wndclass.cbWndExtra = 0;/窗口类实例没有扩展 wndclass.hInstance = hInstance;/当
5、前实例句柄 wndclass.hIcon = LoadIcon (NULL, IDI_APPLICATION);/窗口最小化图标为默认图标 wndclass.hCursor = LoadCursor (NULL,IDC_ARROW);/窗口当前光标为箭头光标 wndclass.hbrBackground = (HBRUSH)GetStockObject (BLACK_BRUSH);/获得当前背景设置为黑色 wndclass.lpszMenuName = NULL;/窗体菜单名为空 wndclass.lpszClassName = AppName;/应用程序名 wndclass.hIconSm
6、= LoadIcon (NULL, IDI_APPLICATION);/为应用程序加载图标 if(!RegisterClassEx (&wndclass) return FALSE; /注册一个窗口类 / 获取显示器分辨率的X值iScreenWide，将程序窗口置于屏幕中央 iScreenWide=GetSystemMetrics (SM_CXFULLSCREEN); /创建窗口 hwnd =CreateWindow (AppName, 俄罗斯方块, WS_MINIMIZEBOX|WS_SYSMENU , iScreenWide/2-W*CELL/2, CELL, (W+1)*CELL-8,
7、H*CELL, NULL, NULL, hInstance, NULL ); if(!hwnd) return FALSE; /没有获得窗口句柄，返回假 ShowWindow (hwnd,iCmdShow); /显示窗口 UpdateWindow (hwnd); /更新窗口 MessageBox(hwnd,开始游戏,开始,MB_OK);/显示Message SendMessage(hwnd,MS_NEWBLOCK,0,0);/向当前窗口发送消息 SetTimer (hwnd, 1, 550,NULL);/设置下落时间 while (GetMessage (&msg, NULL, 0, 0)/进
8、入消息循环 TranslateMessage (&msg); DispatchMessage (&msg); return msg.wParam; / 函数DrawRact: 画【正方形】 / 参数: 设备环境句柄和【正方形】的四角坐标 void DrawRect (HDC hdc, int l, int t, int r, int b) MoveToEx (hdc, l, t, NULL); LineTo (hdc, r, t); LineTo (hdc, r, b); LineTo (hdc, l, b); LineTo (hdc, l,t); / 函数DrawCell: 画【方格】 /
9、参数: 设备环境句柄和【方格】的四角坐标 / 每个方格由内外两个【正方形】(DrawCell)画成，使其有立体感 void DrawCell (HDC hdc, int l, int t, int r, int b) DrawRect (hdc,l+1, t+1, r-1, b-1); DrawRect (hdc,l+3, t+3, r-3, b-3); / 函数DrawBlock: 画【方块】 / 参数: 设备环境句柄和【方块】中四个【方格】在游戏区域中的位置 / 每个【方块】由四个【方格】组成种不同的形状 void DrawBlock (HDC hdc, int block42) int
10、i; HPEN hpen; hpen =CreatePen (PS_SOLID,1,RGB(255,255,255); SelectObject (hdc,hpen); for(i=0; i4; i+) DrawCell (hdc, (blocki0-1)*CELL, (blocki1-1)*CELL, /. blocki0*CELL, blocki1*CELL); DeleteObject (hpen); / 函数Cover: 清除原来位置的【方块】 / 参数: 设备环境句柄和待清除的【方块】 / 清除【方块】即在该【方块】的每个【方块】处画一个正方形的黑块 void Cover (HDC
11、hdc, int org42) int i; SelectObject (hdc, (HBRUSH)GetStockObject (BLACK_BRUSH); for(i=0; i4; i+) Rectangle ( hdc, (orgi0-1)*CELL, (orgi1-1)*CELL, /. orgi0*CELL, orgi1*CELL); / 窗口过程函数WndProc LRESULT CALLBACK WndProc ( HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam ) int i,j,k,lines,r; static int top, sel, flag; static int cellsW+2H; / 控制游戏的【方格矩阵】 static int org42, block42; / 【方块】 HDC hdc; HPEN hpen; PAINTSTRUCT ps; switch (iMsg) case WM_CREATE: top=H-1; / 将第一列和最后一列【方格】置1，控制【方块】不超出游戏区域 f
