New mostly-working system: SME Systems Aussie Byte SBC [Robbbert]

This commit is contained in:
Robbbert 2015-08-02 13:41:31 +10:00
parent acb2ccce5f
commit 465878ee75
5 changed files with 900 additions and 0 deletions

View File

@ -2599,6 +2599,8 @@ files {
MAME_DIR .. "src/mess/drivers/amust.c", MAME_DIR .. "src/mess/drivers/amust.c",
MAME_DIR .. "src/mess/drivers/applix.c", MAME_DIR .. "src/mess/drivers/applix.c",
MAME_DIR .. "src/mess/drivers/attache.c", MAME_DIR .. "src/mess/drivers/attache.c",
MAME_DIR .. "src/mess/drivers/aussiebyte.c",
MAME_DIR .. "src/mess/video/aussiebyte.c",
MAME_DIR .. "src/mess/drivers/ax20.c", MAME_DIR .. "src/mess/drivers/ax20.c",
MAME_DIR .. "src/mess/drivers/beehive.c", MAME_DIR .. "src/mess/drivers/beehive.c",
MAME_DIR .. "src/mess/drivers/binbug.c", MAME_DIR .. "src/mess/drivers/binbug.c",

View File

@ -2717,3 +2717,5 @@ excali64
bitgrpha bitgrpha
bitgrphb bitgrphb
tvgame tvgame
aussieby

View File

@ -0,0 +1,572 @@
// license:BSD-3-Clause
// copyright-holders:Robbbert
/*************************************************************************************************
The Aussie Byte II Single-Board Computer, created by SME Systems, Melbourne, Australia.
Also known as the Knight 2000 Microcomputer.
Status:
Boots up from floppy.
Output to serial terminal and to 6545 are working. Serial keyboard works.
Developed in conjunction with members of the MSPP. Written in July, 2015.
ToDo:
- CRT8002 attributes controller
- Graphics
- Hard drive controllers and drives
- Test Centronics printer
- PIO connections
- RTC not working
Note of MAME restrictions:
- Votrax doesn't sound anything like the real thing
- WD1001/WD1002 device is not emulated
- CRT8002 device is not emulated
**************************************************************************************************/
/***********************************************************
Includes
************************************************************/
#include "includes/aussiebyte.h"
/***********************************************************
Address Maps
************************************************************/
static ADDRESS_MAP_START( aussiebyte_map, AS_PROGRAM, 8, aussiebyte_state )
AM_RANGE(0x0000, 0x3fff) AM_READ_BANK("bankr0") AM_WRITE_BANK("bankw0")
AM_RANGE(0x4000, 0x7fff) AM_RAMBANK("bank1")
AM_RANGE(0x8000, 0xbfff) AM_RAMBANK("bank2")
AM_RANGE(0xc000, 0xffff) AM_RAM AM_REGION("mram", 0x0000)
ADDRESS_MAP_END
static ADDRESS_MAP_START( aussiebyte_io, AS_IO, 8, aussiebyte_state )
ADDRESS_MAP_GLOBAL_MASK(0xff)
ADDRESS_MAP_UNMAP_HIGH
AM_RANGE(0x00, 0x03) AM_DEVREADWRITE("sio1", z80sio0_device, ba_cd_r, ba_cd_w)
AM_RANGE(0x04, 0x07) AM_DEVREADWRITE("pio1", z80pio_device, read, write)
AM_RANGE(0x08, 0x0b) AM_DEVREADWRITE("ctc", z80ctc_device, read, write)
AM_RANGE(0x0c, 0x0f) AM_NOP // winchester interface
AM_RANGE(0x10, 0x13) AM_DEVREADWRITE("fdc", wd2797_t, read, write)
AM_RANGE(0x14, 0x14) AM_DEVREADWRITE("dma", z80dma_device, read, write)
AM_RANGE(0x15, 0x15) AM_WRITE(port15_w) // boot rom disable
AM_RANGE(0x16, 0x16) AM_WRITE(port16_w) // fdd select
AM_RANGE(0x17, 0x17) AM_WRITE(port17_w) // DMA mux
AM_RANGE(0x18, 0x18) AM_WRITE(port18_w) // fdc select
AM_RANGE(0x19, 0x19) AM_READ(port19_r) // info port
AM_RANGE(0x1a, 0x1a) AM_WRITE(port1a_w) // membank
AM_RANGE(0x1b, 0x1b) AM_WRITE(port1b_w) // winchester control
AM_RANGE(0x1c, 0x1f) AM_WRITE(port1c_w) // gpebh select
AM_RANGE(0x20, 0x23) AM_DEVREADWRITE("pio2", z80pio_device, read, write)
AM_RANGE(0x24, 0x27) AM_DEVREADWRITE("sio2", z80sio0_device, ba_cd_r, ba_cd_w)
AM_RANGE(0x28, 0x28) AM_READ(port28_r) AM_DEVWRITE("votrax", votrax_sc01_device, write)
AM_RANGE(0x2c, 0x2c) AM_DEVWRITE("votrax", votrax_sc01_device, inflection_w)
AM_RANGE(0x30, 0x30) AM_WRITE(address_w)
AM_RANGE(0x31, 0x31) AM_DEVREAD("crtc", mc6845_device, status_r)
AM_RANGE(0x32, 0x32) AM_WRITE(register_w)
AM_RANGE(0x33, 0x33) AM_READ(port33_r)
AM_RANGE(0x34, 0x34) AM_WRITE(port34_w) // video control
AM_RANGE(0x35, 0x35) AM_WRITE(port35_w) // data to vram and aram
AM_RANGE(0x36, 0x36) AM_READ(port36_r) // data from vram and aram
AM_RANGE(0x37, 0x37) AM_READ(port37_r) // read dispen flag
AM_RANGE(0x40, 0x4f) AM_DEVREADWRITE("rtc", msm5832_device, data_r, data_w)
ADDRESS_MAP_END
/***********************************************************
Keyboard
************************************************************/
static INPUT_PORTS_START( aussiebyte )
INPUT_PORTS_END
/***********************************************************
I/O Ports
************************************************************/
WRITE8_MEMBER( aussiebyte_state::port15_w )
{
membank("bankr0")->set_entry(m_port15); // point at ram
m_port15 = true;
}
/* FDD select
0 Drive Select bit O
1 Drive Select bit 1
2 Drive Select bit 2
3 Drive Select bit 3
- These bits connect to a 74LS145 binary to BCD converter.
- Drives 0 to 3 are 5.25 inch, 4 to 7 are 8 inch, 9 and 0 are not used.
- Currently we only support drive 0.
4 Side Select to Disk Drives.
5 Disable 5.25 inch floppy spindle motors.
6 Unused.
7 Enable write precompensation on WD2797 controller. */
WRITE8_MEMBER( aussiebyte_state::port16_w )
{
floppy_image_device *m_floppy = NULL;
if ((data & 15) == 0)
m_floppy = m_floppy0->get_device();
else
if ((data & 15) == 1)
m_floppy = m_floppy1->get_device();
m_fdc->set_floppy(m_floppy);
if (m_floppy)
{
m_floppy->mon_w(BIT(data, 5));
m_floppy->ss_w(BIT(data, 4));
}
}
/* DMA select
0 - FDC
1 - SIO Ch A
2 - SIO Ch B
3 - Winchester bus
4 - SIO Ch C
5 - SIO Ch D
6 - Ext ready 1
7 - Ext ready 2 */
WRITE8_MEMBER( aussiebyte_state::port17_w )
{
m_port17 = data & 7;
m_dma->rdy_w(BIT(m_port17_rdy, data));
}
/* FDC params
2 EXC: WD2797 clock frequency. H = 5.25"; L = 8"
3 WIEN: WD2797 Double density select. */
WRITE8_MEMBER( aussiebyte_state::port18_w )
{
m_fdc->set_unscaled_clock(BIT(data, 2) ? 1e6 : 2e6);
m_fdc->dden_w(BIT(data, 3));
}
READ8_MEMBER( aussiebyte_state::port19_r )
{
return m_port19;
}
// Memory banking
WRITE8_MEMBER( aussiebyte_state::port1a_w )
{
data &= 7;
switch (data)
{
case 0:
case 1:
case 2:
case 3:
case 4:
m_port1a = data*3+1;
if (m_port15)
membank("bankr0")->set_entry(data*3+1);
membank("bankw0")->set_entry(data*3+1);
membank("bank1")->set_entry(data*3+2);
membank("bank2")->set_entry(data*3+3);
break;
case 5:
m_port1a = 1;
if (m_port15)
membank("bankr0")->set_entry(1);
membank("bankw0")->set_entry(1);
membank("bank1")->set_entry(2);
membank("bank2")->set_entry(13);
break;
case 6:
m_port1a = 14;
if (m_port15)
membank("bankr0")->set_entry(14);
membank("bankw0")->set_entry(14);
membank("bank1")->set_entry(15);
//membank("bank2")->set_entry(0); // open bus
break;
case 7:
m_port1a = 1;
if (m_port15)
membank("bankr0")->set_entry(1);
membank("bankw0")->set_entry(1);
membank("bank1")->set_entry(4);
membank("bank2")->set_entry(13);
break;
}
}
// Winchester control
WRITE8_MEMBER( aussiebyte_state::port1b_w )
{
}
// GPEHB control
WRITE8_MEMBER( aussiebyte_state::port1c_w )
{
}
WRITE8_MEMBER( aussiebyte_state::port20_w )
{
m_speaker->level_w(BIT(data, 7));
}
READ8_MEMBER( aussiebyte_state::port28_r )
{
return m_port28;
}
/***********************************************************
DMA
************************************************************/
READ8_MEMBER( aussiebyte_state::memory_read_byte )
{
address_space& prog_space = m_maincpu->space(AS_PROGRAM);
return prog_space.read_byte(offset);
}
WRITE8_MEMBER( aussiebyte_state::memory_write_byte )
{
address_space& prog_space = m_maincpu->space(AS_PROGRAM);
prog_space.write_byte(offset, data);
}
READ8_MEMBER( aussiebyte_state::io_read_byte )
{
address_space& prog_space = m_maincpu->space(AS_IO);
return prog_space.read_byte(offset);
}
WRITE8_MEMBER( aussiebyte_state::io_write_byte )
{
address_space& prog_space = m_maincpu->space(AS_IO);
prog_space.write_byte(offset, data);
}
WRITE_LINE_MEMBER( aussiebyte_state::busreq_w )
{
// since our Z80 has no support for BUSACK, we assume it is granted immediately
m_maincpu->set_input_line(Z80_INPUT_LINE_BUSRQ, state);
m_dma->bai_w(state); // tell dma that bus has been granted
}
/***********************************************************
DMA selector
************************************************************/
WRITE_LINE_MEMBER( aussiebyte_state::sio1_rdya_w )
{
m_port17_rdy = (m_port17_rdy & 0xfd) | (UINT8)(state << 1);
if (m_port17 == 1)
m_dma->rdy_w(state);
}
WRITE_LINE_MEMBER( aussiebyte_state::sio1_rdyb_w )
{
m_port17_rdy = (m_port17_rdy & 0xfb) | (UINT8)(state << 2);
if (m_port17 == 2)
m_dma->rdy_w(state);
}
WRITE_LINE_MEMBER( aussiebyte_state::sio2_rdya_w )
{
m_port17_rdy = (m_port17_rdy & 0xef) | (UINT8)(state << 4);
if (m_port17 == 4)
m_dma->rdy_w(state);
}
WRITE_LINE_MEMBER( aussiebyte_state::sio2_rdyb_w )
{
m_port17_rdy = (m_port17_rdy & 0xdf) | (UINT8)(state << 5);
if (m_port17 == 5)
m_dma->rdy_w(state);
}
/***********************************************************
Video
************************************************************/
/* F4 Character Displayer */
static const gfx_layout crt8002_charlayout =
{
8, 12, /* 7 x 11 characters */
128, /* 128 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, 9*8, 10*8, 11*8 },
8*16 /* every char takes 16 bytes */
};
static GFXDECODE_START( crt8002 )
GFXDECODE_ENTRY( "chargen", 0x0000, crt8002_charlayout, 0, 1 )
GFXDECODE_END
/***************************************************************
Daisy Chain
****************************************************************/
static const z80_daisy_config daisy_chain_intf[] =
{
{ "dma" },
{ "pio2" },
{ "sio1" },
{ "sio2" },
{ "pio1" },
{ "ctc" },
{ NULL }
};
/***********************************************************
CTC
************************************************************/
// baud rate generator. All inputs are 1.2288MHz.
TIMER_DEVICE_CALLBACK_MEMBER( aussiebyte_state::ctc_tick )
{
m_ctc->trg0(1);
m_ctc->trg0(0);
m_ctc->trg1(1);
m_ctc->trg1(0);
m_ctc->trg2(1);
m_ctc->trg2(0);
}
WRITE_LINE_MEMBER( aussiebyte_state::ctc_z0_w )
{
m_sio1->rxca_w(state);
m_sio1->txca_w(state);
}
WRITE_LINE_MEMBER( aussiebyte_state::ctc_z1_w )
{
m_sio1->rxtxcb_w(state);
m_sio2->rxca_w(state);
m_sio2->txca_w(state);
}
WRITE_LINE_MEMBER( aussiebyte_state::ctc_z2_w )
{
m_sio2->rxtxcb_w(state);
m_ctc->trg3(1);
m_ctc->trg3(0);
}
/***********************************************************
Centronics ack
************************************************************/
WRITE_LINE_MEMBER( aussiebyte_state::write_centronics_busy )
{
m_centronics_busy = state;
}
/***********************************************************
Speech ack
************************************************************/
WRITE_LINE_MEMBER( aussiebyte_state::votrax_w )
{
m_port28 = state;
}
/***********************************************************
Floppy Disk
************************************************************/
WRITE_LINE_MEMBER( aussiebyte_state::fdc_intrq_w )
{
UINT8 data = (m_port19 & 0xbf) | (state ? 0x40 : 0);
m_port19 = data;
}
WRITE_LINE_MEMBER( aussiebyte_state::fdc_drq_w )
{
UINT8 data = (m_port19 & 0x7f) | (state ? 0x80 : 0);
m_port19 = data;
state ^= 1; // inverter on pin38 of fdc
m_port17_rdy = (m_port17_rdy & 0xfe) | (UINT8)state;
if (m_port17 == 0)
m_dma->rdy_w(state);
}
static SLOT_INTERFACE_START( aussiebyte_floppies )
SLOT_INTERFACE( "drive0", FLOPPY_525_QD )
SLOT_INTERFACE( "drive1", FLOPPY_525_QD )
SLOT_INTERFACE_END
/***********************************************************
Machine Driver
************************************************************/
MACHINE_RESET_MEMBER( aussiebyte_state, aussiebyte )
{
m_port15 = false;
m_port17 = 0;
m_port17_rdy = 0;
m_port1a = 1;
m_alpha_address = 0;
m_graph_address = 0;
m_p_chargen = memregion("chargen")->base();
m_p_videoram = memregion("vram")->base();
m_p_attribram = memregion("aram")->base();
membank("bankr0")->set_entry(16); // point at rom
membank("bankw0")->set_entry(1); // always write to ram
membank("bank1")->set_entry(2);
membank("bank2")->set_entry(3);
m_maincpu->reset();
}
static MACHINE_CONFIG_START( aussiebyte, aussiebyte_state )
/* basic machine hardware */
MCFG_CPU_ADD("maincpu", Z80, XTAL_16MHz / 4)
MCFG_CPU_PROGRAM_MAP(aussiebyte_map)
MCFG_CPU_IO_MAP(aussiebyte_io)
MCFG_CPU_CONFIG(daisy_chain_intf)
MCFG_MACHINE_RESET_OVERRIDE(aussiebyte_state, aussiebyte )
/* video hardware */
MCFG_SCREEN_ADD("screen", RASTER)
MCFG_SCREEN_REFRESH_RATE(50)
MCFG_SCREEN_SIZE(640, 480)
MCFG_SCREEN_VISIBLE_AREA(0, 640-1, 0, 480-1)
MCFG_SCREEN_UPDATE_DEVICE("crtc", sy6545_1_device, screen_update)
MCFG_GFXDECODE_ADD("gfxdecode", "palette", crt8002)
MCFG_PALETTE_ADD_BLACK_AND_WHITE("palette")
/* sound hardware */
MCFG_SPEAKER_STANDARD_MONO("mono")
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
MCFG_DEVICE_ADD("votrax", VOTRAX_SC01, 720000) /* 720kHz? needs verify */
MCFG_VOTRAX_SC01_REQUEST_CB(WRITELINE(aussiebyte_state, votrax_w))
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.00)
/* devices */
MCFG_CENTRONICS_ADD("centronics", centronics_devices, "printer")
MCFG_CENTRONICS_DATA_INPUT_BUFFER("cent_data_in")
MCFG_CENTRONICS_BUSY_HANDLER(WRITELINE(aussiebyte_state, write_centronics_busy))
MCFG_DEVICE_ADD("cent_data_in", INPUT_BUFFER, 0)
MCFG_CENTRONICS_OUTPUT_LATCH_ADD("cent_data_out", "centronics")
MCFG_DEVICE_ADD("ctc", Z80CTC, XTAL_16MHz / 4)
MCFG_Z80CTC_INTR_CB(INPUTLINE("maincpu", INPUT_LINE_IRQ0))
MCFG_Z80CTC_ZC0_CB(WRITELINE(aussiebyte_state, ctc_z0_w)) // SIO1 Ch A
MCFG_Z80CTC_ZC1_CB(WRITELINE(aussiebyte_state, ctc_z1_w)) // SIO1 Ch B, SIO2 Ch A
MCFG_Z80CTC_ZC2_CB(WRITELINE(aussiebyte_state, ctc_z2_w)) // SIO2 Ch B, CTC Ch 3
MCFG_DEVICE_ADD("dma", Z80DMA, XTAL_16MHz / 4)
MCFG_Z80DMA_OUT_INT_CB(INPUTLINE("maincpu", INPUT_LINE_IRQ0))
MCFG_Z80DMA_OUT_BUSREQ_CB(WRITELINE(aussiebyte_state, busreq_w))
// BAO, not used
MCFG_Z80DMA_IN_MREQ_CB(READ8(aussiebyte_state, memory_read_byte))
MCFG_Z80DMA_OUT_MREQ_CB(WRITE8(aussiebyte_state, memory_write_byte))
MCFG_Z80DMA_IN_IORQ_CB(READ8(aussiebyte_state, io_read_byte))
MCFG_Z80DMA_OUT_IORQ_CB(WRITE8(aussiebyte_state, io_write_byte))
MCFG_DEVICE_ADD("pio1", Z80PIO, XTAL_16MHz / 4)
MCFG_Z80PIO_OUT_INT_CB(INPUTLINE("maincpu", INPUT_LINE_IRQ0))
MCFG_Z80PIO_OUT_PA_CB(DEVWRITE8("cent_data_out", output_latch_device, write))
MCFG_Z80PIO_IN_PB_CB(DEVREAD8("cent_data_in", input_buffer_device, read))
MCFG_Z80PIO_OUT_ARDY_CB(DEVWRITELINE("centronics", centronics_device, write_strobe)) MCFG_DEVCB_INVERT
MCFG_DEVICE_ADD("pio2", Z80PIO, XTAL_16MHz / 4)
MCFG_Z80PIO_OUT_INT_CB(INPUTLINE("maincpu", INPUT_LINE_IRQ0))
MCFG_Z80PIO_OUT_PA_CB(WRITE8(aussiebyte_state, port20_w))
MCFG_Z80SIO0_ADD("sio1", XTAL_16MHz / 4, 0, 0, 0, 0)
MCFG_Z80DART_OUT_INT_CB(INPUTLINE("maincpu", INPUT_LINE_IRQ0))
MCFG_Z80DART_OUT_WRDYA_CB(WRITELINE(aussiebyte_state, sio1_rdya_w))
MCFG_Z80DART_OUT_WRDYB_CB(WRITELINE(aussiebyte_state, sio1_rdyb_w))
MCFG_Z80SIO0_ADD("sio2", XTAL_16MHz / 4, 0, 0, 0, 0)
MCFG_Z80DART_OUT_INT_CB(INPUTLINE("maincpu", INPUT_LINE_IRQ0))
MCFG_Z80DART_OUT_WRDYA_CB(WRITELINE(aussiebyte_state, sio2_rdya_w))
MCFG_Z80DART_OUT_WRDYB_CB(WRITELINE(aussiebyte_state, sio2_rdyb_w))
MCFG_Z80DART_OUT_TXDA_CB(DEVWRITELINE("rs232", rs232_port_device, write_txd))
MCFG_Z80DART_OUT_DTRA_CB(DEVWRITELINE("rs232", rs232_port_device, write_dtr))
MCFG_Z80DART_OUT_RTSA_CB(DEVWRITELINE("rs232", rs232_port_device, write_rts))
MCFG_RS232_PORT_ADD("rs232", default_rs232_devices, "terminal")
MCFG_RS232_RXD_HANDLER(DEVWRITELINE("sio2", z80sio0_device, rxa_w))
MCFG_WD2797_ADD("fdc", XTAL_16MHz / 16)
MCFG_WD_FDC_INTRQ_CALLBACK(WRITELINE(aussiebyte_state, fdc_intrq_w))
MCFG_WD_FDC_DRQ_CALLBACK(WRITELINE(aussiebyte_state, fdc_drq_w))
MCFG_FLOPPY_DRIVE_ADD("fdc:0", aussiebyte_floppies, "drive0", floppy_image_device::default_floppy_formats)
MCFG_FLOPPY_DRIVE_ADD("fdc:1", aussiebyte_floppies, "drive1", floppy_image_device::default_floppy_formats)
/* devices */
MCFG_MC6845_ADD("crtc", SY6545_1, "screen", XTAL_16MHz / 8)
MCFG_MC6845_SHOW_BORDER_AREA(false)
MCFG_MC6845_CHAR_WIDTH(8)
MCFG_MC6845_UPDATE_ROW_CB(aussiebyte_state, crtc_update_row)
MCFG_MC6845_ADDR_CHANGED_CB(aussiebyte_state, crtc_update_addr)
MCFG_MSM5832_ADD("rtc", XTAL_32_768kHz)
MCFG_TIMER_DRIVER_ADD_PERIODIC("ctc_tick", aussiebyte_state, ctc_tick, attotime::from_hz(XTAL_4_9152MHz / 4))
MACHINE_CONFIG_END
DRIVER_INIT_MEMBER( aussiebyte_state, aussiebyte )
{
// Main ram is divided into 16k blocks (0-15). The boot rom is block number 16.
// For convenience, bank 0 is permanently assigned to C000-FFFF
UINT8 *main = memregion("roms")->base();
UINT8 *ram = memregion("mram")->base();
membank("bankr0")->configure_entries(0, 16, &ram[0x0000], 0x4000);
membank("bankw0")->configure_entries(0, 16, &ram[0x0000], 0x4000);
membank("bank1")->configure_entries(0, 16, &ram[0x0000], 0x4000);
membank("bank2")->configure_entries(0, 16, &ram[0x0000], 0x4000);
membank("bankr0")->configure_entry(16, &main[0x0000]);
}
/***********************************************************
Game driver
************************************************************/
ROM_START(aussieby)
ROM_REGION(0x4000, "roms", 0) // Size of bank 16
ROM_LOAD( "knight_boot_0000.u27", 0x0000, 0x1000, CRC(1f200437) SHA1(80d1d208088b325c16a6824e2da605fb2b00c2ce) )
ROM_REGION(0x800, "chargen", 0)
ROM_LOAD( "8002.bin", 0x0000, 0x0800, CRC(fdd6eb13) SHA1(a094d416e66bdab916e72238112a6265a75ca690) )
ROM_REGION(0x40000, "mram", ROMREGION_ERASE00) // main ram, 256k dynamic
ROM_REGION(0x10000, "vram", ROMREGION_ERASEFF) // video ram, 64k dynamic
ROM_REGION(0x00800, "aram", ROMREGION_ERASEFF) // attribute ram, 2k static
ROM_END
/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */
COMP( 1984, aussieby, 0, 0, aussiebyte, aussiebyte, aussiebyte_state, aussiebyte, "SME Systems", "Aussie Byte II" , MACHINE_IMPERFECT_GRAPHICS )

