mirror of
https://github.com/holub/mame
synced 2025-04-21 07:52:35 +03:00
(MESS) new Skeleton [Robbbert, Chickenman]
------------------------------------------- Amust Compak
This commit is contained in:
Robbbert
parent
3ee7c95374
commit
a8b5250590
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -7428,6 +7428,7 @@ src/mess/drivers/amiga.c svneol=native#text/plain
|
||||
src/mess/drivers/ampro.c svneol=native#text/plain
|
||||
src/mess/drivers/amstr_pc.c svneol=native#text/plain
|
||||
src/mess/drivers/amstrad.c svneol=native#text/plain
|
||||
src/mess/drivers/amust.c svneol=native#text/plain
|
||||
src/mess/drivers/apc.c svneol=native#text/plain
|
||||
src/mess/drivers/apexc.c svneol=native#text/plain
|
||||
src/mess/drivers/apf.c svneol=native#text/plain
|
||||
|
||||
217
src/mess/drivers/amust.c
Normal file
217
src/mess/drivers/amust.c
Normal file
@ -0,0 +1,217 @@
|
||||
// license:MAME
|
||||
// copyright-holders:Robbbert
|
||||
/***************************************************************************
|
||||
|
||||
Amust Compak
|
||||
|
||||
2014-03-21 Skeleton driver. [Robbbert]
|
||||
|
||||
An unusual-looking CP/M computer.
|
||||
There are no manuals or schematics known to exist.
|
||||
A blurry photo of the board shows 2x 8251, 2x 8255, 8253, uPD765 and a 6845.
|
||||
The videoram is a 6116 RAM. There is a piezo beeper. There are 3 crystals,
|
||||
but the writing is too blurred.
|
||||
|
||||
The main rom is identical between the 2 halves, except that the initial
|
||||
crtc parameters are slightly different. I've chosen to ignore the first
|
||||
half.
|
||||
|
||||
|
||||
ToDo:
|
||||
- Everything
|
||||
- Need software
|
||||
|
||||
****************************************************************************/
|
||||
|
||||
#include "emu.h"
|
||||
#include "cpu/z80/z80.h"
|
||||
#include "video/mc6845.h"
|
||||
#include "machine/upd765.h"
|
||||
|
||||
|
||||
class amust_state : public driver_device
|
||||
{
|
||||
public:
|
||||
amust_state(const machine_config &mconfig, device_type type, const char *tag)
|
||||
: driver_device(mconfig, type, tag)
|
||||
, m_palette(*this, "palette")
|
||||
, m_maincpu(*this, "maincpu")
|
||||
, m_fdc (*this, "fdc")
|
||||
, m_floppy0(*this, "fdc:0")
|
||||
, m_floppy1(*this, "fdc:1")
|
||||
{ }
|
||||
|
||||
DECLARE_DRIVER_INIT(amust);
|
||||
DECLARE_MACHINE_RESET(amust);
|
||||
DECLARE_WRITE8_MEMBER(port0a_w);
|
||||
UINT8 *m_p_videoram;
|
||||
const UINT8 *m_p_chargen;
|
||||
required_device<palette_device> m_palette;
|
||||
private:
|
||||
required_device<cpu_device> m_maincpu;
|
||||
required_device<upd765a_device> m_fdc;
|
||||
required_device<floppy_connector> m_floppy0;
|
||||
required_device<floppy_connector> m_floppy1;
|
||||
};
|
||||
|
||||
//WRITE8_MEMBER( amust_state::port00_w )
|
||||
//{
|
||||
// membank("bankr0")->set_entry(BIT(data, 6));
|
||||
// m_fdc->dden_w(BIT(data, 5));
|
||||
// floppy_image_device *floppy = NULL;
|
||||
// if (BIT(data, 0)) floppy = m_floppy0->get_device();
|
||||
// m_fdc->set_floppy(floppy);
|
||||
// if (floppy)
|
||||
// floppy->ss_w(BIT(data, 4));
|
||||
//}
|
||||
|
||||
static ADDRESS_MAP_START(amust_mem, AS_PROGRAM, 8, amust_state)
|
||||
ADDRESS_MAP_UNMAP_HIGH
|
||||
//AM_RANGE(0x0000, 0x0fff) AM_READ_BANK("bankr0") AM_WRITE_BANK("bankw0")
|
||||
AM_RANGE(0x0000, 0xf7ff) AM_RAM
|
||||
AM_RANGE(0xf800, 0xffff) AM_READ_BANK("bankr0") AM_WRITE_BANK("bankw0")
|
||||
ADDRESS_MAP_END
|
||||
|
||||
static ADDRESS_MAP_START(amust_io, AS_IO, 8, amust_state)
|
||||
ADDRESS_MAP_UNMAP_HIGH
|
||||
ADDRESS_MAP_GLOBAL_MASK(0xff)
|
||||
AM_RANGE(0x0a, 0x0a) AM_WRITE(port0a_w)
|
||||
AM_RANGE(0x0e, 0x0e) AM_DEVWRITE("crtc", mc6845_device, address_w)
|
||||
AM_RANGE(0x0f, 0x0f) AM_DEVREADWRITE("crtc", mc6845_device, register_r, register_w)
|
||||
//AM_RANGE(0xxx, 0xxx) AM_DEVREADWRITE("fdc", upd765a, read, write)
|
||||
ADDRESS_MAP_END
|
||||
|
||||
static SLOT_INTERFACE_START( amust_floppies )
|
||||
SLOT_INTERFACE( "525dd", FLOPPY_525_DD )
|
||||
SLOT_INTERFACE_END
|
||||
|
||||
/* Input ports */
|
||||
static INPUT_PORTS_START( amust )
|
||||
INPUT_PORTS_END
|
||||
|
||||
// no idea which port actually does this
|
||||
WRITE8_MEMBER( amust_state::port0a_w )
|
||||
{
|
||||
membank("bankr0")->set_entry(1);
|
||||
}
|
||||
|
||||
/* F4 Character Displayer */
|
||||
static const gfx_layout amust_charlayout =
|
||||
{
|
||||
8, 8, /* 8 x 8 characters */
|
||||
256, /* 256 characters */
|
||||
1, /* 1 bits per pixel */
|
||||
{ 0 }, /* no bitplanes */
|
||||
/* x offsets */
|
||||
{ 0, 1, 2, 3, 4, 5, 6, 7 },
|
||||
/* y offsets */
|
||||
{ 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 },
|
||||
8*8 /* every char takes 8 bytes */
|
||||
};
|
||||
|
||||
static GFXDECODE_START( amust )
|
||||
GFXDECODE_ENTRY( "chargen", 0x0000, amust_charlayout, 0, 1 )
|
||||
GFXDECODE_END
|
||||
|
||||
MC6845_UPDATE_ROW( amust_update_row )
|
||||
{
|
||||
amust_state *state = device->machine().driver_data<amust_state>();
|
||||
const rgb_t *palette = state->m_palette->palette()->entry_list_raw();
|
||||
UINT8 chr,gfx,inv;
|
||||
UINT16 mem,x;
|
||||
UINT32 *p = &bitmap.pix32(y);
|
||||
|
||||
for (x = 0; x < x_count; x++)
|
||||
{
|
||||
inv = (x == cursor_x) ? 0xff : 0;
|
||||
mem = (ma + x) & 0x7ff;
|
||||
chr = state->m_p_videoram[mem];
|
||||
if (ra < 8)
|
||||
gfx = state->m_p_chargen[(chr<<4) | ra] ^ inv;
|
||||
else
|
||||
gfx = inv;
|
||||
|
||||
/* Display a scanline of a character (8 pixels) */
|
||||
*p++ = palette[BIT(gfx, 7)];
|
||||
*p++ = palette[BIT(gfx, 6)];
|
||||
*p++ = palette[BIT(gfx, 5)];
|
||||
*p++ = palette[BIT(gfx, 4)];
|
||||
*p++ = palette[BIT(gfx, 3)];
|
||||
*p++ = palette[BIT(gfx, 2)];
|
||||
*p++ = palette[BIT(gfx, 1)];
|
||||
*p++ = palette[BIT(gfx, 0)];
|
||||
}
|
||||
}
|
||||
|
||||
static MC6845_INTERFACE( amust_crtc )
|
||||
{
|
||||
false,
|
||||
0,0,0,0, /* visarea adjustment */
|
||||
8, /* number of dots per character */
|
||||
NULL,
|
||||
amust_update_row, /* handler to display a scanline */
|
||||
NULL,
|
||||
DEVCB_NULL,
|
||||
DEVCB_NULL,
|
||||
DEVCB_NULL,
|
||||
DEVCB_NULL,
|
||||
NULL//amust_update_addr /* handler to process transparent mode */
|
||||
};
|
||||
|
||||
MACHINE_RESET_MEMBER( amust_state, amust )
|
||||
{
|
||||
m_p_chargen = memregion("chargen")->base();
|
||||
m_p_videoram = memregion("videoram")->base();
|
||||
membank("bankr0")->set_entry(0); // point at rom
|
||||
membank("bankw0")->set_entry(0); // always write to ram
|
||||
m_maincpu->set_state_int(Z80_PC, 0xf800);
|
||||
}
|
||||
|
||||
DRIVER_INIT_MEMBER( amust_state, amust )
|
||||
{
|
||||
UINT8 *main = memregion("maincpu")->base();
|
||||
|
||||
membank("bankr0")->configure_entry(1, &main[0xf800]);
|
||||
membank("bankr0")->configure_entry(0, &main[0x10800]);
|
||||
membank("bankw0")->configure_entry(0, &main[0xf800]);
|
||||
}
|
||||
|
||||
static MACHINE_CONFIG_START( amust, amust_state )
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu",Z80, XTAL_16MHz / 4) // guess clock
|
||||
MCFG_CPU_PROGRAM_MAP(amust_mem)
|
||||
MCFG_CPU_IO_MAP(amust_io)
|
||||
MCFG_MACHINE_RESET_OVERRIDE(amust_state, amust)
|
||||
|
||||
/* video hardware */
|
||||
MCFG_SCREEN_ADD("screen", RASTER)
|
||||
MCFG_SCREEN_REFRESH_RATE(50)
|
||||
MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */
|
||||
MCFG_SCREEN_SIZE(640, 480)
|
||||
MCFG_SCREEN_VISIBLE_AREA(0, 640-1, 0, 480-1)
|
||||
MCFG_SCREEN_UPDATE_DEVICE("crtc", mc6845_device, screen_update)
|
||||
MCFG_PALETTE_ADD_MONOCHROME_GREEN("palette")
|
||||
MCFG_GFXDECODE_ADD("gfxdecode", "palette", amust)
|
||||
|
||||
/* Devices */
|
||||
MCFG_MC6845_ADD("crtc", MC6845, "screen", XTAL_16MHz / 8, amust_crtc)
|
||||
MCFG_UPD765A_ADD("fdc", false, true)
|
||||
MCFG_FLOPPY_DRIVE_ADD("fdc:0", amust_floppies, "525dd", floppy_image_device::default_floppy_formats)
|
||||
MCFG_FLOPPY_DRIVE_ADD("fdc:1", amust_floppies, "525dd", floppy_image_device::default_floppy_formats)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
/* ROM definition */
|
||||
ROM_START( amust )
|
||||
ROM_REGION( 0x11000, "maincpu", ROMREGION_ERASEFF )
|
||||
ROM_LOAD( "mon_h.rom", 0x10000, 0x1000, CRC(10dceac6) SHA1(1ef80039063f7a6455563d59f1bcc23e09eca369) )
|
||||
|
||||
ROM_REGION( 0x800, "chargen", 0 )
|
||||
ROM_LOAD( "cg4.rom", 0x000, 0x800, CRC(52e7b9d8) SHA1(cc6d457634eb688ccef471f72bddf0424e64b045) )
|
||||
|
||||
ROM_REGION( 0x800, "videoram", ROMREGION_ERASE00 )
|
||||
ROM_END
|
||||
|
||||
/* Driver */
|
||||
|
||||
/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */
|
||||
COMP( 1983, amust, 0, 0, amust, amust, amust_state, amust, "Amust", "Compak", GAME_IS_SKELETON)
|
||||
@ -2346,3 +2346,4 @@ compclr2
|
||||
m6805evs
|
||||
mx2178
|
||||
hunter2
|
||||
amust
|
||||
|
||||
@ -2034,6 +2034,7 @@ $(MESSOBJ)/zvt.a: \
|
||||
$(MESSOBJ)/skeleton.a: \
|
||||
$(MESS_DRIVERS)/alphasma.o \
|
||||
$(MESS_DRIVERS)/ampro.o \
|
||||
$(MESS_DRIVERS)/amust.o \
|
||||
$(MESS_DRIVERS)/applix.o \
|
||||
$(MESS_DRIVERS)/attache.o \
|
||||
$(MESS_DRIVERS)/ax20.o \
|
||||
|
||||
Loading…
Reference in New Issue
Block a user