seta.c

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

   AddWriteWord(-1, -1, NULL, NULL);

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

void ClearZingZingZip(void)
{
   #ifdef RAINE_DEBUG
      save_debug("ROM.bin",ROM,0x080000,1);
      save_debug("RAM.bin",RAM,0x080000,1);
      save_debug("GFX.bin",GFX,0x600000,0);
   #endif
}

void LoadUSClassicGolf(void)
{
   int ta,tb,tc,td;

   RAMSize=0x40000+0x10000;

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

   if(!load_rom("P1006163", RAM, 0x40000)) return;		// 16x16 SPRITES
   tb=0;
   for(ta=0;ta<0x40000;ta++){
      tc=RAM[ta];
      GFX[tb+0]=((tc&0x80)>>7)<<0;
      GFX[tb+1]=((tc&0x40)>>6)<<0;
      GFX[tb+2]=((tc&0x20)>>5)<<0;
      GFX[tb+3]=((tc&0x10)>>4)<<0;
      GFX[tb+4]=((tc&0x08)>>3)<<0;
      GFX[tb+5]=((tc&0x04)>>2)<<0;
      GFX[tb+6]=((tc&0x02)>>1)<<0;
      GFX[tb+7]=((tc&0x01)>>0)<<0;
      tb+=16;
      if((tb&0x7F)==0){tb-=0x78;}
      else{if((tb&0x7F)==8){tb-=8;}}
   }
   if(!load_rom("P1007164", RAM, 0x40000)) return;		// 16x16 SPRITES
   tb=0;
   for(ta=0;ta<0x40000;ta++){
      tc=RAM[ta];
      GFX[tb+0]|=((tc&0x80)>>7)<<1;
      GFX[tb+1]|=((tc&0x40)>>6)<<1;
      GFX[tb+2]|=((tc&0x20)>>5)<<1;
      GFX[tb+3]|=((tc&0x10)>>4)<<1;
      GFX[tb+4]|=((tc&0x08)>>3)<<1;
      GFX[tb+5]|=((tc&0x04)>>2)<<1;
      GFX[tb+6]|=((tc&0x02)>>1)<<1;
      GFX[tb+7]|=((tc&0x01)>>0)<<1;
      tb+=16;
      if((tb&0x7F)==0){tb-=0x78;}
      else{if((tb&0x7F)==8){tb-=8;}}
   }
   if(!load_rom("P1008165", RAM, 0x40000)) return;		// 16x16 SPRITES
   tb=0;
   for(ta=0;ta<0x40000;ta++){
      tc=RAM[ta];
      GFX[tb+0]|=((tc&0x80)>>7)<<2;
      GFX[tb+1]|=((tc&0x40)>>6)<<2;
      GFX[tb+2]|=((tc&0x20)>>5)<<2;
      GFX[tb+3]|=((tc&0x10)>>4)<<2;
      GFX[tb+4]|=((tc&0x08)>>3)<<2;
      GFX[tb+5]|=((tc&0x04)>>2)<<2;
      GFX[tb+6]|=((tc&0x02)>>1)<<2;
      GFX[tb+7]|=((tc&0x01)>>0)<<2;
      tb+=16;
      if((tb&0x7F)==0){tb-=0x78;}
      else{if((tb&0x7F)==8){tb-=8;}}
   }
   if(!load_rom("P1009166", RAM, 0x40000)) return;		// 16x16 SPRITES
   tb=0;
   for(ta=0;ta<0x40000;ta++){
      tc=RAM[ta];
      GFX[tb+0]|=((tc&0x80)>>7)<<3;
      GFX[tb+1]|=((tc&0x40)>>6)<<3;
      GFX[tb+2]|=((tc&0x20)>>5)<<3;
      GFX[tb+3]|=((tc&0x10)>>4)<<3;
      GFX[tb+4]|=((tc&0x08)>>3)<<3;
      GFX[tb+5]|=((tc&0x04)>>2)<<3;
      GFX[tb+6]|=((tc&0x02)>>1)<<3;
      GFX[tb+7]|=((tc&0x01)>>0)<<3;
      tb+=16;
      if((tb&0x7F)==0){tb-=0x78;}
      else{if((tb&0x7F)==8){tb-=8;}}
   }

   if(!load_rom("UP001010", RAM, 0x80000)) return;		// 16x16 SPRITES
   tb=0;
   td=0x200000;
   for(ta=0;ta<0x80000;ta++){
      tc=RAM[ta];
      GFX[td|seta_gfx_code[tb+0]] = (((tc&0x80)>>7)<<3) | (((tc&0x08)>>3)<<2);
      GFX[td|seta_gfx_code[tb+1]] = (((tc&0x40)>>6)<<3) | (((tc&0x04)>>2)<<2);
      GFX[td|seta_gfx_code[tb+2]] = (((tc&0x20)>>5)<<3) | (((tc&0x02)>>1)<<2);
      GFX[td|seta_gfx_code[tb+3]] = (((tc&0x10)>>4)<<3) | (((tc&0x01)>>0)<<2);
      tb+=4; if(tb==0x100){ tb=0; td+=0x100; }
   }
   if(!load_rom("UP001011", RAM, 0x80000)) return;		// 16x16 SPRITES
   tb=0;
   td=0x400000;
   for(ta=0;ta<0x80000;ta++){
      tc=RAM[ta];
      GFX[td|seta_gfx_code[tb+0]] = (((tc&0x80)>>7)<<3) | (((tc&0x08)>>3)<<2);
      GFX[td|seta_gfx_code[tb+1]] = (((tc&0x40)>>6)<<3) | (((tc&0x04)>>2)<<2);
      GFX[td|seta_gfx_code[tb+2]] = (((tc&0x20)>>5)<<3) | (((tc&0x02)>>1)<<2);
      GFX[td|seta_gfx_code[tb+3]] = (((tc&0x10)>>4)<<3) | (((tc&0x01)>>0)<<2);
      tb+=4; if(tb==0x100){ tb=0; td+=0x100; }
   }
   if(!load_rom("UP001012", RAM, 0x80000)) return;		// 16x16 SPRITES
   tb=0;
   td=0x200000;
   for(ta=0;ta<0x80000;ta++){
      tc=RAM[ta];
      GFX[td|seta_gfx_code[tb+0]] |= (((tc&0x80)>>7)<<1) | (((tc&0x08)>>3)<<0);
      GFX[td|seta_gfx_code[tb+1]] |= (((tc&0x40)>>6)<<1) | (((tc&0x04)>>2)<<0);
      GFX[td|seta_gfx_code[tb+2]] |= (((tc&0x20)>>5)<<1) | (((tc&0x02)>>1)<<0);
      GFX[td|seta_gfx_code[tb+3]] |= (((tc&0x10)>>4)<<1) | (((tc&0x01)>>0)<<0);
      tb+=4; if(tb==0x100){ tb=0; td+=0x100; }
   }
   if(!load_rom("UP001013", RAM, 0x80000)) return;		// 16x16 SPRITES
   tb=0;
   td=0x400000;
   for(ta=0;ta<0x80000;ta++){
      tc=RAM[ta];
      GFX[td|seta_gfx_code[tb+0]] |= (((tc&0x80)>>7)<<1) | (((tc&0x08)>>3)<<0);
      GFX[td|seta_gfx_code[tb+1]] |= (((tc&0x40)>>6)<<1) | (((tc&0x04)>>2)<<0);
      GFX[td|seta_gfx_code[tb+2]] |= (((tc&0x20)>>5)<<1) | (((tc&0x02)>>1)<<0);
      GFX[td|seta_gfx_code[tb+3]] |= (((tc&0x10)>>4)<<1) | (((tc&0x01)>>0)<<0);
      tb+=4; if(tb==0x100){ tb=0; td+=0x100; }
   }

   if(!load_rom("P1003161", RAM+0x00000, 0x40000)) return;
   if(!load_rom("UP001002", RAM+0x40000, 0x10000)) return;
   for(ta=0;ta<0x50000;ta++){
      ROM[ta+ta]=RAM[ta];
   }
   if(!load_rom("P1004162", RAM+0x00000, 0x40000)) return;
   if(!load_rom("UP001001", RAM+0x40000, 0x10000)) return;
   for(ta=0;ta<0x50000;ta++){
      ROM[ta+ta+1]=RAM[ta];
   }
/*
   Rotate16x16(GFX+0x200000,0x4000);
   Flip16x16_Y(GFX+0x200000,0x4000);
*/
   Rotate16x16(GFX+0x000000,0x2000);
   Flip16x16_X(GFX+0x000000,0x2000);

   /* ----- M6510/M6502 ----- */

   M6502ROM = RAM+0x40000;

   memset(M6502ROM,0xFF,0x10000);

   if(!load_rom("UP001005", M6502ROM+0x6000, 0x2000)) return;

   M6502ROM[0x7239]=0x8D;	// STA $FFFC
   M6502ROM[0x723A]=0xFC;
   M6502ROM[0x723B]=0xFF;

   SetStopM6502Mode2(0x720D);

   // Mirror

   memcpy(M6502ROM+0x8000,M6502ROM,0x8000);

   // Setup Z80 memory map
   // --------------------

   AddM6502AROMBase(M6502ROM);

   AddM6502AReadByte(0x0000, 0xFFFF, ReadROM,                     NULL); // Testing
   AddM6502AReadByte(0x0000, 0xFFFF, DefBadReadM6502,             NULL);
   AddM6502AReadByte(    -1,     -1, NULL,                        NULL);

   AddM6502AWriteByte(0x0000, 0xFFF0, WriteROM,                   NULL); // Testing
   AddM6502AWriteByte(0xFFFC, 0xFFFC, StopM6502Mode2,             NULL);
   AddM6502AWriteByte(0x0000, 0xFFFF, DefBadWriteM6502,           NULL);
   AddM6502AWriteByte(    -1,     -1, NULL,                       NULL);

   AddM6502AInit();

   /* ----------------------- */

   memset(RAM+0x00000,0x00,0x40000);

   // Speed Hack

   WriteLong68k(&ROM[0x00D0A],0x4EF80300);
   WriteLong68k(&ROM[0x00300],0x13FC0000);
   WriteLong68k(&ROM[0x00304],0x00AA0000);
   WriteWord68k(&ROM[0x00308],0x6100-10);

   // Fix CP ERROR

   WriteLong68k(&ROM[0x8AA26],0x4E714E71);
   WriteLong68k(&ROM[0x8AA76],0x4E714E71);
   WriteLong68k(&ROM[0x8AAC6],0x4E714E71);
   WriteLong68k(&ROM[0x8AB08],0x4E714E71);

   InitPaletteMap(RAM+0x15000, 0x20, 0x10, 0x8000);

   set_colour_mapper(&col_map_xrrr_rrgg_gggb_bbbb);

   //GFX_BG0_SOLID = make_solid_mask_8x8(GFX, 0x4000);

   //GFX_SPR_SOLID = make_solid_mask_16x16(GFX_SPR, 0x2000);

/*
 *  StarScream Stuff follows
 */

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

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

   AddReadByte(0x000000, 0x09FFFF, NULL, ROM+0x000000);			// 68000 ROM
   AddReadByte(0xF00000, 0xF03FFF, NULL, RAM+0x000000);			// 68000 RAM
   AddReadByte(0x100000, 0x103FFF, NULL, RAM+0x004000);			// ? RAM
   AddReadByte(0x900000, 0x903FFF, NULL, RAM+0x008000);			// BG0 RAM
   AddReadByte(0xD00000, 0xD00FFF, NULL, RAM+0x016000);			// ? RAM
   AddReadByte(0xE00000, 0xE03FFF, NULL, RAM+0x00C000);			// OBJECT RAM
   AddReadByte(0x21C000, 0x21FFFF, NULL, RAM+0x010000);			// CP
   AddReadByte(0xB00000, 0xB00FFF, NULL, RAM+0x014000);			// COM RAM
   AddReadByte(0x700000, 0x7003FF, NULL, RAM+0x015000);			// COLOUR RAM
   AddReadByte(0x000000, 0xFFFFFF, DefBadReadByte, NULL);		// <Bad Reads>
   AddReadByte(-1, -1, NULL, NULL);

   AddReadWord(0x000000, 0x09FFFF, NULL, ROM+0x000000);			// 68000 ROM
   AddReadWord(0xF00000, 0xF03FFF, NULL, RAM+0x000000);			// 68000 RAM
   AddReadWord(0x100000, 0x103FFF, NULL, RAM+0x004000);			// ? RAM
   AddReadWord(0x900000, 0x903FFF, NULL, RAM+0x008000);			// BG0 RAM
   AddReadWord(0xD00000, 0xD00FFF, NULL, RAM+0x016000);			// ? RAM
   AddReadWord(0xE00000, 0xE03FFF, NULL, RAM+0x00C000);			// OBJECT RAM
   AddReadWord(0x21C000, 0x21FFFF, NULL, RAM+0x010000);			// CP
   AddReadWord(0xB00000, 0xB00FFF, NULL, RAM+0x014000);			// COM RAM
   AddReadWord(0x700000, 0x7003FF, NULL, RAM+0x015000);			// COLOUR RAM
   AddReadWord(0x000000, 0xFFFFFF, DefBadReadWord, NULL);		// <Bad Reads>
   AddReadWord(-1, -1,NULL, NULL);

   AddWriteByte(0xF00000, 0xF03FFF, NULL, RAM+0x000000);		// 68000 RAM
   AddWriteByte(0x100000, 0x103FFF, NULL, RAM+0x004000);		// ? RAM
   AddWriteByte(0x900000, 0x903FFF, NULL, RAM+0x008000);		// BG0 RAM
   AddWriteByte(0xD00000, 0xD00FFF, NULL, RAM+0x016000);		// ? RAM
   AddWriteByte(0xE00000, 0xE03FFF, NULL, RAM+0x00C000);		// OBJECT RAM
   AddWriteByte(0x21C000, 0x21FFFF, NULL, RAM+0x010000);		// CP
   AddWriteByte(0xB00000, 0xB00FFF, NULL, RAM+0x014000);		// COM RAM
   AddWriteByte(0x700000, 0x7003FF, NULL, RAM+0x015000);		// COLOUR RAM
   AddWriteByte(0xAA0000, 0xAA0001, Stop68000, NULL);			// Trap Idle 68000
   AddWriteByte(0x000000, 0xFFFFFF, DefBadWriteByte, NULL);		// <Bad Writes>
   AddWriteByte(-1, -1, NULL, NULL);

   AddWriteWord(0xF00000, 0xF03FFF, NULL, RAM+0x000000);		// 68000 RAM
   AddWriteWord(0x100000, 0x103FFF, NULL, RAM+0x004000);		// ? RAM
   AddWriteWord(0x900000, 0x903FFF, NULL, RAM+0x008000);		// BG0 RAM
   AddWriteWord(0xD00000, 0xD00FFF, NULL, RAM+0x016000);		// ? RAM
   AddWriteWord(0xE00000, 0xE03FFF, NULL, RAM+0x00C000);		// OBJECT RAM
   AddWriteWord(0x21C000, 0x21FFFF, NULL, RAM+0x010000);		// CP
   AddWriteWord(0xB00000, 0xB00FFF, NULL, RAM+0x014000);		// COM RAM
   AddWriteWord(0x700000, 0x7003FF, NULL, RAM+0x015000);		// COLOUR RAM
   AddWriteWord(0x800000, 0x80000F, NULL, RAM+0x017000);		// SCROLL RAM
   AddWriteWord(0x000000, 0xFFFFFF, DefBadWriteWord, NULL);		// <Bad Writes>
   AddWriteWord(-1, -1, NULL, NULL);

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

void ClearUSClassicGolf(void)
{
   #ifdef RAINE_DEBUG
      save_debug("ROM.bin",ROM,0x0A0000,1);
      save_debug("RAM.bin",RAM,0x080000,1);
      //save_debug("GFX.bin",GFX,0x600000,0);
   #endif
}

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

   m6502exec(CPU_FRAME_MHz(4,60));	// M6502 4MHz (60fps)
   #ifdef RAINE_DEBUG
     print_debug("M6502_PC:%04x\n",m6502pc);
   #endif
   //m6502int();
}

