Subversion Repositories Kolibri OS

// Emacs style mode select   -*- C++ -*- 

// Emacs style mode select   -*- C++ -*- 

//-----------------------------------------------------------------------------

//-----------------------------------------------------------------------------

//

//

// $Id:$

// $Id:$

//

//

// Copyright (C) 1993-1996 by id Software, Inc.

// Copyright (C) 1993-1996 by id Software, Inc.

//

//

// This source is available for distribution and/or modification

// This source is available for distribution and/or modification

// only under the terms of the DOOM Source Code License as

// only under the terms of the DOOM Source Code License as

// published by id Software. All rights reserved.

// published by id Software. All rights reserved.

//

//

// The source is distributed in the hope that it will be useful,

// The source is distributed in the hope that it will be useful,

// but WITHOUT ANY WARRANTY; without even the implied warranty of

// but WITHOUT ANY WARRANTY; without even the implied warranty of

// FITNESS FOR A PARTICULAR PURPOSE. See the DOOM Source Code License

// FITNESS FOR A PARTICULAR PURPOSE. See the DOOM Source Code License

// for more details.

// for more details.

//

//

// $Log:$

// $Log:$

//

//

// DESCRIPTION:  none

// DESCRIPTION:  none

//

//

//-----------------------------------------------------------------------------

//-----------------------------------------------------------------------------

static const char

static const char

rcsid[] = "$Id: s_sound.c,v 1.6 1997/02/03 22:45:12 b1 Exp $";

rcsid[] = "$Id: s_sound.c,v 1.6 1997/02/03 22:45:12 b1 Exp $";

#include 

#include 

#include 

#include 

#include "i_system.h"

#include "i_system.h"

#include "i_sound.h"

#include "i_sound.h"

#include "sounds.h"

#include "sounds.h"

#include "s_sound.h"

#include "s_sound.h"

#include "z_zone.h"

#include "z_zone.h"

#include "m_random.h"

#include "m_random.h"

#include "w_wad.h"

#include "w_wad.h"

#include "doomdef.h"

#include "doomdef.h"

#include "p_local.h"

#include "p_local.h"

//#include "m_music.h"

//#include "m_music.h"

#include "doomstat.h"

#include "doomstat.h"

//#include "qmus2mid.h"

//#include "qmus2mid.h"

void WriteDebug(char *);

void WriteDebug(char *);

// Purpose?

// Purpose?

const char snd_prefixen[]

const char snd_prefixen[]

= { 'P', 'P', 'A', 'S', 'S', 'S', 'M', 'M', 'M', 'S', 'S', 'S' };

= { 'P', 'P', 'A', 'S', 'S', 'S', 'M', 'M', 'M', 'S', 'S', 'S' };

#define S_MAX_VOLUME		127

#define S_MAX_VOLUME            127

// when to clip out sounds

// when to clip out sounds

// Does not fit the large outdoor areas.

// Does not fit the large outdoor areas.

#define S_CLIPPING_DIST		(1200*0x10000)

#define S_CLIPPING_DIST         (1200*0x10000)

// Distance tp origin when sounds should be maxed out.

// Distance tp origin when sounds should be maxed out.

// This should relate to movement clipping resolution

// This should relate to movement clipping resolution

// (see BLOCKMAP handling).

// (see BLOCKMAP handling).

// Originally: (200*0x10000).

// Originally: (200*0x10000).

#define S_CLOSE_DIST		(160*0x10000)

#define S_CLOSE_DIST            (160*0x10000)

#define S_ATTENUATOR		((S_CLIPPING_DIST-S_CLOSE_DIST)>>FRACBITS)

#define S_ATTENUATOR            ((S_CLIPPING_DIST-S_CLOSE_DIST)>>FRACBITS)

// Adjustable by menu.

// Adjustable by menu.

#define NORM_VOLUME    		snd_MaxVolume

#define NORM_VOLUME             snd_MaxVolume

#define NORM_PITCH     		128

#define NORM_PITCH              128

#define NORM_PRIORITY		64

#define NORM_PRIORITY           64

#define NORM_SEP		128

#define NORM_SEP                128

#define S_PITCH_PERTURB		1

#define S_PITCH_PERTURB         1

#define S_STEREO_SWING		(96*0x10000)

#define S_STEREO_SWING          (96*0x10000)

// percent attenuation from front to back

// percent attenuation from front to back

#define S_IFRACVOL		30

#define S_IFRACVOL              30

#define NA			0

#define NA                      0

//#define S_NUMCHANNELS		2

//#define S_NUMCHANNELS         2

#define NUM_CHANNELS	16

#define NUM_CHANNELS    16

// Current music/sfx card - index useless

// Current music/sfx card - index useless

//  w/o a reference LUT in a sound module.

//  w/o a reference LUT in a sound module.

extern int snd_MusicDevice;

extern int snd_MusicDevice;

extern int snd_SfxDevice;

extern int snd_SfxDevice;

// Config file? Same disclaimer as above.

// Config file? Same disclaimer as above.

