src/sonido.c

   1 // --------------------------------------------------------
   2 // sonido.c
   3 // --------------------------------------------------------
   4 // Copyright (c) Kronoman
   5 // En memoria de mi querido padre
   6 // --------------------------------------------------------
   7 // Modulo de sonido y musica
   8 // --------------------------------------------------------
   9 #ifndef SONIDO_C
  10 #define SONIDO_C
  11
  12 #include <allegro.h>
  13
  14 #include <aldumb.h> /* DUMB: libreria de sonido */
  15
  16 #include "sonido.h"
  17 #include "global.h"
  18 #include "kfbuffer.h"
  19
  20 /* player para la musica */
  21 static AL_DUH_PLAYER *musica_dp = NULL;
  22
  23
  24 /*
  25 Esta peque~a rutina toca un sonido
  26 Pasarle el volumen
  27 El paneo stereo es calculado de acuerdo a la posicion del objeto
  28 parametros:
  29 x = posicion x del objeto que emite el sonido (para hacer el panning correcto)
  30 spl = puntero al sample a tocar
  31 vol = volumen
  32 freq = frecuencia (velocidad, 1000 = 1, 2000 = 2, etc)
  33
  34 */
  35 void tocar_sonido_paneado(int x, SAMPLE *spl, int vol, int freq)
  36 {
  37 int pan = 0;
  38
  39 if (!(quiere_snd && driver_de_sonido)) return; /* no esta usando el sonido */
  40 if (spl == NULL) return; /* evito errores */
  41
  42 pan = ( x * 255 ) / ANCHO_FB;
  43
  44 tocar_sonido(spl, vol, pan, freq);
  45
  46 }
  47
  48 /*
  49 Esta funcion toca un sonido, es equivalente a play_sample,
  50 pero ajusta el volumen de manera relativa a la variable global
  51 llamada 'volumen_sonido'.
  52 NOTA: se deberia USAR SIEMPRE esta funcion para enviar un sonido
  53 a la placa de sonido, de esa manera, se respetan los settings del usuario
  54 */
  55 void tocar_sonido(SAMPLE *spl, int vol, int pan, int freq)
  56 {
  57 int vol2 = 255;
  58
  59 if (!(quiere_snd && driver_de_sonido)) return; /* no esta usando el sonido */
  60 if (spl == NULL) return; /* evito errores */
  61
  62  vol2 = (vol * volumen_sonido) / 255;
  63  if (vol2 > 0) play_sample(spl, vol2, pan, freq, 0);
  64 }
  65
  66
  67
  68 /* Rutina para comenzar a tocar un archivo de DUMB
  69 pasarle el puntero al archivo
  70 devuelve 0 si todo OK, -1 si falla
  71 */
  72 int musica_play(DUH *duh)
  73 {
  74 float vol = 1.0;
  75
  76 if (duh == NULL) return -1;
  77
  78 if (musica_dp != NULL)  musica_stop();
  79
  80 if (!quiere_musica) return 0;
  81
  82 vol = (float)volumen_musica / 255.0;
  83
  84 /* ajusta el stereo y los khz de acuerdo al nivel de detalle */
  85  musica_dp = al_start_duh(duh,
  86                           (nivel_detalle > 5) ? 2 : 1,
  87                           0,
  88                           vol,
  89                           2048,
  90                           11025);
  91
  92 if (musica_dp == NULL) return -1;
  93
  94 return 0;
  95 }
  96
  97 /* Rutina para parar DEFINITIVAMENTE de tocar la musica */
  98 void musica_stop()
  99 {
 100 if (musica_dp == NULL) return;
 101
 102     al_stop_duh(musica_dp);
 103     musica_dp = NULL;
 104 }
 105
 106 /* Llamar a esta funcion MUY seguido, para que la musica se escuche! */
 107 void ejecutar_poll_musica()
 108 {
 109     if (musica_dp != NULL)  al_poll_duh(musica_dp);
 110 }
 111
 112 /* Llamar a esta funcion luego de cambiar el volumen
 113 de la musica */
 114 void reajustar_volumen_musica()
 115 {
 116 float vol = 1.0;
 117
 118 if (musica_dp == NULL) return;
 119
 120 vol = (float)volumen_musica / 255.0;
 121
 122  al_duh_set_volume(musica_dp, vol);
 123 }
 124
 125 /* Esta funcion pausa la musica */
 126 void pausar_musica()
 127 {
 128     if (!quiere_musica)
 129     {
 130         musica_stop();
 131         return;
 132     }
 133
 134     if (musica_dp == NULL) return;
 135
 136     al_pause_duh(musica_dp);
 137 }
 138
 139 /* Esta funcion continua la musica */
 140 void continuar_musica()
 141 {
 142 if (!quiere_musica) return;
 143
 144     if (musica_dp == NULL) return;
 145
 146     al_resume_duh(musica_dp);
 147 }
 148
 149 #endif