rambo3.c

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

/******************************************************************************/
/*                                                                            */
/*                      RAMBO 3 (C) 1990 TAITO CORPORATION                    */
/*                                                                            */
/******************************************************************************/

#include "gameinc.h"
#include "rambo3.h"
#include "tc180vcu.h"
#include "tc220ioc.h"
#include "sasound.h"		// sample support routines
#include "taitosnd.h"

/*

First set:

Thursday 10th Jan 1989

Second set:

Monday 22nd May 1989

*/

static struct DIR_INFO rambo_3_dirs[] =
{
   { "rambo_3", },
   { "rambo3", },
   { NULL, },
};

static struct ROM_INFO rambo_3_roms[] =
{
   {    "r3-00.rom", 0x00010000, 0xdf7a6ed6, 0, 0, 0, },
   {    "r3-0e.rom", 0x00010000, 0x3efa4177, 0, 0, 0, },
   {    "r3-0o.rom", 0x00010000, 0x55c38d92, 0, 0, 0, },
   {    "r3-1e.rom", 0x00020000, 0x40e363c7, 0, 0, 0, },
   {    "r3-1o.rom", 0x00020000, 0x7f1fe6ab, 0, 0, 0, },
   {    "r3-a1.rom", 0x00020000, 0x4396fa19, 0, 0, 0, },
   {    "r3-a2.rom", 0x00020000, 0x41fe53a8, 0, 0, 0, },
   {    "r3-a3.rom", 0x00020000, 0xe89249ba, 0, 0, 0, },
   {    "r3-a4.rom", 0x00020000, 0x9cf4c21b, 0, 0, 0, },
   { "r3-ch0hh.rom", 0x00020000, 0x4dc69751, 0, 0, 0, },
   { "r3-ch0hl.rom", 0x00020000, 0xa4cad36d, 0, 0, 0, },
   { "r3-ch0lh.rom", 0x00020000, 0x76a330a2, 0, 0, 0, },
   { "r3-ch0ll.rom", 0x00020000, 0xb416f1bf, 0, 0, 0, },
   { "r3-ch1hh.rom", 0x00020000, 0xe39cff37, 0, 0, 0, },
   { "r3-ch1hl.rom", 0x00020000, 0x7525eb92, 0, 0, 0, },
   { "r3-ch1lh.rom", 0x00020000, 0x75568cf0, 0, 0, 0, },
   { "r3-ch1ll.rom", 0x00020000, 0xc86ea5fc, 0, 0, 0, },
   { "r3-ch2hh.rom", 0x00020000, 0xbf37dfac, 0, 0, 0, },
   { "r3-ch2hl.rom", 0x00020000, 0x837d8677, 0, 0, 0, },
   { "r3-ch2lh.rom", 0x00020000, 0xdf3bc48f, 0, 0, 0, },
   { "r3-ch2ll.rom", 0x00020000, 0xd0ce3051, 0, 0, 0, },
   { "r3-ch3hh.rom", 0x00020000, 0xabe58fdb, 0, 0, 0, },
   { "r3-ch3hl.rom", 0x00020000, 0x80e5647e, 0, 0, 0, },
   { "r3-ch3lh.rom", 0x00020000, 0x5a155c04, 0, 0, 0, },
   { "r3-ch3ll.rom", 0x00020000, 0xabe54b1e, 0, 0, 0, },
   {           NULL,          0,          0, 0, 0, 0, },
};

static struct DSW_INFO rambo_3_dsw[] =
{
   { 0x000000, 0xFF, dsw_data_default_0 },
   { 0x000002, 0xFF, dsw_data_default_1 },
   { 0,        0,    NULL,      },
};

static struct ROMSW_DATA romsw_data_rambo_3_0[] =
{
   { "Taito Japan",           0x01 },
   { "Taito America",         0x02 },
   { "Taito Europe",          0x03 },
   { NULL,                    0    },
};

static struct ROMSW_INFO rambo_3_romsw[] =
{
   { 0x01FFFF, 0x03, romsw_data_rambo_3_0 },
   { 0,        0,    NULL },
};

struct GAME_MAIN game_rambo_3 =
{
   rambo_3_dirs,
   rambo_3_roms,
   b_system_inputs,
   rambo_3_dsw,
   rambo_3_romsw,

   LoadRambo3,
   ClearRambo3,
   &b_system_r180_video,
   ExecuteRambo3Frame,
   "rambo3",
   "Rambo 3",
   "儔儞儃乕俁",
   COMPANY_ID_TAITO,
   "B93",
   1989,
   taito_ym2610_sound,
   GAME_SHOOT,
};

static struct DIR_INFO rambo_3_alternate_dirs[] =
{
   { "rambo_3_alternate", },
   { "rambo3a", },
   { ROMOF("rambo3"), },
   { CLONEOF("rambo3"), },
   { NULL, },
};

