trunk/src/mame/drivers/royalmah.c
| r26297 | r26298 | |
|---|
| 127 | 127 | UINT8 m_flip_screen; |
| 128 | 128 | |
| 129 | 129 | DECLARE_WRITE8_MEMBER(royalmah_palbank_w); |
| 130 | | DECLARE_WRITE8_MEMBER(jansou_palbank_w); |
| 131 | 130 | DECLARE_WRITE8_MEMBER(mjderngr_coin_w); |
| 132 | 131 | DECLARE_WRITE8_MEMBER(mjderngr_palbank_w); |
| 133 | 132 | DECLARE_WRITE8_MEMBER(royalmah_rom_w); |
| r26297 | r26298 | |
|---|
| 777 | 776 | m_audiocpu->set_input_line(INPUT_LINE_NMI, PULSE_LINE); |
| 778 | 777 | } |
| 779 | 778 | |
| 780 | | WRITE8_MEMBER(royalmah_state::jansou_palbank_w) |
| 781 | | { |
| 782 | | m_flip_screen = ((data & 4) >> 2) ^ 1; |
| 783 | | coin_counter_w(machine(), 0,data & 2); // in |
| 784 | | coin_counter_w(machine(), 1,data & 1); // out |
| 785 | | } |
| 786 | | |
| 787 | 779 | static ADDRESS_MAP_START( jansou_map, AS_PROGRAM, 8, royalmah_state ) |
| 788 | 780 | AM_RANGE( 0x0000, 0x3fff ) AM_ROM |
| 789 | 781 | |
| r26297 | r26298 | |
|---|
| 802 | 794 | AM_RANGE( 0x8000, 0xffff ) AM_WRITEONLY AM_SHARE("videoram") |
| 803 | 795 | ADDRESS_MAP_END |
| 804 | 796 | |
| 805 | | static ADDRESS_MAP_START( jansou_iomap, AS_IO, 8, royalmah_state ) |
| 806 | | ADDRESS_MAP_GLOBAL_MASK(0xff) |
| 807 | | AM_RANGE( 0x10, 0x10 ) AM_READ_PORT("DSW1") AM_WRITE(jansou_palbank_w) |
| 808 | | AM_IMPORT_FROM( royalmah_iomap ) |
| 809 | | ADDRESS_MAP_END |
| 810 | | |
| 811 | | |
| 812 | 797 | static ADDRESS_MAP_START( jansou_sub_map, AS_PROGRAM, 8, royalmah_state ) |
| 813 | 798 | AM_RANGE( 0x0000, 0xffff ) AM_ROM AM_WRITENOP // tries to write to the stack at irq generation |
| 814 | 799 | ADDRESS_MAP_END |
| r26297 | r26298 | |
|---|
| 3282 | 3267 | |
| 3283 | 3268 | MCFG_CPU_MODIFY("maincpu") |
| 3284 | 3269 | MCFG_CPU_PROGRAM_MAP(jansou_map) |
| 3285 | | MCFG_CPU_IO_MAP(jansou_iomap) |
| 3270 | MCFG_CPU_IO_MAP(royalmah_iomap) |
| 3286 | 3271 | |
| 3287 | 3272 | MCFG_CPU_ADD("audiocpu", Z80, 4000000) /* 4.000 MHz */ |
| 3288 | 3273 | MCFG_CPU_PROGRAM_MAP(jansou_sub_map) |
| r26297 | r26298 | |
|---|
| 4802 | 4787 | GAME( 1981, janputer, 0, royalmah, royalmah, driver_device, 0, ROT0, "bootleg (Public Software Ltd. / Mes)", "New Double Bet Mahjong (bootleg of Janputer)", 0 ) // the original Janputer (Sanritsu) is not yet dumped |
| 4803 | 4788 | GAME( 1984, janoh, 0, royalmah, royalmah, driver_device, 0, ROT0, "Toaplan", "Jan Oh (set 1)", GAME_NOT_WORKING ) |
| 4804 | 4789 | GAME( 1984, janoha, janoh, janoh, royalmah, driver_device, 0, ROT0, "Toaplan", "Jan Oh (set 2)", GAME_NOT_WORKING ) // this one is complete? |
| 4805 | | GAME( 1985, jansou, 0, jansou, jansou, driver_device, 0, ROT180, "Dyna", "Jansou (set 1)", GAME_NOT_WORKING|GAME_NO_SOUND ) |
| 4806 | | GAME( 1985, jansoua, jansou, jansou, jansou, driver_device, 0, ROT180, "Dyna", "Jansou (set 2)", 0 ) |
| 4790 | GAME( 1985, jansou, 0, jansou, jansou, driver_device, 0, ROT0, "Dyna", "Jansou (set 1)", GAME_NOT_WORKING|GAME_NO_SOUND ) |
| 4791 | GAME( 1985, jansoua, jansou, jansou, jansou, driver_device, 0, ROT0, "Dyna", "Jansou (set 2)", 0 ) |
| 4807 | 4792 | GAME( 1986, dondenmj, 0, dondenmj, majs101b, driver_device, 0, ROT0, "Dyna Electronics", "Don Den Mahjong [BET] (Japan)", 0 ) |
| 4808 | 4793 | GAME( 1986, ippatsu, 0, ippatsu, ippatsu, royalmah_state, ippatsu, ROT0, "Public Software / Paradais", "Ippatsu Gyakuten [BET] (Japan)", 0 ) |
| 4809 | 4794 | GAME( 1986, suzume, 0, suzume, suzume, driver_device, 0, ROT0, "Dyna Electronics", "Watashiha Suzumechan (Japan)", 0 ) |