俄罗斯方块源码（Tetris source）.docVIP

俄罗斯方块源码（Tetris source） This time wrote a Tetris program, is based on Win32, C language. Now write the source code below A total of three files, including Main.cpp, TetrisControl.cpp, and TetrisControl.h. ///////////////////////////////////////////////////////////////////////////////////// //Main.cpp #include TetrisControl.h #includewindows.h #includetime.h LRESULT, CALLBACK, WndProc (HWND, hWnd, UINT, MSG, WPARAM, wParam, LPARAM, lParam); Int, APIENTRY, WinMain (HINSTANCE, hInstance, HINSTANCE, hPreInstance, LPSTR, lpCmdLine, int NShowCmd) { HWND hwnd=NULL; MSG msg={0}; TCHAR AppName[]=TEXT (Tetris); WNDCLASS wndcls={0}; Wndcls.cbClsExtra=0; Wndcls.cbWndExtra=0; Wndcls.hbrBackground= (HBRUSH) GetStockObject (BLACK_BRUSH); Wndcls.hCursor=LoadCursor (NULL, IDC_ARROW); Wndcls.hIcon=LoadIcon (NULL, IDI_ERROR); //wndcls.hIcon=LoadIcon (hInstance, TEXT (icon1.ico)); Wndcls.hInstance=hInstance; Wndcls.lpfnWndProc=WndProc; Wndcls.lpszClassName=AppName; Wndcls.lpszMenuName=NULL; Wndcls.style=CS_HREDRAW|CS_VREDRAW; If (... RegisterClass (wndcls)) { MessageBox (NULL, TEXT (RegisterClass Failed), 0, MB_OK); Return 0; } Hwnd=CreateWindow (AppName, TEXT (Tetris), WS_OVERLAPPEDWINDOW, 0,0, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL); ShowWindow (hWnd, SW_SHOWNORMAL); UpdateWindow (hWnd); While (GetMessage (msg, NULL, 0,0)) { TranslateMessage (msg); DispatchMessage (msg); } Return msg.wParam; } LRESULT, CALLBACK, WndProc (HWND, hWnd, UINT, MSG, WPARAM, wParam, LPARAM, lParam) { HDC hdc; PAINTSTRUCT ps; HBRUSH hBrush[2]; Switch (MSG) { Case WM_CREATE: Srand ((UINT) time (NULL)); SetTimer (hWnd, ID_Event, 800, NULL); ExportBlock (); Break; Case WM_TIMER: ChangeDirect (hWnd, VK_DOWN); InvalidateRect (hWnd, NULL, TRUE); / / re Break; Case WM_KEYDOWN: ChangeDirect (hWnd, wParam); InvalidateRect (hWnd, NULL, TRUE); / / re Break; Case WM_PAINT: HBrush[0]=CreateSolidBrush (RGB (0,0255)); HBrush[1]=CreateSolidBrush (RGB (0255,0)); Hdc=BeginPaint (hWnd, ps); DrawFrame (HDC, hB