X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;ds=inline;f=16%2F16_snd.c;fp=16%2F16_snd.c;h=0000000000000000000000000000000000000000;hb=7e0f6ed4f3100a8d6b3a1da9f96eecee866900bb;hp=47cab348332462fb8a4a85e326c22b1888540818;hpb=448d9ab387cd4d054f38e0fa3c816992f86f133f;p=16.git diff --git a/16/16_snd.c b/16/16_snd.c deleted file mode 100644 index 47cab348..00000000 --- a/16/16_snd.c +++ /dev/null @@ -1,195 +0,0 @@ -/* Project 16 Source Code~ - * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669 - * - * This file is part of Project 16. - * - * Project 16 is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 3 of the License, or - * (at your option) any later version. - * - * Project 16 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 General Public License for more details. - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program. If not, see , or - * write to the Free Software Foundation, Inc., 51 Franklin Street, - * Fifth Floor, Boston, MA 02110-1301 USA. - * - */ - -#include "src/lib/16_snd.h" - -void opl2out(word reg, word data) -{ - __asm - { - mov ax,reg - mov dx,word ptr [ADLIB_FM_ADDRESS] - or ah,ah - jz @@1 - add dx,2 -@@1: out dx,al - mov cx,6 -@@2: in al,dx - loop @@2 - inc dl - mov ax,data - out dx,al - dec dl - mov cx,36 -@@3: in al,dx - loop @@3 - } -} - -void opl3out(word reg, word data) -{ - __asm - { - mov ax,reg - mov dx,word ptr [ADLIB_FM_ADDRESS] - or ah,ah - jz @@1 - add dx,2 -@@1: out dx,al - inc dl - mov ax,data - out dx,al - dec dl - mov cx,26 -@@2: in al,dx - loop @@2 - } -} - -void opl3exp(word data) -{ - __asm - { - mov ax,data - mov dx,word ptr [ADLIB_FM_ADDRESS] - add dx,2 - out dx,al - mov cx,6 -@@1: in al,dx - loop @@1 - inc dl - mov al,ah - out dx,al - mov cx,36 -@@2: in al,dx - loop @@2 - } -} - -/* Function: FMResest ******************************************************* -* -* Description: quick and dirty sound card reset (zeros all -* registers). -* -*/ -void FMReset(void/*int percusiveMode*/) -{ - int i; - - /* zero all registers */ - for(i = MIN_REGISTER; i < MAX_REGISTER+1; i++) opl2out(i, 0); - - /* allow FM chips to control the waveform of each operator */ - opl2out(0x01, 0x20); - - /* set rhythm enabled (6 melodic voices, 5 percussive) */ - opl2out(0xBD, 0x20); - - //FMSetPercusiveMode(percusiveMode); -} /* End of FMReset */ - -/* Function: FMKeyOff ******************************************************* -* -* Parameters: voice - which voice to turn off. -* -* Description: turns off the specified voice. -* -*/ -void FMKeyOff(int voice) -{ - int regNum; - - /* turn voice off */ - regNum = 0xB0 + voice % 11;//NUMVOICE; - opl2out(regNum, 0x0E); -} /* End of FMKeyOff */ - -/* Function: FMKeyOn ******************************************************* -* -* Parameters: voice - which voice to turn on. -* freq - its frequency (note). -* octave - its octave. -* -* Description: turns on a voice of specfied frequency and -* octave. -* -*/ -void FMKeyOn(int voice, int freq, int octave) -{ - int regNum, tmp; - - regNum = 0xA0 + voice % 11;//NUMVOICE; - opl2out(regNum, freq & 0xff); - regNum = 0xB0 + voice % 11;//NUMVOICE; - tmp = (freq >> 8) | (octave << 2) | 0x20; - opl2out(regNum, tmp); -} /* End of FMKeyOn */ - -/* Function: FMSetVoice ***************************************************** -* -* Parameters: voiceNum - which voice to set. -* ins - instrument to set voice. -* -* Description: sets the instrument of a voice. -* -*/ -void FMSetVoice(int voiceNum, FMInstrument *ins){ - int opCellNum, cellOffset; - - voiceNum %= 11;//NUMVOICE; - cellOffset = voiceNum % 3 + ((voiceNum / 3) << 3); - - /* set sound characteristic */ - opCellNum = 0x20 + (char)cellOffset; - opl2out(opCellNum, ins->SoundCharacteristic[0]); - opCellNum += 3; - opl2out(opCellNum, ins->SoundCharacteristic[1]); - - /* set level/output */ - opCellNum = 0x40 + (char)cellOffset; - opl2out(opCellNum, ins->Level[0]); - opCellNum += 3; - opl2out(opCellNum, ins->Level[1]); - - /* set Attack/Decay */ - opCellNum = 0x60 + (char)cellOffset; - opl2out(opCellNum, ins->AttackDecay[0]); - opCellNum += 3; - opl2out(opCellNum, ins->AttackDecay[1]); - - /* set Sustain/Release */ - opCellNum = 0x80 + (char)cellOffset; - opl2out(opCellNum, ins->SustainRelease[0]); - opCellNum += 3; - opl2out(opCellNum, ins->SustainRelease[1]); - - /* set Wave Select */ - opCellNum = 0xE0 + (char)cellOffset; - opl2out(opCellNum, ins->WaveSelect[0]); - opCellNum += 3; - opl2out(opCellNum, ins->WaveSelect[1]); - - /* set Feedback/Selectivity */ - opCellNum = (byte)0xC0 + (byte)voiceNum; - opl2out(opCellNum, ins->Feedback); -} /* End of FMSetVoice */