extern int snd_DesiredMusicDevice;

extern int snd_DesiredMusicDevice;

extern int snd_DesiredSfxDevice;

extern int snd_DesiredSfxDevice;

typedef struct

typedef struct

{

{

    // sound information (if null, channel avail.)

    // sound information (if null, channel avail.)

    sfxinfo_t*	sfxinfo;

    sfxinfo_t*  sfxinfo;

    // origin of sound

    // origin of sound

    void*	origin;

    void*       origin;

    // handle of the sound being played

    // handle of the sound being played

    int		handle;

    int         handle;

} channel_t;

} channel_t;

// the set of channels available

// the set of channels available

static channel_t*	channels;

static channel_t*       channels;

// These are not used, but should be (menu).

// These are not used, but should be (menu).

// Maximum volume of a sound effect.

// Maximum volume of a sound effect.

// Internal default is max out of 0-15.

// Internal default is max out of 0-15.

int 		snd_SfxVolume = 80;

int             snd_SfxVolume = 80;

// Maximum volume of music. Useless so far.

// Maximum volume of music. Useless so far.

int 		snd_MusicVolume = 80; 

int             snd_MusicVolume = 80; 

// whether songs are mus_paused

// whether songs are mus_paused

static boolean		mus_paused;	

static boolean          mus_paused;     

// music currently being played

// music currently being played

static musicinfo_t*	mus_playing=0;

static musicinfo_t*     mus_playing=0;

// following is set

// following is set

//  by the defaults code in M_misc:

//  by the defaults code in M_misc:

// number of channels available

// number of channels available

int			numChannels;	

int                     numChannels;    

static int		nextcleanup;

static int              nextcleanup;

//

//

// Internals.

// Internals.

//

//

int

int

S_getChannel

S_getChannel

( void*		origin,

( void*         origin,

  sfxinfo_t*	sfxinfo,

  sfxinfo_t*    sfxinfo,

  int       sfxid );

  int       sfxid );

int

int

S_AdjustSoundParams

S_AdjustSoundParams

( mobj_t*	listener,

( mobj_t*       listener,

  mobj_t*	source,

  mobj_t*       source,

  int*		vol,

  int*          vol,

  int*		sep,

  int*          sep,

  int*		pitch );

  int*          pitch );

void S_StopChannel(int cnum);

void S_StopChannel(int cnum);

//

//

// Initializes sound stuff, including volume

// Initializes sound stuff, including volume

// Sets channels, SFX and music volume,

// Sets channels, SFX and music volume,

//  allocates channel buffer, sets S_sfx lookup.

//  allocates channel buffer, sets S_sfx lookup.

//

//

void S_Init

void S_Init

( int		sfxVolume,

( int           sfxVolume,

  int		musicVolume )

  int           musicVolume )

