#pragma comment(lib, "d3d9.lib")	// Ссылка  на d3d9.lib
#pragma comment(lib, "d3dx9.lib")	// Ссылка  на d3dx9.lib
#pragma comment(lib, "winmm.lib")	// Ссылка  на winmm.lib

//Включаемые заголовочные файлы

#include <windows.h>		// Заголовочный файл  для Windows
#include <d3d9.h>			// Заголовочный файл  для DirectX3D
#include <d3dx9.h>			// Заголовочный файл  для некоторых 
				// функций DirectX3D

//Макрос  для освобождения интерфейсов
#define SAFE_RELEASE(x) if(x != NULL){ x->Release(); x = NULL; }

#define APPNAME "\"Первая программа  под Direct3D 9.0\" by L1f"	// Название окна

#define CLASSNAME "DIRECT3D"		// Название класса окна
bool	isProcess=true;		// Флаг процесса рендеринга
RECT	WindowRect;
int	Width=640, Height=480;	// Высота  и Ширина окна
bool	fullscreen = false;		// Оконный/Полноэкранный режим
bool	keys[256];		// Массив  для работы  с клавиатурой

HWND hWnd;			// Здесь хранится экземпляр нашего окна

LPDIRECT3D9             g_pD3D       = NULL;// Используется  для создания Устройство рендеринга
LPDIRECT3DDEVICE9       g_pd3dDevice = NULL;// Устройство рендеринга
D3DPRESENT_PARAMETERS   d3dpp;	    // Параметры  для создания Direct3D

INT WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
	// Регистрирование класса окна
	WNDCLASSEX wc;

	wc.cbSize	 	 = sizeof(WNDCLASSEX);
	wc.style	 	 = CS_CLASSDC;
	wc.lpfnWndProc	 = MsgProc;
	wc.cbClsExtra	 = 0L;
	wc.cbWndExtra	 = 0L;
	wc.hInstance	 = GetModuleHandle(NULL);
	wc.hIcon		 = LoadIcon(NULL, IDI_HAND);	 // Стандартный значек
	wc.hCursor	 = LoadCursor(NULL, IDC_ARROW);// Стандартный курсор
	wc.hbrBackground 	 = NULL;
	wc.lpszMenuName	 = NULL;
	wc.lpszClassName 	 = CLASSNAME;
	wc.hIconSm	 = NULL;

	RegisterClassEx( &wc );	// Регистрируем класс окна

	DWORD WindowStyle, WindowExStyle;

	if(fullscreen)
	{
		WindowExStyle=WS_EX_APPWINDOW;	// Расширенный стиль окна
		WindowStyle=WS_POPUP;		// Стиль окна
	}
	else
	{
		
		WindowExStyle=WS_EX_APPWINDOW | WS_EX_WINDOWEDGE;	// Расширенный стиль окна
		WindowStyle=WS_OVERLAPPEDWINDOW;		// Стиль окна
	};

	WindowRect.left=(long)0;		// Устанавливаем позицию окна  по оси X
	WindowRect.right=(long)Width;		// Устанавливаем ширину окна
	WindowRect.top=(long)0;		// Устанавливаем позицию окна  по оси X
	WindowRect.bottom=(long)Height;	// Устанавливаем высоту окна

	// согласовываем размеры окна  со стилем
	AdjustWindowRectEx(&WindowRect, WindowStyle, FALSE, WindowExStyle);

	// Создаем окно
	if (!(hWnd=CreateWindowEx(
			WindowExStyle,			// Расширенный стиль
			CLASSNAME,			// Имя класса
			APPNAME,				// Заголовок окна
			WindowStyle |			// Наш стиль окна
			WS_CLIPSIBLINGS |			// Нужен оконный стиль
			WS_CLIPCHILDREN,			// Нужен оконный стиль
			0, 0,				// Позиция окна
			WindowRect.right-WindowRect.left,	// Просчет ширины окна
			WindowRect.bottom-WindowRect.top,	// Просчет высоты окна
			NULL,				// Нет родительского окна
			NULL,				//  Не нада нам меню
			wc.hInstance,			// Instance
			NULL)))				// Ничего  не создавать
	{
		MessageBox(NULL,"Не могу создать окно!","ОШИБКА",MB_OK|MB_ICONEXCLAMATION);
	}
	
	ShowCursor(false);			// Скрываем курсов

	ShowWindow( hWnd, SW_SHOWNORMAL );	// Показываем окно
	SetFocus(hWnd);			// Устанавливаем фокус окна
	UpdateWindow( hWnd );		// Обновляем окно
	SetForegroundWindow(hWnd);		// Немного высокий приоритет

    	// Инициализация
	if( AllInit() )
    	{
        	MSG msg;

		//Начинаем главный процесс рендеринга
		while (isProcess)
		{
			// Обработка всех сообщений
			if(PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE))
			{
				if (GetMessage(&msg, NULL, 0, 0))
				{
					TranslateMessage(&msg);
					DispatchMessage(&msg);
				}
			}
			else
			{
				// Если нажат ESCAPE  то выходим  из цикла
				if(keys[VK_ESCAPE])
					isProcess=false;
				
				if(keys[VK_F1]) // Если нажат F1
				{
					//Оконный/полноэкранный режим
					fullscreen=!fullscreen;	
					ResetWindow(Width, Height, fullscreen);
				}
				Render();	// Прорисовываем сцену
			}
        		}
	}

	AllShutdown();		// Вызываем функцию удаления всего что наваяли
	ShowCursor(true);		// Показываем курсор

	UnregisterClass( CLASSNAME, wc.hInstance );
	return 1;
}

