功能完善的俄罗斯方块程序(C语言编写，详细注释)

//========================================================= // Project Win32 俄罗斯方块程序 // File Tetris.cpp 主程序 // Update 2009.04 // Author 沉淪 http://www.EasyIDE.cn // Tools Visual C++ 6.0 & Editplus 3 //========================================================= #include "Tetris.h" //Windows 入口函数 int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR szCmdLine,int iCmdShow) { static TCHAR szClsName[] = TEXT("Tetris"); HWND hwnd; MSG msg; WNDCLASSEX wndclass; InitCommonControls(); //初始化通用控件类库 //程序启动时初始化数据 hInst = hInstance; RandomBlock(&ii,&jj,&cc); //x = 4; y = -1; iLevel = 1; iSorce = 0; iLayer = 0; iSorceMax = TetrisIni(0); hDcAlert = CreateCompatibleDC(NULL); //注册窗口类 wndclass.hInstance = hInstance; wndclass.lpszClassName = szClsName; wndclass.lpfnWndProc = WndProc; wndclass.cbClsExtra = 0; wndclass.cbWndExtra = 0; wndclass.cbSize = sizeof(WNDCLASSEX); wndclass.style = CS_HREDRAW|CS_VREDRAW; wndclass.hIcon = LoadIcon(hInstance,MAKEINTRESOURCE(IDI_ICON1)); wndclass.hIconSm = NULL; wndclass.hCursor = LoadCursor(NULL,IDC_ARROW); wndclass.hbrBackground = (HBRUSH)(COLOR_BTNFACE+1); wndclass.lpszMenuName = MAKEINTRESOURCE(IDR_MENU1); if ( !RegisterClassEx(&wndclass) ) { MessageBox( NULL, TEXT("This program requires Windows NT!"), TEXT("RegisterClass ERROR"), MB_ICONERROR); return 0; } //创建主窗口 hwnd = CreateWindowEx( WS_EX_CLIENTEDGE, szClsName, TEXT("俄罗斯方块Win32版"), WS_MINIMIZEBOX|WS_SYSMENU, GetSystemMetrics(SM_CXFULLSCREEN)/2-370/2, GetSystemMetrics(SM_CYFULLSCREEN)/2-520/2, 370, 520, NULL, NULL, hInstance, NULL); //显示窗口并刷新客户区 ShowWindow(hwnd,iCmdShow); UpdateWindow(hwnd); //构建消息循环 while ( GetMessage(&msg,NULL,0,0) ) { TranslateMessage(&msg); DispatchMessage(&msg); } return msg.wParam; } //主窗口过程 LRESULT CALLBACK WndProc(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam) { HDC hdc; PAINTSTRUCT ps; switch ( message ) { case WM_CREATE: GameUI(hwnd); //创建界面控件 GameStart(hwnd); //数据初始化 //背景音乐初始化 bMusicOn = TRUE; iMusicBG = IDR_WAVE1; hMenu = GetMenu(hwnd); MusicItem(IDM_MUSIC1); return 0; case WM_PAINT: hdc = BeginPaint(hwnd,&ps); DrawMatrix(hdc); //绘制游戏区 DrawTetris(hdc,0,0,0); //绘制方块 DrawNext(hdc); //绘制预览区 BitBlt(hdc,40,200,160,50,hDcAlert,0,0,SRCCOPY);//绘制提示语 EndPaint(hwnd,&ps); return 0; case WM_TIMER: DropTetris(hwnd); return 0; case WM_DRAWITEM: DrawButton(lParam); //绘制方向按钮 return TRUE; case WM_KEYDOWN: switch ( (int)wParam ) { case VK_LEFT: if ( !bStart ) break; if ( CheckBlock(x-1,y) ) { x --; hdc = GetDC(hwnd); DrawTetris(hdc,-1,0,0); ReleaseDC(hwnd,hdc); } break; case VK_RIGHT: if ( !bStart ) break; if ( CheckBlock(x+1,y) ) { x ++; hdc = GetDC(hwnd); DrawTetris(hdc,1,0,0); ReleaseDC(hwnd,hdc); } break; case VK_UP: if ( !bStart || y<0 ) break; RankTetris(hwnd); break; case VK_DOWN: if ( !bStart ) break; DropTetris(hwnd); break; case VK_SPACE: GamePause(hwnd); break; } return 0; case WM_COMMAND: switch ( LOWORD(wParam) ) { case IDM_STOP: if ( y == -1 ) break; GameOver(hwnd); break; case IDM_NEW: GameStart(hwnd); GamePause(hwnd); break; case IDM_PAUSE: GamePause(hwnd); break; case IDM_EXIT: SendMessage(hwnd,WM_DESTROY,NULL,NULL); break; case IDM_ABOUT: DialogBox(hInst,MAKEINTRESOURCE(IDD_DIALOG1),hwnd,AboutDlgProc); break; case IDM_HELP: DialogBox(hInst,MAKEINTRESOURCE(IDD_DIALOG2),hwnd,HelpDlgProc); break; case IDM_MUSIC: DialogBox(hInst,MAKEINTRESOURCE(IDD_DIALOG3),hwnd,MusicDlgProc); break; case IDM_MUSIC1: MusicItem(IDM_MUSIC1); break; case IDM_MUSIC2: MusicItem(IDM_MUSIC2); break; case IDM_MUSICOFF: MusicItem(IDM_MUSICOFF); break; case IDM_LEFT: SendMessage(hwnd,WM_KEYDOWN,VK_LEFT,0); SetFocus(hwnd); break; case IDM_RIGHT: SendMessage(hwnd,WM_KEYDOWN,VK_RIGHT,0); SetFocus(hwnd); break; case IDM_UP: SendMessage(hwnd,WM_KEYDOWN,VK_UP,0); SetFocus(hwnd); break; case IDM_DOWN: SendMessage(hwnd,WM_KEYDOWN,VK_DOWN,0); SetFocus(hwnd); break; } return 0; case WM_CLOSE: if ( iSorce > iSorceMax ) iSorceMax = iSorce; TetrisIni(iSorceMax); case WM_DESTROY: PostQuitMessage(0); return 0; } return DefWindowProc(hwnd,message,wParam,lParam); } //关于对话框窗口过程 BOOL CALLBACK AboutDlgProc(HWND hDlg,UINT message,WPARAM wParam,LPARAM lParam) { switch ( message ) { case WM_INITDIALOG: return TRUE; case WM_COMMAND: switch ( LOWORD(wParam) ) { case IDOK: EndDialog(hDlg,0); break; } break; } return FALSE; } //帮助对话框窗口过程 BOOL CALLBACK HelpDlgProc(HWND hDlg,UINT message,WPARAM wParam,LPARAM lParam) { switch ( message ) { case WM_INITDIALOG: return TRUE; case WM_COMMAND: switch ( LOWORD(wParam) ) { case IDOK: EndDialog(hDlg,0); break; } break; } return FALSE; } //背景音乐对话框窗口过程 BOOL CALLBACK MusicDlgProc(HWND hDlg,UINT message,WPARAM wParam,LPARAM lParam) { switch ( message ) { case WM_INITDIALOG: if( iMusicBG == IDR_WAVE1 ) CheckRadioButton(hDlg,IDC_RADIO1,IDC_RADIO3,IDC_RADIO1); if( iMusicBG == IDR_WAVE2 ) CheckRadioButton(hDlg,IDC_RADIO1,IDC_RADIO3,IDC_RADIO2); if( !bMusicOn ) CheckRadioButton(hDlg,IDC_RADIO1,IDC_RADIO3,IDC_RADIO3); return TRUE; case WM_COMMAND : switch ( LOWORD(wParam) ) { case IDC_RADIO1: CheckRadioButton(hDlg,IDC_RADIO1,IDC_RADIO3,IDC_RADIO1); break; case IDC_RADIO2: CheckRadioButton(hDlg,IDC_RADIO1,IDC_RADIO3,IDC_RADIO2); break; case IDC_RADIO3: CheckRadioButton(hDlg,IDC_RADIO1,IDC_RADIO3,IDC_RADIO3); break; case IDOK: if ( IsDlgButtonChecked(hDlg,IDC_RADIO1) == BST_CHECKED ) { bMusicOn = TRUE; iMusicBG = IDR_WAVE1; MusicItem(IDM_MUSIC1); if ( bStart ) TetrisMusic(TRUE); } if ( IsDlgButtonChecked(hDlg,IDC_RADIO2) == BST_CHECKED ) { bMusicOn = TRUE; iMusicBG = IDR_WAVE2; MusicItem(IDM_MUSIC2); if ( bStart ) TetrisMusic(TRUE); } if ( IsDlgButtonChecked(hDlg,IDC_RADIO3) == BST_CHECKED ) { bMusicOn = FALSE; MusicItem(IDM_MUSICOFF); TetrisMusic(FALSE); } EndDialog(hDlg,0); break; case IDCANCEL: EndDialog(hDlg,0); break; } break; } return FALSE; } //音乐菜单处理 void MusicItem(int iCheckID) { CheckMenuRadioItem(hMenu,IDM_MUSIC1,IDM_MUSICOFF,iCheckID,MF_BYCOMMAND); if ( iCheckID == IDM_MUSIC1 ) { bMusicOn = TRUE; iMusicBG = IDR_WAVE1; if ( bStart ) TetrisMusic(TRUE); }else if ( iCheckID == IDM_MUSIC2 ) { bMusicOn = TRUE; iMusicBG = IDR_WAVE2; if ( bStart ) TetrisMusic(TRUE); } else { bMusicOn = FALSE; TetrisMusic(FALSE); } return; } //背景音乐 void TetrisMusic(BOOL start) { if ( start && bMusicOn && !bGOver ) PlaySound(MAKEINTRESOURCE(iMusicBG),NULL,SND_RESOURCE|SND_LOOP|SND_ASYNC); else PlaySound(NULL,NULL,NULL); return; } //初始化游戏数据 void GameStart(HWND hwnd) { int m, n; HDC hdc; hDcBitmap = CreateCompatibleDC(NULL); //初始化Matrix矩阵 for ( m=0; m<=18; m++ ) { for ( n=0; n<=9; n++ ) { Matrix[m][n] = -1; //Matrix[m][n]处初始颜色值为-1 } } //初始化方块位置 x = 4; y = -1; //初始化标志变量 bStart = FALSE; bGOver = FALSE; //初始化游戏区 hdc = GetDC(hwnd); DrawMatrix(hdc); ReleaseDC(hwnd,hdc); //初始化计分器 iLevel = 1; wsprintf(szBuffer,TEXT("%i"),iLevel); SetWindowText(hLevel,szBuffer); //