{  

{  

  int		i;

  int           i;

  printf("S_Init: default sfx volume %d\n", sfxVolume);

  printf("S_Init: default sfx volume %d\n", sfxVolume);

  I_CreateSound();

  //I_CreateSound();

  numChannels = NUM_CHANNELS;

  numChannels = NUM_CHANNELS;

  // Whatever these did with DMX, these are rather dummies now.

  // Whatever these did with DMX, these are rather dummies now.

  I_SetChannels();

  I_SetChannels();

  S_SetSfxVolume(sfxVolume);

  S_SetSfxVolume(sfxVolume);

  // No music with Linux - another dummy.

  // No music with Linux - another dummy.

  S_SetMusicVolume(musicVolume);

  S_SetMusicVolume(musicVolume);

  // Allocating the internal channels for mixing

  // Allocating the internal channels for mixing

  // (the maximum numer of sounds rendered

  // (the maximum numer of sounds rendered

  // simultaneously) within zone memory.

  // simultaneously) within zone memory.

  channels =

  channels =

    (channel_t *) Z_Malloc(numChannels*sizeof(channel_t), PU_STATIC, 0);

    (channel_t *) Z_Malloc(numChannels*sizeof(channel_t), PU_STATIC, 0);

  // Free all channels for use

  // Free all channels for use

  for (i=0 ; i

  for (i=0 ; i

    channels[i].sfxinfo = 0;

    channels[i].sfxinfo = 0;

  // no sounds are playing, and they are not mus_paused

  // no sounds are playing, and they are not mus_paused

  mus_paused = 0;

  mus_paused = 0;

  // Note that sounds have not been cached (yet).

  // Note that sounds have not been cached (yet).

  for (i=1 ; i

  for (i=1 ; i

    S_sfx[i].lumpnum = S_sfx[i].usefulness = -1;

    S_sfx[i].lumpnum = S_sfx[i].usefulness = -1;

}

}

//

//

// Per level startup code.

// Per level startup code.

// Kills playing sounds at start of level,

// Kills playing sounds at start of level,

//  determines music if any, changes music.

//  determines music if any, changes music.

//

//

void S_Start(void)

void S_Start(void)

{

{

  int cnum;

  int cnum;

  int mnum;

  int mnum;

  // kill all playing sounds at start of level

  // kill all playing sounds at start of level

  //  (trust me - a good idea)

  //  (trust me - a good idea)

  for (cnum=0 ; cnum

  for (cnum=0 ; cnum

    if (channels[cnum].sfxinfo)

    if (channels[cnum].sfxinfo)

      S_StopChannel(cnum);

      S_StopChannel(cnum);

  // start new music for the level

  // start new music for the level

  mus_paused = 0;

  mus_paused = 0;

  if (gamemode == commercial)

  if (gamemode == commercial)

	  mnum = mus_runnin + gamemap - 1;

          mnum = mus_runnin + gamemap - 1;

  else

  else

  {

  {

	  int spmus[]=

          int spmus[]=

	  {

          {

		  // Song - Who? - Where?

                  // Song - Who? - Where?

		mus_e3m4,	// American	e4m1

                mus_e3m4,       // American     e4m1

		mus_e3m2,	// Romero	e4m2

                mus_e3m2,       // Romero       e4m2

		mus_e3m3,	// Shawn	e4m3

                mus_e3m3,       // Shawn        e4m3

		mus_e1m5,	// American	e4m4

                mus_e1m5,       // American     e4m4

		mus_e2m7,	// Tim 	e4m5

                mus_e2m7,       // Tim  e4m5

		mus_e2m4,	// Romero	e4m6

                mus_e2m4,       // Romero       e4m6

		mus_e2m6,	// J.Anderson	e4m7 CHIRON.WAD

                mus_e2m6,       // J.Anderson   e4m7 CHIRON.WAD

		mus_e2m5,	// Shawn	e4m8

                mus_e2m5,       // Shawn        e4m8

		mus_e1m9	// Tim		e4m9

                mus_e1m9        // Tim          e4m9

	  };

          };

	  if (gameepisode < 4)

          if (gameepisode < 4)

		  mnum = mus_e1m1 + (gameepisode-1)*9 + gamemap-1;

                  mnum = mus_e1m1 + (gameepisode-1)*9 + gamemap-1;

	  else

          else

		  mnum = spmus[gamemap-1];

                  mnum = spmus[gamemap-1];

  }	

  }     

  // HACK FOR COMMERCIAL

  // HACK FOR COMMERCIAL

  //  if (commercial && mnum > mus_e3m9)	

  //  if (commercial && mnum > mus_e3m9)        

  //      mnum -= mus_e3m9;

  //      mnum -= mus_e3m9;

  S_ChangeMusic(mnum, true);

  S_ChangeMusic(mnum, true);

  nextcleanup = 15;

  nextcleanup = 15;

}	

}       

void S_StartSoundAtVolume( void *origin_p, int sfx_id, int volume )

void S_StartSoundAtVolume( void *origin_p, int sfx_id, int volume )

   {

   {

    int        rc;

    int        rc;

    int        sep;

    int        sep;

    int        pitch;

    int        pitch;

    int        priority;

    int        priority;

    sfxinfo_t *sfx;

    sfxinfo_t *sfx;

    int        cnum;

    int        cnum;

    // int        chnum;  <-- 10.9.98 compiler warning

    // int        chnum;  <-- 10.9.98 compiler warning

    mobj_t*	origin = (mobj_t *)origin_p;

    mobj_t*     origin = (mobj_t *)origin_p;

    //WriteDebug("S_StartSoundAtVolume...\n");

    //WriteDebug("S_StartSoundAtVolume...\n");

    // Debug.

    // Debug.

    /*fprintf( stderr,"S_StartSoundAtVolume: playing sound %d (%s)\n",sfx_id, S_sfx[sfx_id].name );*/

    /*fprintf( stderr,"S_StartSoundAtVolume: playing sound %d (%s)\n",sfx_id, S_sfx[sfx_id].name );*/

    // check for bogus sound #

    // check for bogus sound #

    if (sfx_id < 1 || sfx_id > NUMSFX)

    if (sfx_id < 1 || sfx_id > NUMSFX)

        I_Error("Bad sfx #: %d", sfx_id);

        I_Error("Bad sfx #: %d", sfx_id);

    sfx = &S_sfx[sfx_id];

    sfx = &S_sfx[sfx_id];

    // Initialize sound parameters

    // Initialize sound parameters

    if (sfx->link)

    if (sfx->link)

       {

       {

        pitch = sfx->pitch;

        pitch = sfx->pitch;

        priority = sfx->priority;

        priority = sfx->priority;

        volume += sfx->volume;

        volume += sfx->volume;

        if (volume < 1)

        if (volume < 1)

           {

           {

            //WriteDebug("Volume off...\n");

            //WriteDebug("Volume off...\n");

            return;

            return;

           }

           }

        if (volume > snd_SfxVolume)

        if (volume > snd_SfxVolume)

            volume = snd_SfxVolume;

            volume = snd_SfxVolume;

       }	

       }        

    else

    else

       {

       {

        pitch = NORM_PITCH;

        pitch = NORM_PITCH;

        priority = NORM_PRIORITY;

        priority = NORM_PRIORITY;

       }

       }

    // Check to see if it is audible,

    // Check to see if it is audible,

    //  and if not, modify the params

    //  and if not, modify the params

    if (origin && origin != players[consoleplayer].mo)

    if (origin && origin != players[consoleplayer].mo)

       {

       {

        rc = S_AdjustSoundParams(players[consoleplayer].mo, origin, &volume, &sep, &pitch);

        rc = S_AdjustSoundParams(players[consoleplayer].mo, origin, &volume, &sep, &pitch);

        if ( origin->x == players[consoleplayer].mo->x && origin->y == players[consoleplayer].mo->y)

        if ( origin->x == players[consoleplayer].mo->x && origin->y == players[consoleplayer].mo->y)

           {	

           {    

            sep = NORM_SEP;

            sep = NORM_SEP;

           }

           }

        if (!rc)

        if (!rc)

           {

           {

            //WriteDebug("No rc from S_AdjustSoundParams...\n");

            //WriteDebug("No rc from S_AdjustSoundParams...\n");

            return;

            return;

           }

           }

       }	

       }        

    else

    else

       {

       {

        sep = NORM_SEP;

        sep = NORM_SEP;

       }

       }

    // hacks to vary the sfx pitches

    // hacks to vary the sfx pitches

    if (sfx_id >= sfx_sawup && sfx_id <= sfx_sawhit)

    if (sfx_id >= sfx_sawup && sfx_id <= sfx_sawhit)

       {	

       {        

        pitch += 8 - (M_Random()&15);

        pitch += 8 - (M_Random()&15);

        if (pitch < 0)

        if (pitch < 0)

            pitch = 0;

            pitch = 0;

        else

        else

        if (pitch>255)

        if (pitch>255)

            pitch = 255;

            pitch = 255;

       }

       }

    else

    else

    if (sfx_id != sfx_itemup && sfx_id != sfx_tink)

    if (sfx_id != sfx_itemup && sfx_id != sfx_tink)

       {

       {

        pitch += 16 - (M_Random()&31);

        pitch += 16 - (M_Random()&31);

        if (pitch<0)

        if (pitch<0)

            pitch = 0;

            pitch = 0;

        else

        else

        if (pitch > 255)

        if (pitch > 255)

            pitch = 255;

            pitch = 255;

       }

       }

  // kill old sound

  // kill old sound

  S_StopSound(origin);

  S_StopSound(origin);

  // try to find a channel

  // try to find a channel

  cnum = S_getChannel(origin, sfx, sfx_id);

  cnum = S_getChannel(origin, sfx, sfx_id);

  if (cnum<0)

  if (cnum<0)

     {

     {

        //WriteDebug("cnum < 0 -- no channel...\n");

        //WriteDebug("cnum < 0 -- no channel...\n");

    return;

    return;

     }

     }

  //

  //

  // This is supposed to handle the loading/caching.

  // This is supposed to handle the loading/caching.

  // For some odd reason, the caching is done nearly

  // For some odd reason, the caching is done nearly

  //  each time the sound is needed?

  //  each time the sound is needed?

  //

  //

  // get lumpnum if necessary

  // get lumpnum if necessary

  if (sfx->lumpnum < 0)

  if (sfx->lumpnum < 0)

    sfx->lumpnum = I_GetSfxLumpNum(sfx);

    sfx->lumpnum = I_GetSfxLumpNum(sfx);

  // cache data if necessary

  // cache data if necessary

  if (!sfx->data)

  if (!sfx->data)

  {

  {

    sfx->data = (void *) W_CacheLumpNum(sfx->lumpnum, PU_MUSIC);

    sfx->data = (void *) W_CacheLumpNum(sfx->lumpnum, PU_MUSIC);

  }

  }

  // increase the usefulness

  // increase the usefulness

  if (sfx->usefulness++ < 0)

  if (sfx->usefulness++ < 0)

      sfx->usefulness = 1;

      sfx->usefulness = 1;

  // Assigns the handle to one of the channels in the

  // Assigns the handle to one of the channels in the

  //  mix/output buffer.

  //  mix/output buffer.

  //WriteDebug("I_StartSound...\n");

  //WriteDebug("I_StartSound...\n");

  channels[cnum].handle = cnum;

  channels[cnum].handle = cnum;

  channels[cnum].sfxinfo = sfx;

  channels[cnum].sfxinfo = sfx;

  channels[cnum].origin = origin;

  channels[cnum].origin = origin;

}	

}       

void S_StartSound( void *origin, int sfx_id )

void S_StartSound( void *origin, int sfx_id )

   {

   {

#ifdef SAWDEBUG

#ifdef SAWDEBUG

    // if (sfx_id == sfx_sawful)

    // if (sfx_id == sfx_sawful)

    // sfx_id = sfx_itemup;

    // sfx_id = sfx_itemup;

#endif

#endif

    S_StartSoundAtVolume(origin, sfx_id, snd_SfxVolume);

    S_StartSoundAtVolume(origin, sfx_id, snd_SfxVolume);

    // UNUSED. We had problems, had we not?

    // UNUSED. We had problems, had we not?

#ifdef SAWDEBUG

#ifdef SAWDEBUG

{

{

    int i;

    int i;

    int n;

    int n;

    static mobj_t*      last_saw_origins[10] = {1,1,1,1,1,1,1,1,1,1};

    static mobj_t*      last_saw_origins[10] = {1,1,1,1,1,1,1,1,1,1};

    static int		first_saw=0;

    static int          first_saw=0;

    static int		next_saw=0;

    static int          next_saw=0;

    if (sfx_id == sfx_sawidl

    if (sfx_id == sfx_sawidl

	|| sfx_id == sfx_sawful

        || sfx_id == sfx_sawful

	|| sfx_id == sfx_sawhit)

        || sfx_id == sfx_sawhit)

    {

    {

	for (i=first_saw;i!=next_saw;i=(i+1)%10)

        for (i=first_saw;i!=next_saw;i=(i+1)%10)

	    if (last_saw_origins[i] != origin)

            if (last_saw_origins[i] != origin)

		fprintf(stderr, "old origin 0x%lx != "

                fprintf(stderr, "old origin 0x%lx != "

			"origin 0x%lx for sfx %d\n",

                        "origin 0x%lx for sfx %d\n",

			last_saw_origins[i],

                        last_saw_origins[i],

			origin,

                        origin,

			sfx_id);

                        sfx_id);

	last_saw_origins[next_saw] = origin;

        last_saw_origins[next_saw] = origin;

	next_saw = (next_saw + 1) % 10;

        next_saw = (next_saw + 1) % 10;

	if (next_saw == first_saw)

        if (next_saw == first_saw)

	    first_saw = (first_saw + 1) % 10;

            first_saw = (first_saw + 1) % 10;

	for (n=i=0; i

        for (n=i=0; i

	{

        {

	    if (channels[i].sfxinfo == &S_sfx[sfx_sawidl]

            if (channels[i].sfxinfo == &S_sfx[sfx_sawidl]

		|| channels[i].sfxinfo == &S_sfx[sfx_sawful]

                || channels[i].sfxinfo == &S_sfx[sfx_sawful]

		|| channels[i].sfxinfo == &S_sfx[sfx_sawhit]) n++;

                || channels[i].sfxinfo == &S_sfx[sfx_sawhit]) n++;

	}

        }

	if (n>1)

        if (n>1)

	{

        {

	    for (i=0; i

            for (i=0; i

	    {

            {

		if (channels[i].sfxinfo == &S_sfx[sfx_sawidl]

                if (channels[i].sfxinfo == &S_sfx[sfx_sawidl]

		    || channels[i].sfxinfo == &S_sfx[sfx_sawful]

                    || channels[i].sfxinfo == &S_sfx[sfx_sawful]

		    || channels[i].sfxinfo == &S_sfx[sfx_sawhit])

                    || channels[i].sfxinfo == &S_sfx[sfx_sawhit])

		{

                {

		    fprintf(stderr,

                    fprintf(stderr,

			    "chn: sfxinfo=0x%lx, origin=0x%lx, "

                            "chn: sfxinfo=0x%lx, origin=0x%lx, "

			    "handle=%d\n",

                            "handle=%d\n",

			    channels[i].sfxinfo,

                            channels[i].sfxinfo,

			    channels[i].origin,

                            channels[i].origin,

			    channels[i].handle);

                            channels[i].handle);

		}

                }

	    }

            }

	    fprintf(stderr, "\n");

            fprintf(stderr, "\n");

	}

        }

    }

    }

}

}

#endif

#endif

}

}

void S_StopSound(void *origin)

void S_StopSound(void *origin)

{

{

    int cnum;

    int cnum;

    for (cnum=0 ; cnum

    for (cnum=0 ; cnum

    {

    {

	if (channels[cnum].sfxinfo && channels[cnum].origin == origin)

        if (channels[cnum].sfxinfo && channels[cnum].origin == origin)

	{

        {

	    S_StopChannel(cnum);

            S_StopChannel(cnum);

	    break;

            break;

	}

        }

    }

    }

}

}

//

//

// Stop and resume music, during game PAUSE.

// Stop and resume music, during game PAUSE.

//

//

void S_PauseSound(void)

void S_PauseSound(void)

{

{

    if (mus_playing && !mus_paused)

    if (mus_playing && !mus_paused)

    {

    {

	I_PauseSong(mus_playing->handle);

        I_PauseSong(mus_playing->handle);

	mus_paused = true;

        mus_paused = true;

    }

    }

}

}

void S_ResumeSound(void)

void S_ResumeSound(void)

{

{

    if (mus_playing && mus_paused)

    if (mus_playing && mus_paused)

    {

    {

	I_ResumeSong(mus_playing->handle);

        I_ResumeSong(mus_playing->handle);

	mus_paused = false;

        mus_paused = false;

    }

    }

}

}

//

//

// Updates music & sounds

// Updates music & sounds

//

//

void S_UpdateSounds(void* listener_p)

void S_UpdateSounds(void* listener_p)

{

{

    int		audible;

    int         audible;

    int		cnum;

    int         cnum;

    int		volume;

    int         volume;

    int		sep;

    int         sep;

    int		pitch;

    int         pitch;

    sfxinfo_t*	sfx;

    sfxinfo_t*  sfx;

    channel_t*	c;

    channel_t*  c;

    mobj_t*	listener = (mobj_t*)listener_p;

    mobj_t*     listener = (mobj_t*)listener_p;

    // Clean up unused data.

    // Clean up unused data.

    // This is currently not done for 16bit (sounds cached static).

    // This is currently not done for 16bit (sounds cached static).

    // DOS 8bit remains. 

    // DOS 8bit remains. 

    /*if (gametic > nextcleanup)

    /*if (gametic > nextcleanup)

    {

    {

	for (i=1 ; i

        for (i=1 ; i

	{

        {

	    if (S_sfx[i].usefulness < 1

            if (S_sfx[i].usefulness < 1

		&& S_sfx[i].usefulness > -1)

                && S_sfx[i].usefulness > -1)

	    {

            {

		if (--S_sfx[i].usefulness == -1)

                if (--S_sfx[i].usefulness == -1)

		{

                {

		    Z_ChangeTag(S_sfx[i].data, PU_CACHE);

                    Z_ChangeTag(S_sfx[i].data, PU_CACHE);

		    S_sfx[i].data = 0;

                    S_sfx[i].data = 0;

		}

                }

	    }

            }

	}

        }

	nextcleanup = gametic + 15;

        nextcleanup = gametic + 15;

    }*/

    }*/

    for (cnum=0 ; cnum

    for (cnum=0 ; cnum

    {

    {

	c = &channels[cnum];

        c = &channels[cnum];

	sfx = c->sfxinfo;

        sfx = c->sfxinfo;

	if (c->sfxinfo)

        if (c->sfxinfo)

	{

        {

	    if (I_SoundIsPlaying(c->handle))

            if (I_SoundIsPlaying(c->handle))

	    {

            {

		// initialize parameters

                // initialize parameters

		volume = snd_SfxVolume;

                volume = snd_SfxVolume;

		pitch = NORM_PITCH;

                pitch = NORM_PITCH;

		sep = NORM_SEP;

                sep = NORM_SEP;

		if (sfx->link)

                if (sfx->link)

		{

                {

		    pitch = sfx->pitch;

                    pitch = sfx->pitch;

		    volume += sfx->volume;

                    volume += sfx->volume;

		    if (volume < 1)

                    if (volume < 1)

		    {

                    {

			S_StopChannel(cnum);

                        S_StopChannel(cnum);

			continue;

                        continue;

		    }

                    }

		    else if (volume > snd_SfxVolume)

                    else if (volume > snd_SfxVolume)

		    {

                    {

			volume = snd_SfxVolume;

                        volume = snd_SfxVolume;

		    }

                    }

		}

                }

		// check non-local sounds for distance clipping

                // check non-local sounds for distance clipping

		//  or modify their params

                //  or modify their params

		if (c->origin && listener_p != c->origin)

                if (c->origin && listener_p != c->origin)

		{

                {

		    audible = S_AdjustSoundParams(listener,

                    audible = S_AdjustSoundParams(listener,

						  c->origin,

                                                  c->origin,

						  &volume,

                                                  &volume,

						  &sep,

                                                  &sep,

						  &pitch);

                                                  &pitch);

		    if (!audible)

                    if (!audible)

		    {

                    {

			S_StopChannel(cnum);

                        S_StopChannel(cnum);

		    }

                    }

		    else

                    else

			I_UpdateSoundParams(c->handle, volume, sep, pitch);

                        I_UpdateSoundParams(c->handle, volume, sep, pitch);

		}

                }

	    }

            }

	    else

            else

	    {

            {

		// if channel is allocated but sound has stopped,

                // if channel is allocated but sound has stopped,

		//  free it

                //  free it

		S_StopChannel(cnum);

                S_StopChannel(cnum);

	    }

            }

	}

        }

    }

    }

    // kill music if it is a single-play && finished

    // kill music if it is a single-play && finished

    // if (	mus_playing

    // if (     mus_playing

    //      && !I_QrySongPlaying(mus_playing->handle)

    //      && !I_QrySongPlaying(mus_playing->handle)

    //      && !mus_paused )

    //      && !mus_paused )

    // S_StopMusic();

    // S_StopMusic();

}

}

void S_SetMusicVolume(int volume)

void S_SetMusicVolume(int volume)

{

{

    if (volume < 0 || volume > 127)

    if (volume < 0 || volume > 127)

    {

    {

	I_Error("Attempt to set music volume at %d",

        I_Error("Attempt to set music volume at %d",

		volume);

                volume);

    }    

    }    

    I_SetMusicVolume(127);

    I_SetMusicVolume(127);

    I_SetMusicVolume(volume);

    I_SetMusicVolume(volume);

    snd_MusicVolume = volume;

    snd_MusicVolume = volume;

}

}

void S_SetSfxVolume(int volume)

void S_SetSfxVolume(int volume)

{

{

    if (volume < 0 || volume > 127)

    if (volume < 0 || volume > 127)

	I_Error("Attempt to set sfx volume at %d", volume);

        I_Error("Attempt to set sfx volume at %d", volume);

    snd_SfxVolume = volume;

    snd_SfxVolume = volume;

}

}

//

//

// Starts some music with the music id found in sounds.h.

// Starts some music with the music id found in sounds.h.

//

//

void S_StartMusic(int m_id)

void S_StartMusic(int m_id)

{

{

//    S_ChangeMusic(m_id, false);

//    S_ChangeMusic(m_id, false);

}

}

// clean-up&code for orig midi 10.9.98-dlw

// clean-up&code for orig midi 10.9.98-dlw

void S_ChangeMusic(int musicnum, int looping)

void S_ChangeMusic(int musicnum, int looping)

{

{

    // I_PlaySong(music->handle, looping);

    // I_PlaySong(music->handle, looping);

//	mus_playing = music;

//      mus_playing = music;

}

}

void S_StopMusic(void)

void S_StopMusic(void)

{

{

    if (mus_playing)

    if (mus_playing)

    {

    {

		if (mus_paused) I_ResumeSong(mus_playing->handle);

                if (mus_paused) I_ResumeSong(mus_playing->handle);

		I_StopSong(mus_playing->handle);

                I_StopSong(mus_playing->handle);

		I_UnRegisterSong(mus_playing->handle);

                I_UnRegisterSong(mus_playing->handle);

		Z_ChangeTag(mus_playing->data, PU_CACHE);

                Z_ChangeTag(mus_playing->data, PU_CACHE);

		mus_playing->data = 0;

                mus_playing->data = 0;

		mus_playing = 0;

                mus_playing = 0;

    }

    }

}

}

void S_StopChannel(int cnum)

void S_StopChannel(int cnum)

{

{

    int		i;

    int         i;

    channel_t*	c = &channels[cnum];

    channel_t*  c = &channels[cnum];

    if (c->sfxinfo)

    if (c->sfxinfo)

    {

    {

	// stop the sound playing

        // stop the sound playing

	if (I_SoundIsPlaying(c->handle))

        if (I_SoundIsPlaying(c->handle))

	{

        {

#ifdef SAWDEBUG

#ifdef SAWDEBUG

	    if (c->sfxinfo == &S_sfx[sfx_sawful])

            if (c->sfxinfo == &S_sfx[sfx_sawful])

		fprintf(stderr, "stopped\n");

                fprintf(stderr, "stopped\n");

#endif

#endif

	    I_StopSound(c->handle);

            I_StopSound(c->handle);

	}

        }

	// check to see

        // check to see

	//  if other channels are playing the sound

        //  if other channels are playing the sound

	for (i=0 ; i

        for (i=0 ; i

	{

        {

	    if (cnum != i

            if (cnum != i

		&& c->sfxinfo == channels[i].sfxinfo)

                && c->sfxinfo == channels[i].sfxinfo)

	    {

            {

		break;

                break;

	    }

            }

	}

        }

	// degrade usefulness of sound data

        // degrade usefulness of sound data

	c->sfxinfo->usefulness--;

        c->sfxinfo->usefulness--;

	c->sfxinfo = 0;

        c->sfxinfo = 0;

    }

    }

}

}

//

//

// Changes volume, stereo-separation, and pitch variables

// Changes volume, stereo-separation, and pitch variables

//  from the norm of a sound effect to be played.

//  from the norm of a sound effect to be played.

// If the sound is not audible, returns a 0.

// If the sound is not audible, returns a 0.

// Otherwise, modifies parameters and returns 1.

// Otherwise, modifies parameters and returns 1.

//

//

int

int

S_AdjustSoundParams (mobj_t* listener, mobj_t* source, 

S_AdjustSoundParams (mobj_t* listener, mobj_t* source, 

                     int* vol, int* sep, int* pitch)

                     int* vol, int* sep, int* pitch)

{

{

    fixed_t	approx_dist;

    fixed_t     approx_dist;

    fixed_t	adx;

    fixed_t     adx;

    fixed_t	ady;

    fixed_t     ady;

    angle_t	angle;

    angle_t     angle;

    // calculate the distance to sound origin

    // calculate the distance to sound origin

    //  and clip it if necessary

    //  and clip it if necessary

    adx = abs(listener->x - source->x);

    adx = abs(listener->x - source->x);

    ady = abs(listener->y - source->y);

    ady = abs(listener->y - source->y);

    // From _GG1_ p.428. Appox. eucledian distance fast.

    // From _GG1_ p.428. Appox. eucledian distance fast.

    approx_dist = adx + ady - ((adx < ady ? adx : ady)>>1);

    approx_dist = adx + ady - ((adx < ady ? adx : ady)>>1);

    if (gamemap != 8

    if (gamemap != 8

	&& approx_dist > S_CLIPPING_DIST)

        && approx_dist > S_CLIPPING_DIST)

    {

    {

	return 0;

        return 0;

    }

    }

    // angle of source to listener

    // angle of source to listener

    angle = R_PointToAngle2(listener->x,

    angle = R_PointToAngle2(listener->x,

			    listener->y,

                            listener->y,

			    source->x,

                            source->x,

			    source->y);

                            source->y);

    if (angle > listener->angle)

    if (angle > listener->angle)

	angle = angle - listener->angle;

        angle = angle - listener->angle;

    else

    else

	angle = angle + (0xffffffff - listener->angle);

        angle = angle + (0xffffffff - listener->angle);

    angle >>= ANGLETOFINESHIFT;

    angle >>= ANGLETOFINESHIFT;

    // stereo separation

    // stereo separation

    *sep = 128 - (FixedMul(S_STEREO_SWING,finesine[angle])>>FRACBITS);

    *sep = 128 - (FixedMul(S_STEREO_SWING,finesine[angle])>>FRACBITS);

    // volume calculation

    // volume calculation

    if (approx_dist < S_CLOSE_DIST)

    if (approx_dist < S_CLOSE_DIST)

    {

    {

	*vol = snd_SfxVolume;

        *vol = snd_SfxVolume;

    }

    }

    else if (gamemap == 8)

    else if (gamemap == 8)

    {

    {

	if (approx_dist > S_CLIPPING_DIST)

        if (approx_dist > S_CLIPPING_DIST)

	    approx_dist = S_CLIPPING_DIST;

            approx_dist = S_CLIPPING_DIST;

	*vol = 15+ ((snd_SfxVolume-15)

        *vol = 15+ ((snd_SfxVolume-15)

		    *((S_CLIPPING_DIST - approx_dist)>>FRACBITS))

                    *((S_CLIPPING_DIST - approx_dist)>>FRACBITS))

	    / S_ATTENUATOR;

            / S_ATTENUATOR;

    }

    }

    else

    else

    {

    {

	// distance effect

        // distance effect

	*vol = (snd_SfxVolume

        *vol = (snd_SfxVolume

		* ((S_CLIPPING_DIST - approx_dist)>>FRACBITS))

                * ((S_CLIPPING_DIST - approx_dist)>>FRACBITS))

	    / S_ATTENUATOR; 

            / S_ATTENUATOR; 

    }

    }

    return (*vol > 0);

    return (*vol > 0);

}

}

//

//

// S_getChannel :

// S_getChannel :

//   If none available, return -1.  Otherwise channel #.

//   If none available, return -1.  Otherwise channel #.

//

//

int S_getChannel( void *origin, sfxinfo_t *sfxinfo, int sfxid )

int S_getChannel( void *origin, sfxinfo_t *sfxinfo, int sfxid )

   {

   {

    // channel number to use

    // channel number to use

    int		cnum;

    int         cnum;

    channel_t*	c;

    channel_t*  c;

    // Find an open channel

    // Find an open channel

    //for (cnum = 0; cnum < numChannels; cnum++)

    //for (cnum = 0; cnum < numChannels; cnum++)

    for (cnum = 0; cnum < NUM_CHANNELS; cnum++)

    for (cnum = 0; cnum < NUM_CHANNELS; cnum++)

       {

       {

        if (!channels[cnum].sfxinfo)

        if (!channels[cnum].sfxinfo)

            break;

            break;

        else

        else

        if (origin && channels[cnum].origin == origin)

        if (origin && channels[cnum].origin == origin)

           {

           {

            S_StopChannel(cnum);

            S_StopChannel(cnum);

            break;

            break;

           }

           }

       }

       }

    // None available

    // None available

    if (cnum == NUM_CHANNELS)

    if (cnum == NUM_CHANNELS)

       {

       {

        // Look for lower priority

        // Look for lower priority

        for (cnum = NUMSFX; cnum < NUM_CHANNELS; cnum++)

        for (cnum = NUMSFX; cnum < NUM_CHANNELS; cnum++)

             if (channels[cnum].sfxinfo->priority >= sfxinfo->priority)

             if (channels[cnum].sfxinfo->priority >= sfxinfo->priority)

                 break;

                 break;

        if (cnum == numChannels)

        if (cnum == numChannels)

           {

           {

            // FUCK!  No lower priority.  Sorry, Charlie.    

            // FUCK!  No lower priority.  Sorry, Charlie.    

            return -1;

            return -1;

           }

           }

        else

        else

           {

           {

            // Otherwise, kick out lower priority.

            // Otherwise, kick out lower priority.

            S_StopChannel(cnum);

            S_StopChannel(cnum);

           }

           }

       }

       }

    c = &channels[cnum];

    c = &channels[cnum];

    // channel is decided to be cnum.

    // channel is decided to be cnum.

    c->sfxinfo = sfxinfo;

    c->sfxinfo = sfxinfo;

    c->origin = origin;

    c->origin = origin;

    return cnum;

    return cnum;

   }

   }

>

>

>

>