/***************************************************************************

Mario Bros memory map (preliminary):

0000-5fff ROM
6000-6fff RAM
7000-73ff ?
7400-77ff Video RAM
f000-ffff ROM

read:
7c00      IN0
7c80      IN1
7f80      DSW

*
 * IN0 (bits NOT inverted)
 * bit 7 : TEST
 * bit 6 : START 2
 * bit 5 : START 1
 * bit 4 : JUMP player 1
 * bit 3 : ? DOWN player 1 ?
 * bit 2 : ? UP player 1 ?
 * bit 1 : LEFT player 1
 * bit 0 : RIGHT player 1
 *
*
 * IN1 (bits NOT inverted)
 * bit 7 : ?
 * bit 6 : COIN 2
 * bit 5 : COIN 1
 * bit 4 : JUMP player 2
 * bit 3 : ? DOWN player 2 ?
 * bit 2 : ? UP player 2 ?
 * bit 1 : LEFT player 2
 * bit 0 : RIGHT player 2
 *
*
 * DSW (bits NOT inverted)
 * bit 7 : \ difficulty
 * bit 6 : / 00 = easy  01 = medium  10 = hard  11 = hardest
 * bit 5 : \ bonus
 * bit 4 : / 00 = 20000  01 = 30000  10 = 40000  11 = none
 * bit 3 : \ coins per play
 * bit 2 : /
 * bit 1 : \ 00 = 3 lives  01 = 4 lives
 * bit 0 : / 10 = 5 lives  11 = 6 lives
 *

write:
7d00      ?
7d80      ?
7e00      ?
7e80-7e82 ?
7e83      sprite palette bank select
7e84      interrupt enable
7e85      ?
7f00-7f06 ?


I/O ports

write:
00        ?

***************************************************************************/

#include "driver.h"
#include "vidhrdw/generic.h"



extern unsigned char *mario_sprite_palette;
extern void mario_gfxbank_w(int offset,int data);
extern int  mario_vh_start(void);
extern void mario_vh_screenrefresh(struct osd_bitmap *bitmap);



static struct MemoryReadAddress readmem[] =
{
	{ 0x6000, 0x6fff, MRA_RAM },
	{ 0x7400, 0x77ff, MRA_RAM },	/* video RAM */
	{ 0x0000, 0x5fff, MRA_ROM },
	{ 0xf000, 0xffff, MRA_ROM },
	{ 0x7c00, 0x7c00, input_port_0_r },	/* IN0 */
	{ 0x7c80, 0x7c80, input_port_1_r },	/* IN1 */
	{ 0x7f80, 0x7f80, input_port_2_r },	/* DSW */
	{ -1 }	/* end of table */
};

static struct MemoryWriteAddress writemem[] =
{
	{ 0x6000, 0x68ff, MWA_RAM },
	{ 0x6a80, 0x6fff, MWA_RAM },
	{ 0x6900, 0x6a7f, MWA_RAM, &spriteram, &spriteram_size },
	{ 0x7400, 0x77ff, videoram_w, &videoram, &videoram_size },
	{ 0x7e80, 0x7e80, mario_gfxbank_w },
	{ 0x7e84, 0x7e84, interrupt_enable_w },
	{ 0x7e83, 0x7e83, MWA_RAM, &mario_sprite_palette },
	{ 0x0000, 0x5fff, MWA_ROM },
	{ 0xf000, 0xffff, MWA_ROM },
	{ -1 }	/* end of table */
};


static struct InputPort input_ports[] =
{
	{	/* IN0 */
		0x00,
		{ OSD_KEY_RIGHT, OSD_KEY_LEFT, OSD_KEY_UP, OSD_KEY_DOWN,
				OSD_KEY_CONTROL, OSD_KEY_1, OSD_KEY_2, OSD_KEY_F1 },
		{ OSD_JOY_RIGHT, OSD_JOY_LEFT, OSD_JOY_UP, OSD_JOY_DOWN,
				OSD_JOY_FIRE, 0, 0, 0 },
	},
	{	/* IN1 */
		0x00,
		{ OSD_KEY_X, OSD_KEY_Z, 0, 0, OSD_KEY_SPACE, OSD_KEY_3, 0, 0 },
		{ 0, 0, 0, 0, 0, 0, 0, 0 }
	},
	{	/* DSW */
		0x00,
		{ 0, 0, 0, 0, 0, 0, 0, 0 },
		{ 0, 0, 0, 0, 0, 0, 0, 0 }
	},
	{ -1 }	/* end of table */
};

