#include <math.h>
#include <windows.h>
#include <dsound.h>
#include <d3dx9.h>

#pragma comment(lib, "dsound")
#pragma comment(lib, "dxguid")

// 실패했을 경우, 예외를 발생시킨다.
void assert(HRESULT hr)
{
	if (FAILED(hr))
		throw hr;
}

int main(int argc, char* argv[])
{
	HWND hWnd = GetConsoleWindow();
	LPDIRECTSOUND8 pDS8 = NULL;
	LPDIRECTSOUNDBUFFER8 pDSBSin = NULL;

	WAVEFORMATEX fmt;
	fmt.wFormatTag = WAVE_FORMAT_PCM; // PCM
	fmt.nChannels = 1; // 모노
	fmt.nSamplesPerSec = 44100; // 44.1KHz
	fmt.wBitsPerSample = 16; // 16비트
	fmt.nBlockAlign = fmt.nChannels * fmt.wBitsPerSample / 8; // 한시간단위당 바이트수
	fmt.nAvgBytesPerSec = fmt.nSamplesPerSec * fmt.nBlockAlign; // 초당 바이트수
	fmt.cbSize = 0; // 여분 데이터 없음

	__try
	{
		// DirectSound8 객체 생성
		assert(DirectSoundCreate8(NULL, &pDS8, NULL));
		// ..
		assert(pDS8->SetCooperativeLevel(hWnd, DSSCL_PRIORITY));

		DSBUFFERDESC desc;
		desc.dwSize = sizeof(DSBUFFERDESC);
		desc.dwFlags = 0;
		desc.dwBufferBytes = fmt.nAvgBytesPerSec; // 1초 길이 버퍼로 만든다..
		desc.dwReserved = 0;
		desc.lpwfxFormat = &fmt;
		desc.guid3DAlgorithm = GUID_NULL;
		
		// 버퍼 생성
		LPDIRECTSOUNDBUFFER pDSB;
		assert(pDS8->CreateSoundBuffer(&desc, &pDSB, NULL));
		// DS 8버전 인터페이스를 가져온다.
		assert(pDSB->QueryInterface(IID_IDirectSoundBuffer8, (LPVOID*)&pDSBSin));
		// 1버전것은 해제
		assert(pDSB->Release());

		WORD* pAudio;
		DWORD dwSize;
		assert(pDSBSin->Lock(0, 0, (LPVOID*)&pAudio, &dwSize, NULL, NULL, DSBLOCK_ENTIREBUFFER));

		// 여러가지 주파수의 사인파를 만든다.
		float freq[] = { 400.0f, 200.0f, 100.0f, 50.0f };
		// 각 사인파의 계수
		float k[] = { 1.0f, 0.5f, 0.3f, 0.9f };

		int blocks = dwSize / 2;
		int funcs = sizeof(freq) / sizeof(freq[0]);

		// sin 함수에 알맞는 형태로 변경
		// (2 * PI) / sps => 1Hz 이기 때문에
		// 앞서 설정한 값의 주파수를 갖는 사인파가 된다.
		for (int i = 0; i < funcs; i++)
			freq[i] *= 2 * D3DX_PI / fmt.nSamplesPerSec;

		for (int i = 0; i < blocks; i++)
		{
			float v = 0;
			// 함수 합성
			for (int j = 0; j < funcs; j++)
				v += cosf(freq[j] * i) * k[j];
			// 범위를 넘지 않도록 함.
			if (v > 1.0f) v = 1.0f;
			else if (v < -1.0f) v= -1.0f;
			// 16비트에 맞게.
			pAudio[i] = (WORD)((v + 1.0f) * 0.5f * 0xFFFF);
		}
		assert(pDSBSin->Unlock((LPVOID)pAudio, dwSize, NULL, 0));

		// 반복재생해 본다.
		assert(pDSBSin->Play(0, 0, DSBPLAY_LOOPING));
		// 입력할때까지 대기
		MessageBox(NULL, TEXT("111"), NULL, MB_OK);
	}
	__finally
	{
		// 별도 예외 처리 없이, 생성된 객체만 해제한다.
		if (pDSBSin)
		{
			pDSBSin->Stop();
			pDSBSin->Release();
		}
		if (pDS8)
			pDS8->Release();
	}
}