[VS2010]簡(jiǎn)易電子鋼琴

尹亮亮 2017-02-05

展開(kāi)全文

利用VC的MIDI的一個(gè)Windows電子琴程序，可以鍵盤鼠標(biāo)彈奏，可以選擇音色、音量、錄音。

#include "stdafx.h"
#include "PIANO.h"
#include <stdio.h>
#include <MMSystem.h>
#include <shlwapi.h>
#pragma comment (lib,"Winmm.lib")	//	音樂(lè)播放
#include "SkinH.h"			
#pragma comment(lib,"SkinH.lib")	//	換膚

union {DWORD dwData; BYTE bData[4];}midi; // MIDI消息聯(lián)合
HMIDIOUT hmo;  //MIDI句柄
HWND hwndcombo,hwndmain; 
int yinse,yinliang,focus=0;

int APIENTRY _tWinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPTSTR lpCmdLine,int nCmdShow)
{
	DialogBox(hInstance,MAKEINTRESOURCE(IDD_MAINDIALOG),NULL,Main_Proc);
	return 0;
}
BOOL WINAPI Main_Proc(HWND hWnd,UINT uMsg,WPARAM wParam,LPARAM lParam)
{
	switch(uMsg)
	{
		//開(kāi)始消息測(cè)試
		HANDLE_MSG(hWnd,WM_INITDIALOG,Main_OnInitDialog);
		HANDLE_MSG(hWnd,WM_COMMAND,Main_OnCommand);
		HANDLE_MSG(hWnd,WM_CLOSE,Main_OnClose);
		//結(jié)束消息測(cè)試
	}
	return FALSE;
}
BOOL Main_OnInitDialog(HWND hWnd,HWND hwndFocus,LPARAM lParam)
{
	//設(shè)置應(yīng)用程序圖標(biāo)
	HICON hIcon = LoadIcon((HINSTANCE)GetWindowLong(hWnd,GWL_HINSTANCE),MAKEINTRESOURCE(IDI_PIANO));
	SendMessage(hWnd,WM_SETICON,TRUE,(LPARAM)hIcon);
	SendMessage(hWnd,WM_SETICON,FALSE,(LPARAM)hIcon);
	//皮膚初始化
	TCHAR skinpath[MAX_PATH];
	GetCurrentDirectory(MAX_PATH,skinpath);
	sprintf(skinpath,"%s\\Skin\\piano.she",skinpath);
	SkinH_Attach();
	//添加初始化代碼
	hwndmain=hWnd;
	initmidi();
	SetTimer(hWnd,0,1000,playpiano);
	return TRUE;
}
void Main_OnCommand(HWND hWnd,int id,HWND hwndCtl,UINT codeNotify)
{
	if (focus ==0) 
	{
		SetFocus(GetDlgItem(hWnd,ZH1));
		focus=1;
	}
	switch(id)
	{
	case DIDI6:
		duoruami(45);SetFocus(GetDlgItem(hWnd,DIDI6));
		break;
	case DIDI7:
		duoruami(47);SetFocus(GetDlgItem(hWnd,DIDI7));
		break;
	case DI1:
		duoruami(48);SetFocus(GetDlgItem(hWnd,DI1));
		break;
	case DI2:
		duoruami(50);SetFocus(GetDlgItem(hWnd,DI2));
		break;
	case DI3:
		duoruami(52);SetFocus(GetDlgItem(hWnd,DI3));
		break;
	case DI4:
		duoruami(53);SetFocus(GetDlgItem(hWnd,DI4));
		break;
	case DI5:case DI52:
		duoruami(55);SetFocus(GetDlgItem(hWnd,DI5));
		break;
	case DI6:case DI62:
		duoruami(57);SetFocus(GetDlgItem(hWnd,DI6));
		break;
	case DI7:case DI72:
		duoruami(59);SetFocus(GetDlgItem(hWnd,DI7));
		break;
	case ZH1:
		duoruami(60);SetFocus(GetDlgItem(hWnd,ZH1));
		break;
	case ZH2:
		duoruami(62);SetFocus(GetDlgItem(hWnd,ZH2));
		break;
	case ZH3:
		duoruami(64);SetFocus(GetDlgItem(hWnd,ZH3));
		break;
	case ZH4:
		duoruami(65);SetFocus(GetDlgItem(hWnd,ZH4));
		break;
	case ZH5:
		duoruami(67);SetFocus(GetDlgItem(hWnd,ZH5));
		break;
	case ZH6:
		duoruami(69);SetFocus(GetDlgItem(hWnd,ZH6));
		break;
	case ZH7:
		duoruami(71);SetFocus(GetDlgItem(hWnd,ZH7));
		break;
	case GAO1:case GAO12:
		duoruami(72);SetFocus(GetDlgItem(hWnd,GAO1));
		break;
	case GAO2:case GAO22:
		duoruami(74);SetFocus(GetDlgItem(hWnd,GAO2));
		break;
	case GAO3:case GAO32:
		duoruami(76);SetFocus(GetDlgItem(hWnd,GAO3));
		break;
	case GAO4:
		duoruami(77);SetFocus(GetDlgItem(hWnd,GAO4));
		break;
	case GAO5:
		duoruami(79);SetFocus(GetDlgItem(hWnd,GAO5));
		break;
	case GAO6:
		duoruami(81);SetFocus(GetDlgItem(hWnd,GAO6));
		break;
	case GAO7:
		duoruami(83);SetFocus(GetDlgItem(hWnd,GAO7));
		break;
	case GAOGAO1:
		duoruami(84);SetFocus(GetDlgItem(hWnd,GAOGAO1));
		break;
	case GAOGAO2:
		duoruami(86);SetFocus(GetDlgItem(hWnd,GAOGAO2));
		break;
	case GAOGAO3:
		duoruami(88);SetFocus(GetDlgItem(hWnd,GAOGAO3));
		break; //DUORUAMIFASUOLAXI
		case IDC_COMBO1:
		yinsecombo(yinse);	
		focus=0;
		break;
	case IDC_COMBO2:
		yinliangcombo(yinliang);
		focus=0;
		break;//COMMOBO
	case IDC_HELP:
		MessageBox(hWnd,"超簡(jiǎn)單的程序 帶給你超極致的音樂(lè)體驗(yàn)。\n用電腦鼠標(biāo)鍵盤演奏美妙音樂(lè)不是夢(mèng)想！\n加上外接MIDI鍵盤更可用作歌曲錄制處理。\n"
			"多種音色，彈奏音調(diào)優(yōu)化處理，音調(diào)切換過(guò)渡處理。\n界面友好，操作簡(jiǎn)單方便，功能強(qiáng)大，更可錄制彈奏音樂(lè)。\n"
			"\n操作說(shuō)明:\n對(duì)彈奏操作方便度人性化優(yōu)化設(shè)計(jì)。\n“F”到“；”是中音區(qū),“C”到“>”是高音區(qū)\n“ASD”也可對(duì)應(yīng)低音567?！?' [ ] ”對(duì)應(yīng)高音123\n"
			"“W”到“P”是超低音6到低音7,“ / Z X”是超高音123 \n\n逸雨清風(fēng)出品 sswyrlyh@foxmail.com","輕松彈鋼琴V1.0",MB_OK|MB_ICONINFORMATION);
		break;//HELP
		case IDC_RECALL:
		TCHAR str[MAX_PATH];
		GetCurrentDirectory(MAX_PATH,str);
		sprintf(str,"%s\\VoiceRecorder\\VoiceRecorder.exe",str);
		if (WinExec(str,SW_SHOWNORMAL) == NULL)
		{
			WinExec("C:\\Users\\逸雨清風(fēng)\\Desktop\\PIANO\\VoiceRecorder\\VoiceRecorder.exe",SW_SHOWNORMAL);
		}
		break;
	case IDC_EXIT:
		if (IDOK==MessageBox(hWnd,"確定關(guān)閉鋼琴軟件？","提示",MB_OKCANCEL|MB_ICONINFORMATION))
		{
			midiOutClose(hmo);
			EndDialog(hWnd,0);
		}
		break;
	default:break;
	}
}
void Main_OnClose(HWND hWnd)
{
	if (IDOK==MessageBox(hWnd,"確定關(guān)閉鋼琴軟件？","提示",MB_OKCANCEL|MB_ICONINFORMATION))
	{
		midiOutClose(hmo);
		EndDialog(hWnd,0);
	}
}

void initmidi()
{
	midiOutOpen(&hmo,0,0,0,CALLBACK_NULL);   //打開(kāi)MIDI設(shè)備
	hwndcombo=GetDlgItem(hwndmain,IDC_COMBO1);
	ComboBox_InsertString(hwndcombo,-1,"鋼琴"); //0
	ComboBox_InsertString(hwndcombo,-1,"吉他"); //24
	ComboBox_InsertString(hwndcombo,-1,"豎笛");//74
	ComboBox_InsertString(hwndcombo,-1,"短笛");//72
	ComboBox_InsertString(hwndcombo,-1,"口琴");//22
	ComboBox_InsertString(hwndcombo,-1,"小號(hào)");//56
	ComboBox_InsertString(hwndcombo,-1,"貝斯");//32
	ComboBox_InsertString(hwndcombo,-1,"雨聲");//96
	ComboBox_InsertString(hwndcombo,-1,"導(dǎo)音");//83
	ComboBox_InsertString(hwndcombo,-1,"八音盒");//10
	ComboBox_InsertString(hwndcombo,-1,"班卓琴");//105
	ComboBox_InsertString(hwndcombo,-1,"薩克斯");//65
	ComboBox_InsertString(hwndcombo,-1,"手風(fēng)琴");//21
	ComboBox_InsertString(hwndcombo,-1,"電鋼琴");//2
	ComboBox_InsertString(hwndcombo,-1,"小提琴");//40
	ComboBox_InsertString(hwndcombo,-1,"馬林巴琴");//12
	ComboBox_SetCurSel(hwndcombo,0);
	yinsecombo(yinse);
	hwndcombo=GetDlgItem(hwndmain,IDC_COMBO2);
	ComboBox_InsertString(hwndcombo,-1,"5");
	ComboBox_InsertString(hwndcombo,-1,"4");
	ComboBox_InsertString(hwndcombo,-1,"3");
	ComboBox_InsertString(hwndcombo,-1,"2");
	ComboBox_InsertString(hwndcombo,-1,"1");
	ComboBox_SetCurSel(hwndcombo,0);
	yinliangcombo(yinliang);
	midi.bData[0] = 0x90; // 由通道0發(fā)出樂(lè)音
	midi.bData[2] = 127; // 最大音強(qiáng)
}
void yinsecombo(int combosel)
{
	midi.bData[0] = 0xC0; // 設(shè)置通道0的音色/樂(lè)器種類
	midi.bData[2] = 0; // 未使用字節(jié)
	midi.bData[3] = 0; // 保留為0
	hwndcombo=GetDlgItem(hwndmain,IDC_COMBO1);
	combosel=ComboBox_GetCurSel(hwndcombo);

	switch(combosel)
	{
	case 0:midi.bData[1] = 0; break;
	case 1:midi.bData[1] = 24; break;
	case 2:midi.bData[1] = 74; break;
	case 3:midi.bData[1] = 72; break;
	case 4:midi.bData[1] = 22; break;
	case 5:midi.bData[1] = 56; break;
	case 6:midi.bData[1] = 32; break;
	case 7:midi.bData[1] = 96; break;
	case 8:midi.bData[1] = 83; break;
	case 9:midi.bData[1] = 10; break;
	case 10:midi.bData[1] = 105; break;
	case 11:midi.bData[1] = 65; break;
	case 12:midi.bData[1] = 21; break;
	case 13:midi.bData[1] = 2; break;
	case 14:midi.bData[1] = 40; break;
	case 15:midi.bData[1] = 12; break;
	default: midi.bData[1] = 0;break;
	}
	midiOutShortMsg(hmo, midi.dwData);
	midi.bData[0] = 0x90; // 由通道0發(fā)出樂(lè)音
	midi.bData[2] = 127; // 最大音強(qiáng)
}
void yinliangcombo(int combosel)
{
	midi.bData[0] = 0x90; // 由通道0發(fā)出樂(lè)音
	hwndcombo=GetDlgItem(hwndmain,IDC_COMBO2);
	combosel=ComboBox_GetCurSel(hwndcombo);

	switch(combosel)
	{
	case 0:midi.bData[2] = 127; break;
	case 1:midi.bData[2] = 100 ; break;
	case 2:midi.bData[2] = 77; break;
	case 3:midi.bData[2] = 45; break;
	case 4:midi.bData[2] = 25 ; break;
	default: midi.bData[2] = 127;break;
	}
}
void duoruami(int yindiao)
{
		midiOutReset(hmo); 
		midi.bData[1]=yindiao;
		midiOutShortMsg(hmo,midi.dwData);
		SetTimer(hwndmain,2,1000,timereset);
}
VOID CALLBACK playpiano(HWND hwnd, UINT message, UINT iTimerID, DWORD dwTime)
{
	if (focus == 0) 
	{
		SetFocus(GetDlgItem(hwnd,ZH1));
		focus=1;
	}
}
VOID CALLBACK timereset(HWND hwnd, UINT message, UINT iTimerID, DWORD dwTime)
{
	midiOutReset(hmo); 
}

本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間，所有內(nèi)容均由用戶發(fā)布，不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買等信息，謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)點(diǎn)擊一鍵舉報(bào)。

轉(zhuǎn)藏 分享

QQ空間 QQ好友新浪微博微信

獻(xiàn)花（0） +1

來(lái)自：尹亮亮 > 《MIDI解析》

舉報(bào)/認(rèn)領(lǐng)