[BACK]Return to opngeng.c CVS log [TXT] [DIR] Up to [RetroPC.NET] / np2 / sound

Diff for /np2/sound/opngeng.c between versions 1.2 and 1.6

version 1.2, 2003/10/18 07:28:50 version 1.6, 2003/10/27 15:06:31
Line 12  extern SINT32 envtable[]; Line 12  extern SINT32 envtable[];
 extern  SINT32  sintable[];                                     // ver0.27  extern  SINT32  sintable[];                                     // ver0.27
   
   
   #define CALCENV(e, c, s)                                                                                                        \
           (c)->slot[(s)].freq_cnt += (c)->slot[(s)].freq_inc;                                             \
           (c)->slot[(s)].env_cnt += (c)->slot[(s)].env_inc;                                               \
           if ((c)->slot[(s)].env_cnt >= (c)->slot[(s)].env_end) {                                 \
                   switch((c)->slot[(s)].env_mode) {                                                                       \
                           case EM_ATTACK:                                                                                                 \
                                   (c)->slot[(s)].env_mode = EM_DECAY1;                                            \
                                   (c)->slot[(s)].env_cnt = EC_DECAY;                                                      \
                                   (c)->slot[(s)].env_end = (c)->slot[(s)].decaylevel;                     \
                                   (c)->slot[(s)].env_inc = (c)->slot[(s)].env_inc_decay1;         \
                                   break;                                                                                                          \
                           case EM_DECAY1:                                                                                                 \
                                   (c)->slot[(s)].env_mode = EM_DECAY2;                                            \
                                   (c)->slot[(s)].env_cnt = (c)->slot[(s)].decaylevel;                     \
                                   (c)->slot[(s)].env_end = EC_OFF;                                                        \
                                   (c)->slot[(s)].env_inc = (c)->slot[(s)].env_inc_decay2;         \
                                   break;                                                                                                          \
                           case EM_RELEASE:                                                                                                \
                                   (c)->slot[(s)].env_mode = EM_OFF;                                                       \
                           case EM_DECAY2:                                                                                                 \
                                   (c)->slot[(s)].env_cnt = EC_OFF;                                                        \
                                   (c)->slot[(s)].env_end = EC_OFF + 1;                                            \
                                   (c)->slot[(s)].env_inc = 0;                                                                     \
                                   (c)->playing &= ~(1 << (s));                                                            \
                                   break;                                                                                                          \
                   }                                                                                                                                       \
           }                                                                                                                                               \
           (e) = (c)->slot[(s)].totallevel - env_curve[(c)->slot[(s)].env_cnt              \
                                                                                                                           >> ENV_BITS];
   
 #define SLOTOUT(s, e, c)                                                                                                        \  #define SLOTOUT(s, e, c)                                                                                                        \
                 ((sintable[(((s).freq_cnt + (c)) >> (FREQ_BITS - SIN_BITS)) &           \                  ((sintable[(((s).freq_cnt + (c)) >> (FREQ_BITS - SIN_BITS)) &           \
                         (SIN_ENT-1)] * envtable[(e)]) >> (ENVTBL_BIT+SINTBL_BIT-TL_BITS))                          (SIN_ENT-1)] * envtable[(e)]) >> (ENVTBL_BIT+SINTBL_BIT-TL_BITS))
   
   #if 0
 static SINT32 calcrateenvlope(OPNSLOT *slot) {  static SINT32 calcrateenvlope(OPNSLOT *slot) {
   
         /* calcrate phage generator */          /* calcrate phage generator */
Line 50  static SINT32 calcrateenvlope(OPNSLOT *s Line 81  static SINT32 calcrateenvlope(OPNSLOT *s
         }          }
         return(slot->totallevel - env_curve[slot->env_cnt >> ENV_BITS]);          return(slot->totallevel - env_curve[slot->env_cnt >> ENV_BITS]);
 }  }
   #endif
   
 static void calcratechannel(OPNCH *ch) {  static void calcratechannel(OPNCH *ch) {
   
Line 61  static void calcratechannel(OPNCH *ch) { Line 93  static void calcratechannel(OPNCH *ch) {
         opngen.feedback4 = 0;          opngen.feedback4 = 0;
   
         /* SLOT 1 */          /* SLOT 1 */
         envout = calcrateenvlope(ch->slot + 0);  //      envout = calcrateenvlope(ch->slot + 0);
           CALCENV(envout, ch, 0);
         if (envout > 0) {          if (envout > 0) {
                 if (ch->feedback) {                  if (ch->feedback) {
                         /* with self feed back */                          /* with self feed back */
Line 83  static void calcratechannel(OPNCH *ch) { Line 116  static void calcratechannel(OPNCH *ch) {
                 }                  }
         }          }
         /* SLOT 2 */          /* SLOT 2 */
         envout = calcrateenvlope(ch->slot + 1);  //      envout = calcrateenvlope(ch->slot + 1);
           CALCENV(envout, ch, 1);
         if (envout > 0) {          if (envout > 0) {
                 *ch->connect2 += SLOTOUT(ch->slot[1], envout, opngen.feedback2);                  *ch->connect2 += SLOTOUT(ch->slot[1], envout, opngen.feedback2);
         }          }
         /* SLOT 3 */          /* SLOT 3 */
         envout = calcrateenvlope(ch->slot + 2);  //      envout = calcrateenvlope(ch->slot + 2);
           CALCENV(envout, ch, 2);
         if (envout > 0) {          if (envout > 0) {
                 *ch->connect3 += SLOTOUT(ch->slot[2], envout, opngen.feedback3);                  *ch->connect3 += SLOTOUT(ch->slot[2], envout, opngen.feedback3);
         }          }
         /* SLOT 4 */          /* SLOT 4 */
         envout = calcrateenvlope(ch->slot + 3);  //      envout = calcrateenvlope(ch->slot + 3);
           CALCENV(envout, ch, 3);
         if (envout > 0) {          if (envout > 0) {
                 *ch->connect4 += SLOTOUT(ch->slot[3], envout, opngen.feedback4);                  *ch->connect4 += SLOTOUT(ch->slot[3], envout, opngen.feedback4);
         }          }
Line 103  void SOUNDCALL opngen_getpcm(void *hdl,  Line 139  void SOUNDCALL opngen_getpcm(void *hdl, 
   
         OPNCH   *fm;          OPNCH   *fm;
         UINT    i;          UINT    i;
           UINT    playing;
           SINT32  samp_l;
           SINT32  samp_r;
   
           if ((!opngen.playing) || (!count)) {
                   return;
           }
           fm = opnch;
           do {
                   samp_l = opngen.outdl * (opngen.calcremain * -1);
                   samp_r = opngen.outdr * (opngen.calcremain * -1);
                   opngen.calcremain += FMDIV_ENT;
                   while(1) {
                           opngen.outdc = 0;
                           opngen.outdl = 0;
                           opngen.outdr = 0;
                           playing = 0;
                           for (i=0; i<opngen.playchannels; i++) {
                                   if (fm[i].playing & fm[i].outslot) {
                                           calcratechannel(fm + i);
                                           playing++;
                                   }
                           }
                           opngen.outdl += opngen.outdc;
                           opngen.outdr += opngen.outdc;
                           opngen.outdl >>= FMVOL_SFTBIT;
                           opngen.outdr >>= FMVOL_SFTBIT;
                           if (opngen.calcremain > opncfg.calc1024) {
                                   samp_l += opngen.outdl * opncfg.calc1024;
                                   samp_r += opngen.outdr * opncfg.calc1024;
                                   opngen.calcremain -= opncfg.calc1024;
                           }
                           else {
                                   break;
                           }
                   }
                   samp_l += opngen.outdl * opngen.calcremain;
                   samp_l >>= 8;
                   samp_l *= opncfg.fmvol;
                   samp_l >>= (OPM_OUTSB + FMDIV_BITS + 1 + 6 - FMVOL_SFTBIT - 8);
                   pcm[0] += samp_l;
                   samp_r += opngen.outdr * opngen.calcremain;
                   samp_r >>= FMDIV_BITS;
                   samp_r *= opncfg.fmvol;
                   samp_r >>= (OPM_OUTSB + FMDIV_BITS + 1 + 6 - FMVOL_SFTBIT - 8);
                   pcm[1] += samp_r;
                   opngen.calcremain -= opncfg.calc1024;
                   pcm += 2;
           } while(--count);
           opngen.playing = playing;
           (void)hdl;
   }
   
   void SOUNDCALL opngen_getpcmvr(void *hdl, SINT32 *pcm, UINT count) {
   
           OPNCH   *fm;
           UINT    i;
         SINT32  samp_l;          SINT32  samp_l;
         SINT32  samp_r;          SINT32  samp_r;
   
Line 118  void SOUNDCALL opngen_getpcm(void *hdl,  Line 211  void SOUNDCALL opngen_getpcm(void *hdl, 
                         for (i=0; i<opngen.playchannels; i++) {                          for (i=0; i<opngen.playchannels; i++) {
                                 calcratechannel(fm + i);                                  calcratechannel(fm + i);
                         }                          }
                           if (opncfg.vr_en) {
                                   SINT32 tmpl;
                                   SINT32 tmpr;
                                   tmpl = (opngen.outdl >> 5) * opncfg.vr_l;
                                   tmpr = (opngen.outdr >> 5) * opncfg.vr_r;
                                   opngen.outdl += tmpr;
                                   opngen.outdr += tmpl;
                           }
                         opngen.outdl += opngen.outdc;                          opngen.outdl += opngen.outdc;
                         opngen.outdr += opngen.outdc;                          opngen.outdr += opngen.outdc;
                         opngen.outdl >>= FMVOL_SFTBIT;                          opngen.outdl >>= FMVOL_SFTBIT;
Removed from v.1.2  
changed lines
  Added in v.1.6

RetroPC.NET-CVS <cvs@retropc.net>