//
//     Wave音源の録音
//
//  2001/ 9/11 宍戸　輝光
//

#include <windows.h>

HINSTANCE hInst;

LRESULT CALLBACK WndProc(HWND,UINT,WPARAM,LPARAM);

HWND hwMain;

int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,
                    PSTR szCmdLine,int iCmdShow){

	MSG  msg;
	WNDCLASSEX wndclass;

	// ウインドウクラス設定
	wndclass.cbSize        = sizeof(wndclass);
	wndclass.style         = CS_HREDRAW | CS_VREDRAW;
	wndclass.lpfnWndProc   = WndProc;
	wndclass.cbClsExtra    = 0;
	wndclass.cbWndExtra    = 0;
	wndclass.hInstance     = hInstance;
	wndclass.hIcon         = LoadIcon(NULL,IDI_APPLICATION);
	wndclass.hCursor       = LoadCursor(NULL,IDC_ARROW);
	wndclass.hbrBackground = (HBRUSH)GetStockObject(LTGRAY_BRUSH);
	wndclass.lpszMenuName  = NULL;
	wndclass.lpszClassName = "CWindow";
	wndclass.hIconSm       = NULL;

	RegisterClassEx(&wndclass); /* ウインドウクラス登録 */

	hwMain = CreateWindow("CWindow","和音演奏",
	  WS_OVERLAPPEDWINDOW | WS_VISIBLE,CW_USEDEFAULT,CW_USEDEFAULT,
	  280,120,NULL,NULL,hInstance,NULL);

	while (GetMessage(&msg,NULL,0,0)) { /* メッセージループ */

		TranslateMessage(&msg);
		DispatchMessage(&msg);

	}

	return msg.wParam;

}

LRESULT CALLBACK WndProc(HWND hwnd, UINT iMsg, WPARAM wParam, LPARAM lParam) {

	static short int lpBuf[24000];
	static HWAVEOUT hWOut;
	static HWAVEIN hWIn;
	static WAVEHDR wh;
	static WAVEFORMATEX wf;
	static HWND hwRec,hwPlay;

	switch (iMsg) {

	case WM_CREATE:

		hwRec=CreateWindow("BUTTON","録 音",WS_CHILD|WS_VISIBLE,
		  8,8,80,32,hwnd,(HMENU)0,hInst,NULL);

		hwPlay=CreateWindow("BUTTON","再 生",WS_CHILD|WS_VISIBLE,
		  128,8,80,32,hwnd,(HMENU)1,hInst,NULL);

		EnableWindow(hwPlay,FALSE);

		wf.wFormatTag=WAVE_FORMAT_PCM;
		wf.nChannels=1;
		wf.nSamplesPerSec=8000;
		wf.nAvgBytesPerSec=16000;
		wf.nBlockAlign=1;
		wf.wBitsPerSample=16;
		wf.cbSize=0;

		wh.lpData=(char *)lpBuf;
		wh.dwBufferLength=48000;
		wh.dwBytesRecorded=0;
		wh.dwUser=0;
		wh.dwFlags=0;
		wh.dwLoops=1;
		wh.lpNext=NULL;
		wh.reserved=0 ;

		return 0;

	case WM_COMMAND:

		switch (LOWORD(wParam)) {

		case 0: /* 録音ボタン */

			waveInOpen(&hWIn,WAVE_MAPPER,&wf,(DWORD)hwnd,0,CALLBACK_WINDOW);
			waveInPrepareHeader(hWIn,&wh,sizeof(WAVEHDR));
			waveInAddBuffer(hWIn,&wh,sizeof(WAVEHDR));
			waveInStart(hWIn);
    		EnableWindow(hwPlay,FALSE);

			break;

		case 1: /* 再生ボタン */

			/* デバイスオープン */
			waveOutOpen(&hWOut,WAVE_MAPPER,&wf,(DWORD)hwnd,0,CALLBACK_WINDOW);

			waveOutPrepareHeader(hWOut,&wh,sizeof(WAVEHDR));
			waveOutWrite(hWOut,&wh,sizeof(WAVEHDR));
                    
			break;

		}

		return 0;

	case MM_WIM_DATA: /* 録音終了 */

		waveOutUnprepareHeader(hWOut,&wh,sizeof(WAVEHDR));
		waveInClose(hWOut);

		EnableWindow(hwPlay,TRUE);

		return 0;

	case MM_WOM_DONE: /* 再生終了 */

		waveOutUnprepareHeader(hWOut,&wh,sizeof(WAVEHDR));
		waveOutClose(hWOut);

		return 0;

	case WM_DESTROY : // 終了処理

		PostQuitMessage(0);

		return 0;

	}

	return DefWindowProc(hwnd,iMsg,wParam,lParam);

}