Initial community commit
This commit is contained in:
Jef
parent
537bcbc862
commit
fc06254474
16440 changed files with 4239995 additions and 2 deletions
277
Src/external_dependencies/openmpt-trunk/mptrack/OPLInstrDlg.cpp
Normal file
277
Src/external_dependencies/openmpt-trunk/mptrack/OPLInstrDlg.cpp
Normal file
|
|
@ -0,0 +1,277 @@
|
|||
/*
|
||||
* OPLInstrDlg.cpp
|
||||
* ---------------
|
||||
* Purpose: Editor for OPL-based synth instruments
|
||||
* Notes : (currently none)
|
||||
* Authors: OpenMPT Devs
|
||||
* The OpenMPT source code is released under the BSD license. Read LICENSE for more details.
|
||||
*/
|
||||
|
||||
#include "stdafx.h"
|
||||
#include "OPLInstrDlg.h"
|
||||
#include "../soundlib/OPL.h"
|
||||
#include "../soundlib/Sndfile.h"
|
||||
#include "resource.h"
|
||||
#include "Mainfrm.h"
|
||||
|
||||
OPENMPT_NAMESPACE_BEGIN
|
||||
|
||||
BEGIN_MESSAGE_MAP(OPLInstrDlg, CDialog)
|
||||
ON_WM_HSCROLL()
|
||||
ON_MESSAGE(WM_MOD_DRAGONDROPPING, &OPLInstrDlg::OnDragonDropping)
|
||||
ON_COMMAND(IDC_CHECK1, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK2, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK3, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK4, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK5, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK6, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK7, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK8, &OPLInstrDlg::ParamsChanged)
|
||||
ON_COMMAND(IDC_CHECK9, &OPLInstrDlg::ParamsChanged)
|
||||
ON_CBN_SELCHANGE(IDC_COMBO1, &OPLInstrDlg::ParamsChanged)
|
||||
ON_CBN_SELCHANGE(IDC_COMBO2, &OPLInstrDlg::ParamsChanged)
|
||||
ON_NOTIFY_EX(TTN_NEEDTEXT, 0, &OPLInstrDlg::OnToolTip)
|
||||
END_MESSAGE_MAP()
|
||||
|
||||
|
||||
void OPLInstrDlg::DoDataExchange(CDataExchange *pDX)
|
||||
{
|
||||
CDialog::DoDataExchange(pDX);
|
||||
DDX_Control(pDX, IDC_CHECK1, m_additive);
|
||||
DDX_Control(pDX, IDC_SLIDER1, m_feedback);
|
||||
|
||||
for(int op = 0; op < 2; op++)
|
||||
{
|
||||
const int slider = op * 7;
|
||||
const int check = op * 4;
|
||||
DDX_Control(pDX, IDC_SLIDER2 + slider, m_attackRate[op]);
|
||||
DDX_Control(pDX, IDC_SLIDER3 + slider, m_decayRate[op]);
|
||||
DDX_Control(pDX, IDC_SLIDER4 + slider, m_sustainLevel[op]);
|
||||
DDX_Control(pDX, IDC_SLIDER5 + slider, m_releaseRate[op]);
|
||||
DDX_Control(pDX, IDC_CHECK2 + check, m_sustain[op]);
|
||||
DDX_Control(pDX, IDC_SLIDER6 + slider, m_volume[op]);
|
||||
DDX_Control(pDX, IDC_CHECK3 + check, m_scaleEnv[op]);
|
||||
DDX_Control(pDX, IDC_SLIDER7 + slider, m_levelScaling[op]);
|
||||
DDX_Control(pDX, IDC_SLIDER8 + slider, m_freqMultiplier[op]);
|
||||
DDX_Control(pDX, IDC_COMBO1 + op, m_waveform[op]);
|
||||
DDX_Control(pDX, IDC_CHECK4 + check, m_vibrato[op]);
|
||||
DDX_Control(pDX, IDC_CHECK5 + check, m_tremolo[op]);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
OPLInstrDlg::OPLInstrDlg(CWnd &parent, const CSoundFile &sndFile)
|
||||
: m_parent(parent)
|
||||
, m_sndFile(sndFile)
|
||||
{
|
||||
Create(IDD_OPL_PARAMS, &parent);
|
||||
CRect rect;
|
||||
GetClientRect(rect);
|
||||
m_windowSize = rect.BottomRight();
|
||||
}
|
||||
|
||||
|
||||
OPLInstrDlg::~OPLInstrDlg()
|
||||
{
|
||||
DestroyWindow();
|
||||
}
|
||||
|
||||
|
||||
BOOL OPLInstrDlg::OnInitDialog()
|
||||
{
|
||||
CDialog::OnInitDialog();
|
||||
EnableToolTips();
|
||||
m_feedback.SetRange(0, 7);
|
||||
for(int op = 0; op < 2; op++)
|
||||
{
|
||||
m_attackRate[op].SetRange(0, 15);
|
||||
m_decayRate[op].SetRange(0, 15);
|
||||
m_sustainLevel[op].SetRange(0, 15);
|
||||
m_releaseRate[op].SetRange(0, 15);
|
||||
m_volume[op].SetRange(0, 63);
|
||||
m_volume[op].SetTicFreq(4);
|
||||
m_levelScaling[op].SetRange(0, 3);
|
||||
m_freqMultiplier[op].SetRange(0, 15);
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
|
||||
BOOL OPLInstrDlg::PreTranslateMessage(MSG *pMsg)
|
||||
{
|
||||
if(pMsg)
|
||||
{
|
||||
// Forward key presses and drag&drop support to parent editor
|
||||
if(pMsg->message == WM_SYSKEYUP || pMsg->message == WM_KEYUP ||
|
||||
pMsg->message == WM_SYSKEYDOWN || pMsg->message == WM_KEYDOWN ||
|
||||
pMsg->message == WM_DROPFILES)
|
||||
{
|
||||
if(pMsg->hwnd == m_hWnd)
|
||||
{
|
||||
pMsg->hwnd = m_parent.m_hWnd;
|
||||
}
|
||||
if(m_parent.PreTranslateMessage(pMsg))
|
||||
{
|
||||
return TRUE;
|
||||
}
|
||||
} else if(pMsg->message == WM_CHAR)
|
||||
{
|
||||
// Avoid Windows sounds on note key repeats
|
||||
if(HIWORD(pMsg->lParam) & 0x4000)
|
||||
return TRUE;
|
||||
}
|
||||
}
|
||||
return CDialog::PreTranslateMessage(pMsg);
|
||||
}
|
||||
|
||||
|
||||
LRESULT OPLInstrDlg::OnDragonDropping(WPARAM wParam, LPARAM lParam)
|
||||
{
|
||||
return m_parent.SendMessage(WM_MOD_DRAGONDROPPING, wParam, lParam);
|
||||
}
|
||||
|
||||
|
||||
// Swap OPL Key Scale Level bits for a "human-readable" value.
|
||||
static uint8 KeyScaleLevel(uint8 kslVolume)
|
||||
{
|
||||
static constexpr uint8 KSLFix[4] = { 0x00, 0x80, 0x40, 0xC0 };
|
||||
return KSLFix[kslVolume >> 6];
|
||||
}
|
||||
|
||||
|
||||
void OPLInstrDlg::SetPatch(OPLPatch &patch)
|
||||
{
|
||||
SetRedraw(FALSE);
|
||||
|
||||
m_additive.SetCheck((patch[10] & OPL::CONNECTION_BIT) ? BST_CHECKED : BST_UNCHECKED);
|
||||
m_feedback.SetPos((patch[10] & OPL::FEEDBACK_MASK) >> 1);
|
||||
for(int op = 0; op < 2; op++)
|
||||
{
|
||||
m_attackRate[op].SetPos(15 - (patch[4 + op] >> 4));
|
||||
m_decayRate[op].SetPos(15 - (patch[4 + op] & 0x0F));
|
||||
m_sustainLevel[op].SetPos(15 - (patch[6 + op] >> 4));
|
||||
m_releaseRate[op].SetPos(15 - (patch[6 + op] & 0x0F));
|
||||
m_volume[op].SetPos(63 - (patch[2 + op] & OPL::TOTAL_LEVEL_MASK));
|
||||
m_levelScaling[op].SetPos(KeyScaleLevel(patch[2 + op]) >> 6);
|
||||
m_freqMultiplier[op].SetPos(patch[0 + op] & OPL::MULTIPLE_MASK);
|
||||
|
||||
m_sustain[op].SetCheck((patch[0 + op] & OPL::SUSTAIN_ON) ? BST_CHECKED : BST_UNCHECKED);
|
||||
m_scaleEnv[op].SetCheck((patch[0 + op] & OPL::KSR) ? BST_CHECKED : BST_UNCHECKED);
|
||||
m_vibrato[op].SetCheck((patch[0 + op] & OPL::VIBRATO_ON) ? BST_CHECKED : BST_UNCHECKED);
|
||||
m_tremolo[op].SetCheck((patch[0 + op] & OPL::TREMOLO_ON) ? BST_CHECKED : BST_UNCHECKED);
|
||||
|
||||
const auto waveform = patch[8 + op];
|
||||
const int numWaveforms = (m_sndFile.GetType() == MOD_TYPE_S3M && waveform < 4) ? 4 : 8;
|
||||
if(numWaveforms != m_waveform[op].GetCount())
|
||||
{
|
||||
m_waveform[op].ResetContent();
|
||||
static constexpr const TCHAR *waveformNames[] =
|
||||
{
|
||||
_T("Sine"), _T("Half Sine"), _T("Absolute Sine"), _T("Pulse Sine"),
|
||||
_T("Sine (Even Periods)"), _T("Absolute Sine (Even Periods)"), _T("Square"), _T("Derived Square")
|
||||
};
|
||||
for(int i = 0; i < numWaveforms; i++)
|
||||
{
|
||||
m_waveform[op].AddString(waveformNames[i]);
|
||||
}
|
||||
}
|
||||
m_waveform[op].SetCurSel(waveform);
|
||||
}
|
||||
SetRedraw(TRUE);
|
||||
m_patch = &patch;
|
||||
}
|
||||
|
||||
|
||||
void OPLInstrDlg::ParamsChanged()
|
||||
{
|
||||
OPLPatch patch{{}};
|
||||
if(m_additive.GetCheck() != BST_UNCHECKED) patch[10] |= OPL::CONNECTION_BIT;
|
||||
patch[10] |= static_cast<uint8>(m_feedback.GetPos() << 1);
|
||||
for(int op = 0; op < 2; op++)
|
||||
{
|
||||
patch[op] = static_cast<uint8>(m_freqMultiplier[op].GetPos());
|
||||
if(m_sustain[op].GetCheck() != BST_UNCHECKED) patch[op] |= OPL::SUSTAIN_ON;
|
||||
if(m_scaleEnv[op].GetCheck() != BST_UNCHECKED) patch[op] |= OPL::KSR;
|
||||
if(m_vibrato[op].GetCheck() != BST_UNCHECKED) patch[op] |= OPL::VIBRATO_ON;
|
||||
if(m_tremolo[op].GetCheck() != BST_UNCHECKED) patch[op] |= OPL::TREMOLO_ON;
|
||||
patch[2 + op] = static_cast<uint8>((63 - m_volume[op].GetPos()) | KeyScaleLevel(static_cast<uint8>(m_levelScaling[op].GetPos() << 6)));
|
||||
patch[4 + op] = static_cast<uint8>(((15 - m_attackRate[op].GetPos()) << 4) | (15 - m_decayRate[op].GetPos()));
|
||||
patch[6 + op] = static_cast<uint8>(((15 - m_sustainLevel[op].GetPos()) << 4) | (15 - m_releaseRate[op].GetPos()));
|
||||
patch[8 + op] = static_cast<uint8>(m_waveform[op].GetCurSel());
|
||||
}
|
||||
|
||||
if(*m_patch != patch)
|
||||
{
|
||||
m_parent.SendMessage(WM_MOD_VIEWMSG, VIEWMSG_PREPAREUNDO);
|
||||
*m_patch = patch;
|
||||
m_parent.SendMessage(WM_MOD_VIEWMSG, VIEWMSG_SETMODIFIED, SampleHint().Data().AsLPARAM());
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
BOOL OPLInstrDlg::OnToolTip(UINT /*id*/, NMHDR *pNMHDR, LRESULT* /*pResult*/)
|
||||
{
|
||||
TOOLTIPTEXT *pTTT = (TOOLTIPTEXT *)pNMHDR;
|
||||
UINT_PTR nID = pNMHDR->idFrom;
|
||||
if(pTTT->uFlags & TTF_IDISHWND)
|
||||
{
|
||||
// idFrom is actually the HWND of the tool
|
||||
nID = ::GetDlgCtrlID((HWND)nID);
|
||||
}
|
||||
|
||||
static constexpr const char *feedback[] = {"disabled", "\xCF\x80/16", "\xCF\x80/8", "\xCF\x80/4", "\xCF\x80/2", "\xCF\x80", "2\xCF\x80", "4\xCF\x80"};
|
||||
static constexpr const TCHAR *ksl[] = {_T("disabled"), _T("1.5 dB / octave"), _T("3 dB / octave"), _T("6 dB / octave")};
|
||||
|
||||
mpt::tstring text;
|
||||
const CWnd *wnd = GetDlgItem(static_cast<int>(nID));
|
||||
const CSliderCtrl *slider = static_cast<const CSliderCtrl *>(wnd);
|
||||
switch(nID)
|
||||
{
|
||||
case IDC_SLIDER1:
|
||||
// Feedback
|
||||
text = mpt::ToWin(mpt::Charset::UTF8, feedback[slider->GetPos() & 7]);
|
||||
break;
|
||||
|
||||
case IDC_SLIDER2:
|
||||
case IDC_SLIDER3:
|
||||
case IDC_SLIDER5:
|
||||
case IDC_SLIDER9:
|
||||
case IDC_SLIDER10:
|
||||
case IDC_SLIDER12:
|
||||
// Attack / Decay / Release
|
||||
text = _T("faster < ") + mpt::tfmt::val(slider->GetPos()) + _T(" > slower");
|
||||
break;
|
||||
case IDC_SLIDER4:
|
||||
case IDC_SLIDER11:
|
||||
// Sustain Level
|
||||
{
|
||||
const int pos = slider->GetPos();
|
||||
text = mpt::tfmt::val((pos == 0) ? -93 : ((-15 + pos) * 3)) + _T(" dB");
|
||||
}
|
||||
break;
|
||||
case IDC_SLIDER6:
|
||||
case IDC_SLIDER13:
|
||||
// Volume Level
|
||||
text = mpt::tfmt::fix((-63 + slider->GetPos()) * 0.75, 2) + _T(" dB");
|
||||
break;
|
||||
case IDC_SLIDER7:
|
||||
case IDC_SLIDER14:
|
||||
// Key Scale Level
|
||||
text = ksl[slider->GetPos() & 3];
|
||||
break;
|
||||
case IDC_SLIDER8:
|
||||
case IDC_SLIDER15:
|
||||
// Frequency Multiplier
|
||||
if(slider->GetPos() == 0)
|
||||
text = _T("0.5");
|
||||
else
|
||||
text = mpt::tfmt::val(slider->GetPos());
|
||||
break;
|
||||
}
|
||||
|
||||
mpt::String::WriteWinBuf(pTTT->szText) = text.c_str();
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
OPENMPT_NAMESPACE_END
|
||||
Loading…
Add table
Add a link
Reference in a new issue