quantum/MusicKeyboard
1
0
Fork 0
mirror of https://github.com/quantum5/MusicKeyboard.git synced 2025-04-24 21:21:59 -04:00
Code Issues Packages Projects Releases Wiki Activity
MusicKeyboard/src/MainWindow.cpp
Quantum 8a946ee58b Used a Piano control instead of a bitmap. 
Signed-off-by: Xiaomao Chen <xiaomao5@live.com>
2013-06-07 19:40:52 -04:00

431 lines
13 KiB
C++
Raw Blame History

#include <MainWindow.hpp>
#include <resource.h>
#include <commctrl.h>
#include <windowsx.h>
#define LEFT(x, y, cx, cy) x, y, cx, cy
#define RIGHT(x, y, cx, cy) (x - cx), y, cx, cy
#define BOTTOM(x, y, cx, cy) x, (y - cy), cx, cy
#define BOTTOMRIGHT(x, y, cx, cy) (x - cx), (y - cy), cx, cy
#define KEYBOARD_IMAGE 0xAA00
#define KEYBOARD_VOLUME 0xAA01
#define KEYBOARD_FORCE 0xAA02
#define KEYBOARD_INSTRUMENT 0xAA03
#define MIDI_MESSAGE(handle, code, arg1, arg2) \
midiOutShortMsg(handle, ((arg2 & 0x7F) << 16) |\
((arg1 & 0x7F) << 8) | (code & 0xFF))
#pragma comment(lib, "winmm.lib")
DWORD rgbWindowBackground;
static char keymap[256];
static LPWSTR keychars =
L"~`\0" // F#3
L"\x21c6Q\0" // G3
L"W\0" // G#3
L"AZ1\0" // A3
L"E\0" // A#3
L"SX2\0" // B3
L"DC3\0" // C4
L"R\0" // C#4
L"FV4\0" // D4
L"T\0" // D#4
L"GB5\0" // E4
L"HN6\0" // F4
L"U\0" // F#4
L"JM7\0" // G4
L"I\0" // G#4
L"K,8\0" // A4
L"O\0" // A#4
L"L.9\0" // B4
L";/0\0" // C5
L"[\0" // C#5
L"\"-\0" // D5
L"]\0" // D#5
L"=\x21b5\0" // E5
L"\x2190\0" // F5
;
int dnslen(LPWSTR dns)
{
LPWSTR i = dns;
for (; lstrlen(i); i += lstrlen(i) + 1);
return i - dns;
}
BOOL MainWindow::WinRegisterClass(WNDCLASS *pwc)
{
pwc->style = CS_HREDRAW | CS_VREDRAW;
return __super::WinRegisterClass(pwc);
}
LRESULT MainWindow::OnCreate()
{
NONCLIENTMETRICS ncmMetrics = { sizeof(NONCLIENTMETRICS) };
RECT client;
SystemParametersInfo(SPI_GETNONCLIENTMETRICS, 0, &ncmMetrics, 0);
GetClientRect(m_hwnd, &client);
hFont = CreateFontIndirect(&ncmMetrics.lfMessageFont);
rgbWindowBackground = GetSysColor(COLOR_WINDOW);
hBrush = GetSysColorBrush(COLOR_WINDOW);
// Children
m_volumeLabel = CreateWindow(WC_STATIC, L"Volume:",
WS_CHILD | WS_VISIBLE | SS_CENTERIMAGE, 0, 0, 0, 0,
m_hwnd, NULL, GetInstance(), NULL);
m_forceLabel = CreateWindow(WC_STATIC, L"Force:",
WS_CHILD | WS_VISIBLE | SS_CENTERIMAGE, 0, 0, 0, 0,
m_hwnd, NULL, GetInstance(), NULL);
m_instruLabel = CreateWindow(WC_STATIC, L"Instrument:",
WS_CHILD | WS_VISIBLE | SS_CENTERIMAGE, 0, 0, 0, 0,
m_hwnd, NULL, GetInstance(), NULL);
m_volumeBar = CreateWindow(TRACKBAR_CLASS, NULL,
WS_CHILD | WS_VISIBLE | TBS_NOTICKS, 0, 0, 0, 0,
m_hwnd, (HMENU) KEYBOARD_VOLUME, GetInstance(), NULL);
m_forceBar = CreateWindow(TRACKBAR_CLASS, NULL,
WS_CHILD | WS_VISIBLE | TBS_NOTICKS, 0, 0, 0, 0,
m_hwnd, (HMENU) KEYBOARD_FORCE, GetInstance(), NULL);
m_instruSelect = CreateWindow(WC_COMBOBOX, NULL, WS_CHILD | WS_VISIBLE |
CBS_DROPDOWNLIST | CBS_SORT | WS_VSCROLL, 0, 0, 0, 0,
m_hwnd, (HMENU) KEYBOARD_INSTRUMENT, GetInstance(), NULL);
SendMessage(m_volumeBar, TBM_SETRANGEMIN, FALSE, 0x0000);
SendMessage(m_volumeBar, TBM_SETRANGEMAX, FALSE, 0xFFFF);
SendMessage(m_forceBar, TBM_SETRANGE, FALSE, 127 << 16);
SendMessage(m_volumeBar, TBM_SETPOS, FALSE, 0xFFFF);
SendMessage(m_forceBar, TBM_SETPOS, FALSE, 64);
m_force = 64;
m_volume = 0xFFFF;
WCHAR buf[MAX_PATH];
int piano;
SendMessage(m_instruSelect, CB_INITSTORAGE, 128, 4096);
for (int i = 0; i < 128; ++i) {
int id;
LoadString(GetInstance(), 0xAE00 | i, buf, MAX_PATH);
id = SendMessage(m_instruSelect, CB_ADDSTRING, 0, (LPARAM) buf);
SendMessage(m_instruSelect, CB_SETITEMDATA, id, i);
}
LoadString(GetInstance(), 0xAE00, buf, MAX_PATH);
piano = SendMessage(m_instruSelect, CB_FINDSTRING, 0, (LPARAM) buf);
SendMessage(m_instruSelect, CB_SETCURSEL, piano, 0);
#define SETFONT(hwnd) PostMessage(hwnd, WM_SETFONT, (WPARAM) hFont, (LPARAM) TRUE)
SETFONT(m_volumeLabel);
SETFONT(m_volumeBar);
SETFONT(m_forceLabel);
SETFONT(m_forceBar);
SETFONT(m_instruLabel);
SETFONT(m_instruSelect);
#undef SETFONT
if (midiOutOpen(&m_midi, 0, NULL, NULL, CALLBACK_NULL) != MMSYSERR_NOERROR)
MessageBox(m_hwnd, L"Failed to open MIDI device!", L"Fatal Error", MB_ICONERROR);
this->piano = PianoControl::Create(NULL, m_hwnd, WS_VISIBLE | WS_CHILD, 0, 0, 0, 0);
this->piano->SetBackground(
(HBRUSH) DefWindowProc(m_hwnd, WM_CTLCOLORSTATIC,
(WPARAM) GetDC(m_volumeLabel),
(LPARAM) m_volumeLabel));
{
keymap[VK_OEM_3] = 54; // `~ key
keymap['Q'] = 55;
keymap[VK_TAB] = 55;
keymap['A'] = 57;
keymap['Z'] = 57;
keymap['W'] = 56;
keymap['E'] = 58;
keymap['S'] = 59;
keymap['X'] = 59;
keymap['D'] = 60;
keymap['C'] = 60;
keymap['R'] = 61;
keymap['F'] = 62;
keymap['V'] = 62;
keymap['T'] = 63;
keymap['G'] = 64;
keymap['B'] = 64;
keymap['H'] = 65;
keymap['N'] = 65;
keymap['U'] = 66;
keymap['J'] = 67;
keymap['M'] = 67;
keymap['I'] = 68;
keymap['K'] = 69;
keymap[VK_OEM_COMMA] = 69;
keymap['O'] = 70;
keymap['L'] = 71;
keymap[VK_OEM_PERIOD] = 71;
keymap[VK_OEM_1] = 72; // ;:
keymap[VK_OEM_2] = 72; // /?
keymap[VK_OEM_7] = 74; // '"
keymap[VK_OEM_4] = 73; // [
keymap[VK_OEM_6] = 75; // ]
keymap[VK_RETURN] = 76;
keymap[VK_OEM_5] = 77; // \|
keymap[VK_BACK] = 77;
keymap[0x31] = 57;
keymap[0x32] = 59;
keymap[0x33] = 60;
keymap[0x34] = 62;
keymap[0x35] = 64;
keymap[0x36] = 65;
keymap[0x37] = 67;
keymap[0x38] = 69;
keymap[0x39] = 71;
keymap[0x30] = 72;
keymap[VK_OEM_MINUS] = 74;
keymap[VK_OEM_PLUS] = 76;
}
m_keychars = NULL;
PostMessage(m_hwnd, WM_INPUTLANGCHANGE, 0, 0);
return 0;
}
LRESULT MainWindow::OnDestroy()
{
DestroyWindow(m_volumeLabel);
DestroyWindow(m_volumeBar);
DestroyWindow(m_forceLabel);
DestroyWindow(m_forceBar);
DestroyWindow(m_instruLabel);
DestroyWindow(m_instruSelect);
midiOutClose(m_midi);
return 0;
}
HICON MainWindow::GetIcon()
{
return LoadIcon(GetInstance(), MAKEINTRESOURCE(RID_ICON));
}
void MainWindow::PaintContent(PAINTSTRUCT *pps)
{
}
void MainWindow::OnPaint()
{
PAINTSTRUCT ps;
BeginPaint(m_hwnd, &ps);
PaintContent(&ps);
EndPaint(m_hwnd, &ps);
}
WORD MainWindow::GetQWERTYKeyCode(WORD wKeyCode)
{
if (isQWERTY)
return wKeyCode;
UINT uiScan = MapVirtualKey(wKeyCode, MAPVK_VK_TO_VSC);
if (!uiScan)
return wKeyCode;
UINT uiQWERTY = MapVirtualKeyEx(uiScan, MAPVK_VSC_TO_VK, hklQWERTY);
if (uiQWERTY)
return (WORD) uiQWERTY;
else
return wKeyCode;
}
WORD MainWindow::GetRealKeyCode(WORD wQWERTYCode)
{
if (isQWERTY)
return wQWERTYCode;
UINT uiScan = MapVirtualKeyEx(wQWERTYCode, MAPVK_VK_TO_VSC, hklQWERTY);
if (!uiScan)
return wQWERTYCode;
UINT uiKeyCode = MapVirtualKey(uiScan, MAPVK_VSC_TO_VK);
if (uiKeyCode)
return (WORD) uiKeyCode;
else
return wQWERTYCode;
}
int GetMIDINote(WPARAM wCode)
{
int state = 0;
int note;
if (GetKeyState(VK_CONTROL) < 0)
state |= 0x001;
if (GetKeyState(VK_SHIFT) < 0)
state |= 0x010;
if (GetKeyState(VK_MENU) < 0)
state |= 0x100;
note = keymap[wCode];
switch (state) {
case 0x001:
note -= 24;
break;
case 0x010:
note += 24;
break;
case 0x100:
note += 48;
break;
}
return note;
}
bool MainWindow::Play(WPARAM wParam, LPARAM lParam, bool down)
{
int note, id;
WORD wCode = GetQWERTYKeyCode((WORD) wParam);
if (wCode > 255 || !keymap[wCode] || (down && (lParam & 0x40000000)))
return false;
note = GetMIDINote(wCode);
if (down) {
int num = note % 24;
while (num < 0x7F) {
if (num != note)
MIDI_MESSAGE(m_midi, 0x90, num, 0);
num += 24;
}
}
if (down)
MIDI_MESSAGE(m_midi, 0x90, note, m_force);
else
MIDI_MESSAGE(m_midi, 0x90, note, 0);
piano->SetKeyStatus((note - 6) % 24, down);
return true;
}
LRESULT MainWindow::HandleMessage(UINT uMsg, WPARAM wParam, LPARAM lParam)
{
switch (uMsg) {
case WM_CREATE:
return OnCreate();
case WM_DESTROY:
return OnDestroy();
case WM_NCDESTROY:
PostQuitMessage(0);
break;
case WM_PAINT:
OnPaint();
return 0;
case WM_SIZE: {
RECT client;
HDWP hdwp;
GetClientRect(m_hwnd, &client);
#define REPOS(hwnd, k) hdwp = DeferWindowPos(hdwp, hwnd, 0, k, SWP_NOACTIVATE|SWP_NOZORDER)
hdwp = BeginDeferWindowPos(14);
REPOS(m_volumeLabel, BOTTOM(12, client.bottom - 12, 70, 25));
REPOS(m_volumeBar, BOTTOM(82, client.bottom - 12, client.right - 94, 25));
REPOS(m_forceLabel, BOTTOM(12, client.bottom - 42, 70, 25));
REPOS(m_forceBar, BOTTOM(82, client.bottom - 42, client.right - 94, 25));
REPOS(m_instruLabel, BOTTOM(12, client.bottom - 72, 70, 25));
REPOS(m_instruSelect, BOTTOM(82, client.bottom - 72, client.right - 94, 25));
EndDeferWindowPos(hdwp);
#undef REPOS
//REPOS(piano->GetHWND(), LEFT(12, 12, client.right - 24, client.bottom - 117));
if (!MoveWindow(piano->GetHWND(), 12, 12, client.right - 24, client.bottom - 117, TRUE))
MessageBox(m_hwnd, 0, 0, 0);
return 0;
}
case WM_COMMAND:
switch (HIWORD(wParam)) {
case CBN_SELCHANGE:
switch (LOWORD(wParam)) {
case KEYBOARD_INSTRUMENT:
m_instrument = SendMessage((HWND) lParam, CB_GETITEMDATA,
SendMessage((HWND) lParam, CB_GETCURSEL, 0, 0), 0);
MIDI_MESSAGE(m_midi, 0xC0, m_instrument, 0);
}
}
break;
case WM_HSCROLL:
switch (LOWORD(wParam)) {
case TB_THUMBPOSITION:
if (lParam == (LPARAM) m_volumeBar) {
m_volume = HIWORD(wParam);
midiOutSetVolume(m_midi, m_volume);
} else if (lParam == (LPARAM) m_forceBar)
m_force = HIWORD(wParam);
break;
}
break;
case WM_KEYDOWN:
case WM_SYSKEYDOWN:
if (Play(wParam, lParam, true))
return 0;
break;
case WM_KEYUP:
case WM_SYSKEYUP:
if (Play(wParam, lParam, false))
return 0;
break;
case WM_LBUTTONDOWN:
SetFocus(m_hwnd);
return 0;
case WM_MOUSEWHEEL:
if (GetFocus() != m_forceBar)
SendMessage(m_forceBar, WM_MOUSEWHEEL,
-GET_WHEEL_DELTA_WPARAM(wParam) * 2 << 16 |
GET_KEYSTATE_WPARAM(wParam), lParam);
case WM_INPUTLANGCHANGE: {
TCHAR buf[KL_NAMELENGTH];
GetKeyboardLayoutName(buf);
isQWERTY = lstrcmpi(buf, L"00000409") == 0;
if (!isQWERTY && !hklQWERTY)
hklQWERTY = LoadKeyboardLayout(L"00000409", KLF_NOTELLSHELL);
int size = dnslen(keychars) + 1, i;
LPWSTR s;
if (m_keychars)
delete m_keychars;
m_keychars = new WCHAR[size];
for (i = 0; i < size; ++i) {
WORD scan = VkKeyScanEx(keychars[i], hklQWERTY);
if (LOBYTE(scan) == -1)
goto giveup;
WORD vk = GetRealKeyCode(LOBYTE(scan));
if (!vk || vk == LOBYTE(scan))
goto giveup;
WCHAR ch = (WCHAR) MapVirtualKey(vk, MAPVK_VK_TO_CHAR);
if (!ch)
goto giveup;
m_keychars[i] = ch;
continue;
giveup:
m_keychars[i] = keychars[i];
}
for (s = m_keychars, i = 0; i < 24 && lstrlen(s); s += lstrlen(s) + 1, ++i)
piano->SetKeyText(i, s);
}
case WM_CHAR:
case WM_DEADCHAR:
case WM_SYSCHAR:
case WM_SYSDEADCHAR:
return 0;
case WM_ENTERSIZEMOVE:
SetWindowLongPtr(m_hwnd, GWL_EXSTYLE, GetWindowLongPtr(m_hwnd, GWL_EXSTYLE) | WS_EX_COMPOSITED);
return 0;
case WM_EXITSIZEMOVE:
SetWindowLongPtr(m_hwnd, GWL_EXSTYLE, GetWindowLongPtr(m_hwnd, GWL_EXSTYLE) & ~WS_EX_COMPOSITED);
return 0;
}
return __super::HandleMessage(uMsg, wParam, lParam);
}
MainWindow *MainWindow::Create(LPCTSTR szTitle)
{
MainWindow *self = new MainWindow();
RECT client = {0, 0, 622, 286};
AdjustWindowRect(&client, WS_OVERLAPPEDWINDOW | WS_CLIPCHILDREN, FALSE);
if (self &&
self->WinCreateWindow(0,
szTitle, WS_OVERLAPPEDWINDOW | WS_CLIPCHILDREN,
CW_USEDEFAULT, CW_USEDEFAULT, client.right - client.left,
client.bottom - client.top, NULL, NULL)) {
return self;
}
delete self;
return NULL;
}
Reference in a new issue View git blame Copy permalink