2008-08-07 14:26:07 +02:00
|
|
|
|
/***********************************************************
|
|
|
|
|
|
* *
|
|
|
|
|
|
* YM2612.C : YM2612 emulator *
|
|
|
|
|
|
* *
|
|
|
|
|
|
* Almost constantes are taken from the MAME core *
|
|
|
|
|
|
* *
|
|
|
|
|
|
* This source is a part of Gens project *
|
|
|
|
|
|
* Written by St<EFBFBD>phane Dallongeville (gens@consolemul.com) *
|
|
|
|
|
|
* Copyright (c) 2002 by St<EFBFBD>phane Dallongeville *
|
|
|
|
|
|
* *
|
|
|
|
|
|
***********************************************************/
|
|
|
|
|
|
|
2007-08-10 22:34:06 +02:00
|
|
|
|
#ifndef _YM2612_H_
|
|
|
|
|
|
#define _YM2612_H_
|
|
|
|
|
|
|
|
|
|
|
|
// Change it if you need to do long update
|
|
|
|
|
|
#define MAX_UPDATE_LENGHT 2000
|
|
|
|
|
|
|
|
|
|
|
|
// Gens always uses 16 bits sound (in 32 bits buffer) and do the convertion later if needed.
|
|
|
|
|
|
#define OUTPUT_BITS 16
|
|
|
|
|
|
|
|
|
|
|
|
typedef struct slot__ {
|
|
|
|
|
|
int *DT; // param<61>tre detune
|
|
|
|
|
|
int MUL; // param<61>tre "multiple de fr<66>quence"
|
|
|
|
|
|
int TL; // Total Level = volume lorsque l'enveloppe est au plus haut
|
|
|
|
|
|
int TLL; // Total Level ajusted
|
|
|
|
|
|
int SLL; // Sustin Level (ajusted) = volume o<> l'enveloppe termine sa premi<6D>re phase de r<>gression
|
|
|
|
|
|
int KSR_S; // Key Scale Rate Shift = facteur de prise en compte du KSL dans la variations de l'enveloppe
|
|
|
|
|
|
int KSR; // Key Scale Rate = cette valeur est calcul<75>e par rapport <20> la fr<66>quence actuelle, elle va influer
|
|
|
|
|
|
// sur les diff<66>rents param<61>tres de l'enveloppe comme l'attaque, le decay ... comme dans la r<>alit<69> !
|
|
|
|
|
|
int SEG; // Type enveloppe SSG
|
|
|
|
|
|
int *AR; // Attack Rate (table pointeur) = Taux d'attaque (AR[KSR])
|
|
|
|
|
|
int *DR; // Decay Rate (table pointeur) = Taux pour la r<>gression (DR[KSR])
|
|
|
|
|
|
int *SR; // Sustin Rate (table pointeur) = Taux pour le maintien (SR[KSR])
|
|
|
|
|
|
int *RR; // Release Rate (table pointeur) = Taux pour le rel<65>chement (RR[KSR])
|
|
|
|
|
|
int Fcnt; // Frequency Count = compteur-fr<66>quence pour d<>terminer l'amplitude actuelle (SIN[Finc >> 16])
|
|
|
|
|
|
int Finc; // frequency step = pas d'incr<63>mentation du compteur-fr<66>quence
|
|
|
|
|
|
// plus le pas est grand, plus la fr<66>quence est a<>gu (ou haute)
|
|
|
|
|
|
int Ecurp; // Envelope current phase = cette variable permet de savoir dans quelle phase
|
|
|
|
|
|
// de l'enveloppe on se trouve, par exemple phase d'attaque ou phase de maintenue ...
|
|
|
|
|
|
// en fonction de la valeur de cette variable, on va appeler une fonction permettant
|
|
|
|
|
|
// de mettre <20> jour l'enveloppe courante.
|
|
|
|
|
|
int Ecnt; // Envelope counter = le compteur-enveloppe permet de savoir o<> l'on se trouve dans l'enveloppe
|
|
|
|
|
|
int Einc; // Envelope step courant
|
|
|
|
|
|
int Ecmp; // Envelope counter limite pour la prochaine phase
|
|
|
|
|
|
int EincA; // Envelope step for Attack = pas d'incr<63>mentation du compteur durant la phase d'attaque
|
|
|
|
|
|
// cette valeur est <20>gal <20> AR[KSR]
|
|
|
|
|
|
int EincD; // Envelope step for Decay = pas d'incr<63>mentation du compteur durant la phase de regression
|
|
|
|
|
|
// cette valeur est <20>gal <20> DR[KSR]
|
|
|
|
|
|
int EincS; // Envelope step for Sustain = pas d'incr<63>mentation du compteur durant la phase de maintenue
|
|
|
|
|
|
// cette valeur est <20>gal <20> SR[KSR]
|
|
|
|
|
|
int EincR; // Envelope step for Release = pas d'incr<63>mentation du compteur durant la phase de rel<65>chement
|
|
|
|
|
|
// cette valeur est <20>gal <20> RR[KSR]
|
|
|
|
|
|
int *OUTp; // pointeur of SLOT output = pointeur permettant de connecter la sortie de ce slot <20> l'entr<74>e
|
|
|
|
|
|
// d'un autre ou carrement <20> la sortie de la voie
|
|
|
|
|
|
int INd; // input data of the slot = donn<6E>es en entr<74>e du slot
|
|
|
|
|
|
int ChgEnM; // Change envelop mask.
|
|
|
|
|
|
int AMS; // AMS depth level of this SLOT = degr<67> de modulation de l'amplitude par le LFO
|
|
|
|
|
|
int AMSon; // AMS enable flag = drapeau d'activation de l'AMS
|
|
|
|
|
|
} slot_;
|
|
|
|
|
|
|
|
|
|
|
|
typedef struct channel__ {
|
|
|
|
|
|
int S0_OUT[4]; // anciennes sorties slot 0 (pour le feed back)
|
|
|
|
|
|
int Old_OUTd; // ancienne sortie de la voie (son brut)
|
|
|
|
|
|
int OUTd; // sortie de la voie (son brut)
|
|
|
|
|
|
int LEFT; // LEFT enable flag
|
|
|
|
|
|
int RIGHT; // RIGHT enable flag
|
|
|
|
|
|
int ALGO; // Algorythm = d<>termine les connections entre les op<6F>rateurs
|
|
|
|
|
|
int FB; // shift count of self feed back = degr<67> de "Feed-Back" du SLOT 1 (il est son unique entr<74>e)
|
|
|
|
|
|
int FMS; // Fr<46>quency Modulation Sensitivity of channel = degr<67> de modulation de la fr<66>quence sur la voie par le LFO
|
|
|
|
|
|
int AMS; // Amplitude Modulation Sensitivity of channel = degr<67> de modulation de l'amplitude sur la voie par le LFO
|
|
|
|
|
|
int FNUM[4]; // hauteur fr<66>quence de la voie (+ 3 pour le mode sp<73>cial)
|
|
|
|
|
|
int FOCT[4]; // octave de la voie (+ 3 pour le mode sp<73>cial)
|
|
|
|
|
|
int KC[4]; // Key Code = valeur fonction de la fr<66>quence (voir KSR pour les slots, KSR = KC >> KSR_S)
|
|
|
|
|
|
struct slot__ SLOT[4]; // four slot.operators = les 4 slots de la voie
|
|
|
|
|
|
int FFlag; // Frequency step recalculation flag
|
|
|
|
|
|
} channel_;
|
|
|
|
|
|
|
|
|
|
|
|
typedef struct ym2612__ {
|
|
|
|
|
|
int Clock; // Horloge YM2612
|
|
|
|
|
|
int Rate; // Sample Rate (11025/22050/44100)
|
|
|
|
|
|
int TimerBase; // TimerBase calculation
|
|
|
|
|
|
int Status; // YM2612 Status (timer overflow)
|
|
|
|
|
|
int OPNAadr; // addresse pour l'<27>criture dans l'OPN A (propre <20> l'<27>mulateur)
|
|
|
|
|
|
int OPNBadr; // addresse pour l'<27>criture dans l'OPN B (propre <20> l'<27>mulateur)
|
|
|
|
|
|
int LFOcnt; // LFO counter = compteur-fr<66>quence pour le LFO
|
|
|
|
|
|
int LFOinc; // LFO step counter = pas d'incr<63>mentation du compteur-fr<66>quence du LFO
|
|
|
|
|
|
// plus le pas est grand, plus la fr<66>quence est grande
|
|
|
|
|
|
int TimerA; // timerA limit = valeur jusqu'<27> laquelle le timer A doit compter
|
|
|
|
|
|
int TimerAL;
|
|
|
|
|
|
int TimerAcnt; // timerA counter = valeur courante du Timer A
|
|
|
|
|
|
int TimerB; // timerB limit = valeur jusqu'<27> laquelle le timer B doit compter
|
|
|
|
|
|
int TimerBL;
|
|
|
|
|
|
int TimerBcnt; // timerB counter = valeur courante du Timer B
|
|
|
|
|
|
int Mode; // Mode actuel des voie 3 et 6 (normal / sp<73>cial)
|
|
|
|
|
|
int DAC; // DAC enabled flag
|
|
|
|
|
|
int DACdata; // DAC data
|
|
|
|
|
|
double Frequence; // Fr<46>quence de base, se calcul par rapport <20> l'horlage et au sample rate
|
|
|
|
|
|
unsigned int Inter_Cnt; // Interpolation Counter
|
|
|
|
|
|
unsigned int Inter_Step; // Interpolation Step
|
|
|
|
|
|
struct channel__ CHANNEL[6]; // Les 6 voies du YM2612
|
|
|
|
|
|
int REG[2][0x100]; // Sauvegardes des valeurs de tout les registres, c'est facultatif
|
|
|
|
|
|
// cela nous rend le d<>buggage plus facile
|
|
|
|
|
|
} ym2612_;
|
|
|
|
|
|
|
|
|
|
|
|
|
2008-08-07 14:26:07 +02:00
|
|
|
|
extern int YM2612_Init(int clock, int rate, int interpolation);
|
|
|
|
|
|
extern int YM2612_Reset(void);
|
|
|
|
|
|
extern int YM2612_Read(void);
|
|
|
|
|
|
extern int YM2612_Write(unsigned char adr, unsigned char data);
|
|
|
|
|
|
extern void YM2612_Update(int **buf, int length);
|
2007-08-10 22:34:06 +02:00
|
|
|
|
|
|
|
|
|
|
#endif
|
