X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2F16_snd.c;h=866d9a204166c61a22e84297ba29bc2d7fcb82c1;hb=a565be31ce92d6168ae6983042da75b0b683e52b;hp=e814c148b7460acaec40760627ea87fdc3ac9cad;hpb=fa252ebd82649e4f3bab4a53228828766713ad6c;p=16.git

diff --git a/src/lib/16_snd.c b/src/lib/16_snd.c
index e814c148..866d9a20 100755
--- a/src/lib/16_snd.c
+++ b/src/lib/16_snd.c
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~
- * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
+ * Copyright (C) 2012-2019 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
  *
  * This file is part of Project 16.
  *
@@ -22,6 +22,8 @@
 
 #include "src/lib/16_snd.h"
 
+static	void interrupt	(*t0OldService)(void);
+
 void opl2out(word reg, word data)
 {
 	__asm
@@ -192,3 +194,189 @@ void FMSetVoice(int voiceNum, FMInstrument *ins){
 	opCellNum = (byte)0xC0 + (byte)voiceNum;
 	opl2out(opCellNum, ins->Feedback);
 } /* End of FMSetVoice */
+
+
+//newer sd
+
+
+struct glob_game_vars	*ggvv;
+// WARNING: subroutine call in interrupt handler. make sure you compile with -zu flag for large/compact memory models
+void interrupt SDL_irq0()
+{
+	ggvv->ca.sd.irq0_ticks++;
+	if ((ggvv->ca.sd.irq0_cnt += ggvv->ca.sd.irq0_add) >= ggvv->ca.sd.irq0_max) {
+		ggvv->ca.sd.irq0_cnt -= ggvv->ca.sd.irq0_max;
+		t0OldService();
+	}
+	else {
+		p8259_OCW2(0,P8259_OCW2_NON_SPECIFIC_EOI);
+	}
+}
+
+void SD_Initimf(global_game_variables_t *gvar)
+{
+	if (!init_adlib()) {
+		printf("Cannot init library\n");
+		return;
+	}
+	if (!probe_8254()) { /* we need the timer to keep time with the music */
+		printf("8254 timer not found\n");
+		return;
+	}
+
+	gvar->ca.sd.imf_delay_countdown=0;
+	gvar->ca.sd.imf_music=
+	gvar->ca.sd.imf_play_ptr=
+	gvar->ca.sd.imf_music_end=NULL;
+
+	SD_adlib_shut_up();
+	shutdown_adlib_opl3(); // NTS: Apparently the music won't play otherwise
+}
+
+void SD_imf_reset_music(global_game_variables_t *gvar)
+{
+	gvar->ca.sd.imf_music = gvar->ca.sd.imf_play_ptr = gvar->ca.sd.imf_music_end = NULL;
+	gvar->ca.sd.imf_delay_countdown = 0;
+}
+
+void SD_StartupTimer(global_game_variables_t *gvar)
+{
+	gvar->ca.sd.irq0_ticks=
+	gvar->ca.sd.irq0_cnt = 0;
+	gvar->ca.sd.irq0_add = 182;
+	gvar->ca.sd.irq0_max = 1000; /* about 18.2Hz */
+	gvar->ca.sd.tickrate = 700;
+
+	write_8254_system_timer(T8254_REF_CLOCK_HZ / gvar->ca.sd.tickrate);
+	t0OldService = _dos_getvect(8);	/*IRQ0*/
+	_dos_setvect(8,SDL_irq0);
+
+	_cli();
+	gvar->ca.sd.irq0_ticks = gvar->ca.sd.ptick = 0;
+	_sti();
+}
+
+void SD_ShutdownTimer()
+{
+	_dos_setvect(8,t0OldService);
+}
+
+void SD_imf_free_music(global_game_variables_t *gvar)
+{
+#ifndef SD_USESCAMMPM
+	if (gvar->ca.sd.imf_music) free(gvar->ca.sd.imf_music);
+#else
+	MM_FreePtr(MEMPTRCONV gvar->ca.audiosegs[0], gvar);	//TODO make behave like id engine
+#endif
+	SD_imf_reset_music(gvar);
+}
+
+int SD_imf_load_music(const char *path, global_game_variables_t *gvar)
+{
+	unsigned long len;
+	unsigned char buf[8];
+	int fd;
+
+#ifndef SD_USESCAMMPM
+	SD_imf_free_music(gvar);
+#else
+	SD_imf_reset_music(gvar);
+#endif
+
+	fd = open(path,O_RDONLY|O_BINARY);
+	if (fd < 0) return 0;
+
+	len = lseek(fd,0,SEEK_END);
+	lseek(fd,0,SEEK_SET);
+	read(fd,buf,2);
+	if (buf[0] != 0 || buf[1] != 0) // type 1 IMF
+		len = *((uint16_t*)buf);
+	else
+		lseek(fd,0,SEEK_SET);
+
+	if (len == 0 || len > 65535UL) {
+		close(fd);
+		return 0;
+	}
+	len -= len & 3;
+
+#ifndef SD_USESCAMMPM
+	gvar->ca.sd.imf_music = malloc(len);
+#else
+	MM_GetPtr(MEMPTRCONV gvar->ca.audiosegs[0],len, gvar);
+	gvar->ca.sd.imf_music = (struct imf_entry *)gvar->ca.audiosegs[0];
+#endif
+	if (gvar->ca.sd.imf_music == NULL) {
+		close(fd);
+		return 0;
+	}
+	read(fd,gvar->ca.sd.imf_music,len);
+	close(fd);
+
+	gvar->ca.sd.imf_play_ptr = gvar->ca.sd.imf_music;
+	gvar->ca.sd.imf_music_end = gvar->ca.sd.imf_music + (len >> 2UL);
+	return 1;
+}
+
+void SD_imf_tick(global_game_variables_t *gvar)
+{
+	if (gvar->ca.sd.imf_delay_countdown == 0) {
+		do {
+			adlib_write(gvar->ca.sd.imf_play_ptr->reg,gvar->ca.sd.imf_play_ptr->data);
+			gvar->ca.sd.imf_delay_countdown = gvar->ca.sd.imf_play_ptr->delay;
+			gvar->ca.sd.imf_play_ptr++;
+			if (gvar->ca.sd.imf_play_ptr == gvar->ca.sd.imf_music_end)
+			{
+//				printf("replay\n");
+				gvar->ca.sd.imf_play_ptr = gvar->ca.sd.imf_music;
+			}
+		} while (gvar->ca.sd.imf_delay_countdown == 0);
+	}
+	else {
+		gvar->ca.sd.imf_delay_countdown--;
+	}
+}
+
+void SD_adlib_shut_up() {
+	int i;
+
+	memset(adlib_fm,0,sizeof(adlib_fm));
+	memset(&adlib_reg_bd,0,sizeof(adlib_reg_bd));
+	for (i=0;i < adlib_fm_voices;i++) {
+		struct adlib_fm_operator *f;
+		f = &adlib_fm[i].mod;
+		f->ch_a = f->ch_b = f->ch_c = f->ch_d = 1;
+		f = &adlib_fm[i].car;
+		f->ch_a = f->ch_b = f->ch_c = f->ch_d = 1;
+	}
+
+	for (i=0;i < adlib_fm_voices;i++) {
+		struct adlib_fm_operator *f;
+
+		f = &adlib_fm[i].mod;
+		f->mod_multiple = 1;
+		f->total_level = 63 - 16;
+		f->attack_rate = 15;
+		f->decay_rate = 4;
+		f->sustain_level = 0;
+		f->release_rate = 8;
+		f->f_number = 400;
+		f->sustain = 1;
+		f->octave = 4;
+		f->key_on = 0;
+
+		f = &adlib_fm[i].car;
+		f->mod_multiple = 1;
+		f->total_level = 63 - 16;
+		f->attack_rate = 15;
+		f->decay_rate = 4;
+		f->sustain_level = 0;
+		f->release_rate = 8;
+		f->f_number = 0;
+		f->sustain = 1;
+		f->octave = 0;
+		f->key_on = 0;
+	}
+
+	adlib_apply_all();
+}