First commit of the OPL2 MIDI driver (to have MIDI music without
requiring any OS-level MIDI support). This was taken from AdPlug. This is *very* buggy for now (well, it works, but it sounds just plain ugly :-) ). svn-id: r4232
This commit is contained in:
Lionel Ulmer
parent
da3ada1815
commit
dd3129b882
4 changed files with 473 additions and 3 deletions
|
|
@ -317,6 +317,7 @@ bool GameDetector::parseMusicDriver(const char *s) {
|
|||
{"qt",MD_QTMUSIC},
|
||||
{"core",MD_COREAUDIO},
|
||||
{"amidi",MD_AMIDI},
|
||||
{"midiemu",MD_MIDIEMU},
|
||||
{"adlib",-1},
|
||||
};
|
||||
|
||||
|
|
@ -579,6 +580,7 @@ MidiDriver *GameDetector::createMidi() {
|
|||
switch(drv) {
|
||||
case MD_AUTO:
|
||||
case MD_NULL: return MidiDriver_NULL_create();
|
||||
case MD_MIDIEMU: return MidiDriver_MIDIEMU_create();
|
||||
#if defined(WIN32) && !defined(_WIN32_WCE)
|
||||
case MD_WINDOWS: return MidiDriver_WIN_create();
|
||||
#endif
|
||||
|
|
|
|||
|
|
@ -1398,6 +1398,9 @@ Scumm *Scumm::createFromDetector(GameDetector *detector, OSystem *syst)
|
|||
}
|
||||
scumm->_mixer->set_volume(128);
|
||||
|
||||
/* HACK !!! */
|
||||
g_scumm = scumm;
|
||||
/* END HACK */
|
||||
|
||||
scumm->_fullScreen = detector->_fullScreen;
|
||||
scumm->_debugMode = detector->_debugMode;
|
||||
|
|
|
|||
|
|
@ -20,6 +20,8 @@
|
|||
*/
|
||||
|
||||
/*
|
||||
* EmuMIDI support by Lionel Ulmer <lionel.ulmer@free.fr> copied from
|
||||
* AdPlug (http://adplug.sourceforge.net)
|
||||
* Timidity support by Lionel Ulmer <lionel.ulmer@free.fr>
|
||||
* QuickTime support by Florent Boudet <flobo@ifrance.com>
|
||||
* Raw output support by Michael Pearce
|
||||
|
|
@ -29,6 +31,8 @@
|
|||
#include "stdafx.h"
|
||||
#include "scumm.h"
|
||||
#include "mididrv.h"
|
||||
#include "fmopl.h"
|
||||
#include "mixer.h"
|
||||
|
||||
#if defined(WIN32) && !defined(_WIN32_WCE)
|
||||
|
||||
|
|
@ -799,9 +803,468 @@ const char *MidiDriver::get_error_name(int error_code) {
|
|||
return midi_errors[error_code];
|
||||
}
|
||||
|
||||
/* This is the internal emulated MIDI driver using the included OPL2 sound chip
|
||||
* FM instrument definitions below borrowed from the Allegro library by
|
||||
* Phil Hassey, <philhassey@hotmail.com> (www.imitationpickles.org)
|
||||
*/
|
||||
|
||||
static unsigned char midi_fm_instruments_table[128][14] =
|
||||
{
|
||||
|
||||
/* This set of GM instrument patches was provided by Jorrit Rouwe...
|
||||
*/
|
||||
|
||||
{ 0x21, 0x21, 0x8f, 0x0c, 0xf2, 0xf2, 0x45, 0x76, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Acoustic Grand */
|
||||
{ 0x31, 0x21, 0x4b, 0x09, 0xf2, 0xf2, 0x54, 0x56, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Bright Acoustic */
|
||||
{ 0x31, 0x21, 0x49, 0x09, 0xf2, 0xf2, 0x55, 0x76, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Electric Grand */
|
||||
{ 0xb1, 0x61, 0x0e, 0x09, 0xf2, 0xf3, 0x3b, 0x0b, 0x00, 0x00, 0x06, 0, 0, 0 }, /* Honky-Tonk */
|
||||
{ 0x01, 0x21, 0x57, 0x09, 0xf1, 0xf1, 0x38, 0x28, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Electric Piano 1 */
|
||||
{ 0x01, 0x21, 0x93, 0x09, 0xf1, 0xf1, 0x38, 0x28, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Electric Piano 2 */
|
||||
{ 0x21, 0x36, 0x80, 0x17, 0xa2, 0xf1, 0x01, 0xd5, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Harpsichord */
|
||||
{ 0x01, 0x01, 0x92, 0x09, 0xc2, 0xc2, 0xa8, 0x58, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Clav */
|
||||
{ 0x0c, 0x81, 0x5c, 0x09, 0xf6, 0xf3, 0x54, 0xb5, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Celesta */
|
||||
{ 0x07, 0x11, 0x97, 0x89, 0xf6, 0xf5, 0x32, 0x11, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Glockenspiel */
|
||||
{ 0x17, 0x01, 0x21, 0x09, 0x56, 0xf6, 0x04, 0x04, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Music Box */
|
||||
{ 0x18, 0x81, 0x62, 0x09, 0xf3, 0xf2, 0xe6, 0xf6, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Vibraphone */
|
||||
{ 0x18, 0x21, 0x23, 0x09, 0xf7, 0xe5, 0x55, 0xd8, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Marimba */
|
||||
{ 0x15, 0x01, 0x91, 0x09, 0xf6, 0xf6, 0xa6, 0xe6, 0x00, 0x00, 0x04, 0, 0, 0 }, /* Xylophone */
|
||||
{ 0x45, 0x81, 0x59, 0x89, 0xd3, 0xa3, 0x82, 0xe3, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Tubular Bells */
|
||||
{ 0x03, 0x81, 0x49, 0x89, 0x74, 0xb3, 0x55, 0x05, 0x01, 0x00, 0x04, 0, 0, 0 }, /* Dulcimer */
|
||||
{ 0x71, 0x31, 0x92, 0x09, 0xf6, 0xf1, 0x14, 0x07, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Drawbar Organ */
|
||||
{ 0x72, 0x30, 0x14, 0x09, 0xc7, 0xc7, 0x58, 0x08, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Percussive Organ */
|
||||
{ 0x70, 0xb1, 0x44, 0x09, 0xaa, 0x8a, 0x18, 0x08, 0x00, 0x00, 0x04, 0, 0, 0 }, /* Rock Organ */
|
||||
{ 0x23, 0xb1, 0x93, 0x09, 0x97, 0x55, 0x23, 0x14, 0x01, 0x00, 0x04, 0, 0, 0 }, /* Church Organ */
|
||||
{ 0x61, 0xb1, 0x13, 0x89, 0x97, 0x55, 0x04, 0x04, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Reed Organ */
|
||||
{ 0x24, 0xb1, 0x48, 0x09, 0x98, 0x46, 0x2a, 0x1a, 0x01, 0x00, 0x0c, 0, 0, 0 }, /* Accoridan */
|
||||
{ 0x61, 0x21, 0x13, 0x09, 0x91, 0x61, 0x06, 0x07, 0x01, 0x00, 0x0a, 0, 0, 0 }, /* Harmonica */
|
||||
{ 0x21, 0xa1, 0x13, 0x92, 0x71, 0x61, 0x06, 0x07, 0x00, 0x00, 0x06, 0, 0, 0 }, /* Tango Accordian */
|
||||
{ 0x02, 0x41, 0x9c, 0x89, 0xf3, 0xf3, 0x94, 0xc8, 0x01, 0x00, 0x0c, 0, 0, 0 }, /* Acoustic Guitar(nylon) */
|
||||
{ 0x03, 0x11, 0x54, 0x09, 0xf3, 0xf1, 0x9a, 0xe7, 0x01, 0x00, 0x0c, 0, 0, 0 }, /* Acoustic Guitar(steel) */
|
||||
{ 0x23, 0x21, 0x5f, 0x09, 0xf1, 0xf2, 0x3a, 0xf8, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Electric Guitar(jazz) */
|
||||
{ 0x03, 0x21, 0x87, 0x89, 0xf6, 0xf3, 0x22, 0xf8, 0x01, 0x00, 0x06, 0, 0, 0 }, /* Electric Guitar(clean) */
|
||||
{ 0x03, 0x21, 0x47, 0x09, 0xf9, 0xf6, 0x54, 0x3a, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Electric Guitar(muted) */
|
||||
{ 0x23, 0x21, 0x4a, 0x0e, 0x91, 0x84, 0x41, 0x19, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Overdriven Guitar */
|
||||
{ 0x23, 0x21, 0x4a, 0x09, 0x95, 0x94, 0x19, 0x19, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Distortion Guitar */
|
||||
{ 0x09, 0x84, 0xa1, 0x89, 0x20, 0xd1, 0x4f, 0xf8, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Guitar Harmonics */
|
||||
{ 0x21, 0xa2, 0x1e, 0x09, 0x94, 0xc3, 0x06, 0xa6, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Acoustic Bass */
|
||||
{ 0x31, 0x31, 0x12, 0x09, 0xf1, 0xf1, 0x28, 0x18, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Electric Bass(finger) */
|
||||
{ 0x31, 0x31, 0x8d, 0x09, 0xf1, 0xf1, 0xe8, 0x78, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Electric Bass(pick) */
|
||||
{ 0x31, 0x32, 0x5b, 0x09, 0x51, 0x71, 0x28, 0x48, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Fretless Bass */
|
||||
{ 0x01, 0x21, 0x8b, 0x49, 0xa1, 0xf2, 0x9a, 0xdf, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Slap Bass 1 */
|
||||
{ 0x21, 0x21, 0x8b, 0x11, 0xa2, 0xa1, 0x16, 0xdf, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Slap Bass 2 */
|
||||
{ 0x31, 0x31, 0x8b, 0x09, 0xf4, 0xf1, 0xe8, 0x78, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Synth Bass 1 */
|
||||
{ 0x31, 0x31, 0x12, 0x09, 0xf1, 0xf1, 0x28, 0x18, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Synth Bass 2 */
|
||||
{ 0x31, 0x21, 0x15, 0x09, 0xdd, 0x56, 0x13, 0x26, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Violin */
|
||||
{ 0x31, 0x21, 0x16, 0x09, 0xdd, 0x66, 0x13, 0x06, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Viola */
|
||||
{ 0x71, 0x31, 0x49, 0x09, 0xd1, 0x61, 0x1c, 0x0c, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Cello */
|
||||
{ 0x21, 0x23, 0x4d, 0x89, 0x71, 0x72, 0x12, 0x06, 0x01, 0x00, 0x02, 0, 0, 0 }, /* Contrabass */
|
||||
{ 0xf1, 0xe1, 0x40, 0x09, 0xf1, 0x6f, 0x21, 0x16, 0x01, 0x00, 0x02, 0, 0, 0 }, /* Tremolo Strings */
|
||||
{ 0x02, 0x01, 0x1a, 0x89, 0xf5, 0x85, 0x75, 0x35, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Pizzicato Strings */
|
||||
{ 0x02, 0x01, 0x1d, 0x89, 0xf5, 0xf3, 0x75, 0xf4, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Orchestral Strings */
|
||||
{ 0x10, 0x11, 0x41, 0x09, 0xf5, 0xf2, 0x05, 0xc3, 0x01, 0x00, 0x02, 0, 0, 0 }, /* Timpani */
|
||||
{ 0x21, 0xa2, 0x9b, 0x0a, 0xb1, 0x72, 0x25, 0x08, 0x01, 0x00, 0x0e, 0, 0, 0 }, /* String Ensemble 1 */
|
||||
{ 0xa1, 0x21, 0x98, 0x09, 0x7f, 0x3f, 0x03, 0x07, 0x01, 0x01, 0x00, 0, 0, 0 }, /* String Ensemble 2 */
|
||||
{ 0xa1, 0x61, 0x93, 0x09, 0xc1, 0x4f, 0x12, 0x05, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* SynthStrings 1 */
|
||||
{ 0x21, 0x61, 0x18, 0x09, 0xc1, 0x4f, 0x22, 0x05, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* SynthStrings 2 */
|
||||
{ 0x31, 0x72, 0x5b, 0x8c, 0xf4, 0x8a, 0x15, 0x05, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Choir Aahs */
|
||||
{ 0xa1, 0x61, 0x90, 0x09, 0x74, 0x71, 0x39, 0x67, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Voice Oohs */
|
||||
{ 0x71, 0x72, 0x57, 0x09, 0x54, 0x7a, 0x05, 0x05, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Synth Voice */
|
||||
{ 0x90, 0x41, 0x00, 0x09, 0x54, 0xa5, 0x63, 0x45, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Orchestra Hit */
|
||||
{ 0x21, 0x21, 0x92, 0x0a, 0x85, 0x8f, 0x17, 0x09, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Trumpet */
|
||||
{ 0x21, 0x21, 0x94, 0x0e, 0x75, 0x8f, 0x17, 0x09, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Trombone */
|
||||
{ 0x21, 0x61, 0x94, 0x09, 0x76, 0x82, 0x15, 0x37, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Tuba */
|
||||
{ 0x31, 0x21, 0x43, 0x09, 0x9e, 0x62, 0x17, 0x2c, 0x01, 0x01, 0x02, 0, 0, 0 }, /* Muted Trumpet */
|
||||
{ 0x21, 0x21, 0x9b, 0x09, 0x61, 0x7f, 0x6a, 0x0a, 0x00, 0x00, 0x02, 0, 0, 0 }, /* French Horn */
|
||||
{ 0x61, 0x22, 0x8a, 0x0f, 0x75, 0x74, 0x1f, 0x0f, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Brass Section */
|
||||
{ 0xa1, 0x21, 0x86, 0x8c, 0x72, 0x71, 0x55, 0x18, 0x01, 0x00, 0x00, 0, 0, 0 }, /* SynthBrass 1 */
|
||||
{ 0x21, 0x21, 0x4d, 0x09, 0x54, 0xa6, 0x3c, 0x1c, 0x00, 0x00, 0x08, 0, 0, 0 }, /* SynthBrass 2 */
|
||||
{ 0x31, 0x61, 0x8f, 0x09, 0x93, 0x72, 0x02, 0x0b, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Soprano Sax */
|
||||
{ 0x31, 0x61, 0x8e, 0x09, 0x93, 0x72, 0x03, 0x09, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Alto Sax */
|
||||
{ 0x31, 0x61, 0x91, 0x09, 0x93, 0x82, 0x03, 0x09, 0x01, 0x00, 0x0a, 0, 0, 0 }, /* Tenor Sax */
|
||||
{ 0x31, 0x61, 0x8e, 0x09, 0x93, 0x72, 0x0f, 0x0f, 0x01, 0x00, 0x0a, 0, 0, 0 }, /* Baritone Sax */
|
||||
{ 0x21, 0x21, 0x4b, 0x09, 0xaa, 0x8f, 0x16, 0x0a, 0x01, 0x00, 0x08, 0, 0, 0 }, /* Oboe */
|
||||
{ 0x31, 0x21, 0x90, 0x09, 0x7e, 0x8b, 0x17, 0x0c, 0x01, 0x01, 0x06, 0, 0, 0 }, /* English Horn */
|
||||
{ 0x31, 0x32, 0x81, 0x09, 0x75, 0x61, 0x19, 0x19, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Bassoon */
|
||||
{ 0x32, 0x21, 0x90, 0x09, 0x9b, 0x72, 0x21, 0x17, 0x00, 0x00, 0x04, 0, 0, 0 }, /* Clarinet */
|
||||
{ 0xe1, 0xe1, 0x1f, 0x09, 0x85, 0x65, 0x5f, 0x1a, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Piccolo */
|
||||
{ 0xe1, 0xe1, 0x46, 0x09, 0x88, 0x65, 0x5f, 0x1a, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Flute */
|
||||
{ 0xa1, 0x21, 0x9c, 0x09, 0x75, 0x75, 0x1f, 0x0a, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Recorder */
|
||||
{ 0x31, 0x21, 0x8b, 0x09, 0x84, 0x65, 0x58, 0x1a, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Pan Flute */
|
||||
{ 0xe1, 0xa1, 0x4c, 0x09, 0x66, 0x65, 0x56, 0x26, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Blown Bottle */
|
||||
{ 0x62, 0xa1, 0xcb, 0x09, 0x76, 0x55, 0x46, 0x36, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Skakuhachi */
|
||||
{ 0x62, 0xa1, 0xa2, 0x09, 0x57, 0x56, 0x07, 0x07, 0x00, 0x00, 0x0b, 0, 0, 0 }, /* Whistle */
|
||||
{ 0x62, 0xa1, 0x9c, 0x09, 0x77, 0x76, 0x07, 0x07, 0x00, 0x00, 0x0b, 0, 0, 0 }, /* Ocarina */
|
||||
{ 0x22, 0x21, 0x59, 0x09, 0xff, 0xff, 0x03, 0x0f, 0x02, 0x00, 0x00, 0, 0, 0 }, /* Lead 1 (square) */
|
||||
{ 0x21, 0x21, 0x0e, 0x09, 0xff, 0xff, 0x0f, 0x0f, 0x01, 0x01, 0x00, 0, 0, 0 }, /* Lead 2 (sawtooth) */
|
||||
{ 0x22, 0x21, 0x46, 0x89, 0x86, 0x64, 0x55, 0x18, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Lead 3 (calliope) */
|
||||
{ 0x21, 0xa1, 0x45, 0x09, 0x66, 0x96, 0x12, 0x0a, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Lead 4 (chiff) */
|
||||
{ 0x21, 0x22, 0x8b, 0x09, 0x92, 0x91, 0x2a, 0x2a, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Lead 5 (charang) */
|
||||
{ 0xa2, 0x61, 0x9e, 0x49, 0xdf, 0x6f, 0x05, 0x07, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Lead 6 (voice) */
|
||||
{ 0x20, 0x60, 0x1a, 0x09, 0xef, 0x8f, 0x01, 0x06, 0x00, 0x02, 0x00, 0, 0, 0 }, /* Lead 7 (fifths) */
|
||||
{ 0x21, 0x21, 0x8f, 0x86, 0xf1, 0xf4, 0x29, 0x09, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Lead 8 (bass+lead) */
|
||||
{ 0x77, 0xa1, 0xa5, 0x09, 0x53, 0xa0, 0x94, 0x05, 0x00, 0x00, 0x02, 0, 0, 0 }, /* Pad 1 (new age) */
|
||||
{ 0x61, 0xb1, 0x1f, 0x89, 0xa8, 0x25, 0x11, 0x03, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Pad 2 (warm) */
|
||||
{ 0x61, 0x61, 0x17, 0x09, 0x91, 0x55, 0x34, 0x16, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Pad 3 (polysynth) */
|
||||
{ 0x71, 0x72, 0x5d, 0x09, 0x54, 0x6a, 0x01, 0x03, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Pad 4 (choir) */
|
||||
{ 0x21, 0xa2, 0x97, 0x09, 0x21, 0x42, 0x43, 0x35, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Pad 5 (bowed) */
|
||||
{ 0xa1, 0x21, 0x1c, 0x09, 0xa1, 0x31, 0x77, 0x47, 0x01, 0x01, 0x00, 0, 0, 0 }, /* Pad 6 (metallic) */
|
||||
{ 0x21, 0x61, 0x89, 0x0c, 0x11, 0x42, 0x33, 0x25, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Pad 7 (halo) */
|
||||
{ 0xa1, 0x21, 0x15, 0x09, 0x11, 0xcf, 0x47, 0x07, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Pad 8 (sweep) */
|
||||
{ 0x3a, 0x51, 0xce, 0x09, 0xf8, 0x86, 0xf6, 0x02, 0x00, 0x00, 0x02, 0, 0, 0 }, /* FX 1 (rain) */
|
||||
{ 0x21, 0x21, 0x15, 0x09, 0x21, 0x41, 0x23, 0x13, 0x01, 0x00, 0x00, 0, 0, 0 }, /* FX 2 (soundtrack) */
|
||||
{ 0x06, 0x01, 0x5b, 0x09, 0x74, 0xa5, 0x95, 0x72, 0x00, 0x00, 0x00, 0, 0, 0 }, /* FX 3 (crystal) */
|
||||
{ 0x22, 0x61, 0x92, 0x8c, 0xb1, 0xf2, 0x81, 0x26, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* FX 4 (atmosphere) */
|
||||
{ 0x41, 0x42, 0x4d, 0x09, 0xf1, 0xf2, 0x51, 0xf5, 0x01, 0x00, 0x00, 0, 0, 0 }, /* FX 5 (brightness) */
|
||||
{ 0x61, 0xa3, 0x94, 0x89, 0x11, 0x11, 0x51, 0x13, 0x01, 0x00, 0x06, 0, 0, 0 }, /* FX 6 (goblins) */
|
||||
{ 0x61, 0xa1, 0x8c, 0x89, 0x11, 0x1d, 0x31, 0x03, 0x00, 0x00, 0x06, 0, 0, 0 }, /* FX 7 (echoes) */
|
||||
{ 0xa4, 0x61, 0x4c, 0x09, 0xf3, 0x81, 0x73, 0x23, 0x01, 0x00, 0x04, 0, 0, 0 }, /* FX 8 (sci-fi) */
|
||||
{ 0x02, 0x07, 0x85, 0x0c, 0xd2, 0xf2, 0x53, 0xf6, 0x00, 0x01, 0x00, 0, 0, 0 }, /* Sitar */
|
||||
{ 0x11, 0x13, 0x0c, 0x89, 0xa3, 0xa2, 0x11, 0xe5, 0x01, 0x00, 0x00, 0, 0, 0 }, /* Banjo */
|
||||
{ 0x11, 0x11, 0x06, 0x09, 0xf6, 0xf2, 0x41, 0xe6, 0x01, 0x02, 0x04, 0, 0, 0 }, /* Shamisen */
|
||||
{ 0x93, 0x91, 0x91, 0x09, 0xd4, 0xeb, 0x32, 0x11, 0x00, 0x01, 0x08, 0, 0, 0 }, /* Koto */
|
||||
{ 0x04, 0x01, 0x4f, 0x09, 0xfa, 0xc2, 0x56, 0x05, 0x00, 0x00, 0x0c, 0, 0, 0 }, /* Kalimba */
|
||||
{ 0x21, 0x22, 0x49, 0x09, 0x7c, 0x6f, 0x20, 0x0c, 0x00, 0x01, 0x06, 0, 0, 0 }, /* Bagpipe */
|
||||
{ 0x31, 0x21, 0x85, 0x09, 0xdd, 0x56, 0x33, 0x16, 0x01, 0x00, 0x0a, 0, 0, 0 }, /* Fiddle */
|
||||
{ 0x20, 0x21, 0x04, 0x8a, 0xda, 0x8f, 0x05, 0x0b, 0x02, 0x00, 0x06, 0, 0, 0 }, /* Shanai */
|
||||
{ 0x05, 0x03, 0x6a, 0x89, 0xf1, 0xc3, 0xe5, 0xe5, 0x00, 0x00, 0x06, 0, 0, 0 }, /* Tinkle Bell */
|
||||
{ 0x07, 0x02, 0x15, 0x09, 0xec, 0xf8, 0x26, 0x16, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Agogo */
|
||||
{ 0x05, 0x01, 0x9d, 0x09, 0x67, 0xdf, 0x35, 0x05, 0x00, 0x00, 0x08, 0, 0, 0 }, /* Steel Drums */
|
||||
{ 0x18, 0x12, 0x96, 0x09, 0xfa, 0xf8, 0x28, 0xe5, 0x00, 0x00, 0x0a, 0, 0, 0 }, /* Woodblock */
|
||||
{ 0x10, 0x00, 0x86, 0x0c, 0xa8, 0xfa, 0x07, 0x03, 0x00, 0x00, 0x06, 0, 0, 0 }, /* Taiko Drum */
|
||||
{ 0x11, 0x10, 0x41, 0x0c, 0xf8, 0xf3, 0x47, 0x03, 0x02, 0x00, 0x04, 0, 0, 0 }, /* Melodic Tom */
|
||||
{ 0x01, 0x10, 0x8e, 0x09, 0xf1, 0xf3, 0x06, 0x02, 0x02, 0x00, 0x0e, 0, 0, 0 }, /* Synth Drum */
|
||||
{ 0x0e, 0xc0, 0x00, 0x09, 0x1f, 0x1f, 0x00, 0xff, 0x00, 0x03, 0x0e, 0, 0, 0 }, /* Reverse Cymbal */
|
||||
{ 0x06, 0x03, 0x80, 0x91, 0xf8, 0x56, 0x24, 0x84, 0x00, 0x02, 0x0e, 0, 0, 0 }, /* Guitar Fret Noise */
|
||||
{ 0x0e, 0xd0, 0x00, 0x0e, 0xf8, 0x34, 0x00, 0x04, 0x00, 0x03, 0x0e, 0, 0, 0 }, /* Breath Noise */
|
||||
{ 0x0e, 0xc0, 0x00, 0x09, 0xf6, 0x1f, 0x00, 0x02, 0x00, 0x03, 0x0e, 0, 0, 0 }, /* Seashore */
|
||||
{ 0xd5, 0xda, 0x95, 0x49, 0x37, 0x56, 0xa3, 0x37, 0x00, 0x00, 0x00, 0, 0, 0 }, /* Bird Tweet */
|
||||
{ 0x35, 0x14, 0x5c, 0x11, 0xb2, 0xf4, 0x61, 0x15, 0x02, 0x00, 0x0a, 0, 0, 0 }, /* Telephone ring */
|
||||
{ 0x0e, 0xd0, 0x00, 0x09, 0xf6, 0x4f, 0x00, 0xf5, 0x00, 0x03, 0x0e, 0, 0, 0 }, /* Helicopter */
|
||||
{ 0x26, 0xe4, 0x00, 0x09, 0xff, 0x12, 0x01, 0x16, 0x00, 0x01, 0x0e, 0, 0, 0 }, /* Applause */
|
||||
{ 0x00, 0x00, 0x00, 0x09, 0xf3, 0xf6, 0xf0, 0xc9, 0x00, 0x02, 0x0e, 0, 0, 0 } /* Gunshot */
|
||||
|
||||
};
|
||||
|
||||
/* logarithmic relationship between midi and FM volumes */
|
||||
static int my_midi_fm_vol_table[128] = {
|
||||
0, 11, 16, 19, 22, 25, 27, 29, 32, 33, 35, 37, 39, 40, 42, 43,
|
||||
45, 46, 48, 49, 50, 51, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62,
|
||||
64, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 75, 76, 77,
|
||||
78, 79, 80, 80, 81, 82, 83, 83, 84, 85, 86, 86, 87, 88, 89, 89,
|
||||
90, 91, 91, 92, 93, 93, 94, 95, 96, 96, 97, 97, 98, 99, 99, 100,
|
||||
101, 101, 102, 103, 103, 104, 104, 105, 106, 106, 107, 107, 108,
|
||||
109, 109, 110, 110, 111, 112, 112, 113, 113, 114, 114, 115, 115,
|
||||
116, 117, 117, 118, 118, 119, 119, 120, 120, 121, 121, 122, 122,
|
||||
123, 123, 124, 124, 125, 125, 126, 126, 127
|
||||
};
|
||||
|
||||
class MidiDriver_MIDIEMU : public MidiDriver {
|
||||
public:
|
||||
MidiDriver_MIDIEMU();
|
||||
int open(int mode);
|
||||
void close();
|
||||
void send(uint32 b);
|
||||
void pause(bool pause);
|
||||
void set_stream_callback(void *param, StreamCallback *sc);
|
||||
|
||||
private:
|
||||
struct midi_channel {
|
||||
int inum;
|
||||
unsigned char ins[11];
|
||||
int vol;
|
||||
int nshift;
|
||||
int on;
|
||||
};
|
||||
|
||||
enum {
|
||||
ADLIB_MELODIC = 0,
|
||||
ADLIB_RYTHM = 1
|
||||
};
|
||||
|
||||
void generate_samples(int16 *buf, uint len);
|
||||
static void premix_proc(void *param, int16 *buf, unsigned int len);
|
||||
|
||||
void midi_write_adlib(unsigned int r, unsigned char v);
|
||||
void midi_fm_instrument(int voice, unsigned char *inst);
|
||||
void midi_fm_volume(int voice, int volume);
|
||||
void midi_fm_playnote(int voice, int note, int volume);
|
||||
void midi_fm_endnote(int voice);
|
||||
unsigned char adlib_data[256];
|
||||
int adlib_style;
|
||||
int adlib_mode;
|
||||
|
||||
StreamCallback *_stream_proc;
|
||||
void *_stream_param;
|
||||
int _mode;
|
||||
FM_OPL *_opl;
|
||||
int chp[9][3];
|
||||
unsigned char myinsbank[128][16];
|
||||
midi_channel ch[16];
|
||||
};
|
||||
|
||||
MidiDriver_MIDIEMU::MidiDriver_MIDIEMU(){
|
||||
int i, j;
|
||||
|
||||
_mode = 0;
|
||||
for (i = 0; i < 128; i++)
|
||||
for (j = 0; j < 16; j++)
|
||||
myinsbank[i][j] = midi_fm_instruments_table[i][j];
|
||||
for (i = 0; i < 16; i++) {
|
||||
ch[i].inum = 0;
|
||||
for (j = 0; j < 11; j++)
|
||||
ch[i].ins[j] = myinsbank[ch[i].inum][j];
|
||||
ch[i].vol = 127;
|
||||
ch[i].nshift = -25;
|
||||
ch[i].on = 1;
|
||||
}
|
||||
|
||||
/* General init */
|
||||
for (i=0; i < 9; i++) {
|
||||
chp[i][0] = -1;
|
||||
chp[i][2] = 0;
|
||||
}
|
||||
|
||||
adlib_mode = ADLIB_MELODIC;
|
||||
}
|
||||
|
||||
int MidiDriver_MIDIEMU::open(int mode) {
|
||||
_opl = OPLCreate(OPL_TYPE_YM3812, 3579545, g_scumm->_system->property(OSystem::PROP_GET_SAMPLE_RATE,0));
|
||||
g_scumm->_mixer->setup_premix((void*) this, premix_proc);
|
||||
return 0;
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::close() {
|
||||
_mode = 0;
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::generate_samples(int16 *data, uint len) {
|
||||
if (!_opl) {
|
||||
memset(data, 0, len * sizeof(*data));
|
||||
} else {
|
||||
YM3812UpdateOne(_opl, data, len);
|
||||
}
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::premix_proc(void *param, int16 *buf, unsigned int len) {
|
||||
((MidiDriver_MIDIEMU*)param)->generate_samples(buf, len);
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::send(uint32 b)
|
||||
{
|
||||
unsigned char channel = b & 0x0F;
|
||||
|
||||
switch (b & 0xF0) {
|
||||
case 0x80: {/*note off*/
|
||||
unsigned char note = (unsigned char)((b >> 8) & 0x7F);
|
||||
for (int i = 0; i < 9; i++)
|
||||
if ((chp[i][0] == channel) && (chp[i][1] == note)) {
|
||||
midi_fm_endnote(i);
|
||||
chp[i][0] = -1;
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 0x90: { /*note on*/
|
||||
unsigned char note = (unsigned char)((b >> 8) & 0x7F);
|
||||
unsigned char vel = (unsigned char)((b >> 16) & 0x7F);
|
||||
int i, j;
|
||||
int onl, on, nv;
|
||||
unsigned char ins[11];
|
||||
|
||||
if (ch[channel].on != 0) {
|
||||
for (i = 0; i < 9; i++)
|
||||
chp[i][2]++;
|
||||
|
||||
j = 0;
|
||||
on = -1;
|
||||
onl = 0;
|
||||
for (i = 0; i < 9; i++)
|
||||
if ((chp[i][0] == -1) && (chp[i][2] > onl)) {
|
||||
onl = chp[i][2];
|
||||
on = i;
|
||||
j = 1;
|
||||
}
|
||||
|
||||
if (on == -1) {
|
||||
onl = 0;
|
||||
for (i = 0; i < 9; i++)
|
||||
if (chp[i][2] > onl) {
|
||||
onl = chp[i][2];
|
||||
on = i;
|
||||
}
|
||||
}
|
||||
|
||||
if (j == 0)
|
||||
midi_fm_endnote(on);
|
||||
|
||||
if ((vel != 0) && (ch[channel].inum >= 0) && (ch[channel].inum < 128)) {
|
||||
if ((adlib_mode == ADLIB_MELODIC) || (channel < 12))
|
||||
midi_fm_instrument(on, ch[channel].ins);
|
||||
else {
|
||||
//the following fails to be effective
|
||||
//at doing rythm sounds .. (cmf blah)
|
||||
ins[0] = ins[1] = ch[channel].ins[0];
|
||||
ins[2] = ins[3] = ch[channel].ins[2];
|
||||
ins[4] = ins[5] = ch[channel].ins[4];
|
||||
ins[6] = ins[7] = ch[channel].ins[6];
|
||||
ins[8] = ins[9] = ch[channel].ins[8];
|
||||
ins[10] = (ch[channel].ins[10] | 1);
|
||||
midi_fm_instrument(on,ins);
|
||||
}
|
||||
|
||||
nv = (ch[channel].vol * vel) / 128;
|
||||
#ifdef LUCAS_MODE
|
||||
nv *= 2;
|
||||
#endif
|
||||
if (nv > 127) nv = 127;
|
||||
nv = my_midi_fm_vol_table[nv];
|
||||
#ifdef LUCAS_MODE
|
||||
nv = (int)((double) sqrt((double) nv) * 11); /* TO CHANGE !!! */
|
||||
#endif
|
||||
}
|
||||
|
||||
midi_fm_playnote(on, note + ch[channel].nshift, nv * 2);
|
||||
chp[on][0] = channel;
|
||||
chp[on][1] = note;
|
||||
chp[on][2] = 0;
|
||||
} else {
|
||||
if (vel == 0) { //same code as end note
|
||||
for (i = 0; i < 9; i++)
|
||||
if ((chp[i][0] == channel) && (chp[i][1] == note)) {
|
||||
// midi_fm_volume(i,0); // really end the note
|
||||
midi_fm_endnote(i);
|
||||
chp[i][0] = -1;
|
||||
}
|
||||
} else { // i forget what this is for.
|
||||
chp[on][0] = -1;
|
||||
chp[on][2] = 0;
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
case 0xa0: /*key after touch */
|
||||
/* this might all be good
|
||||
note=getnext(1); vel=getnext(1);
|
||||
for (i=0; i<9; i++)
|
||||
if (chp[i][0]==c & chp[i][1]==note)
|
||||
midi_fm_playnote(i,note+cnote[c],my_midi_fm_vol_table[(cvols[c]*vel)/128]*2);
|
||||
*/
|
||||
debug(1, "MIDI command 0xA0 (Key After Touch) not handled in MIDIEMU driver.");
|
||||
break;
|
||||
|
||||
case 0xb0: { /* control change .. pitch bend? */
|
||||
unsigned char ctrl = (unsigned char)((b >> 8) & 0x7F);
|
||||
unsigned char vel = (unsigned char)((b >> 16) & 0x7F);
|
||||
|
||||
switch(ctrl) {
|
||||
case 0x07:
|
||||
ch[channel].vol = vel;
|
||||
break;
|
||||
default:
|
||||
debug(1, "MIDI sub-command 0xB0 (Key After Touch) case %02X not handled in MIDIEMU driver.", ctrl);
|
||||
break;
|
||||
}
|
||||
} break;
|
||||
|
||||
case 0xc0: { /* patch change */
|
||||
unsigned char instrument = (unsigned char)((b >> 8) & 0x7F);
|
||||
ch[channel].inum = instrument;
|
||||
for (int j = 0; j < 11; j++)
|
||||
ch[channel].ins[j] = myinsbank[ch[channel].inum][j];
|
||||
} break;
|
||||
|
||||
case 0xd0: /* channel touch */
|
||||
debug(1, "MIDI command 0xD0 (Channel Touch) not handled in MIDIEMU driver.");
|
||||
break;
|
||||
case 0xe0: /* pitch wheel */
|
||||
debug(1, "MIDI command 0xE0 (Pitch Wheel) not handled in MIDIEMU driver.");
|
||||
break;
|
||||
|
||||
default:
|
||||
fprintf(stderr, "Unknown : %08x\n", (int) b);
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::pause(bool pause) {
|
||||
if (_mode == MO_STREAMING) {
|
||||
}
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::set_stream_callback(void *param, StreamCallback *sc) {
|
||||
_stream_param = param;
|
||||
_stream_proc = sc;
|
||||
}
|
||||
|
||||
MidiDriver *MidiDriver_MIDIEMU_create() {
|
||||
return new MidiDriver_MIDIEMU();
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::midi_write_adlib(unsigned int r, unsigned char v) {
|
||||
OPLWriteReg(_opl, r, v);
|
||||
adlib_data[r] = v;
|
||||
}
|
||||
|
||||
static unsigned char adlib_opadd[] = {0x00 ,0x01 ,0x02 ,0x08 ,0x09 ,0x0A ,0x10 ,0x11 ,0x12};
|
||||
|
||||
void MidiDriver_MIDIEMU::midi_fm_instrument(int voice, unsigned char *inst) {
|
||||
/* Just gotta make sure this happens because who knows when it'll be reset otherwise.... */
|
||||
midi_write_adlib(0xbd, 0);
|
||||
|
||||
midi_write_adlib(0x20 + adlib_opadd[voice], inst[0]);
|
||||
midi_write_adlib(0x23 + adlib_opadd[voice], inst[1]);
|
||||
|
||||
#ifdef LUCAS_MODE
|
||||
midi_write_adlib(0x43 + adlib_opadd[voice], 0x3f);
|
||||
if ((inst[10] & 1) == 0)
|
||||
midi_write_adlib(0x40 + adlib_opadd[voice], inst[2]);
|
||||
else
|
||||
midi_write_adlib(0x40 + adlib_opadd[voice], 0x3f);
|
||||
#else
|
||||
midi_write_adlib(0x40 + adlib_opadd[voice], inst[2]);
|
||||
if ((inst[10] & 1) == 0)
|
||||
midi_write_adlib(0x43 + adlib_opadd[voice],inst[3]);
|
||||
else
|
||||
midi_write_adlib(0x43 + adlib_opadd[voice], 0);
|
||||
#endif
|
||||
|
||||
midi_write_adlib(0x60 + adlib_opadd[voice], inst[4]);
|
||||
midi_write_adlib(0x63 + adlib_opadd[voice], inst[5]);
|
||||
midi_write_adlib(0x80 + adlib_opadd[voice], inst[6]);
|
||||
midi_write_adlib(0x83 + adlib_opadd[voice], inst[7]);
|
||||
midi_write_adlib(0xe0 + adlib_opadd[voice], inst[8]);
|
||||
midi_write_adlib(0xe3 + adlib_opadd[voice], inst[9]);
|
||||
|
||||
midi_write_adlib(0xc0 + voice, inst[10]);
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::midi_fm_volume(int voice, int volume) {
|
||||
volume >>= 2;
|
||||
|
||||
if ((adlib_data[0xc0 + voice] & 1) == 1)
|
||||
midi_write_adlib(0x40 + adlib_opadd[voice],
|
||||
(unsigned char)((63 - volume) | (adlib_data[0x40 + adlib_opadd[voice]] & 0xc0)));
|
||||
midi_write_adlib(0x43 + adlib_opadd[voice],
|
||||
(unsigned char)((63 - volume) | (adlib_data[0x43 + adlib_opadd[voice]] & 0xc0)));
|
||||
}
|
||||
|
||||
static int fnums[] = { 0x16b,0x181,0x198,0x1b0,0x1ca,0x1e5,0x202,0x220,0x241,0x263,0x287,0x2ae };
|
||||
|
||||
void MidiDriver_MIDIEMU::midi_fm_playnote(int voice, int note, int volume) {
|
||||
int freq = fnums[note % 12];
|
||||
int oct = note / 12;
|
||||
int c;
|
||||
|
||||
midi_fm_volume(voice, volume);
|
||||
midi_write_adlib(0xa0 + voice, (unsigned char) (freq & 0xff));
|
||||
|
||||
c = ((freq & 0x300) >> 8) + (oct << 2) + (1 << 5);
|
||||
midi_write_adlib(0xb0 + voice, (unsigned char) c);
|
||||
}
|
||||
|
||||
void MidiDriver_MIDIEMU::midi_fm_endnote(int voice) {
|
||||
midi_write_adlib(0xb0 + voice, (unsigned char) (adlib_data[0xb0 + voice] & (255 - 32)));
|
||||
}
|
||||
|
||||
|
||||
#if 0
|
||||
|
|
|
|||
|
|
@ -106,6 +106,7 @@ enum {
|
|||
MD_QTMUSIC = 5,
|
||||
MD_AMIDI = 6,
|
||||
MD_COREAUDIO = 7,
|
||||
MD_MIDIEMU = 8
|
||||
};
|
||||
|
||||
|
||||
|
|
@ -118,3 +119,4 @@ extern MidiDriver *MidiDriver_SEQ_create();
|
|||
extern MidiDriver *MidiDriver_QT_create();
|
||||
extern MidiDriver *MidiDriver_CORE_create();
|
||||
extern MidiDriver *MidiDriver_AMIDI_create();
|
||||
extern MidiDriver *MidiDriver_MIDIEMU_create();
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue