gzdoom-gles/libraries/adlmidi/chips/opal_opl3.cpp
2020-10-15 13:41:56 +03:00

86 lines
2.1 KiB
C++

/*
* Interfaces over Yamaha OPL3 (YMF262) chip emulators
*
* Copyright (c) 2017-2020 Vitaly Novichkov (Wohlstand)
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include "opal_opl3.h"
#include "opal/opal.hpp"
#include <new>
#include <cstring>
OpalOPL3::OpalOPL3() :
OPLChipBaseT()
{
m_chip = new Opal(m_rate);
setRate(m_rate);
}
OpalOPL3::~OpalOPL3()
{
Opal *chip_r = reinterpret_cast<Opal *>(m_chip);
delete chip_r;
}
void OpalOPL3::setRate(uint32_t rate)
{
OPLChipBaseT::setRate(rate);
Opal *chip_r = reinterpret_cast<Opal *>(m_chip);
chip_r->~Opal();
new (chip_r) Opal(effectiveRate());
}
void OpalOPL3::reset()
{
OPLChipBaseT::reset();
Opal *chip_r = reinterpret_cast<Opal *>(m_chip);
chip_r->~Opal();
new (chip_r) Opal(effectiveRate());
}
void OpalOPL3::writeReg(uint16_t addr, uint8_t data)
{
Opal *chip_r = reinterpret_cast<Opal *>(m_chip);
chip_r->Port(addr, data);
}
void OpalOPL3::writePan(uint16_t addr, uint8_t data)
{
#ifdef OPAL_HAVE_SOFT_PANNING
Opal *chip_r = reinterpret_cast<Opal *>(m_chip);
chip_r->Pan(addr, data);
#else
(void)addr;
(void)data;
#endif
}
void OpalOPL3::nativeGenerate(int16_t *frame)
{
Opal *chip_r = reinterpret_cast<Opal *>(m_chip);
chip_r->Sample(&frame[0], &frame[1]);
}
const char *OpalOPL3::emulatorName()
{
return "Opal OPL3";
}
OPLChipBase::ChipType OpalOPL3::chipType()
{
return CHIPTYPE_OPL3;
}