16/adplug/adplug/src/temuopl.cpp

   1 /*
   2  * AdPlug - Replayer for many OPL2/OPL3 audio file formats.
   3  * Copyright (C) 1999 - 2004 Simon Peter <dn.tlp@gmx.net>, et al.
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  *
  19  * temuopl.cpp - Tatsuyuki Satoh's OPL2 emulator, by Simon Peter <dn.tlp@gmx.net>
  20  */
  21
  22 #include "temuopl.h"
  23
  24 CTemuopl::CTemuopl(int rate, bool bit16, bool usestereo)
  25   : use16bit(bit16), stereo(usestereo)
  26 {
  27   opl = OPLCreate(OPL_TYPE_YM3812, 3579545, rate);
  28 }
  29
  30 CTemuopl::~CTemuopl()
  31 {
  32   OPLDestroy(opl);
  33 }
  34
  35 void CTemuopl::update(short *buf, int samples)
  36 {
  37   int i;
  38
  39   if(use16bit) {
  40     YM3812UpdateOne(opl,buf,samples);
  41
  42     if(stereo)
  43       for(i=samples-1;i>=0;i--) {
  44         buf[i*2] = buf[i];
  45         buf[i*2+1] = buf[i];
  46       }
  47   } else {
  48     short *tempbuf = new short[stereo ? samples*2 : samples];
  49     int i;
  50
  51     YM3812UpdateOne(opl,tempbuf,samples);
  52
  53     if(stereo)
  54       for(i=samples-1;i>=0;i--) {
  55         tempbuf[i*2] = tempbuf[i];
  56         tempbuf[i*2+1] = tempbuf[i];
  57       }
  58
  59     for(i=0;i<(stereo ? samples*2 : samples);i++)
  60       ((char *)buf)[i] = (tempbuf[i] >> 8) ^ 0x80;
  61
  62     delete [] tempbuf;
  63   }
  64 }
  65
  66 void CTemuopl::write(int reg, int val)
  67 {
  68   OPLWrite(opl,0,reg);
  69   OPLWrite(opl,1,val);
  70 }
  71
  72 void CTemuopl::init()
  73 {
  74   OPLResetChip(opl);
  75 }