LRESULT CALLBACK WinProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
    PAINTSTRUCT ps;
    switch (uMsg)
   {
        case WM_PAINT:
            BeginPaint(hWnd, &ps);
            EndPaint(hWnd, &ps);
            return 0;
      case WM_MOUSEMOVE:
      {
            //lParam:
            //(0,0)     (1,0)
            //
            //
            //(0,1)     (1,1)
         cursor.X = 1 / GLfloat(WinRect.Height) * (2 * GLfloat(LOWORD(lParam)) - WinRect.Width);
         cursor.Y = 1 - 2 * (GLfloat(HIWORD(lParam)) / WinRect.Height);
         return 0;
      }
        case WM_LBUTTONDOWN:
            //Selection
            cursor.Selection = true;
            cursor.Xp = cursor.X;
            cursor.Yp = cursor.Y;
            return 0;
        case WM_LBUTTONUP:
            if (Command == move)
            {
                PickUnit
                if (u.Selected)
                {
                    u.CurrentOrder.Id = 1;
                    u.CurrentOrder.X  = cursor.X;
                    u.CurrentOrder.Y  = cursor.Y;
                }
                Command = nothing;
            }
            else
            if (Command == rotate)
            {
                PickUnit
                if (u.Selected)
                {
                    u.CurrentOrder.Id = 2;
                    u.CurrentOrder.X  = cursor.X;
                    u.CurrentOrder.Y  = cursor.Y;
                }
                Command = nothing;
            }
            else
            {
            //Selection
            cursor.Selection = false;
            if (cursor.X == cursor.Xp && cursor.Y == cursor.Yp)
            {
                if (!Shift)
                PickUnit
                u.Selected = false;
                PickUnit
                if (GetDistance(cursor.X, cursor.Y, u.X, u.Y) < u.RealSize)
                {
                    u.Selected = true;
                    break;
                }
                return 0;
            }
            return 0;
        case WM_RBUTTONDOWN:
            PickUnit
            if (u.Selected)
            {
                u.CurrentOrder.Id = 1;
                u.CurrentOrder.X  = cursor.X;
                u.CurrentOrder.Y  = cursor.Y;
            }
            return 0;
        case WM_KEYDOWN:
            //VK_0 - VK_9 = 0x30 - 0x39
            //VK_A - VK_Z = 0x41 - 0x5A
            if (wParam == VK_SHIFT)
                Shift = true;
//            if (wParam == 0x41)
//                PickUnit
//                if (u.Selected)
//                    u.Fire();
            if (wParam == 0x4D)
                if (Command == move)
                    Command = nothing;
                else
                    Command = move;
            if (wParam == 0x52)
                if (Command == rotate)
                    Command = nothing;
                else
                    Command = rotate;
            if (wParam == 0x53)
                PickUnit
                if (u.Selected)
                    u.CurrentOrder.Id = 0;
            if (wParam == VK_ESCAPE)
                DeInit();
            return 0;
        case WM_KEYUP:
            if (wParam == VK_SHIFT)
                Shift = false;
            return 0;
        case WM_DESTROY:
            DeInit();
            return 0;
    }
    return DefWindowProc(hWnd, uMsg, wParam, lParam);
}