// roToBa9I.cpp : Defines the entry point for the application.
//

#include "stdafx.h"
#include "roToBa9I.h"
#include <fstream>
#include <cmath>

#define MAX_LOADSTRING 100
#define PI 3.14159

// Global Variables:
HINSTANCE hInst;								// current instance
TCHAR szTitle[MAX_LOADSTRING];					// The title bar text
TCHAR szWindowClass[MAX_LOADSTRING];			// the main window class name
static int sx,sy;
const int SCALE = 400;
const int MARK = 3 ;

void DcInLp(POINT &point)
{point.x = point.x*SCALE/sx;
point.y = SCALE - point.y*SCALE/sy;}

 void transform(HDC& hdc)
{ SetMapMode(hdc, MM_ANISOTROPIC);
SetWindowExtEx(hdc, SCALE, -SCALE,NULL);
SetViewportExtEx(hdc,sx,sy,NULL);
SetViewportOrgEx(hdc,0,sy,NULL);
}


// 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_PTR CALLBACK	Options(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_GOTOBA9I, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

	// Perform application initialization:
	if (!InitInstance (hInstance, nCmdShow))
	{
		return FALSE;
	}


	hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_GOTOBA9I));

	// 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(IDI_GOTOBA9I));
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName	= MAKEINTRESOURCE(IDC_GOTOBA9I);
	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
//
//


LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	int wmId, wmEvent;
	PAINTSTRUCT ps;
	HDC hdc; 

	static HPEN hpen1,hpen2;
    int i,a,b,x,y,R;
	int r,t;
	float Ey,Ex,k;
        R = 200;
		Ey= 0;
        Ex=50;
	static HPEN hDash, hBezier;
    static HBRUSH hRect, hSel;
    static POINT pt[1002];
    static POINT point;
    RECT rt;
    static int count, index;
    static bool capture;
    std::ifstream in;
    std::ofstream out;
	switch (message)
	{
	case WM_CREATE:
		hpen1 = CreatePen(PS_SOLID,2,RGB(0,0,255));
		hpen2 = CreatePen(PS_SOLID,2,RGB(255,0,0));
		in.open("file.txt");
			if (in.fail())
			{MessageBox(hWnd,_T("Файл не найден"),
			_T("открытие файла"), MB_OK | MB_ICONEXCLAMATION);
			PostQuitMessage(0);
			return 1;} 
			for (count = 0; in>>pt[count].x;count++) in>>pt[count].y;
			in.close();
			out.open("file.txt");
		if (Ey == 0) {
		for(t = 1; t<400;t++){
		r=R;
		out<<t<<'\t'<<r<<'\n';}}
		else if (Ey > 0) {
		for(t = 1; t<400;t++){
        k=Ey/Ex;
		r=k*t + R ;
		out<<t<<'\t'<<r<<'\n';}} 
		else   {
			for(t = 0; t<400;t++){
		k=Ey/Ex;
		r= k*t + R;
		out<<t<<'\t'<<r<<'\n';}}  
		out.close();
			hDash = CreatePen (PS_DASH,1,0);
			hBezier = CreatePen(PS_SOLID,4,RGB(192,192,192));
            hRect = CreateSolidBrush(RGB(0,0,0));
			hSel = CreateSolidBrush(RGB(255,0,0));
			break;
		
		case WM_SIZE:
		    sx = LOWORD(lParam);
			sy = HIWORD(lParam);
            break;

			case WM_COMMAND:
		wmId    = LOWORD(wParam);
		wmEvent = HIWORD(wParam);
		// Parse the menu selections:
		switch (wmId)
		{
		case IDM_EXIT:
			DestroyWindow(hWnd);
			break;
			 case IDM_ABOUT:
			DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
			break;
           case IDM_OPT:
			DialogBox(hInst, MAKEINTRESOURCE(IDD_OPT), hWnd, Options);
			break;
		default: return DefWindowProc(hWnd, message, wParam, lParam);
		}
		break;
		      
			case WM_LBUTTONDOWN:
			point.x = LOWORD(lParam);
			point.y = HIWORD(lParam);
			DcInLp(point);
			for (i=0; i<count;i++)
		{SetRect(&rt,pt[i].x-MARK,pt[i].y-MARK,pt[i].x+MARK,pt[i].y+MARK);
			if (PtInRect(&rt,point))
			{ index= i;
			capture = true;
			hdc=GetDC(hWnd);
			transform(hdc);
            FillRect(hdc,&rt,hSel);
			ReleaseDC(hWnd,hdc);
			SetCapture(hWnd);
			return 0;}}
             break;

		case WM_LBUTTONUP:
			if (capture)
			{ReleaseCapture();
			capture = false;}
			break;

		  case WM_MOUSEMOVE:
       if (capture)
	   {point.x = LOWORD(lParam);
			point.y = HIWORD(lParam);
			DcInLp(point);
			pt[index] = point;
			InvalidateRect(hWnd,NULL,TRUE);}
            break;

           case WM_PAINT:
			   hdc = BeginPaint(hWnd, &ps);
		for (x=0; x<sx; x+=sx/18)
		{MoveToEx(hdc,x,0,NULL);
		LineTo(hdc,x,sy);}
		for (y=0; y<sy; y+=sy/18)
		{MoveToEx(hdc,0,y,NULL);
		LineTo(hdc,sx,y);}
		a = sx/350;
		b = sy - 1;
		SelectObject(hdc,hpen2);
		MoveToEx(hdc,0,b,NULL);
		LineTo(hdc,sx,b);
		MoveToEx(hdc,a,0,NULL);
		LineTo(hdc,a,sy);
		MoveToEx(hdc,a,b,NULL); 
		transform(hdc);
		SelectObject(hdc,hDash);
		Polyline(hdc,pt,count);
		SelectObject(hdc,hBezier);
		PolyBezier(hdc,pt,count);
		for (i=0; i < count; i++)
		{SetRect(&rt,pt[i].x-MARK,pt[i].y-MARK,pt[i].x+MARK,pt[i].y+MARK);
		FillRect(hdc,&rt,hRect);}

		// TODO: Add any drawing code here...
		EndPaint(hWnd, &ps);
		break;

	case WM_DESTROY:
		DeleteObject(hDash);
		DeleteObject(hBezier);
		DeleteObject(hRect);
		DeleteObject(hSel);
		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;
}
INT_PTR CALLBACK Options(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;
}