Потоковая многозадачность

#include "stdafx.h"
#include "lr6.h"
#include <Windows.h>
#include <math.h>
 
#define MAX_LOADSTRING 100
 
// Global Variables:
HINSTANCE hInst;                                // current instance
TCHAR szTitle[MAX_LOADSTRING];                  // The title bar text
TCHAR szWindowClass[MAX_LOADSTRING];            // the main window class name
 
// Forward declarations of functions included in this code module:
ATOM                MyRegisterClass(HINSTANCE hInstance);
BOOL                InitInstance(HINSTANCE, int);
LRESULT CALLBACK    WndProc(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK    About(HWND, UINT, WPARAM, LPARAM);
 
int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
    UNREFERENCED_PARAMETER(hPrevInstance);
    UNREFERENCED_PARAMETER(lpCmdLine);
 
    // TODO: Place code here.
    MSG msg;
    HACCEL hAccelTable;
 
    // Initialize global strings
    LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
    LoadString(hInstance, IDC_LR6, szWindowClass, MAX_LOADSTRING);
    MyRegisterClass(hInstance);
 
    // Perform application initialization:
    if (!InitInstance (hInstance, nCmdShow))
    {
        return FALSE;
    }
 
    hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_LR6));
 
    // Main message loop:
    while (GetMessage(&msg, NULL, 0, 0))
    {
        if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
        {
            TranslateMessage(&msg);
            DispatchMessage(&msg);
        }
    }
 
    return (int) msg.wParam;
}
 
 
 
//
//  FUNCTION: MyRegisterClass()
//
//  PURPOSE: Registers the window class.
//
//  COMMENTS:
//
//    This function and its usage are only necessary if you want this code
//    to be compatible with Win32 systems prior to the 'RegisterClassEx'
//    function that was added to Windows 95. It is important to call this function
//    so that the application will get 'well formed' small icons associated
//    with it.
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
    WNDCLASSEX wcex;
 
    wcex.cbSize = sizeof(WNDCLASSEX);
 
    wcex.style          = CS_HREDRAW | CS_VREDRAW;
    wcex.lpfnWndProc    = WndProc;
    wcex.cbClsExtra     = 0;
    wcex.cbWndExtra     = 0;
    wcex.hInstance      = hInstance;
    wcex.hIcon          = LoadIcon(hInstance, MAKEINTRESOURCE(IDC_LR6));
    wcex.hCursor        = LoadCursor(NULL, IDC_ARROW);
    wcex.hbrBackground  = (HBRUSH)(COLOR_WINDOW+1);
    wcex.lpszMenuName   = MAKEINTRESOURCE(IDC_LR6);
    wcex.lpszClassName  = szWindowClass;
    wcex.hIconSm        = LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));
 
    return RegisterClassEx(&wcex);
}
 
//
//   FUNCTION: InitInstance(HINSTANCE, int)
//
//   PURPOSE: Saves instance handle and creates main window
//
//   COMMENTS:
//
//        In this function, we save the instance handle in a global variable and
//        create and display the main program window.
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;
 
   hInst = hInstance; // Store instance handle in our global variable
 
   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);
 
   if (!hWnd)
   {
      return FALSE;
   }
 
   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);
 
   return TRUE;
}
 
