Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-07-05 09:57:47 +03:00
Code Issues Actions 33 Packages Projects Releases Wiki Activity

Nascom: Add support for the selectable restart address (set to E000H to

Browse Source 
automatically start up BASIC for example)
This commit is contained in:
Dirk Best 2015-05-19 10:22:45 +02:00
parent b5d9c0396b
commit d06646c93d
1 changed files with 36 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
src/mess/drivers/nascom1.c
View File

@ -106,7 +106,8 @@ public:
nascom_state(mconfig, type, tag), nascom_state(mconfig, type, tag),
m_nasbus(*this, "nasbus"), m_nasbus(*this, "nasbus"),
m_socket1(*this, "socket1"), m_socket1(*this, "socket1"),
m_socket2(*this, "socket2") m_socket2(*this, "socket2"),
m_lsw1(*this, "lsw1")
{} {}
DECLARE_WRITE_LINE_MEMBER(ram_disable_w); DECLARE_WRITE_LINE_MEMBER(ram_disable_w);
@ -118,10 +119,14 @@ public:
DECLARE_DEVICE_IMAGE_LOAD_MEMBER(socket1_load) { return load_cart(image, m_socket1, 1); } DECLARE_DEVICE_IMAGE_LOAD_MEMBER(socket1_load) { return load_cart(image, m_socket1, 1); }
DECLARE_DEVICE_IMAGE_LOAD_MEMBER(socket2_load) { return load_cart(image, m_socket2, 2); } DECLARE_DEVICE_IMAGE_LOAD_MEMBER(socket2_load) { return load_cart(image, m_socket2, 2); }
protected:
virtual void machine_reset();
private: private:
required_device<nasbus_device> m_nasbus; required_device<nasbus_device> m_nasbus;
required_device<generic_slot_device> m_socket1; required_device<generic_slot_device> m_socket1;
required_device<generic_slot_device> m_socket2; required_device<generic_slot_device> m_socket2;
required_ioport m_lsw1;
}; };
@ -335,6 +340,15 @@ DRIVER_INIT_MEMBER( nascom_state, nascom )
} }
} }
void nascom2_state::machine_reset()
{
// base machine reset
nascom_state::machine_reset();
// restart address (on the real system, a12 to a15 are forced to 1 for one memory cycle)
m_maincpu->set_state_int(Z80_PC, m_lsw1->read() << 12);
}
DRIVER_INIT_MEMBER( nascom2_state, nascom ) DRIVER_INIT_MEMBER( nascom2_state, nascom )
{ {
nascom_state::init_nascom(); nascom_state::init_nascom();
@ -547,6 +561,27 @@ static INPUT_PORTS_START( nascom2 )
PORT_MODIFY("KEY.8") PORT_MODIFY("KEY.8")
PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Back CS") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR(8) PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Back CS") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR(8)
PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Enter Escape") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13) PORT_CHAR(27) PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Enter Escape") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13) PORT_CHAR(27)
// link switch on board
PORT_START("lsw1")
PORT_DIPNAME(0x0f, 0x00, "Restart address")
PORT_DIPLOCATION("LSW1:2,3,4,5")
PORT_DIPSETTING(0x00, "0000H")
PORT_DIPSETTING(0x01, "1000H")
PORT_DIPSETTING(0x02, "2000H")
PORT_DIPSETTING(0x03, "3000H")
PORT_DIPSETTING(0x04, "4000H")
PORT_DIPSETTING(0x05, "5000H")
PORT_DIPSETTING(0x06, "6000H")
PORT_DIPSETTING(0x07, "7000H")
PORT_DIPSETTING(0x08, "8000H")
PORT_DIPSETTING(0x09, "9000H")
PORT_DIPSETTING(0x0a, "A000H")
PORT_DIPSETTING(0x0b, "B000H")
PORT_DIPSETTING(0x0c, "C000H")
PORT_DIPSETTING(0x0d, "D000H")
PORT_DIPSETTING(0x0e, "E000H")
PORT_DIPSETTING(0x0f, "F000H")
INPUT_PORTS_END INPUT_PORTS_END