/******************************************************************************//*                                                                            *//*                    WRESTLEFEST (C) 1991 TECHNOS JAPAN                      *//*                                                                            *//******************************************************************************/#include "gameinc.h"#include "sasound.h"		// sample support routines#include "wrestlef.h"#include "tchnosnd.h"static struct DIR_INFO wrestle_fest_dirs[] ={   { "wrestle_fest", },   { "wrestlef", },   { "wwfwfsta", },   { NULL, },};static struct ROM_INFO wrestle_fest_roms[] ={   {   "wf_73a.rom", 0x00080000, 0x6c522edb, 0, 0, 0, },   {    "wf_42.rom", 0x00010000, 0x5ddebfea, 0, 0, 0, },   {    "wf_33.rom", 0x00020000, 0x06f22615, 0, 0, 0, },   {    "wf_19.rom", 0x00040000, 0xbd02e3c4, 0, 0, 0, },   {    "wf_18.rom", 0x00040000, 0x933ea1a0, 0, 0, 0, },   {    "wf_15.rom", 0x00100000, 0xdd387289, 0, 0, 0, },   {    "wf_14.rom", 0x00100000, 0x44abe127, 0, 0, 0, },   {    "wf_13.rom", 0x00100000, 0x74d774c3, 0, 0, 0, },   {    "wf_12.rom", 0x00100000, 0x79956cf8, 0, 0, 0, },   {    "wf_11.rom", 0x00100000, 0x2ce545e8, 0, 0, 0, },   {    "wf_10.rom", 0x00100000, 0x00edb66a, 0, 0, 0, },   {    "wf_09.rom", 0x00100000, 0xe395cf1d, 0, 0, 0, },   {    "wf_08.rom", 0x00100000, 0xb5a97465, 0, 0, 0, },   {    "wf_02.rom", 0x00040000, 0x82ed7155, 0, 0, 0, },   {    "wf_01.rom", 0x00040000, 0x8a12b450, 0, 0, 0, },   {           NULL,          0,          0, 0, 0, 0, },};static struct INPUT_INFO wrestle_fest_inputs[] ={   { KB_DEF_COIN1,        MSG_COIN1,               0x01C021, 0x01, BIT_ACTIVE_0 },   { KB_DEF_COIN2,        MSG_COIN2,               0x01C021, 0x02, BIT_ACTIVE_0 },   { KB_DEF_P1_START,     MSG_P1_START,            0x01C020, 0x80, BIT_ACTIVE_0 },   { KB_DEF_P1_UP,        MSG_P1_UP,               0x01C020, 0x04, BIT_ACTIVE_0 },   { KB_DEF_P1_DOWN,      MSG_P1_DOWN,             0x01C020, 0x08, BIT_ACTIVE_0 },   { KB_DEF_P1_LEFT,      MSG_P1_LEFT,             0x01C020, 0x02, BIT_ACTIVE_0 },   { KB_DEF_P1_RIGHT,     MSG_P1_RIGHT,            0x01C020, 0x01, BIT_ACTIVE_0 },   { KB_DEF_P1_B1,        MSG_P1_B1,               0x01C020, 0x10, BIT_ACTIVE_0 },   { KB_DEF_P1_B2,        MSG_P1_B2,               0x01C020, 0x20, BIT_ACTIVE_0 },   { KB_DEF_P2_START,     MSG_P2_START,            0x01C022, 0x80, BIT_ACTIVE_0 },   { KB_DEF_P2_UP,        MSG_P2_UP,               0x01C022, 0x04, BIT_ACTIVE_0 },   { KB_DEF_P2_DOWN,      MSG_P2_DOWN,             0x01C022, 0x08, BIT_ACTIVE_0 },   { KB_DEF_P2_LEFT,      MSG_P2_LEFT,             0x01C022, 0x02, BIT_ACTIVE_0 },   { KB_DEF_P2_RIGHT,     MSG_P2_RIGHT,            0x01C022, 0x01, BIT_ACTIVE_0 },   { KB_DEF_P2_B1,        MSG_P2_B1,               0x01C022, 0x10, BIT_ACTIVE_0 },   { KB_DEF_P2_B2,        MSG_P2_B2,               0x01C022, 0x20, BIT_ACTIVE_0 },   { KB_DEF_P3_START,     MSG_P3_START,            0x01C024, 0x80, BIT_ACTIVE_0 },   { KB_DEF_P3_UP,        MSG_P3_UP,               0x01C024, 0x04, BIT_ACTIVE_0 },   { KB_DEF_P3_DOWN,      MSG_P3_DOWN,             0x01C024, 0x08, BIT_ACTIVE_0 },   { KB_DEF_P3_LEFT,      MSG_P3_LEFT,             0x01C024, 0x02, BIT_ACTIVE_0 },   { KB_DEF_P3_RIGHT,     MSG_P3_RIGHT,            0x01C024, 0x01, BIT_ACTIVE_0 },   { KB_DEF_P3_B1,        MSG_P3_B1,               0x01C024, 0x10, BIT_ACTIVE_0 },   { KB_DEF_P3_B2,        MSG_P3_B2,               0x01C024, 0x20, BIT_ACTIVE_0 },   { KB_DEF_P4_START,     MSG_P4_START,            0x01C026, 0x80, BIT_ACTIVE_0 },   { KB_DEF_P4_UP,        MSG_P4_UP,               0x01C026, 0x04, BIT_ACTIVE_0 },   { KB_DEF_P4_DOWN,      MSG_P4_DOWN,             0x01C026, 0x08, BIT_ACTIVE_0 },   { KB_DEF_P4_LEFT,      MSG_P4_LEFT,             0x01C026, 0x02, BIT_ACTIVE_0 },   { KB_DEF_P4_RIGHT,     MSG_P4_RIGHT,            0x01C026, 0x01, BIT_ACTIVE_0 },   { KB_DEF_P4_B1,        MSG_P4_B1,               0x01C026, 0x10, BIT_ACTIVE_0 },   { KB_DEF_P4_B2,        MSG_P4_B2,               0x01C026, 0x20, BIT_ACTIVE_0 },   { 0,                   NULL,                    0,        0,    0            },};static struct DSW_DATA dsw_data_wrestle_fest_0[] ={   { "Coin Slots",            0x03, 0x04 },   { MSG_1COIN_1PLAY,         0x03, 0x00 },   { MSG_1COIN_2PLAY,         0x02, 0x00 },   { MSG_2COIN_1PLAY,         0x01, 0x00 },   { MSG_3COIN_1PLAY,         0x00, 0x00 },   { "Continue price",        0x04, 0x02 },   { MSG_NO,                    0x04, 0x00 },   { MSG_YES,                   0x00, 0x00 },   { "Demo Sounds",           0x08, 0x02 },   { MSG_YES,                   0x08, 0x00 },   { MSG_NO,                    0x00, 0x00 },   { MSG_SCREEN,              0x10, 0x02 },   { MSG_NORMAL,              0x10, 0x00 },   { MSG_INVERT,              0x00, 0x00 },   { "FBI Logo",              0x20, 0x02 },   { MSG_YES,                   0x20, 0x00 },   { MSG_NO,                    0x00, 0x00 },   { "Regain Power",          0x40, 0x02 },   { MSG_YES,                   0x40, 0x00 },   { MSG_NO,                    0x00, 0x00 },   { "Buy in",                0x80, 0x02 },   { MSG_YES,                   0x80, 0x00 },   { MSG_NO,                    0x00, 0x00 },   { NULL,                    0,    0,   },};static struct DSW_DATA dsw_data_wrestle_fest_1[] ={   { MSG_DIFFICULTY,          0x03, 0x04 },   { MSG_NORMAL,              0x03, 0x00 },   { MSG_EASY,                0x02, 0x00 },   { MSG_HARD,                0x01, 0x00 },   { MSG_HARDEST,             0x00, 0x00 },   { "Max Players",           0x0C, 0x04 },   { "4 players",             0x0C, 0x00 },   { "3 players",             0x08, 0x00 },   { "2 players",             0x04, 0x00 },   { "<undefined>",           0x00, 0x00 },   { "<unused>",              0x10, 0x02 },   { "1",                     0x10, 0x00 },   { "0",                     0x00, 0x00 },   { "Stage Clear power",     0x60, 0x04 },   { "24",                    0x60, 0x00 },   { "32",                    0x40, 0x00 },   { "12",                    0x20, 0x00 },   { "0",                     0x00, 0x00 },   { "Championship Games",    0x80, 0x02 },   { "5th",                   0x80, 0x00 },   { "4th",                   0x00, 0x00 },   { NULL,                    0,    0,   },};static struct DSW_INFO wrestle_fest_dsw[] ={   { 0x01C07E, 0xFF, dsw_data_wrestle_fest_0 },   { 0x01C07F, 0xFF, dsw_data_wrestle_fest_1 },   { 0,        0,    NULL,      },};static struct VIDEO_INFO wrestle_fest_video ={   DrawWrestleF,   320,   240,   32,   VIDEO_ROTATE_NORMAL |   VIDEO_ROTATABLE,};struct GAME_MAIN game_wrestle_fest ={   wrestle_fest_dirs,   wrestle_fest_roms,   wrestle_fest_inputs,   wrestle_fest_dsw,   NULL,   LoadWrestleF,   ClearWrestleF,   &wrestle_fest_video,   ExecuteWrestleFFrame,   "wwfwfsta",   "WWF Wrestlefest",   "倂倂俥儗僢僗儖僼僃儖僩",   COMPANY_ID_TECHNOS,   "TA-0031",   1991,   technos_ym2151_m6295_sound,   GAME_BEAT,};static UINT8 *RAM_BG0;static UINT8 *RAM_BG1;static UINT8 *RAM_SPR;static UINT8 *RAM_FG0;static UINT8 *GFX_BG0;static UINT8 *GFX_BG0_SOLID;static UINT8 *GFX_SPR;static UINT8 *GFX_SPR_SOLID;static UINT8 *GFX_FG0;static UINT8 *GFX_FG0_SOLID;static void wf_colour_ram_wb(UINT32 address, UINT8 data){   WriteByte(RAM + 0x0C000 + ((address & 0xFF80) >> 2) + ((address & 0x1F) ^ 1), data);}static void wf_colour_ram_ww(UINT32 address, UINT16 data){   WriteWord(RAM + 0x0C000 + ((address & 0xFF80) >> 2) + (address & 0x1F), data);}static UINT8 wf_colour_ram_rb(UINT32 address){   return ReadByte(RAM + 0x0C000 + ((address & 0xFF80) >> 2) + ((address & 0x1F) ^ 1));}static UINT16 wf_colour_ram_rw(UINT32 address){   return ReadWord(RAM + 0x0C000 + ((address & 0xFF80) >> 2) + (address & 0x1F));}static void WFSoundWrite(UINT32 address, UINT16 data){   WriteWord(&RAM[address-0x140000+0x1C000],data);   if(address==0x14000C) TechnosSoundWrite68k(address,data);}void WrestleFSpeedPatch(void){   int address;   for(address=0;address<0x80000-8;address+=2){   if(ROM[address+0]==0x08){   if(ROM[address+1]==0x39){   if(ROM[address+2]==0x00){   if(ROM[address+3]==0x01){   if(ROM[address+4]==0x00){   if(ROM[address+5]==0x1C){   if(ROM[address+6]==0x00){   if(ROM[address+7]==0x6F){   ROM[address+0]=0x13;	//	move.b	#$00,$AA0000   ROM[address+1]=0xFC;   ROM[address+2]=0x00;   ROM[address+3]=0x00;   ROM[address+4]=0x00;   ROM[address+5]=0xAA;   ROM[address+6]=0x00;   ROM[address+7]=0x00;   ROM[address+8]=0x4E;	//	nop   ROM[address+9]=0x71;   }}}}}}}}   }}void LoadWrestleF(void){   UINT8 *TMP;   int ta,tb,tc,td,te;   if(!(GFX_SPR=AllocateMem(0x1000000))) return;   if(!(TMP    =AllocateMem(0x0100000))) return;   if(!load_rom("wf_15.rom", TMP, 0x100000)) return;	// SPRITE BANK A   tb=0;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]=(((tc&0x80)>>7)<<0);      GFX_SPR[tb+1]=(((tc&0x40)>>6)<<0);      GFX_SPR[tb+2]=(((tc&0x20)>>5)<<0);      GFX_SPR[tb+3]=(((tc&0x10)>>4)<<0);      GFX_SPR[tb+4]=(((tc&0x08)>>3)<<0);      GFX_SPR[tb+5]=(((tc&0x04)>>2)<<0);      GFX_SPR[tb+6]=(((tc&0x02)>>1)<<0);      GFX_SPR[tb+7]=(((tc&0x01)>>0)<<0);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_12.rom", TMP, 0x100000)) return;   tb=0;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]|=(((tc&0x80)>>7)<<1);      GFX_SPR[tb+1]|=(((tc&0x40)>>6)<<1);      GFX_SPR[tb+2]|=(((tc&0x20)>>5)<<1);      GFX_SPR[tb+3]|=(((tc&0x10)>>4)<<1);      GFX_SPR[tb+4]|=(((tc&0x08)>>3)<<1);      GFX_SPR[tb+5]|=(((tc&0x04)>>2)<<1);      GFX_SPR[tb+6]|=(((tc&0x02)>>1)<<1);      GFX_SPR[tb+7]|=(((tc&0x01)>>0)<<1);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_11.rom", TMP, 0x100000)) return;   tb=0;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]|=(((tc&0x80)>>7)<<2);      GFX_SPR[tb+1]|=(((tc&0x40)>>6)<<2);      GFX_SPR[tb+2]|=(((tc&0x20)>>5)<<2);      GFX_SPR[tb+3]|=(((tc&0x10)>>4)<<2);      GFX_SPR[tb+4]|=(((tc&0x08)>>3)<<2);      GFX_SPR[tb+5]|=(((tc&0x04)>>2)<<2);      GFX_SPR[tb+6]|=(((tc&0x02)>>1)<<2);      GFX_SPR[tb+7]|=(((tc&0x01)>>0)<<2);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_09.rom", TMP, 0x100000)) return;   tb=0;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]|=(((tc&0x80)>>7)<<3);      GFX_SPR[tb+1]|=(((tc&0x40)>>6)<<3);      GFX_SPR[tb+2]|=(((tc&0x20)>>5)<<3);      GFX_SPR[tb+3]|=(((tc&0x10)>>4)<<3);      GFX_SPR[tb+4]|=(((tc&0x08)>>3)<<3);      GFX_SPR[tb+5]|=(((tc&0x04)>>2)<<3);      GFX_SPR[tb+6]|=(((tc&0x02)>>1)<<3);      GFX_SPR[tb+7]|=(((tc&0x01)>>0)<<3);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_14.rom", TMP, 0x100000)) return;	// SPRITE BANK B   tb=0x800000;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]=(((tc&0x80)>>7)<<0);      GFX_SPR[tb+1]=(((tc&0x40)>>6)<<0);      GFX_SPR[tb+2]=(((tc&0x20)>>5)<<0);      GFX_SPR[tb+3]=(((tc&0x10)>>4)<<0);      GFX_SPR[tb+4]=(((tc&0x08)>>3)<<0);      GFX_SPR[tb+5]=(((tc&0x04)>>2)<<0);      GFX_SPR[tb+6]=(((tc&0x02)>>1)<<0);      GFX_SPR[tb+7]=(((tc&0x01)>>0)<<0);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_13.rom", TMP, 0x100000)) return;   tb=0x800000;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]|=(((tc&0x80)>>7)<<1);      GFX_SPR[tb+1]|=(((tc&0x40)>>6)<<1);      GFX_SPR[tb+2]|=(((tc&0x20)>>5)<<1);      GFX_SPR[tb+3]|=(((tc&0x10)>>4)<<1);      GFX_SPR[tb+4]|=(((tc&0x08)>>3)<<1);      GFX_SPR[tb+5]|=(((tc&0x04)>>2)<<1);      GFX_SPR[tb+6]|=(((tc&0x02)>>1)<<1);      GFX_SPR[tb+7]|=(((tc&0x01)>>0)<<1);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_10.rom", TMP, 0x100000)) return;   tb=0x800000;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]|=(((tc&0x80)>>7)<<2);      GFX_SPR[tb+1]|=(((tc&0x40)>>6)<<2);      GFX_SPR[tb+2]|=(((tc&0x20)>>5)<<2);      GFX_SPR[tb+3]|=(((tc&0x10)>>4)<<2);      GFX_SPR[tb+4]|=(((tc&0x08)>>3)<<2);      GFX_SPR[tb+5]|=(((tc&0x04)>>2)<<2);      GFX_SPR[tb+6]|=(((tc&0x02)>>1)<<2);      GFX_SPR[tb+7]|=(((tc&0x01)>>0)<<2);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_08.rom", TMP, 0x100000)) return;   tb=0x800000;   for(ta=0;ta<0x100000;ta++){      tc=TMP[ta];      GFX_SPR[tb+0]|=(((tc&0x80)>>7)<<3);      GFX_SPR[tb+1]|=(((tc&0x40)>>6)<<3);      GFX_SPR[tb+2]|=(((tc&0x20)>>5)<<3);      GFX_SPR[tb+3]|=(((tc&0x10)>>4)<<3);      GFX_SPR[tb+4]|=(((tc&0x08)>>3)<<3);      GFX_SPR[tb+5]|=(((tc&0x04)>>2)<<3);      GFX_SPR[tb+6]|=(((tc&0x02)>>1)<<3);      GFX_SPR[tb+7]|=(((tc&0x01)>>0)<<3);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   FreeMem(TMP);   if(!(GFX=AllocateMem(0x0140000))) return;   RAMSize=0x40000+0x10000;   if(!(RAM=AllocateMem(RAMSize))) return;   if(!(ROM=AllocateMem(0x80000))) return;   /*-------[SOUND SYSTEM INIT]-------*/   Z80ROM=RAM+0x40000;   if(!load_rom("wf_42.rom", Z80ROM, 0x10000)) return;	// Z80 SOUND ROM   Z80ROM[0x03E5]=0x00;		// Timers Bodge   Z80ROM[0x03E9]=0x18;   if(!(PCMROM = AllocateMem(0x80000))) return;   if(!load_rom("wf_73a.rom", PCMROM, 0x80000)) return;	// ADPCM ROM <2 banks>   AddTechnosSound(0x0040, 0x003A, 0x10000, PCMROM, PCMROM+0x40000, 63);   /*---------------------------------*/   if(!load_rom("wf_18.rom", RAM, 0x40000)) return;	// 68000 ROM (EVEN BYTES)   for(ta=0;ta<0x40000;ta++){      ROM[ta+ta]=RAM[ta];   }   if(!load_rom("wf_19.rom", RAM, 0x40000)) return;	// 68000 ROM (ODD BYTES)   for(ta=0;ta<0x40000;ta++){      ROM[ta+ta+1]=RAM[ta];   }   if(!load_rom("wf_33.rom", RAM, 0x20000)) return;	// FG TILES (8x8)   tb=0;   for(ta=0;ta<0x20000;ta+=32){      for(td=0;td<8;td+=2){      for(te=0;te<8;te++){      tc=RAM[ta+(td<<2)+te];      GFX[tb+1+td+(te<<3)]=(((tc&0x80)>>7)<<3);      GFX[tb+0+td+(te<<3)]=(((tc&0x40)>>6)<<3);      GFX[tb+1+td+(te<<3)]|=(((tc&0x20)>>5)<<2);      GFX[tb+0+td+(te<<3)]|=(((tc&0x10)>>4)<<2);      GFX[tb+1+td+(te<<3)]|=(((tc&0x08)>>3)<<1);      GFX[tb+0+td+(te<<3)]|=(((tc&0x04)>>2)<<1);      GFX[tb+1+td+(te<<3)]|=(((tc&0x02)>>1)<<0);      GFX[tb+0+td+(te<<3)]|=(((tc&0x01)>>0)<<0);      }      }      tb+=64;   }   if(!load_rom("wf_01.rom", RAM, 0x40000)) return;	// BG TILES (16x16)   tb=0x40000;   for(ta=0;ta<0x40000;ta+=2){      tc=RAM[ta+0];      td=RAM[ta+1];      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);      GFX[tb+0]|=(((td&0x80)>>7)<<1);      GFX[tb+1]|=(((td&0x40)>>6)<<1);      GFX[tb+2]|=(((td&0x20)>>5)<<1);      GFX[tb+3]|=(((td&0x10)>>4)<<1);      GFX[tb+4]|=(((td&0x08)>>3)<<1);      GFX[tb+5]|=(((td&0x04)>>2)<<1);      GFX[tb+6]|=(((td&0x02)>>1)<<1);      GFX[tb+7]|=(((td&0x01)>>0)<<1);      tb+=16;      if((tb&0xFF)==0){tb-=0xF8;}      else{if((tb&0xFF)==8){tb-=8;}}   }   if(!load_rom("wf_02.rom", RAM, 0x40000)) return;   tb=0x40000;   for(ta=0;ta<0x40000;ta+=2){      tc=RAM[ta+0];      td=RAM[ta+1];