bool InitD3D(int width, int height, bool fscreen)
{
	if( NULL == ( g_pD3D = Direct3DCreate9( D3D_SDK_VERSION ) ) )
	// Если  не удалось создать Direct3D выведем сообщение  о ошибке
	MessageBox(NULL,"Не могу создать Direct3D9!","ОШИБКА",MB_OK|MB_ICONEXCLAMATION);

    	ZeroMemory( &d3dpp, sizeof(d3dpp) ); // Очищаем память из-под d3dpp


	// Если поноэкранное приложение
	if(fscreen)
	{
		d3dpp.BackBufferWidth  = width; // Устанавливаем ширину заднего буфера
		d3dpp.BackBufferHeight = height;// Устанавливаем высоту заднего буфера
		d3dpp.BackBufferCount  = 1;	  // Устанавливаем кол-во задниих буферов
					  // Двойная буферизация

		// Устанавливаем чатоту экрана  и Вертикальную синхронизацию  по дефолту
		d3dpp.FullScreen_RefreshRateInHz = D3DPRESENT_RATE_DEFAULT;
		d3dpp.PresentationInterval = D3DPRESENT_INTERVAL_DEFAULT;
	}
	else
	{
		d3dpp.FullScreen_RefreshRateInHz =0;
		d3dpp.PresentationInterval	   =0;
	};

	d3dpp.hDeviceWindow	         = hWnd;

	d3dpp.BackBufferFormat       = D3DFMT_R5G6B5;	// Формат заднего буфера

	d3dpp.EnableAutoDepthStencil = true;		// Юзать Буфер глубины  и стенсил
	d3dpp.AutoDepthStencilFormat = D3DFMT_D16;	// Формат буфера глубины  и стенсила

	d3dpp.Windowed = !fscreen;
	d3dpp.SwapEffect = D3DSWAPEFFECT_DISCARD;


	// Создаем устройство рендеринга:
	// Пытаемся создать устройство рендеринга  с использованием возможностей видеокарты
	if(FAILED( g_pD3D->CreateDevice(D3DADAPTER_DEFAULT, D3DDEVTYPE_HAL, hWnd, 
		D3DCREATE_SOFTWARE_VERTEXPROCESSING, &d3dpp, &g_pd3dDevice)))
	{
		// Если  не получилось
		// Пытаемся создать устройство рендеринга без использования
		// возможностей видеокарты
		if(FAILED(g_pD3D->CreateDevice(D3DADAPTER_DEFAULT, D3DDEVTYPE_REF, hWnd,
			D3DCREATE_SOFTWARE_VERTEXPROCESSING, &d3dpp, &g_pd3dDevice)))
		{
			// Иначе выводим сообщение об ошибке
			MessageBox(NULL,"Не могу создать устройство рендеринга!",
						"ОШИБКА",MB_OK|MB_ICONEXCLAMATION);
			return false;
		}
	}

    return true;
}

void Render()
{
	HRESULT hr;

	// Проверяем Direct3dDevice  на потерянность
	hr = g_pd3dDevice->TestCooperativeLevel();

	// если окно  не в фокусе выходим  из цикла рендеринга
	if(hr==D3DERR_DEVICELOST)
		return; 

	// если окно опять  в фокусе пытаемся восстановить устройство рендеринга
	if(hr==D3DERR_DEVICENOTRESET)
	{
		Cleanup();
		
		g_pd3dDevice->Reset(&d3dpp);

		if( g_pd3dDevice )
			ReInit();
	}

    	if( NULL == g_pd3dDevice )
		return;


	// Начинаем отрисовку нашей сцены
	if( SUCCEEDED( g_pd3dDevice->BeginScene() ) )
	{
		// Очищаем задний буфер  и буфер глубины
		g_pd3dDevice->Clear( 0L, NULL, D3DCLEAR_TARGET | D3DCLEAR_ZBUFFER, 
		D3DCOLOR_XRGB(rand()%255, rand()%255, rand()%255), 1.0f, 0L);
		//  За счет этих rand'омов  на экран будет выводиться разные цвета

		//--------------------------//
		// Здесь мы будем рисовать! //
		//--------------------------//

		// Закончили рисовать
		g_pd3dDevice->EndScene();
		// Отображаем задний буфер  на экран
		g_pd3dDevice->Present( NULL, NULL, NULL, NULL );	
	}
}