dleague.c

十七种模拟器源代码 非常有用的作课程设计不可缺少的

   WriteLong68k(&ROM[0x0304],0x13FC0000);	// 	move.b	#$00,$AA0000
   WriteLong68k(&ROM[0x0308],0x00AA0000);
   WriteWord68k(&ROM[0x030C],0x6100-10);	//	bra.s	<loop>

   // Init tc0004vcu emulation
   // ------------------------

   tc0004vcu.RAM	= RAM_VIDEO;
   tc0004vcu.GFX_BG0	= GFX_BG0;
   tc0004vcu.GFX_BG0_MSK= GFX_BG0_SOLID;
   tc0004vcu.GFX_FG0	= GFX_FG0;
   tc0004vcu.tile_mask	= 0x7FFF;
   tc0004vcu.bmp_x	= 64;
   tc0004vcu.bmp_y	= 64;
   tc0004vcu.bmp_w	= 320;
   tc0004vcu.bmp_h	= 240;
   tc0004vcu.scr_x	= 16-1;
   tc0004vcu.scr_y	= 32-1;

   tc0004vcu_init();

   // Init tc0220ioc emulation
   // ------------------------

   tc0220ioc.RAM  = RAM_INPUT;
   tc0220ioc.ctrl = 0;		//TC0220_STOPCPU;
   reset_tc0220ioc();

/*
 *  StarScream Stuff follows
 */

   ByteSwap(ROM,0x60000);
   ByteSwap(RAM,0x40000);

   AddMemFetch(0x000000, 0x05FFFF, ROM+0x000000-0x000000);	// 68000 ROM
   AddMemFetch(-1, -1, NULL);

   AddReadByte(0x000000, 0x05FFFF, NULL, ROM+0x000000);			// 68000 ROM
   AddReadByte(0x100000, 0x10FFFF, NULL, RAM+0x000000);			// 68000 RAM
   AddReadByte(0x400000, 0x420FFF, NULL, RAM+0x010000);			// SCREEN RAM
   AddReadByte(0x500000, 0x500FFF, NULL, RAM+0x031000);			// COLOR RAM
   AddReadByte(0x200000, 0x20000F, NULL, RAM_INPUT);			// INPUT
   AddReadByte(0x300000, 0x300003, tc0140syt_read_main_68k, NULL);	// SOUND COMM
   AddReadByte(0x000000, 0xFFFFFF, DefBadReadByte, NULL);		// <Bad Reads>
   AddReadByte(-1, -1, NULL, NULL);

   AddReadWord(0x000000, 0x05FFFF, NULL, ROM+0x000000);			// 68000 ROM
   AddReadWord(0x100000, 0x10FFFF, NULL, RAM+0x000000);			// 68000 RAM
   AddReadWord(0x400000, 0x420FFF, NULL, RAM+0x010000);			// SCREEN RAM
   AddReadWord(0x500000, 0x500FFF, NULL, RAM+0x031000);			// COLOR RAM
   AddReadWord(0x200000, 0x20000F, NULL, RAM_INPUT);			// INPUT
   AddReadWord(0x000000, 0xFFFFFF, DefBadReadWord, NULL);		// <Bad Reads>
   AddReadWord(-1, -1,NULL, NULL);

   AddWriteByte(0x100000, 0x10FFFF, NULL, RAM+0x000000);		// 68000 RAM
   AddWriteByte(0x400000, 0x420FFF, NULL, RAM+0x010000);		// SCREEN RAM
   AddWriteByte(0x500000, 0x500FFF, NULL, RAM+0x031000);		// COLOR RAM
   AddWriteByte(0x200000, 0x20000F, tc0220ioc_wb, NULL);		// INPUT
   AddWriteByte(0x300000, 0x300003, tc0140syt_write_main_68k, NULL);	// SOUND COMM
   AddWriteByte(0xAA0000, 0xAA0001, Stop68000, NULL);			// Trap Idle 68000
   AddWriteByte(0x000000, 0xFFFFFF, DefBadWriteByte, NULL);		// <Bad Writes>
   AddWriteByte(-1, -1, NULL, NULL);

   AddWriteWord(0x100000, 0x10FFFF, NULL, RAM+0x000000);		// 68000 RAM
   AddWriteWord(0x400000, 0x420FFF, NULL, RAM+0x010000);		// SCREEN RAM
   AddWriteWord(0x500000, 0x500FFF, NULL, RAM+0x031000);		// COLOR RAM
   AddWriteWord(0x200000, 0x20000F, tc0220ioc_ww, NULL);		// INPUT
   AddWriteWord(0x000000, 0xFFFFFF, DefBadWriteWord, NULL);		// <Bad Writes>
   AddWriteWord(-1, -1, NULL, NULL);

   AddInitMemory();	// Set Starscream mem pointers... 
}

void LoadDLeaguem(void)
{
   if(!(RAM=AllocateMem(0x80000))) return;
   GFX = load_region[REGION_GFX1];
   GFX_BG0 = GFX+0x000000;

   RAMSize=0x48000+0x10000;

   /*-----[Sound Setup]-----*/

   if(!(Z80ROM=AllocateMem(0x1c000))) return;
   memcpy(Z80ROM+0x00000,load_region[REGION_ROM2]+0x0,0x4000);
   memcpy(Z80ROM+0x10000,load_region[REGION_ROM2]+0x4000,0xc000); 
  
   PCMROM=load_region[REGION_SMP1];
   setup_dleague();
}

