俄罗斯方块源代码 C语言

这段时间写了一个俄罗斯方块的程序，是基于win32的，C语言。现在把源码写在下面

总共包括三个文件，Main.cpp， TetrisControl.cpp， TetrisControl.h。

/

//Main.cpp

#include"TetrisControl.h"

#include<windows.h>

#include<time.h>

LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAMwParam,LPARAM lParam);

int APIENTRY WinMain(HINSTANCE hInstance,HINSTANCEhPreInstance,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("俄罗斯方块"),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,WPARAMwParam,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);//重新绘制