// DIGR.cpp: Определяет точку входа для приложения.
//


#include "stdafx.h"
#include "DIGR.h"
#include <string>
#include "cmath"


#define MAX_LOADSTRING 100

// Глобальные переменные:
HINSTANCE hInst;                                // текущий экземпляр
WCHAR szTitle[MAX_LOADSTRING];                  // Текст строки заголовка
WCHAR szWindowClass[MAX_LOADSTRING];            // имя класса главного окна

struct ValStruct
{
    float val;
    float valR;
    char valT[25];
    char name[50];
};

ValStruct a[100];

const double PI = 3.14159265358979323846;
int n;
int EDi = 0;
float sum = 0;
float max = 0;

bool DChoose = 0;
bool invert = 0;
bool Round = 0;
bool Frst = 1;
bool conv = 0;

float StartX = 300;
float StartY = 400;
float StartYL = 100;

int R = 0, G = 255, B = 0;


std::string strBuff[];



// Отправить объявления функций, включенных в этот модуль кода:
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 wWinMain(_In_ HINSTANCE hInstance,
    _In_opt_ HINSTANCE hPrevInstance,
    _In_ LPWSTR    lpCmdLine,
    _In_ int       nCmdShow)
{
    UNREFERENCED_PARAMETER(hPrevInstance);
    UNREFERENCED_PARAMETER(lpCmdLine);

    // TODO: разместите код здесь.

    // Инициализация глобальных строк
    LoadStringW(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
    LoadStringW(hInstance, IDC_DIGR, szWindowClass, MAX_LOADSTRING);
    MyRegisterClass(hInstance);

    // Выполнить инициализацию приложения:
    if (!InitInstance(hInstance, nCmdShow))
    {
        return FALSE;
    }

    HACCEL hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_DIGR));

    MSG msg;

    // Цикл основного сообщения:
    while (GetMessage(&msg, nullptr, 0, 0))
    {
        if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
        {
            TranslateMessage(&msg);
            DispatchMessage(&msg);
        }
    }

    return (int)msg.wParam;
}



//
//  ФУНКЦИЯ: MyRegisterClass()
//
//  НАЗНАЧЕНИЕ: регистрирует класс окна.
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
    WNDCLASSEXW 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(IDI_DIGR));
    wcex.hCursor = LoadCursor(nullptr, IDC_ARROW);
    wcex.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
    wcex.lpszMenuName = MAKEINTRESOURCEW(IDC_DIGR);
    wcex.lpszClassName = szWindowClass;
    wcex.hIconSm = LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));

    return RegisterClassExW(&wcex);
}

//
//   ФУНКЦИЯ: InitInstance(HINSTANCE, int)
//
//   НАЗНАЧЕНИЕ: сохраняет обработку экземпляра и создает главное окно.
//
//   КОММЕНТАРИИ:
//
//        В данной функции дескриптор экземпляра сохраняется в глобальной переменной, а также
//        создается и выводится на экран главное окно программы.
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
    hInst = hInstance; // Сохранить дескриптор экземпляра в глобальной переменной

    HWND hWnd = CreateWindowW(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
        CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, nullptr, nullptr, hInstance, nullptr);

    if (!hWnd)
    {
        return FALSE;
    }

    ShowWindow(hWnd, nCmdShow);
    UpdateWindow(hWnd);

    return TRUE;
}

//
//  ФУНКЦИЯ: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  НАЗНАЧЕНИЕ:  обрабатывает сообщения в главном окне.
//
//  WM_COMMAND — обработать меню приложения
//  WM_PAINT — отрисовать главное окно
//  WM_DESTROY — отправить сообщение о выходе и вернуться
//
//
void Clean()
{
    EDi = 0;
    DChoose = 0;
    invert = 0;
    Round = 0;
    Frst = 1;
    StartX = 300;
    StartY = 400;
    StartYL = 100;
    R = 0, G = 255, B = 0;
    sum = 0;
    if (!conv)
    {
        for (int i = 0; i < n; i++)
        {
            a[i].val = 0;
        }
    }

}

LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    switch (message)
    {
    case WM_COMMAND:
    {
        int wmId = LOWORD(wParam);
        switch (wmId)
        {
        case ID_Diag:
            Clean();
            InvalidateRect(hWnd, NULL, true);
            DialogBox(hInst, MAKEINTRESOURCE(IDD_DIALOG1), hWnd, About);
            break;

        case ID_Clean:
            Clean();
            InvalidateRect(hWnd, NULL, true);
            break;

        case IDM_EXIT:
            DestroyWindow(hWnd);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
        }
        InvalidateRect(hWnd, NULL, false);
    }
    break;
    case WM_PAINT:
    {
        PAINTSTRUCT ps;
        HDC hdc = BeginPaint(hWnd, &ps);

        HPEN pen = CreatePen(0, 1, RGB(0, 0, 0));
        SelectObject(hdc, pen);

        HBRUSH brush = CreateSolidBrush(RGB(R, G, B)); //G
        SelectObject(hdc, brush);

        if (DChoose)
        {
            if (!Round)
            {


                EDi = 0;


                if (!invert)
                {
                    //y
                    MoveToEx(hdc, StartX - 5, StartY + 5, NULL);
                    LineTo(hdc, StartX - 5, StartY - (max * 5) - 10);
                    //x
                    MoveToEx(hdc, StartX - 10, StartY, NULL);
                    LineTo(hdc, StartX + (n * 40), StartY);
                }
                else
                {
                    //Iy
                    MoveToEx(hdc, StartY, StartX + 10, NULL);
                    LineTo(hdc, StartY, StartX - (n * 40));
                    //Ix
                    MoveToEx(hdc, StartY - 5, StartX + 5, NULL);
                    LineTo(hdc, StartY + (max * 5) + 10, StartX + 5);
                }
            }

            while (EDi < n)
            {
                brush = CreateSolidBrush(RGB(R, G, B));
                SelectObject(hdc, brush);

                Ellipse(hdc, 15, StartYL, 25, StartYL + 10);
                TextOutA(hdc, 35, StartYL - 3, a[EDi].name, 20);

                StartYL += 25;

                if (!Round)
                {
                    if (!invert)
                    {
                        Rectangle(hdc, StartX, StartY - (a[EDi].val * 5), StartX + 20, StartY);
                        TextOutA(hdc, StartX, StartY - (a[EDi].val * 5) - 20, a[EDi].valT, 20);

                        StartX += 40;
                    }
                    else
                    {
                        Rectangle(hdc, StartY + (a[EDi].val * 5), StartX, StartY, StartX - 20);
                        TextOutA(hdc, StartY + (a[EDi].val * 5) + 15, StartX - 20, a[EDi].valT, 20);

                        StartX -= 40;
                    }
                }
                else
                {
                    EDi==0?
                        Pie(hdc,
                            StartX - 180, StartY - 180, StartX + 180, StartY + 180,
                            -180 * cos(a[0].valR*PI / 180) + StartX,
                            -180 * sin(a[0].valR*PI / 180) + StartY,
                            -180 * cos(a[n-1].valR*PI / 180) + StartX,
                            -180 * sin(a[n-1].valR*PI / 180) + StartY)
                        :

                        Pie(hdc,
                        StartX - 180, StartY - 180, StartX + 180, StartY + 180,
                        -180 * cos(a[EDi].valR*PI / 180) + StartX,
                        -180 * sin(a[EDi].valR*PI / 180) + StartY,
                        -180 * cos(a[EDi-1].valR*PI / 180) + StartX,
                        -180 * sin(a[EDi-1].valR*PI / 180) + StartY);

                }


                EDi++;

                B += 40;
                G -= 40;
                R += 40;
                if (R > 255)
                {
                    R = B = 0;
                    G = 255;
                }
            }

        }
        EndPaint(hWnd, &ps);
        EDi = 0;
        Frst = 0;
    }
    break;
    case WM_DESTROY:
        PostQuitMessage(0);
        break;
    default:
        return DefWindowProc(hWnd, message, wParam, lParam);
    }
    return 0;
}


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:

        invert = (IsDlgButtonChecked(hDlg, IDC_CHCK1));



        switch (LOWORD(wParam))
        {
        case IDC_CHCK2:
            if (IsDlgButtonChecked(hDlg, IDC_CHCK2))
            {
                SetDlgItemTextA(hDlg, IDC_ED2, "Готово?");
                SetDlgItemTextA(hDlg, IDC_ED3, "Преждние значения");
                conv = 1;
            }
            else
            {
                SetDlgItemTextA(hDlg, IDC_ED2, "");
                SetDlgItemTextA(hDlg, IDC_ED3, "");
                conv = 0;
            }
            break;

        case IDC_BUT1:
            SetDlgItemTextA(hDlg, IDC_ED3, "");
            n = GetDlgItemInt(hDlg, IDC_ED1, NULL, true);
            break;

        case IDC_BUT2:
            a[EDi].val = GetDlgItemInt(hDlg, IDC_ED2, NULL, true);
            sum += a[EDi].val;
            GetDlgItemTextA(hDlg, IDC_ED2, a[EDi].valT, 25);
            GetDlgItemTextA(hDlg, IDC_ED3, a[EDi].name, 50);
            SetDlgItemTextA(hDlg, IDC_ED2, "");
            SetDlgItemTextA(hDlg, IDC_ED3, "");
            EDi++;
            if (EDi == n)
            {
                max = a[0].val;
                for (int i = 0; i < n; i++)
                {
                    a[i].valR = a[i].val * 360 / sum;
                    if (a[i].val > max)
                    {
                        max = a[i].val;
                    }

                }
                SetDlgItemTextA(hDlg, IDC_ED2, "Готово?");
            }

            break;

        case IDC_R2:
            Round = 1;
            break;

        case IDC_R1:
            Round = 0;
            break;

        case IDOK:
            DChoose = 1;

            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;

            break;

        case IDC_Canc:
            DChoose = 0;
            EndDialog(hDlg, LOWORD(wParam));
            return (INT_PTR)TRUE;
            break;

        }

    }
    return (INT_PTR)FALSE;
}