X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=interpreters%2Ffrotz%2Fsound.c;h=0a29d0b5b55372af73eb09b8424791bcb4b563b8;hb=a3d8dbef8ec2442280d6085d43601bf4ba6cadf9;hp=26d38353aa5c2c15fae75704d0f76c82d6703251;hpb=b1f1dc50b22b30c4d7176e1ff7c0805e80fe0724;p=projects%2Fchimara%2Fchimara.git

diff --git a/interpreters/frotz/sound.c b/interpreters/frotz/sound.c
index 26d3835..0a29d0b 100644
--- a/interpreters/frotz/sound.c
+++ b/interpreters/frotz/sound.c
@@ -15,7 +15,7 @@
  *
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
  */
 
 #include "frotz.h"
@@ -31,8 +31,6 @@
 
 extern int direct_call (zword);
 
-static zword routine = 0;
-
 static int next_sample = 0;
 static int next_volume = 0;
 
@@ -75,7 +73,6 @@ static void start_sample (int number, int volume, int repeats, zword eos)
 
     os_start_sample (number, volume, repeats, eos);
 
-    routine = eos;
     playing = TRUE;
 
 }/* start_sample */
@@ -109,7 +106,7 @@ static void start_next_sample (void)
  *
  */
 
-void end_of_sound (void)
+void end_of_sound (zword routine)
 {
 
 #if defined(DJGPP) && defined(SOUND_SUPPORT)
@@ -148,9 +145,8 @@ void z_sound_effect (void)
     zword effect = zargs[1];
     zword volume = zargs[2];
 
-    /* By default play sound 1 at volume 8 */
     if (zargc < 1)
-	number = 1;
+	number = 0;
     if (zargc < 2)
 	effect = EFFECT_PLAY;
     if (zargc < 3)