//
//  FUNCTION: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  PURPOSE:  Processes messages for the main window.
//
//  WM_COMMAND  - process the application menu
//  WM_PAINT    - Paint the main window
//  WM_DESTROY  - post a quit message and return
//
//
int flag=1;
HANDLE hEvent;
DWORD WINAPI PotokFun(LPVOID param) 
{
    HWND hWnd=(HWND)param;
    RECT r;
    GetClientRect(hWnd, &r);
    int R=70; // Расстояние от центра до вершины
    int Ang=0; // Угловое положение в градусах
    int VAng=2; // Угловая скорость (градусов за интервал стабатывания таймера)
    int V=2; // Скорость (пикселей за интервал таймера)
    int x, y;
    SYSTEMTIME t;
    GetLocalTime(&t);
    srand(t.wSecond+t.wMilliseconds);
    WaitForSingleObject(hEvent, INFINITE); // для 1 части убрать
    x=rand() % r.right;
    y=rand() % r.bottom;
    HPEN p1=(HPEN)CreatePen(PS_SOLID,1,RGB(250,100,0)), p2=(HPEN)GetStockObject(WHITE_PEN);
    HDC hdc=GetDC(hWnd);
    POINT P[6];
    while(WaitForSingleObject(hEvent, 0)==WAIT_TIMEOUT)
    {
        SelectObject(hdc, p1);
        //WaitForSingleObject(hEvent, 0); // для 1 части убрать
        // Меняем угловое положение фигуры
        Ang+=VAng; 
        if (Ang>=360) Ang-=360;
        //GetClientRect(hWnd, &r);
        // Расчет координат вершин
        double A=Ang*3.14/180; // Угол в градусах переводим в радианы
        double A1=2*3.14/4; // Угол между направлениями на соседние вершины из центра фигуры
        for(int i=0; i<6; i++, A+=A1)
        {
        P[i].x=x+R*cos(A); 
        P[i].y=y-R*sin(A);
        }
        //Polygon(hdc, P, 6);
        MoveToEx(hdc, P[0].x, P[0].y, 0); // Графический курсор в первую вершину
            for(int i=1; i<6; i++)
                Polygon(hdc, P, 6);
                    //LineTo(hdc, P[i].x, P[i].y);
            Polygon(hdc, P, 6);
        //LineTo(hdc, P[0].x, P[0].y); // Последнею вершину соединяем с первой
        Sleep(20);
        SelectObject(hdc, p2);
        //Polygon(hdc, P, 6);
        MoveToEx(hdc, P[0].x, P[0].y, 0); // Графический курсор в первую вершину
            for(int i=1; i<6; i++)
        //LineTo(hdc, P[i].x, P[i].y);
            Polygon(hdc, P, 6);
 
        //LineTo(hdc, P[0].x, P[0].y); // Последнею вершину соединяем с первой*/
        Polygon(hdc, P, 6);
    }
    ReleaseDC(hWnd, hdc);
    return 1;
}
 
HANDLE Th[1000];
 
int N=0;// число запущенных потоков
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    int wmId, wmEvent;
    PAINTSTRUCT ps;
    HDC hdc;
 
    switch (message)
 
    {
    case WM_CREATE:
        hEvent=CreateEvent(0, 
            false, // TRUE событие со сбросом вручную FALSE — событие с автосбросом
            false, // свободное (TRUE) занятое (FALSE).
            L"MyEvent1");
        //CreateThread(0,0,PotokFun,hWnd,0,0);//создание с самого начала ромба для 2 части 
            break;
    case WM_COMMAND:
        wmId    = LOWORD(wParam);
        wmEvent = HIWORD(wParam);
        // Parse the menu selections:
        switch (wmId)
        {
        case ID_32771: // запустить поток
            flag=1;
            Th[N]=CreateThread(0,0,PotokFun,hWnd,0,0);
            N++;
            break;
        case ID_32772: //приостановить поток
            for(int i=0;i<N;i++)
                SuspendThread(Th[i]);
            break;
        case ID_32773: //возобновить поток
            for(int i=0;i<N;i++)
                ResumeThread(Th[i]);
            break;
        case ID_32774: //завершить поток
            flag=0;
            N=0;
            break;
        case IDM_ABOUT:
            DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
            break;
        case IDM_EXIT:
            DestroyWindow(hWnd);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
        }
        break;
    case WM_PAINT:
        hdc = BeginPaint(hWnd, &ps);
        // TODO: Add any drawing code here...
        EndPaint(hWnd, &ps);
        break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProc(hWnd, message, wParam, lParam);
    }
    return 0;
}
 
// Message handler for about box.
INT_PTR CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
    UNREFERENCED_PARAMETER(lParam);
    switch (message)
    {
    case WM_INITDIALOG:
        return (INT_PTR)TRUE;
 
    case WM_COMMAND:
        if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL)
        {
            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;
        }
        break;
    }
    return (INT_PTR)FALSE;
}