Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-07-01 08:18:59 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

(nw) pegasus: clean

Browse Source
This commit is contained in:
Robbbert 2020-06-06 22:41:41 +10:00
parent 76afd29f5b
commit f5db4e11e7
2 changed files with 58 additions and 58 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

114
src/mame/drivers/pegasus.cpp
View File

@ -64,10 +64,9 @@ public:
, m_exp_02(*this, "exp02") , m_exp_02(*this, "exp02")
, m_exp_0c(*this, "exp0c") , m_exp_0c(*this, "exp0c")
, m_exp_0d(*this, "exp0d") , m_exp_0d(*this, "exp0d")
, m_p_videoram(*this, "videoram") , m_vram(*this, "videoram")
, m_p_chargen(*this, "chargen") , m_p_chargen(*this, "chargen")
, m_p_pcgram(*this, "pcg") , m_io_keyboard(*this, "KEY.%u", 0U)
, m_io_keyboard(*this, "KEY.%u", 0)
{ } { }
void pegasusm(machine_config &config); void pegasusm(machine_config &config);
@ -76,17 +75,17 @@ public:
void init_pegasus(); void init_pegasus();
private: private:
uint8_t pegasus_keyboard_r(); u8 pegasus_keyboard_r();
uint8_t pegasus_protection_r(); u8 pegasus_protection_r();
uint8_t pegasus_pcg_r(offs_t offset); u8 pegasus_pcg_r(offs_t offset);
void pegasus_controls_w(uint8_t data); void pegasus_controls_w(u8 data);
void pegasus_keyboard_w(uint8_t data); void pegasus_keyboard_w(u8 data);
void pegasus_pcg_w(offs_t offset, uint8_t data); void pegasus_pcg_w(offs_t offset, u8 data);
DECLARE_READ_LINE_MEMBER(pegasus_keyboard_irq); DECLARE_READ_LINE_MEMBER(pegasus_keyboard_irq);
DECLARE_READ_LINE_MEMBER(pegasus_cassette_r); DECLARE_READ_LINE_MEMBER(pegasus_cassette_r);
DECLARE_WRITE_LINE_MEMBER(pegasus_cassette_w); DECLARE_WRITE_LINE_MEMBER(pegasus_cassette_w);
DECLARE_WRITE_LINE_MEMBER(pegasus_firq_clr); DECLARE_WRITE_LINE_MEMBER(pegasus_firq_clr);
uint32_t screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); u32 screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
TIMER_DEVICE_CALLBACK_MEMBER(pegasus_firq); TIMER_DEVICE_CALLBACK_MEMBER(pegasus_firq);
image_init_result load_cart(device_image_interface &image, generic_slot_device *slot, const char *reg_tag); image_init_result load_cart(device_image_interface &image, generic_slot_device *slot, const char *reg_tag);
DECLARE_DEVICE_IMAGE_LOAD_MEMBER(exp00_load) { return load_cart(image, m_exp_00, "0000"); } DECLARE_DEVICE_IMAGE_LOAD_MEMBER(exp00_load) { return load_cart(image, m_exp_00, "0000"); }
@ -98,12 +97,13 @@ private:
void pegasus_mem(address_map &map); void pegasus_mem(address_map &map);
void pegasusm_mem(address_map &map); void pegasusm_mem(address_map &map);
uint8_t m_kbd_row; u8 m_kbd_row;
bool m_kbd_irq; bool m_kbd_irq;
uint8_t m_control_bits; u8 m_control_bits;
virtual void machine_reset() override; virtual void machine_reset() override;
virtual void machine_start() override; virtual void machine_start() override;
void pegasus_decrypt_rom(uint8_t *ROM); std::unique_ptr<u8[]> m_pcg;
void pegasus_decrypt_rom(u8 *ROM);
required_device<cpu_device> m_maincpu; required_device<cpu_device> m_maincpu;
required_device<cassette_image_device> m_cass; required_device<cassette_image_device> m_cass;
required_device<pia6821_device> m_pia_s; required_device<pia6821_device> m_pia_s;
@ -113,9 +113,8 @@ private:
required_device<generic_slot_device> m_exp_02; required_device<generic_slot_device> m_exp_02;
required_device<generic_slot_device> m_exp_0c; required_device<generic_slot_device> m_exp_0c;
required_device<generic_slot_device> m_exp_0d; required_device<generic_slot_device> m_exp_0d;
required_shared_ptr<uint8_t> m_p_videoram; required_shared_ptr<u8> m_vram;
required_region_ptr<u8> m_p_chargen; required_region_ptr<u8> m_p_chargen;
required_region_ptr<u8> m_p_pcgram;
required_ioport_array<8> m_io_keyboard; required_ioport_array<8> m_io_keyboard;
}; };
@ -129,9 +128,9 @@ WRITE_LINE_MEMBER( pegasus_state::pegasus_firq_clr )
m_maincpu->set_input_line(M6809_FIRQ_LINE, CLEAR_LINE); m_maincpu->set_input_line(M6809_FIRQ_LINE, CLEAR_LINE);
} }
uint8_t pegasus_state::pegasus_keyboard_r() u8 pegasus_state::pegasus_keyboard_r()
{ {
uint8_t i,data = 0xff; u8 i,data = 0xff;
for (i = 0; i < 8; i++) for (i = 0; i < 8; i++)
if (!BIT(m_kbd_row, i)) data &= m_io_keyboard[i]->read(); if (!BIT(m_kbd_row, i)) data &= m_io_keyboard[i]->read();
@ -141,12 +140,12 @@ uint8_t pegasus_state::pegasus_keyboard_r()
return data; return data;
} }
void pegasus_state::pegasus_keyboard_w(uint8_t data) void pegasus_state::pegasus_keyboard_w(u8 data)
{ {
m_kbd_row = data; m_kbd_row = data;
} }
void pegasus_state::pegasus_controls_w(uint8_t data) void pegasus_state::pegasus_controls_w(u8 data)
{ {
/* d0,d2 - not emulated /* d0,d2 - not emulated
d0 - Blank - Video blanking d0 - Blank - Video blanking
@ -173,25 +172,25 @@ WRITE_LINE_MEMBER( pegasus_state::pegasus_cassette_w )
m_cass->output(state ? 1 : -1); m_cass->output(state ? 1 : -1);
} }
uint8_t pegasus_state::pegasus_pcg_r(offs_t offset) u8 pegasus_state::pegasus_pcg_r(offs_t offset)
{ {
uint8_t code = m_p_videoram[offset] & 0x7f; u8 code = m_vram[offset] & 0x7f;
return m_p_pcgram[(code << 4) | (~m_kbd_row & 15)]; return m_pcg[(code << 4) | (~m_kbd_row & 15)];
} }
void pegasus_state::pegasus_pcg_w(offs_t offset, uint8_t data) void pegasus_state::pegasus_pcg_w(offs_t offset, u8 data)
{ {
// if (BIT(m_control_bits, 1)) // if (BIT(m_control_bits, 1))
{ {
uint8_t code = m_p_videoram[offset] & 0x7f; u8 code = m_vram[offset] & 0x7f;
m_p_pcgram[(code << 4) | (~m_kbd_row & 15)] = data; m_pcg[(code << 4) | (~m_kbd_row & 15)] = data;
} }
} }
/* Must return the A register except when it is doing a rom search */ /* Must return the A register except when it is doing a rom search */
uint8_t pegasus_state::pegasus_protection_r() u8 pegasus_state::pegasus_protection_r()
{ {
uint8_t data = m_maincpu->state_int(M6809_A); u8 data = m_maincpu->state_int(M6809_A);
if (data == 0x20) data = 0xff; if (data == 0x20) data = 0xff;
return data; return data;
} }
@ -207,7 +206,7 @@ void pegasus_state::pegasus_mem(address_map &map)
map(0xe200, 0xe3ff).rw(FUNC(pegasus_state::pegasus_pcg_r), FUNC(pegasus_state::pegasus_pcg_w)); map(0xe200, 0xe3ff).rw(FUNC(pegasus_state::pegasus_pcg_r), FUNC(pegasus_state::pegasus_pcg_w));
map(0xe400, 0xe403).mirror(0x1fc).rw(m_pia_u, FUNC(pia6821_device::read), FUNC(pia6821_device::write)); map(0xe400, 0xe403).mirror(0x1fc).rw(m_pia_u, FUNC(pia6821_device::read), FUNC(pia6821_device::write));
map(0xe600, 0xe603).mirror(0x1fc).rw(m_pia_s, FUNC(pia6821_device::read), FUNC(pia6821_device::write)); map(0xe600, 0xe603).mirror(0x1fc).rw(m_pia_s, FUNC(pia6821_device::read), FUNC(pia6821_device::write));
map(0xf000, 0xffff).rom(); map(0xf000, 0xffff).rom().region("maincpu", 0);
} }
void pegasus_state::pegasusm_mem(address_map &map) void pegasus_state::pegasusm_mem(address_map &map)
@ -300,7 +299,7 @@ static INPUT_PORTS_START( pegasus )
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("{ }") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR('{') PORT_CHAR('}') PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("{ }") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR('{') PORT_CHAR('}')
INPUT_PORTS_END INPUT_PORTS_END
static const uint8_t mcm6571a_shift[] = static const u8 mcm6571a_shift[] =
{ {
0,1,1,0,0,0,1,0,0,0,0,1,0,0,0,0, 0,1,1,0,0,0,1,0,0,0,0,1,0,0,0,0,
1,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0, 1,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,
@ -313,22 +312,22 @@ static const uint8_t mcm6571a_shift[] =
}; };
uint32_t pegasus_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) u32 pegasus_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{ {
uint8_t y,ra,chr,gfx,inv; u8 y,ra,chr,gfx,inv;
uint16_t sy=0,ma=0,x; u16 sy=0,ma=0,x;
bool pcg_mode = BIT(m_control_bits, 1); bool pcg_mode = BIT(m_control_bits, 1);
for(y = 0; y < 16; y++ ) for(y = 0; y < 16; y++ )
{ {
for(ra = 0; ra < 16; ra++ ) for(ra = 0; ra < 16; ra++ )
{ {
uint16_t *p = &bitmap.pix16(sy++); u16 *p = &bitmap.pix16(sy++);
for(x = ma; x < ma + 32; x++ ) for(x = ma; x < ma + 32; x++ )
{ {
inv = 0xff; inv = 0xff;
chr = m_p_videoram[x]; chr = m_vram[x];
if (BIT(chr, 7)) if (BIT(chr, 7))
{ {
@ -338,7 +337,7 @@ uint32_t pegasus_state::screen_update(screen_device &screen, bitmap_ind16 &bitma
if (pcg_mode) if (pcg_mode)
{ {
gfx = m_p_pcgram[(chr << 4) | ra] ^ inv; gfx = m_pcg[(chr << 4) | ra] ^ inv;
} }
else else
if (mcm6571a_shift[chr]) if (mcm6571a_shift[chr])
@ -388,19 +387,19 @@ static const gfx_layout pegasus_charlayout =
static GFXDECODE_START( gfx_pegasus ) static GFXDECODE_START( gfx_pegasus )
GFXDECODE_ENTRY( "chargen", 0x0000, pegasus_charlayout, 0, 1 ) GFXDECODE_ENTRY( "chargen", 0x0000, pegasus_charlayout, 0, 1 )
GFXDECODE_ENTRY( "pcg", 0x0000, pegasus_charlayout, 0, 1 ) //GFXDECODE_ENTRY( "pcg", 0x0000, pegasus_charlayout, 0, 1 )
GFXDECODE_END GFXDECODE_END
// An encrypted single rom starts with 02, decrypted with 20. // An encrypted single rom starts with 02, decrypted with 20.
// The 2nd and 3rd part of a multi-rom set will have no obvious byte, // The 2nd and 3rd part of a multi-rom set will have no obvious byte,
// so we check the first 4 bytes for a signature, and decrypt if found. // so we check the first 4 bytes for a signature, and decrypt if found.
void pegasus_state::pegasus_decrypt_rom(uint8_t *ROM) void pegasus_state::pegasus_decrypt_rom(u8 *ROM)
{ {
bool doit = false; bool doit = false;
uint8_t b; u8 b;
uint16_t j; u16 j;
std::vector<uint8_t> temp_copy; std::vector<u8> temp_copy;
temp_copy.resize(0x1000); temp_copy.resize(0x1000);
if (ROM[0] == 0x02) doit = true; if (ROM[0] == 0x02) doit = true;
@ -424,7 +423,7 @@ void pegasus_state::pegasus_decrypt_rom(uint8_t *ROM)
image_init_result pegasus_state::load_cart(device_image_interface &image, generic_slot_device *slot, const char *reg_tag) image_init_result pegasus_state::load_cart(device_image_interface &image, generic_slot_device *slot, const char *reg_tag)
{ {
uint32_t size = slot->common_get_size(reg_tag); u32 size = slot->common_get_size(reg_tag);
bool any_socket = false; bool any_socket = false;
if (size > 0x1000) if (size > 0x1000)
@ -471,6 +470,11 @@ void pegasus_state::machine_start()
m_maincpu->space(AS_PROGRAM).install_read_handler(0xc000, 0xcfff, read8sm_delegate(*m_exp_0c, FUNC(generic_slot_device::read_rom))); m_maincpu->space(AS_PROGRAM).install_read_handler(0xc000, 0xcfff, read8sm_delegate(*m_exp_0c, FUNC(generic_slot_device::read_rom)));
if (m_exp_0d->exists()) if (m_exp_0d->exists())
m_maincpu->space(AS_PROGRAM).install_read_handler(0xd000, 0xdfff, read8sm_delegate(*m_exp_0d, FUNC(generic_slot_device::read_rom))); m_maincpu->space(AS_PROGRAM).install_read_handler(0xd000, 0xdfff, read8sm_delegate(*m_exp_0d, FUNC(generic_slot_device::read_rom)));
m_pcg = make_unique_clear<u8[]>(0x0800);
save_pointer(NAME(m_pcg), 0x0800);
save_item(NAME(m_kbd_row));
save_item(NAME(m_kbd_irq));
save_item(NAME(m_control_bits));
} }
void pegasus_state::machine_reset() void pegasus_state::machine_reset()
@ -483,7 +487,7 @@ void pegasus_state::machine_reset()
void pegasus_state::init_pegasus() void pegasus_state::init_pegasus()
{ {
// decrypt monitor // decrypt monitor
uint8_t *base = memregion("maincpu")->base() + 0xf000; u8 *base = memregion("maincpu")->base();
pegasus_decrypt_rom(base); pegasus_decrypt_rom(base);
} }
@ -548,28 +552,26 @@ void pegasus_state::pegasusm(machine_config &config)
/* ROM definition */ /* ROM definition */
ROM_START( pegasus ) ROM_START( pegasus )
ROM_REGION( 0x10000, "maincpu", ROMREGION_ERASEFF ) ROM_REGION( 0x1000, "maincpu", ROMREGION_ERASEFF )
ROM_SYSTEM_BIOS(0, "11r2674", "Monitor 1.1 r2674") ROM_SYSTEM_BIOS(0, "11r2674", "Monitor 1.1 r2674")
ROMX_LOAD( "mon11_2674.bin", 0xf000, 0x1000, CRC(1640ff7e) SHA1(8199643749fb40fb8be05e9f311c75620ca939b1), ROM_BIOS(0) ) ROMX_LOAD( "mon11_2674.bin", 0x0000, 0x1000, CRC(1640ff7e) SHA1(8199643749fb40fb8be05e9f311c75620ca939b1), ROM_BIOS(0) )
ROM_SYSTEM_BIOS(1, "10r2569", "Monitor 1.0 r2569") ROM_SYSTEM_BIOS(1, "10r2569", "Monitor 1.0 r2569")
ROMX_LOAD( "mon10_2569.bin", 0xf000, 0x1000, CRC(910fc930) SHA1(a4f6bbe5def0268cc49ee7045616a39017dd8052), ROM_BIOS(1) ) ROMX_LOAD( "mon10_2569.bin", 0x0000, 0x1000, CRC(910fc930) SHA1(a4f6bbe5def0268cc49ee7045616a39017dd8052), ROM_BIOS(1) )
ROM_SYSTEM_BIOS(2, "11r2569", "Monitor 1.1 r2569") ROM_SYSTEM_BIOS(2, "11r2569", "Monitor 1.1 r2569")
ROMX_LOAD( "mon11_2569.bin", 0xf000, 0x1000, CRC(07b92002) SHA1(3c434601120870c888944ecd9ade5186432ddbc2), ROM_BIOS(2) ) ROMX_LOAD( "mon11_2569.bin", 0x0000, 0x1000, CRC(07b92002) SHA1(3c434601120870c888944ecd9ade5186432ddbc2), ROM_BIOS(2) )
ROM_SYSTEM_BIOS(3, "11r2669", "Monitor 1.1 r2669") ROM_SYSTEM_BIOS(3, "11r2669", "Monitor 1.1 r2669")
ROMX_LOAD( "mon11_2669.bin", 0xf000, 0x1000, CRC(f3ee23c8) SHA1(3ac96935668f5e53799c90db5140393c2ef9ce36), ROM_BIOS(3) ) ROMX_LOAD( "mon11_2669.bin", 0x0000, 0x1000, CRC(f3ee23c8) SHA1(3ac96935668f5e53799c90db5140393c2ef9ce36), ROM_BIOS(3) )
ROM_SYSTEM_BIOS(4, "22r2856", "Monitor 2.2 r2856") ROM_SYSTEM_BIOS(4, "22r2856", "Monitor 2.2 r2856")
ROMX_LOAD( "mon22_2856.bin", 0xf000, 0x1000, CRC(5f5f688a) SHA1(3719eecc347e158dd027ea7aa8a068cdafc00d9b), ROM_BIOS(4) ) ROMX_LOAD( "mon22_2856.bin", 0x0000, 0x1000, CRC(5f5f688a) SHA1(3719eecc347e158dd027ea7aa8a068cdafc00d9b), ROM_BIOS(4) )
ROM_SYSTEM_BIOS(5, "22br2856", "Monitor 2.2B r2856") ROM_SYSTEM_BIOS(5, "22br2856", "Monitor 2.2B r2856")
ROMX_LOAD( "mon22b_2856.bin", 0xf000, 0x1000, CRC(a47b0308) SHA1(f215e51aa8df6aed99c10f3df6a3589cb9f63d46), ROM_BIOS(5) ) ROMX_LOAD( "mon22b_2856.bin", 0x0000, 0x1000, CRC(a47b0308) SHA1(f215e51aa8df6aed99c10f3df6a3589cb9f63d46), ROM_BIOS(5) )
ROM_SYSTEM_BIOS(6, "23r2601", "Monitor 2.3 r2601") ROM_SYSTEM_BIOS(6, "23r2601", "Monitor 2.3 r2601")
ROMX_LOAD( "mon23_2601.bin", 0xf000, 0x1000, CRC(0e024222) SHA1(9950cba08996931b9d5a3368b44c7309638b4e08), ROM_BIOS(6) ) ROMX_LOAD( "mon23_2601.bin", 0x0000, 0x1000, CRC(0e024222) SHA1(9950cba08996931b9d5a3368b44c7309638b4e08), ROM_BIOS(6) )
ROM_SYSTEM_BIOS(7, "23ar2569", "Monitor 2.3A r2569") ROM_SYSTEM_BIOS(7, "23ar2569", "Monitor 2.3A r2569")
ROMX_LOAD( "mon23a_2569.bin", 0xf000, 0x1000, CRC(248e62c9) SHA1(adbde27e69b38b29ff89bacf28d0240a8e5d90f3), ROM_BIOS(7) ) ROMX_LOAD( "mon23a_2569.bin", 0x0000, 0x1000, CRC(248e62c9) SHA1(adbde27e69b38b29ff89bacf28d0240a8e5d90f3), ROM_BIOS(7) )
ROM_REGION( 0x800, "chargen", 0 ) ROM_REGION( 0x0800, "chargen", 0 )
ROM_LOAD( "6571.bin", 0x0000, 0x0800, CRC(5a25144b) SHA1(7b9fee0c8ef2605b85d12b6d9fe8feb82418c63a) ) ROM_LOAD( "6571.bin", 0x0000, 0x0800, CRC(5a25144b) SHA1(7b9fee0c8ef2605b85d12b6d9fe8feb82418c63a) )
ROM_REGION( 0x800, "pcg", ROMREGION_ERASEFF )
ROM_END ROM_END
#define rom_pegasusm rom_pegasus #define rom_pegasusm rom_pegasus
@ -577,5 +579,5 @@ ROM_END
/* Driver */ /* Driver */
// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS // YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS
COMP( 1981, pegasus, 0, 0, pegasus, pegasus, pegasus_state, init_pegasus, "Technosys", "Aamber Pegasus", MACHINE_NO_SOUND_HW ) COMP( 1981, pegasus, 0, 0, pegasus, pegasus, pegasus_state, init_pegasus, "Technosys", "Aamber Pegasus", MACHINE_NO_SOUND_HW | MACHINE_SUPPORTS_SAVE )
COMP( 1981, pegasusm, pegasus, 0, pegasusm, pegasus, pegasus_state, init_pegasus, "Technosys", "Aamber Pegasus with RAM expansion unit", MACHINE_NO_SOUND_HW ) COMP( 1981, pegasusm, pegasus, 0, pegasusm, pegasus, pegasus_state, init_pegasus, "Technosys", "Aamber Pegasus with RAM expansion unit", MACHINE_NO_SOUND_HW | MACHINE_SUPPORTS_SAVE )

2
src/mame/drivers/ptcsol.cpp
View File

@ -174,8 +174,6 @@ public:
void sol20(machine_config &config); void sol20(machine_config &config);
void init_sol20();
private: private:
enum enum
{ {