static struct TrakPort trak_ports[] =
{
        { -1 }
};


static struct KEYSet keys[] =
{
        { 0, 2, "MOVE UP" },
        { 0, 1, "MOVE LEFT"  },
        { 0, 0, "MOVE RIGHT" },
        { 0, 3, "MOVE DOWN" },
        { 0, 4, "JUMP" },
        { -1 }
};


static struct DSW dsw[] =
{
	{ 2, 0x03, "LIVES", { "3", "4", "5", "6" } },
	{ 2, 0x30, "BONUS", { "20000", "30000", "40000", "NONE" } },
	{ 2, 0xc0, "DIFFICULTY", { "EASY", "MEDIUM", "HARD", "HARDEST" } },
	{ -1 }
};


static struct GfxLayout charlayout =
{
	8,8,	/* 8*8 characters */
	512,	/* 512 characters */
	2,	/* 2 bits per pixel */
	{ 0, 512*8*8 },	/* the two bitplanes are separated */
	{ 7, 6, 5, 4, 3, 2, 1, 0 },	/* pretty straightforward layout */
	{ 7*8, 6*8, 5*8, 4*8, 3*8, 2*8, 1*8, 0*8 },
	8*8	/* every char takes 8 consecutive bytes */
};


static struct GfxLayout spritelayout =
{
	16,16,	/* 16*16 sprites */
	256,	/* 256 sprites */
	3,	/* 3 bits per pixel */
	{ 0, 256*16*16, 2*256*16*16 },	/* the bitplanes are separated */
	{ 256*16*8+7, 256*16*8+6, 256*16*8+5, 256*16*8+4, 256*16*8+3, 256*16*8+2, 256*16*8+1, 256*16*8+0,
			7, 6, 5, 4, 3, 2, 1, 0 },	/* the two halves of the sprite are separated */
	{ 15*8, 14*8, 13*8, 12*8, 11*8, 10*8, 9*8, 8*8,
			7*8, 6*8, 5*8, 4*8, 3*8, 2*8, 1*8, 0*8 },
	16*8	/* every sprite takes 16 consecutive bytes */
};



static struct GfxDecodeInfo gfxdecodeinfo[] =
{
	{ 1, 0x0000, &charlayout,      0, 32 },
	{ 1, 0x2000, &spritelayout, 32*4, 32 },
	{ -1 } /* end of array */
};



static unsigned char palette[] =
{
        0x00,0x00,0x00, /* BLACK */
        0xff,0xff,0xff, /* WHITE */
        0xff,0x00,0x00, /* RED */
        0xff,0x00,0xff, /* PURPLE */
        0,0,127,        /* INBLUE */
        0,180,0,        /* GRUN */
        255,131,3,      /* ORANGE */
        0x00,0x00,0xff, /* BLUE */
        0xff,0xff,0x00, /* YELLOW */
        120,120,255,      /* GREY */
        3,180,239,      /* LTBLUE */
        0,80,0,         /* DKGRUN */
        0x00,0xff,0x00, /* GREEN */
        167,3,3,        /* DKBROWN */
        255,183,115,    /* LTBROWN */
        0x00,127,0x00,  /* DKGREEN */
};

enum { BLACK,WHITE,RED,PURPLE,INBLUE,GRUN,ORANGE,BLUE,YELLOW,GREY,
                LTBLUE,DKGRUN,GREEN,DKBROWN,LTBROWN,DKGREEN };