static struct ROM_INFO rambo_3_alternate_roms[] =
{
   { "ramb3-01.bin", 0x00080000, 0xc55fcf54, 0, 0, 0, },
   { "ramb3-02.bin", 0x00080000, 0x9dd014c6, 0, 0, 0, },
   { "ramb3-03.bin", 0x00080000, 0xf5808c41, 0, 0, 0, },
   { "ramb3-04.bin", 0x00080000, 0xc57831ce, 0, 0, 0, },
   { "ramb3-05.bin", 0x00080000, 0x0179dc40, 0, 0, 0, },
   { "ramb3-06.bin", 0x00020000, 0xa83d3fd5, 0, 0, 0, },
   { "ramb3-07.bin", 0x00020000, 0xc973ff6f, 0, 0, 0, },
   { "ramb3-10.bin", 0x00010000, 0xb18bc020, 0, 0, 0, },
   { "ramb3-11.bin", 0x00020000, 0x1cc42247, 0, 0, 0, },
   { "ramb3-13.bin", 0x00020000, 0x0a964cb7, 0, 0, 0, },
   {           NULL,          0,          0, 0, 0, 0, },
};

struct INPUT_INFO rambo_3_alternate_inputs[] =
{
   { KB_DEF_COIN1,        MSG_COIN1,               0x000006, 0x10, BIT_ACTIVE_1 },
   { KB_DEF_COIN2,        MSG_COIN2,               0x000006, 0x20, BIT_ACTIVE_1 },
   { KB_DEF_TILT,         MSG_TILT,                0x000006, 0x01, BIT_ACTIVE_0 },
   { KB_DEF_SERVICE,      MSG_SERVICE,             0x000006, 0x02, BIT_ACTIVE_0 },

   { KB_DEF_P1_START,     MSG_P1_START,            0x000006, 0x04, BIT_ACTIVE_0 },
   { KB_DEF_P1_UP,        MSG_P1_UP,               0x00000E, 0x01, BIT_ACTIVE_0 },
   { KB_DEF_P1_DOWN,      MSG_P1_DOWN,             0x00000E, 0x02, BIT_ACTIVE_0 },
   { KB_DEF_P1_LEFT,      MSG_P1_LEFT,             0x00000E, 0x04, BIT_ACTIVE_0 },
   { KB_DEF_P1_RIGHT,     MSG_P1_RIGHT,            0x00000E, 0x08, BIT_ACTIVE_0 },
   { KB_DEF_P1_B1,        MSG_P1_B1,               0x000004, 0x01, BIT_ACTIVE_0 },
   { KB_DEF_P1_B2,        MSG_P1_B2,               0x000004, 0x02, BIT_ACTIVE_0 },
   { KB_DEF_P1_B3,        MSG_P1_B3,               0x000004, 0x04, BIT_ACTIVE_0 },

   { KB_DEF_P2_START,     MSG_P2_START,            0x000006, 0x08, BIT_ACTIVE_0 },
   { KB_DEF_P2_UP,        MSG_P2_UP,               0x00000E, 0x10, BIT_ACTIVE_0 },
   { KB_DEF_P2_DOWN,      MSG_P2_DOWN,             0x00000E, 0x20, BIT_ACTIVE_0 },
   { KB_DEF_P2_LEFT,      MSG_P2_LEFT,             0x00000E, 0x40, BIT_ACTIVE_0 },
   { KB_DEF_P2_RIGHT,     MSG_P2_RIGHT,            0x00000E, 0x80, BIT_ACTIVE_0 },
   { KB_DEF_P2_B1,        MSG_P2_B1,               0x000004, 0x08, BIT_ACTIVE_0 },
   { KB_DEF_P2_B2,        MSG_P2_B2,               0x000004, 0x10, BIT_ACTIVE_0 },
   { KB_DEF_P2_B3,        MSG_P2_B3,               0x000004, 0x20, BIT_ACTIVE_0 },

   { 0,                   NULL,                    0,        0,    0            },
};