View File

@ -0,0 +1,127 @@
// license:BSD-3-Clause
// copyright-holders:Robbbert
/***********************************************************
Includes
************************************************************/
#include "emu.h"
#include "cpu/z80/z80.h"
#include "cpu/z80/z80daisy.h"
#include "machine/z80ctc.h"
#include "machine/z80pio.h"
#include "machine/z80dart.h"
#include "machine/z80dma.h"
#include "bus/centronics/ctronics.h"
#include "sound/speaker.h"
#include "sound/votrax.h"
#include "video/mc6845.h"
#include "bus/rs232/rs232.h"
#include "machine/wd_fdc.h"
#include "machine/msm5832.h"
/***********************************************************
Class
************************************************************/
class aussiebyte_state : public driver_device
{
public:
aussiebyte_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_ctc(*this, "ctc")
, m_dma(*this, "dma")
, m_pio1(*this, "pio1")
, m_pio2(*this, "pio2")
, m_sio1(*this, "sio1")
, m_sio2(*this, "sio2")
, m_centronics(*this, "centronics")
, m_rs232(*this, "rs232")
, m_fdc(*this, "fdc")
, m_floppy0(*this, "fdc:0")
, m_floppy1(*this, "fdc:1")
, m_crtc(*this, "crtc")
, m_speaker(*this, "speaker")
, m_votrax(*this, "votrax")
{}
DECLARE_READ8_MEMBER(memory_read_byte);
DECLARE_WRITE8_MEMBER(memory_write_byte);
DECLARE_READ8_MEMBER(io_read_byte);
DECLARE_WRITE8_MEMBER(io_write_byte);
DECLARE_WRITE_LINE_MEMBER(write_centronics_busy);
DECLARE_WRITE8_MEMBER(port15_w);
DECLARE_WRITE8_MEMBER(port16_w);
DECLARE_WRITE8_MEMBER(port17_w);
DECLARE_WRITE8_MEMBER(port18_w);
DECLARE_READ8_MEMBER(port19_r);
DECLARE_WRITE8_MEMBER(port1a_w);
DECLARE_WRITE8_MEMBER(port1b_w);
DECLARE_WRITE8_MEMBER(port1c_w);
DECLARE_WRITE8_MEMBER(port20_w);
DECLARE_READ8_MEMBER(port28_r);
DECLARE_READ8_MEMBER(port33_r);
DECLARE_WRITE8_MEMBER(port34_w);
DECLARE_WRITE8_MEMBER(port35_w);
DECLARE_READ8_MEMBER(port36_r);
DECLARE_READ8_MEMBER(port37_r);
DECLARE_WRITE_LINE_MEMBER(fdc_intrq_w);
DECLARE_WRITE_LINE_MEMBER(fdc_drq_w);
DECLARE_WRITE_LINE_MEMBER(busreq_w);
DECLARE_WRITE_LINE_MEMBER(votrax_w);
DECLARE_WRITE_LINE_MEMBER(sio1_rdya_w);
DECLARE_WRITE_LINE_MEMBER(sio1_rdyb_w);
DECLARE_WRITE_LINE_MEMBER(sio2_rdya_w);
DECLARE_WRITE_LINE_MEMBER(sio2_rdyb_w);
DECLARE_MACHINE_RESET(aussiebyte);
DECLARE_DRIVER_INIT(aussiebyte);
TIMER_DEVICE_CALLBACK_MEMBER(ctc_tick);
DECLARE_WRITE_LINE_MEMBER(ctc_z0_w);
DECLARE_WRITE_LINE_MEMBER(ctc_z1_w);
DECLARE_WRITE_LINE_MEMBER(ctc_z2_w);
DECLARE_WRITE8_MEMBER(address_w);
DECLARE_WRITE8_MEMBER(register_w);
MC6845_UPDATE_ROW(crtc_update_row);
MC6845_ON_UPDATE_ADDR_CHANGED(crtc_update_addr);
int m_centronics_busy;
required_device<palette_device> m_palette;
private:
UINT8 crt8002(UINT8 ac_ra, UINT8 ac_chr, UINT8 ac_attr, UINT16 ac_cnt, bool ac_curs);
bool m_port15; // rom switched in (0), out (1)
UINT8 m_port17;
UINT8 m_port17_rdy;
UINT8 m_port19;
UINT8 m_port1a; // bank to switch to when write to port 15 happens
UINT8 m_port28;
UINT8 m_port34;
UINT8 m_port35; // byte to be written to vram or aram
UINT8 m_video_index;
UINT16 m_cnt;
UINT8 *m_p_videoram;
UINT8 *m_p_attribram;
const UINT8 *m_p_chargen;
UINT16 m_alpha_address;
UINT16 m_graph_address;
required_device<cpu_device> m_maincpu;
required_device<z80ctc_device> m_ctc;
required_device<z80dma_device> m_dma;
required_device<z80pio_device> m_pio1;
required_device<z80pio_device> m_pio2;
required_device<z80sio0_device> m_sio1;
required_device<z80sio0_device> m_sio2;
required_device<centronics_device> m_centronics;
required_device<rs232_port_device> m_rs232;
required_device<wd2797_t> m_fdc;
required_device<floppy_connector> m_floppy0;
optional_device<floppy_connector> m_floppy1;
required_device<mc6845_device> m_crtc;
required_device<speaker_sound_device> m_speaker;
required_device<votrax_sc01_device> m_votrax;
};