void DrawMetaFox(void)
{
   int zz,zzz,zzzz,x16,y16,x,y,ta;
   UINT8 *map;

   ClearPaletteMap();

   // BG0
   // ---

   MAKE_SCROLL_1024x512_2_16(
       ReadWord(&RAM[0x17000]),
       ReadWord(&RAM[0x17002])
   );

   START_SCROLL_1024x512_2_16_R270(32,32,240,356);

      ta = ReadWord(&RAM[0x8000+zz])&0x3FFF;

      MAP_PALETTE_MAPPED(
         Map_15bit_xRGB,
         RAM[0x9000+zz]&0x1F,
         16,
         map
      );

      switch(RAM[0x8001+zz]&0xC0){
      case 0x00: Draw16x16_Mapped(&GFX[0x200000+(ta<<8)], x, y, map);        break;
      case 0x40: Draw16x16_Mapped_FlipY(&GFX[0x200000+(ta<<8)], x, y, map);  break;
      case 0x80: Draw16x16_Mapped_FlipX(&GFX[0x200000+(ta<<8)], x, y, map);  break;
      case 0xC0: Draw16x16_Mapped_FlipXY(&GFX[0x200000+(ta<<8)], x, y, map); break;
      }

   END_SCROLL_1024x512_2_16();

   render_seta_x1_68000_r270();

}

/*

800000 - SCROLL X
800002 - SCROLL Y
800004 - CTRL

*/