#include "myWin.h"
#pragma comment(lib,"winmm.lib")
#define MPUSH  0x9
#define MCTONE 0xC
#define SMSG(st, ch, d1, d2) ((DWORD)(st<<4|ch|((d1)<<8)|(d2)<<16))
HFONT bFont, nFont;
TCHAR *btName[]={
	TEXT("バスドラム２"), TEXT("バスドラム１"),TEXT("サイドスティック"), TEXT("スネアドラム１"),
	TEXT("手拍子"),TEXT("スネアドラム２"),TEXT("ロートム２"),TEXT("クローズハイハット"),
	TEXT("ロートム１"),TEXT("ペダルハイハット"),TEXT("ミドルトム２"),TEXT("オープンハイハット"),
	TEXT("ミドルトム１"),TEXT("ハイトム２"),TEXT("クラッシュシンバル１"),TEXT("ハイトム１"),
	TEXT("ライドシンバル１"),TEXT("チャイニーズシンバル"),TEXT("ライドベル"),TEXT("タンバリン"),
	TEXT("スプラッシュシンバル"),TEXT("カウベル"),TEXT("クラッシュシンバル２"),TEXT("ヴィブラスラップ"),
	TEXT("ライドシンバル２"),TEXT("ハイボンゴ"),TEXT("ローボンゴ"),TEXT("ミュートハイコンガ"),
	TEXT("オープンハイコンガ"),	TEXT("ローコンガ"),TEXT("ハイティンバル"),TEXT("ローティンバル"),
	TEXT("ハイアゴゴ"),	TEXT("ローアゴゴ"),TEXT("カバサ"),TEXT("マラカス"),TEXT("ショートホイッスル"),
	TEXT("ロングホイッスル"),TEXT("ショートギロ"),TEXT("ロングギロ"),TEXT("クラベス"),
	TEXT("ハイウッドブロック"),TEXT("ローウッドブロック"),TEXT("ミュートクイーカ"),TEXT("オープンクイーカ"),
	TEXT("ショートトライアングル"),TEXT("オープントライアングル")
}; 
int numArray;
static HWND hBtn[sizeof(btName)/sizeof(TCHAR *)];
static HMIDIOUT hM; static BYTE note=0x3C, vel=0x40, prog=0;
void dspProg(HWND hw){
	TCHAR str[128];
	wsprintf(str,TEXT("音の強さ:%02X, 音色: %02X"), vel, prog);
	SetWindowText(hw,str);
}
void setFont(HWND hw, HFONT font){
	SendMessage(hw, WM_SETFONT,(WPARAM)font,0);
}
void createButton(HWND hw){
	TCHAR str[256];	numArray=(sizeof(btName)/sizeof(TCHAR *)); int X=0;
	for(int i=0; i<numArray;i++){
		int j=i%15;	wsprintf(str,TEXT("%d:%s"), i+35,  btName[i]);
		hBtn[i]=CreateWindow(TEXT("BUTTON"),str, WS_CHILD | WS_VISIBLE|WS_BORDER |
			BS_PUSHBUTTON|BS_LEFT, X,30*j, 200,30,hw, (HMENU)(i+35),hInstance, NULL);
		setFont(hBtn[i],bFont);
		if(j==14) X+=200;
	}
}
void procCreate(HWND hw, WPARAM wp,LPARAM lp){              //■Create時処理
	SetWindowText(hw,TEXT("パーカッションの音の確認"  ));
	MoveWindow(hw,0,0,816,490,TRUE);
	bFont=CreateFont(11,0,0,0, FW_BOLD, FALSE, FALSE,FALSE,	
		SHIFTJIS_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY,
		FIXED_PITCH|FF_MODERN,NULL);
	createButton(hw);
	midiOutOpen(&hM,MIDIMAPPER,NULL,0,CALLBACK_NULL);
}
void procCommand(HWND hw, WPARAM wp,LPARAM lp){              //■Create時処理
	int CM=LOWORD(wp);
	if(CM>=35 && CM<=81){
		midiOutShortMsg(hM,SMSG(MPUSH,9,CM,vel));
	}
}

LRESULT CALLBACK WndProc(HWND hw, UINT msg, WPARAM wp,LPARAM lp){//■Window Procedure
	switch(msg){
	case WM_DESTROY       : midiOutReset(hM); midiOutClose(hM);
							PostQuitMessage(0); return 0;
	case WM_CREATE        : procCreate(hw,wp,lp)       ; return 0;
	case WM_COMMAND       :	procCommand(hw,wp,lp)       ; return 0;
//	case WM_KEYDOWN       : procKeyDown(hw,wp,lp)  ; break;
	}
	return DefWindowProc(hw,msg,wp,lp);
}