197
src/mess/video/aussiebyte.c Normal file
View File

@ -0,0 +1,197 @@
// license:BSD-3-Clause
// copyright-holders:Robbbert
/***********************************************************
Video
Graphics not working properly.
Mode 0 - lores (wide, chunky)
Mode 1 - external, *should* be ok
Mode 2 - thin graphics, not explained well enough to code
Mode 3 - alphanumeric, works
************************************************************/
#include "includes/aussiebyte.h"
/***********************************************************
I/O Ports
************************************************************/
// dummy read port, forces requested action to happen
READ8_MEMBER( aussiebyte_state::port33_r )
{
return 0xff;
}
/*
Video control - needs to be fully understood
d0, d1, d2, d3 - can replace RA0-3 in graphics mode
d4 - GS - unknown
d5 - /SRRD - controls write of data to either vram or aram (1=vram, 0=aram)
d6 - /VWR - 0 = enable write vdata to vram, read from aram to vdata ; 1 = enable write to aram from vdata
d7 - OE on port 35
*/
WRITE8_MEMBER( aussiebyte_state::port34_w )
{
m_port34 = data;
}
WRITE8_MEMBER( aussiebyte_state::port35_w )
{
m_port35 = data;
}
READ8_MEMBER( aussiebyte_state::port36_r )
{
if BIT(m_port34, 5)
{
if BIT(m_p_attribram[m_alpha_address & 0x7ff], 7)
return m_p_videoram[m_alpha_address];
else
return m_p_videoram[m_graph_address];
}
else
return m_p_attribram[m_alpha_address & 0x7ff];
}
READ8_MEMBER( aussiebyte_state::port37_r )
{
return m_crtc->de_r() ? 0xff : 0xfe;
}
/***********************************************************
Video
************************************************************/
MC6845_ON_UPDATE_ADDR_CHANGED( aussiebyte_state::crtc_update_addr )
{
/* not sure what goes in here - parameters passed are device, address, strobe */
// m_video_address = address;// & 0x7ff;
}
WRITE8_MEMBER( aussiebyte_state::address_w )
{
m_crtc->address_w( space, 0, data );
m_video_index = data & 0x1f;
if (m_video_index == 31)
{
m_alpha_address++;
m_alpha_address &= 0x3fff;
m_graph_address = (m_alpha_address << 4) | (m_port34 & 15);
if BIT(m_port34, 5)
{
if BIT(m_p_attribram[m_alpha_address & 0x7ff], 7)
m_p_videoram[m_alpha_address] = m_port35;
else
m_p_videoram[m_graph_address] = m_port35;
}
else
m_p_attribram[m_alpha_address & 0x7ff] = m_port35;
}
}
WRITE8_MEMBER( aussiebyte_state::register_w )
{
m_crtc->register_w( space, 0, data );
UINT16 temp = m_alpha_address;
// Get transparent address
if (m_video_index == 18)
m_alpha_address = (data << 8 ) | (temp & 0xff);
else
if (m_video_index == 19)
m_alpha_address = data | (temp & 0xff00);
}
UINT8 aussiebyte_state::crt8002(UINT8 ac_ra, UINT8 ac_chr, UINT8 ac_attr, UINT16 ac_cnt, bool ac_curs)
{
UINT8 gfx = 0;
switch (ac_attr & 3)
{
case 0: // lores gfx
switch (ac_ra)
{
case 0:
case 1:
case 2:
gfx = (BIT(ac_chr, 7) ? 0xf8 : 0) | (BIT(ac_chr, 3) ? 7 : 0);
break;
case 3:
case 4:
case 5:
gfx = (BIT(ac_chr, 6) ? 0xf8 : 0) | (BIT(ac_chr, 2) ? 7 : 0);
break;
case 6:
case 7:
case 8:
gfx = (BIT(ac_chr, 5) ? 0xf8 : 0) | (BIT(ac_chr, 1) ? 7 : 0);
break;
default:
gfx = (BIT(ac_chr, 4) ? 0xf8 : 0) | (BIT(ac_chr, 0) ? 7 : 0);
break;
}
break;
case 1: // external mode
gfx = BITSWAP8(ac_chr, 0,1,2,3,4,5,6,7);
break;
case 2: // thin gfx
break;
case 3: // alpha
gfx = m_p_chargen[((ac_chr & 0x7f)<<4) | ac_ra];
break;
}
if (BIT(ac_attr, 3) & (ac_ra == 11)) // underline
gfx = 0xff;
if (BIT(ac_attr, 2) & ((ac_ra == 5) | (ac_ra == 6))) // strike-through
gfx = 0xff;
if (BIT(ac_attr, 6) & BIT(ac_cnt, 13)) // flash
gfx = 0;
if BIT(ac_attr, 5) // blank
gfx = 0;
if (ac_curs & BIT(ac_cnt, 14)) // cursor
gfx ^= 0xff;
if BIT(ac_attr, 4) // reverse video
gfx ^= 0xff;
return gfx;
}
MC6845_UPDATE_ROW( aussiebyte_state::crtc_update_row )
{
const rgb_t *palette = m_palette->palette()->entry_list_raw();
UINT8 chr,gfx,attr;
UINT16 mem,x;
UINT32 *p = &bitmap.pix32(y);
ra &= 15;
m_cnt++;
for (x = 0; x < x_count; x++)
{
mem = ma + x;
attr = m_p_attribram[mem & 0x7ff];
if BIT(attr, 7)
chr = m_p_videoram[mem & 0x3fff]; // alpha
else
chr = m_p_videoram[(mem << 4) | ra]; // gfx
gfx = crt8002(ra, chr, attr, m_cnt, (x==cursor_x));
/* 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)];
}
}