void LoadDLeague(void)
{
   int ta,tb,tc;

   if(!(RAM=AllocateMem(0x80000))) return;
   if(!(ROM=AllocateMem(0x60000))) return;
   if(!(GFX=AllocateMem(0x400000+0x200000))) return;

   GFX_BG0 = GFX+0x000000;

   if(!load_rom("dl_ic06.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x400000;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic07.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x400004;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic08.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x400008;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic09.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x40000C;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic14.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x400002;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic16.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x400006;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic18.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x40000A;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic20.bin", RAM+0x00000, 0x20000)) return;	// GFX
   tb=0x40000E;
   for(ta=0;ta<0x20000;ta+=16){
      for(tc=0;tc<16;tc++){
         GFX[tb+(tc<<4)]=RAM[ta+tc]&15;
         GFX[tb+(tc<<4)+1]=RAM[ta+tc]>>4;
      }
      tb+=256;
   }
   if(!load_rom("dl_ic15.bin", RAM+0x00000, 0x80000)) return;	// GFX
   tb=0;
   for(ta=0;ta<0x80000;ta+=2){
      GFX[tb+0]=RAM[ta]&15;
      GFX[tb+1]=RAM[ta]>>4;
      GFX[tb+2]=RAM[ta+1]&15;
      GFX[tb+3]=RAM[ta+1]>>4;
      tb+=16;
   }
   if(!load_rom("dl_ic17.bin", RAM+0x00000, 0x80000)) return;	// GFX
   tb=4;
   for(ta=0;ta<0x80000;ta+=2){
      GFX[tb+0]=RAM[ta]&15;
      GFX[tb+1]=RAM[ta]>>4;
      GFX[tb+2]=RAM[ta+1]&15;
      GFX[tb+3]=RAM[ta+1]>>4;
      tb+=16;
   }
   if(!load_rom("dl_ic19.bin", RAM+0x00000, 0x80000)) return;	// GFX
   tb=8;
   for(ta=0;ta<0x80000;ta+=2){
      GFX[tb+0]=RAM[ta]&15;
      GFX[tb+1]=RAM[ta]>>4;
      GFX[tb+2]=RAM[ta+1]&15;
      GFX[tb+3]=RAM[ta+1]>>4;
      tb+=16;
   }
   if(!load_rom("dl_ic21.bin", RAM+0x00000, 0x80000)) return;	// GFX
   tb=12;
   for(ta=0;ta<0x80000;ta+=2){
      GFX[tb+0]=RAM[ta]&15;
      GFX[tb+1]=RAM[ta]>>4;
      GFX[tb+2]=RAM[ta+1]&15;
      GFX[tb+3]=RAM[ta+1]>>4;
      tb+=16;
   }

   if(!load_rom("dl_ic33.bin", RAM, 0x20000)) return;		// 68000 ROM
   for(ta=0;ta<0x20000;ta++){
      ROM[ta+ta]=RAM[ta];
   }
   if(!load_rom("dl_ic36.bin", RAM, 0x20000)) return;
   for(ta=0;ta<0x20000;ta++){
      ROM[ta+ta+1]=RAM[ta];
   }
   if(!load_rom("dl_ic34.bin", RAM, 0x10000)) return;
   for(ta=0;ta<0x10000;ta++){
      ROM[ta+ta+0x40000]=RAM[ta];
   }
   if(!load_rom("dl_ic37.bin", RAM, 0x10000)) return;
   for(ta=0;ta<0x10000;ta++){
      ROM[ta+ta+0x40001]=RAM[ta];
   }

   RAMSize=0x48000+0x10000;

   /*-----[Sound Setup]-----*/

   Z80ROM=RAM+0x48000;
   if(!load_rom("dl_ic40.bin", Z80ROM, 0x10000)) return;	// Z80 SOUND ROM

   if(!(PCMROM=AllocateMem(0x80000))) return;
   if(!load_rom("c02-01.rom",PCMROM,0x80000)) return;		// ADPCM A rom
   //memset(PCMROM,0x80,0x80000);
   setup_dleague();
}

void ClearDLeague(void)
{
   RemoveTaitoYM2610();

   #ifdef RAINE_DEBUG
      save_debug("ROM.bin",ROM,0x060000,1);
      save_debug("RAM.bin",RAM,0x040000,1);
      //save_debug("GFX.bin",GFX,0x500000,0);
   #endif
}

void ExecuteDLeagueFrame(void)
{
   //print_ingame(60,"%04x",ReadWord(&RAM[0x30800]));

   cpu_execute_cycles(CPU_68K_0, CPU_FRAME_MHz(12,60));	// M68000 12MHz (60fps)
   #ifdef RAINE_DEBUG
      print_debug("PC:%06x SR:%04x\n",s68000context.pc,s68000context.sr);
   #endif
   cpu_interrupt(CPU_68K_0, 1);
   cpu_interrupt(CPU_68K_0, 3);

   Taito2610_Frame();			// Z80 and YM2610
}

void DrawDLeague(void)
{
   ClearPaletteMap();

   // Init tc0180vcu emulation
   // ------------------------

   tc0004vcu_layer_count = 0;

   // BG0
   // ---

   tc0004vcu_render_bg0();

   // BG1
   // ---

   tc0004vcu_render_bg1();

   // OBJECT
   // ------

   tc0004vcu_render_obj();

   // FG0
   // ---

   //tc0004vcu_render_fg0();
}