static unsigned char colortable[] =
{
	/* chars (first bank) */
	BLACK,BLUE,WHITE,BLACK,         /* 0-9 */
	BLACK,BLUE,WHITE,BLACK,         /* A-Z */
	BLACK,BLUE,WHITE,BLACK,         /* A-Z */
	BLACK,BLUE,WHITE,BLACK,         /* A-Z */
	BLACK,DKBROWN,BLUE,LTBROWN,     /* MARIO */
	BLACK,DKBROWN,GREEN,BLACK,      /* A-Z */
	BLACK,DKBROWN,GREEN,LTBROWN,    /* LUIGI */
	BLACK,DKBROWN,GREEN,BLACK,        /* A-Z */
	BLACK,DKBROWN,RED,WHITE,                /* A-Z */
	BLACK,DKBROWN,RED,WHITE,                /* A-Z */
	BLACK,DKBROWN,RED,WHITE,                /* A-Z */
	BLACK,DKBROWN,RED,WHITE,                /* A-Z */
	BLACK,BLUE,LTBLUE,WHITE,        /* Mattonella / Acqua */
	BLACK,ORANGE,YELLOW,WHITE,      /* A-Z */
	BLACK,ORANGE,YELLOW,WHITE,      /* Mattonelle A-Z */
	BLACK,ORANGE,YELLOW,WHITE,

	BLACK,BLUE,WHITE,BLACK,	/* char set #1 */
	BLACK,BLUE,WHITE,BLACK,
	BLACK,BLUE,WHITE,BLACK,
	BLACK,BLUE,WHITE,BLACK,
	BLACK,DKBROWN,GREEN,BLACK,	/* char set #2 */
	BLACK,DKBROWN,GREEN,BLACK,
	BLACK,DKBROWN,GREEN,BLACK,
	BLACK,DKBROWN,GREEN,BLACK,
	BLACK,DKBROWN,RED,WHITE,	/* char set #3 */
	BLACK,DKBROWN,RED,WHITE,
	BLACK,DKBROWN,RED,WHITE,
	BLACK,DKBROWN,RED,WHITE,
	BLACK,ORANGE,YELLOW,WHITE,	/* char set #4 */
	BLACK,ORANGE,YELLOW,WHITE,
	BLACK,ORANGE,YELLOW,WHITE,
	BLACK,ORANGE,YELLOW,WHITE,

	/* Sprites bank #1 */
	BLACK,RED,GREEN,DKGRUN,DKGREEN,GRUN,WHITE,BLACK,  /* Tubatura */
	BLACK,WHITE,WHITE,DKBROWN,GREEN,BLUE,LTBROWN,DKGRUN, /* Tartarughe */
	BLACK,WHITE,WHITE,DKBROWN,LTBLUE,BLUE,LTBROWN,DKGRUN, /* Tartarughe Incazzose */
	BLACK,WHITE,WHITE,DKBROWN,RED,DKBROWN,LTBROWN,DKGRUN, /* Tartarughe Violente */
	BLACK,DKBROWN,YELLOW,GREY,WHITE,ORANGE,RED,BLUE, /* Granchio + Bonus */
	BLACK,INBLUE,YELLOW,GREY,WHITE,LTBLUE,BLUE,RED, /* Granchio Incazzoso */
	BLACK,INBLUE,YELLOW,GREY,WHITE,LTBROWN,PURPLE,BLUE, /* Granchio Violento */
	BLACK,DKGRUN,GREEN,GREY,WHITE,GRUN,DKGREEN,BLUE, /* Fuoco Verde */
	BLACK,DKBROWN,WHITE,ORANGE,BLUE,RED,RED,ORANGE, /* Moscone */
	BLACK,DKBROWN,YELLOW,ORANGE,BLUE,RED,RED,ORANGE, /* Moscone Ribaltone */
	BLACK,WHITE,DKBROWN,DKBROWN,BLUE,RED,LTBROWN,BLACK, /* Mario */
	BLACK,WHITE,DKBROWN,BLUE,GREEN,BLUE,LTBROWN,BLACK, /* Luigi */
	BLACK,WHITE, RED ,GRUN,WHITE,GREEN, ORANGE ,DKGRUN, /*  */
	BLACK,BLACK,DKBROWN,RED,RED,DKBROWN,WHITE,DKBROWN,
	BLACK,BLACK,BLUE,3,LTBLUE,GRUN,WHITE,3, /* Mattonelle Schiacciate + Pow */
	BLACK,BLACK,ORANGE,3,YELLOW,3,WHITE,3, /* Pow */

	/* Sprites bank #2 */
	BLACK,WHITE,DKBROWN,DKBROWN,BLUE,RED,LTBROWN,BLACK,  /* Mario titolo */
	BLACK,WHITE,DKBROWN,BLUE,GREEN,BLUE,LTBROWN,BLACK, /* Luigi titolo */
	BLACK,WHITE,WHITE,DKBROWN,LTBLUE,BLUE,LTBROWN,DKGRUN,
	BLACK,WHITE,WHITE,DKBROWN,RED,DKBROWN,LTBROWN,DKGRUN,
	BLACK,DKBROWN,YELLOW,GREY,WHITE,ORANGE,RED,BLUE,
	BLACK,INBLUE,YELLOW,GREY,WHITE,LTBLUE,BLUE,RED,
	BLACK,INBLUE,YELLOW,GREY,WHITE,LTBROWN,PURPLE,BLUE,
	BLACK,DKGRUN,GREEN,GREY,WHITE,GRUN,DKGREEN,BLUE,
	BLACK,WHITE,0,BLUE,0,LTBLUE,0,INBLUE, /* TitoloSU #1 */
	BLACK,DKGRUN,0,LTBLUE,0,WHITE,0,BLUE, /* Titolo #2 */
	BLACK,GRUN,0,WHITE,0,DKGRUN,0,LTBLUE, /* Titolo #3 */
	BLACK,GREEN,0,DKGRUN,0,GRUN,0,WHITE, /* Titolo #4 */
	BLACK,WHITE,0,GRUN,0,GREEN,0,DKGRUN, /* TitoloGIU #5 */
	BLACK,INBLUE,0,GREEN,0,WHITE,0,GRUN, /* Titolo #6 */
	BLACK,BLUE,0,WHITE,0,INBLUE,0,GREEN, /* Titolo #7 */
	BLACK,LTBLUE,0,INBLUE,0,BLUE,0,WHITE /* Titolo #8 */
};



