p16 is being worked on a bunch by me wwww [16_ca needs huge amounts of work and I...

[16.git] / src / lib / 16_sd.c

diff --git a/src/lib/16_sd.c b/src/lib/16_sd.c
index 63e17e5ca8c4418e4999dd90aed416a35084376b..f48ae2c05501fac4a7b1f7c828593efca09b2eae 100755 (executable)
--- a/src/lib/16_sd.c
+++ b/src/lib/16_sd.c
@@ -22,6 +22,9 @@
 \r
 #include "src/lib/16_sd.h"\r
 \r
+//static void (interrupt *old_irq0)();\r
+extern struct glob_game_vars   *ggvv;\r
+\r
 void opl2out(word reg, word data)\r
 {\r
        __asm\r
@@ -192,3 +195,139 @@ void FMSetVoice(int voiceNum, FMInstrument *ins){
        opCellNum = (byte)0xC0 + (byte)voiceNum;\r
        opl2out(opCellNum, ins->Feedback);\r
 } /* End of FMSetVoice */\r
+\r
+\r
+void SD_Initimf(global_game_variables_t *gvar)\r
+{\r
+       gvar->ca.sd.irq0_ticks=\r
+       gvar->ca.sd.irq0_cnt=\r
+       gvar->ca.sd.irq0_add=\r
+       gvar->ca.sd.imf_delay_countdown=\r
+       gvar->ca.sd.irq0_max=0;\r
+       gvar->ca.sd.imf_music=\r
+       gvar->ca.sd.imf_play_ptr=\r
+       gvar->ca.sd.imf_music_end=NULL;\r
+}\r
+\r
+void SD_imf_free_music(global_game_variables_t *gvar)\r
+{\r
+       if (gvar->ca.sd.imf_music) free(gvar->ca.sd.imf_music);\r
+       MM_FreePtr(MEMPTR gvar->ca.audiosegs[0], gvar); //TODO make behave like id engine\r
+       gvar->ca.sd.imf_music = gvar->ca.sd.imf_play_ptr = gvar->ca.sd.imf_music_end = NULL;\r
+       gvar->ca.sd.imf_delay_countdown = 0;\r
+}\r
+\r
+int SD_imf_load_music(const char *path, global_game_variables_t *gvar)\r
+{\r
+       unsigned long len;\r
+       unsigned char buf[8];\r
+       int fd;\r
+\r
+       SD_imf_free_music(gvar);\r
+\r
+       fd = open(path,O_RDONLY|O_BINARY);\r
+       if (fd < 0) return 0;\r
+\r
+       len = lseek(fd,0,SEEK_END);\r
+       lseek(fd,0,SEEK_SET);\r
+       read(fd,buf,2);\r
+       if (buf[0] != 0 || buf[1] != 0) // type 1 IMF\r
+               len = *((uint16_t*)buf);\r
+       else\r
+               lseek(fd,0,SEEK_SET);\r
+\r
+       if (len == 0 || len > 65535UL) {\r
+               close(fd);\r
+               return 0;\r
+       }\r
+       len -= len & 3;\r
+\r
+       MM_GetPtr(MEMPTR gvar->ca.audiosegs[0],len, gvar);\r
+       gvar->ca.sd.imf_music = (struct imf_entry *)gvar->ca.audiosegs[0];\r
+       if (gvar->ca.sd.imf_music == NULL) {\r
+               close(fd);\r
+               return 0;\r
+       }\r
+       read(fd,gvar->ca.sd.imf_music,len);\r
+       close(fd);\r
+\r
+       gvar->ca.sd.imf_play_ptr = gvar->ca.sd.imf_music;\r
+       gvar->ca.sd.imf_music_end = gvar->ca.sd.imf_music + (len >> 2UL);\r
+       return 1;\r
+}\r
+\r
+// WARNING: subroutine call in interrupt handler. make sure you compile with -zu flag for large/compact memory models\r
+/*void interrupt irq0()\r
+{\r
+       ggvv->ca.sd.irq0_ticks++;\r
+       if ((ggvv->ca.sd.irq0_cnt += ggvv->ca.sd.irq0_add) >= ggvv->ca.sd.irq0_max) {\r
+               ggvv->ca.sd.irq0_cnt -= ggvv->ca.sd.irq0_max;\r
+               old_irq0();\r
+       }\r
+       else {\r
+               p8259_OCW2(0,P8259_OCW2_NON_SPECIFIC_EOI);\r
+       }\r
+}*/\r
+\r
+void SD_imf_tick(global_game_variables_t *gvar)\r
+{\r
+       if (gvar->ca.sd.imf_delay_countdown == 0) {\r
+               do {\r
+                       adlib_write(gvar->ca.sd.imf_play_ptr->reg,gvar->ca.sd.imf_play_ptr->data);\r
+                       gvar->ca.sd.imf_delay_countdown = gvar->ca.sd.imf_play_ptr->delay;\r
+                       gvar->ca.sd.imf_play_ptr++;\r
+                       if (gvar->ca.sd.imf_play_ptr == gvar->ca.sd.imf_music_end)\r
+                       {\r
+//                             printf("replay\n");\r
+                               gvar->ca.sd.imf_play_ptr = gvar->ca.sd.imf_music;\r
+                       }\r
+               } while (gvar->ca.sd.imf_delay_countdown == 0);\r
+       }\r
+       else {\r
+               gvar->ca.sd.imf_delay_countdown--;\r
+       }\r
+}\r
+\r
+void SD_adlib_shut_up() {\r
+       int i;\r
+\r
+       memset(adlib_fm,0,sizeof(adlib_fm));\r
+       memset(&adlib_reg_bd,0,sizeof(adlib_reg_bd));\r
+       for (i=0;i < adlib_fm_voices;i++) {\r
+               struct adlib_fm_operator *f;\r
+               f = &adlib_fm[i].mod;\r
+               f->ch_a = f->ch_b = f->ch_c = f->ch_d = 1;\r
+               f = &adlib_fm[i].car;\r
+               f->ch_a = f->ch_b = f->ch_c = f->ch_d = 1;\r
+       }\r
+\r
+       for (i=0;i < adlib_fm_voices;i++) {\r
+               struct adlib_fm_operator *f;\r
+\r
+               f = &adlib_fm[i].mod;\r
+               f->mod_multiple = 1;\r
+               f->total_level = 63 - 16;\r
+               f->attack_rate = 15;\r
+               f->decay_rate = 4;\r
+               f->sustain_level = 0;\r
+               f->release_rate = 8;\r
+               f->f_number = 400;\r
+               f->sustain = 1;\r
+               f->octave = 4;\r
+               f->key_on = 0;\r
+\r
+               f = &adlib_fm[i].car;\r
+               f->mod_multiple = 1;\r
+               f->total_level = 63 - 16;\r
+               f->attack_rate = 15;\r
+               f->decay_rate = 4;\r
+               f->sustain_level = 0;\r
+               f->release_rate = 8;\r
+               f->f_number = 0;\r
+               f->sustain = 1;\r
+               f->octave = 0;\r
+               f->key_on = 0;\r
+       }\r
+\r
+       adlib_apply_all();\r
+}\r