12a6a4076SMarkus Armbruster #ifndef FMOPL_H 22a6a4076SMarkus Armbruster #define FMOPL_H 385571bc7Sbellard 44a796e97SJuan Quintela #include <stdint.h> 54a796e97SJuan Quintela 685571bc7Sbellard /* --- system optimize --- */ 785571bc7Sbellard /* select bit size of output : 8 or 16 */ 885571bc7Sbellard #define OPL_OUTPUT_BIT 16 985571bc7Sbellard 1085571bc7Sbellard /* compiler dependence */ 1185571bc7Sbellard #ifndef OSD_CPU_H 1285571bc7Sbellard #define OSD_CPU_H 1385571bc7Sbellard typedef signed int INT32; /* signed 32bit */ 1485571bc7Sbellard #endif 1585571bc7Sbellard 1685571bc7Sbellard #if (OPL_OUTPUT_BIT==16) 17*7bf10b1dSJuan Quintela typedef int16_t OPLSAMPLE; 1885571bc7Sbellard #endif 1985571bc7Sbellard #if (OPL_OUTPUT_BIT==8) 2085571bc7Sbellard typedef unsigned char OPLSAMPLE; 2185571bc7Sbellard #endif 2285571bc7Sbellard 2385571bc7Sbellard typedef void (*OPL_TIMERHANDLER)(int channel,double interval_Sec); 2485571bc7Sbellard typedef void (*OPL_IRQHANDLER)(int param,int irq); 2585571bc7Sbellard typedef void (*OPL_UPDATEHANDLER)(int param,int min_interval_us); 2685571bc7Sbellard typedef void (*OPL_PORTHANDLER_W)(int param,unsigned char data); 2785571bc7Sbellard typedef unsigned char (*OPL_PORTHANDLER_R)(int param); 2885571bc7Sbellard 2985571bc7Sbellard /* !!!!! here is private section , do not access there member direct !!!!! */ 3085571bc7Sbellard 3185571bc7Sbellard #define OPL_TYPE_WAVESEL 0x01 /* waveform select */ 3285571bc7Sbellard #define OPL_TYPE_ADPCM 0x02 /* DELTA-T ADPCM unit */ 3385571bc7Sbellard #define OPL_TYPE_KEYBOARD 0x04 /* keyboard interface */ 3485571bc7Sbellard #define OPL_TYPE_IO 0x08 /* I/O port */ 3585571bc7Sbellard 3685571bc7Sbellard /* Saving is necessary for member of the 'R' mark for suspend/resume */ 3785571bc7Sbellard /* ---------- OPL one of slot ---------- */ 3885571bc7Sbellard typedef struct fm_opl_slot { 3985571bc7Sbellard INT32 TL; /* total level :TL << 8 */ 4085571bc7Sbellard INT32 TLL; /* adjusted now TL */ 414a796e97SJuan Quintela uint8_t KSR; /* key scale rate :(shift down bit) */ 4285571bc7Sbellard INT32 *AR; /* attack rate :&AR_TABLE[AR<<2] */ 4385571bc7Sbellard INT32 *DR; /* decay rate :&DR_TALBE[DR<<2] */ 4485571bc7Sbellard INT32 SL; /* sustin level :SL_TALBE[SL] */ 4585571bc7Sbellard INT32 *RR; /* release rate :&DR_TABLE[RR<<2] */ 464a796e97SJuan Quintela uint8_t ksl; /* keyscale level :(shift down bits) */ 474a796e97SJuan Quintela uint8_t ksr; /* key scale rate :kcode>>KSR */ 483795f180SJuan Quintela uint32_t mul; /* multiple :ML_TABLE[ML] */ 493795f180SJuan Quintela uint32_t Cnt; /* frequency count : */ 503795f180SJuan Quintela uint32_t Incr; /* frequency step : */ 5185571bc7Sbellard /* envelope generator state */ 524a796e97SJuan Quintela uint8_t eg_typ; /* envelope type flag */ 534a796e97SJuan Quintela uint8_t evm; /* envelope phase */ 5485571bc7Sbellard INT32 evc; /* envelope counter */ 5585571bc7Sbellard INT32 eve; /* envelope counter end point */ 5685571bc7Sbellard INT32 evs; /* envelope counter step */ 5785571bc7Sbellard INT32 evsa; /* envelope step for AR :AR[ksr] */ 5885571bc7Sbellard INT32 evsd; /* envelope step for DR :DR[ksr] */ 5985571bc7Sbellard INT32 evsr; /* envelope step for RR :RR[ksr] */ 6085571bc7Sbellard /* LFO */ 614a796e97SJuan Quintela uint8_t ams; /* ams flag */ 624a796e97SJuan Quintela uint8_t vib; /* vibrate flag */ 6385571bc7Sbellard /* wave selector */ 6485571bc7Sbellard INT32 **wavetable; 6585571bc7Sbellard }OPL_SLOT; 6685571bc7Sbellard 6785571bc7Sbellard /* ---------- OPL one of channel ---------- */ 6885571bc7Sbellard typedef struct fm_opl_channel { 6985571bc7Sbellard OPL_SLOT SLOT[2]; 704a796e97SJuan Quintela uint8_t CON; /* connection type */ 714a796e97SJuan Quintela uint8_t FB; /* feed back :(shift down bit) */ 7285571bc7Sbellard INT32 *connect1; /* slot1 output pointer */ 7385571bc7Sbellard INT32 *connect2; /* slot2 output pointer */ 7485571bc7Sbellard INT32 op1_out[2]; /* slot1 output for selfeedback */ 7585571bc7Sbellard /* phase generator state */ 763795f180SJuan Quintela uint32_t block_fnum; /* block+fnum : */ 774a796e97SJuan Quintela uint8_t kcode; /* key code : KeyScaleCode */ 783795f180SJuan Quintela uint32_t fc; /* Freq. Increment base */ 793795f180SJuan Quintela uint32_t ksl_base; /* KeyScaleLevel Base step */ 804a796e97SJuan Quintela uint8_t keyon; /* key on/off flag */ 8185571bc7Sbellard } OPL_CH; 8285571bc7Sbellard 8385571bc7Sbellard /* OPL state */ 8485571bc7Sbellard typedef struct fm_opl_f { 854a796e97SJuan Quintela uint8_t type; /* chip type */ 8685571bc7Sbellard int clock; /* master clock (Hz) */ 8785571bc7Sbellard int rate; /* sampling rate (Hz) */ 8885571bc7Sbellard double freqbase; /* frequency base */ 8985571bc7Sbellard double TimerBase; /* Timer base time (==sampling time) */ 904a796e97SJuan Quintela uint8_t address; /* address register */ 914a796e97SJuan Quintela uint8_t status; /* status flag */ 924a796e97SJuan Quintela uint8_t statusmask; /* status mask */ 933795f180SJuan Quintela uint32_t mode; /* Reg.08 : CSM , notesel,etc. */ 9485571bc7Sbellard /* Timer */ 9585571bc7Sbellard int T[2]; /* timer counter */ 964a796e97SJuan Quintela uint8_t st[2]; /* timer enable */ 9785571bc7Sbellard /* FM channel slots */ 9885571bc7Sbellard OPL_CH *P_CH; /* pointer of CH */ 9985571bc7Sbellard int max_ch; /* maximum channel */ 100c11e80e2SStefan Weil /* Rhythm sention */ 1014a796e97SJuan Quintela uint8_t rhythm; /* Rhythm mode , key flag */ 10285571bc7Sbellard OPL_PORTHANDLER_R porthandler_r; 10385571bc7Sbellard OPL_PORTHANDLER_W porthandler_w; 10485571bc7Sbellard int port_param; 10585571bc7Sbellard OPL_PORTHANDLER_R keyboardhandler_r; 10685571bc7Sbellard OPL_PORTHANDLER_W keyboardhandler_w; 10785571bc7Sbellard int keyboard_param; 10885571bc7Sbellard /* time tables */ 10985571bc7Sbellard INT32 AR_TABLE[75]; /* atttack rate tables */ 11085571bc7Sbellard INT32 DR_TABLE[75]; /* decay rate tables */ 1113795f180SJuan Quintela uint32_t FN_TABLE[1024]; /* fnumber -> increment counter */ 11285571bc7Sbellard /* LFO */ 11385571bc7Sbellard INT32 *ams_table; 11485571bc7Sbellard INT32 *vib_table; 11585571bc7Sbellard INT32 amsCnt; 11685571bc7Sbellard INT32 amsIncr; 11785571bc7Sbellard INT32 vibCnt; 11885571bc7Sbellard INT32 vibIncr; 11985571bc7Sbellard /* wave selector enable flag */ 1204a796e97SJuan Quintela uint8_t wavesel; 12185571bc7Sbellard /* external event callback handler */ 12285571bc7Sbellard OPL_TIMERHANDLER TimerHandler; /* TIMER handler */ 12385571bc7Sbellard int TimerParam; /* TIMER parameter */ 12485571bc7Sbellard OPL_IRQHANDLER IRQHandler; /* IRQ handler */ 12585571bc7Sbellard int IRQParam; /* IRQ parameter */ 12685571bc7Sbellard OPL_UPDATEHANDLER UpdateHandler; /* stream update handler */ 12785571bc7Sbellard int UpdateParam; /* stream update parameter */ 12885571bc7Sbellard } FM_OPL; 12985571bc7Sbellard 13085571bc7Sbellard /* ---------- Generic interface section ---------- */ 13185571bc7Sbellard #define OPL_TYPE_YM3812 (OPL_TYPE_WAVESEL) 13285571bc7Sbellard 13385571bc7Sbellard FM_OPL *OPLCreate(int type, int clock, int rate); 13485571bc7Sbellard void OPLDestroy(FM_OPL *OPL); 13585571bc7Sbellard void OPLSetTimerHandler(FM_OPL *OPL,OPL_TIMERHANDLER TimerHandler,int channelOffset); 13685571bc7Sbellard void OPLSetIRQHandler(FM_OPL *OPL,OPL_IRQHANDLER IRQHandler,int param); 13785571bc7Sbellard void OPLSetUpdateHandler(FM_OPL *OPL,OPL_UPDATEHANDLER UpdateHandler,int param); 13885571bc7Sbellard 13985571bc7Sbellard void OPLResetChip(FM_OPL *OPL); 14085571bc7Sbellard int OPLWrite(FM_OPL *OPL,int a,int v); 14185571bc7Sbellard unsigned char OPLRead(FM_OPL *OPL,int a); 14285571bc7Sbellard int OPLTimerOver(FM_OPL *OPL,int c); 14385571bc7Sbellard 144*7bf10b1dSJuan Quintela void YM3812UpdateOne(FM_OPL *OPL, int16_t *buffer, int length); 14585571bc7Sbellard #endif 146