static struct DSW_DATA dsw_data_rambo_3_alternate_0[] =
{
   { MSG_DSWA_BIT1,           0x01, 0x02 },
   { MSG_OFF,                 0x01, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { MSG_DSWA_BIT2,           0x02, 0x02 },
   { MSG_OFF,                 0x02, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { MSG_TEST_MODE,           0x04, 0x02 },
   { MSG_OFF,                 0x04, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { MSG_DEMO_SOUND,          0x08, 0x02 },
   { MSG_ON,                  0x08, 0x00 },
   { MSG_OFF,                 0x00, 0x00 },
   { MSG_DSWA_BIT5,           0x10, 0x02 },
   { MSG_OFF,                 0x10, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { MSG_DSWA_BIT6,           0x20, 0x02 },
   { MSG_OFF,                 0x20, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { MSG_DSWA_BIT7,           0x40, 0x02 },
   { MSG_OFF,                 0x40, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { MSG_DSWA_BIT8,           0x80, 0x02 },
   { MSG_OFF,                 0x80, 0x00 },
   { MSG_ON,                  0x00, 0x00 },
   { NULL,                    0,    0,   },
};

static struct DSW_INFO rambo_3_alternate_dsw[] =
{
   { 0x000000, 0xFF, dsw_data_rambo_3_alternate_0 },
   { 0x000002, 0xFF, dsw_data_default_1 },
   { 0,        0,    NULL,      },
};

static struct ROMSW_DATA romsw_data_rambo_3_alternate_0[] =
{
   { "Taito Japan (notice)",  0x01 },
   { "Taito America",         0x02 },
   { "Taito Europe",          0x03 },
   { "Taito Japan",           0x04 },
   { "Taito World",           0x05 },
   { NULL,                    0    },
};

static struct ROMSW_INFO rambo_3_alternate_romsw[] =
{
   { 0x03FFFF, 0x02, romsw_data_rambo_3_alternate_0 },
   { 0,        0,    NULL },
};

struct GAME_MAIN game_rambo_3_alternate =
{
   rambo_3_alternate_dirs,
   rambo_3_alternate_roms,
   rambo_3_alternate_inputs,
   rambo_3_alternate_dsw,
   rambo_3_alternate_romsw,

   LoadRambo3_alternate,
   ClearRambo3,
   &b_system_r180_video,
   ExecuteRambo3Frame,
   "rambo3a",
   "Rambo 3 (release 2)",
   "儔儞儃乕俁 (release 2)",
   COMPANY_ID_TAITO,
   "B93",
   1989,
   taito_ym2610_sound,
   GAME_SHOOT,
};

static UINT8 *RAM_INPUT;
static UINT8 *RAM_VIDEO;
static UINT8 *RAM_VIDEO_2;
static UINT8 *RAM_COLOUR;

static UINT8 *GFX_BG0;
static UINT8 *GFX_BG0_SOLID;

static UINT8 *GFX_BG2;
static UINT8 *GFX_BG2_SOLID;

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

   if(!(RAM=AllocateMem(0xC0000))) return;
   if(!(GFX=AllocateMem(0x440000))) return;

   GFX_BG0 = GFX+0x000000;
   GFX_BG2 = GFX+0x400000;

   if(!load_rom("r3-ch0lh.rom", RAM+0x00000, 0x20000)) return;
   if(!load_rom("r3-ch0hh.rom", RAM+0x20000, 0x20000)) return;
   if(!load_rom("r3-ch2lh.rom", RAM+0x40000, 0x20000)) return;
   if(!load_rom("r3-ch2hh.rom", RAM+0x60000, 0x20000)) return;
   tb=0x400000;
   for(ta=0;ta<0x8000;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+=8;
   }
   tb=0;
   for(ta=0;ta<0x80000;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-=0x08;}}
   }
   if(!load_rom("r3-ch0ll.rom", RAM+0x00000, 0x20000)) return;
   if(!load_rom("r3-ch0hl.rom", RAM+0x20000, 0x20000)) return;
   if(!load_rom("r3-ch2ll.rom", RAM+0x40000, 0x20000)) return;
   if(!load_rom("r3-ch2hl.rom", RAM+0x60000, 0x20000)) return;
   tb=0x400000;
   for(ta=0;ta<0x8000;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+=8;
   }
   tb=0;
   for(ta=0;ta<0x80000;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-=0x08;}}
   }
   if(!load_rom("r3-ch1lh.rom", RAM+0x00000, 0x20000)) return;
   if(!load_rom("r3-ch1hh.rom", RAM+0x20000, 0x20000)) return;
   if(!load_rom("r3-ch3lh.rom", RAM+0x40000, 0x20000)) return;
   if(!load_rom("r3-ch3hh.rom", RAM+0x60000, 0x20000)) return;
   tb=0x400000;
   for(ta=0;ta<0x8000;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+=8;
   }
   tb=0;
   for(ta=0;ta<0x80000;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-=0x08;}}
   }
   if(!load_rom("r3-ch1ll.rom", RAM+0x00000, 0x20000)) return;
   if(!load_rom("r3-ch1hl.rom", RAM+0x20000, 0x20000)) return;
   if(!load_rom("r3-ch3ll.rom", RAM+0x40000, 0x20000)) return;
   if(!load_rom("r3-ch3hl.rom", RAM+0x60000, 0x20000)) return;
   tb=0x400000;
   for(ta=0;ta<0x8000;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+=8;
   }
   tb=0;
   for(ta=0;ta<0x80000;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-=0x08;}}
   }

   FreeMem(RAM);

   RAMSize=0xA0000+0x10000;

   if(!(RAM=AllocateMem(RAMSize))) return;
   if(!(ROM=AllocateMem(0x80000))) return;

   if(!load_rom("r3-0e.rom", RAM, 0x10000)) return;	// 68000 ROM
   for(ta=0;ta<0x10000;ta++){
      ROM[ta+ta]=RAM[ta];
   }
   if(!load_rom("r3-0o.rom", RAM, 0x10000)) return;
   for(ta=0;ta<0x10000;ta++){
      ROM[ta+ta+1]=RAM[ta];
   }
   memset(ROM+0x20000,0xFF,0x20000);