static struct MachineDriver machine_driver =
{
	/* basic machine hardware */
	{
		{
			CPU_Z80,
			3072000,	/* 3.072 Mhz (?) */
			0,
			readmem,writemem,0,0,
			nmi_interrupt,1
		}
	},
	60,
	0,

	/* video hardware */
	32*8, 32*8, { 0*8, 32*8-1, 2*8, 30*8-1 },
	gfxdecodeinfo,
	sizeof(palette)/3,sizeof(colortable),
	0,

	0,
	mario_vh_start,
	generic_vh_stop,
	mario_vh_screenrefresh,

	/* sound hardware */
	0,
	0,
	0,
	0,
	0
};



/***************************************************************************

  Game driver(s)

***************************************************************************/

ROM_START( mario_rom )
	ROM_REGION(0x10000)	/* 64k for code */
	ROM_LOAD( "%s.7f", 0x0000, 0x2000 )
	ROM_LOAD( "%s.7e", 0x2000, 0x2000 )
	ROM_LOAD( "%s.7d", 0x4000, 0x2000 )
	ROM_LOAD( "%s.7c", 0xf000, 0x1000 )

	ROM_REGION(0x8000)	/* temporary space for graphics (disposed after conversion) */
	ROM_LOAD( "%s.3f", 0x0000, 0x1000 )
	ROM_LOAD( "%s.3j", 0x1000, 0x1000 )
	ROM_LOAD( "%s.7m", 0x2000, 0x1000 )
	ROM_LOAD( "%s.7n", 0x3000, 0x1000 )
	ROM_LOAD( "%s.7p", 0x4000, 0x1000 )
	ROM_LOAD( "%s.7s", 0x5000, 0x1000 )
	ROM_LOAD( "%s.7t", 0x6000, 0x1000 )
	ROM_LOAD( "%s.7u", 0x7000, 0x1000 )

	ROM_REGION(0x1000)	/* sound? */
	ROM_LOAD( "%s.6k", 0x0000, 0x1000 )
ROM_END



static int hiload(const char *name)
{
	/* check if the hi score table has already been initialized */
	if (memcmp(&RAM[0x6b1d],"\x00\x20\x01",3) == 0 &&
			memcmp(&RAM[0x6ba5],"\x00\x32\x00",3) == 0)
	{
		FILE *f;


		if ((f = fopen(name,"rb")) != 0)
		{
			fread(&RAM[0x6b00],1,34*5,f);	/* hi scores */
			RAM[0x6823] = RAM[0x6b1f];
			RAM[0x6824] = RAM[0x6b1e];
			RAM[0x6825] = RAM[0x6b1d];
			fread(&RAM[0x6c00],1,0x3c,f);	/* distributions */
			fclose(f);
		}

		return 1;
	}
	else return 0;	/* we can't load the hi scores yet */
}



static void hisave(const char *name)
{
	FILE *f;


	if ((f = fopen(name,"wb")) != 0)
	{
		fwrite(&RAM[0x6b00],1,34*5,f);	/* hi scores */
		fwrite(&RAM[0x6c00],1,0x3c,f);	/* distribution */
		fclose(f);
	}
}



struct GameDriver mario_driver =
{
	"Mario Bros.",
	"mario",
	"MIRKO BUFFONI\nNICOLA SALMORIA\nSTEFANO MOZZI",
	&machine_driver,

	mario_rom,
	0, 0,
	0,

	input_ports, trak_ports, dsw, keys,

	0, palette, colortable,
	8*13, 8*16,

	hiload, hisave
};