trunk/src/mame/drivers/atari_s1.c
| r31813 | r31814 | |
| 1 | 1 | /*********************************************************************************** |
| 2 | 2 | |
| 3 | | Pinball |
| 3 | PINBALL |
| 4 | 4 | Atari Generation/System 1 |
| 5 | | These were the first widebody pinball machines. |
| 6 | 5 | |
| 7 | 6 | Schematics and PinMAME used as references. |
| 8 | 7 | |
| r31813 | r31814 | |
| 24 | 23 | SW2 Toggle 7 = 2005 |
| 25 | 24 | SW2 Toggle 8 = 2004 |
| 26 | 25 | |
| 26 | Until game-specific switches are set up, here is the outhole for each game: |
| 27 | - spcrider: O |
| 28 | - atarians: W |
| 29 | - time2000: Y |
| 30 | - aavenger: X |
| 31 | |
| 27 | 32 | ToDo: |
| 28 | 33 | - Inputs per game; the ones there are for Airborne Avenger |
| 29 | 34 | - Link up switches where 2 or more act together |
| 30 | 35 | - Sound |
| 31 | 36 | - Lamps, solenoids |
| 32 | | - There is an undumped PROM type 020252 (D12) in the sound circuit. |
| 37 | - Middle Earth is a disaster area |
| 33 | 38 | |
| 34 | 39 | |
| 35 | 40 | ************************************************************************************/ |
| 36 | 41 | |
| 37 | 42 | #include "machine/genpin.h" |
| 38 | 43 | #include "cpu/m6800/m6800.h" |
| 44 | #include "sound/dac.h" |
| 39 | 45 | #include "atari_s1.lh" |
| 40 | 46 | |
| 41 | 47 | |
| 42 | 48 | #define MASTER_CLK XTAL_4MHz / 4 |
| 43 | 49 | #define DMA_CLK MASTER_CLK / 2 |
| 44 | | //#define AUDIO_CLK DMA_CLK / 4 |
| 50 | #define AUDIO_CLK DMA_CLK / 4 |
| 45 | 51 | #define DMA_INT DMA_CLK / 128 |
| 46 | 52 | #define NMI_INT DMA_INT / 16 |
| 47 | 53 | //#define BIT6_CLK NMI_INT / 4 |
| r31813 | r31814 | |
| 50 | 56 | { |
| 51 | 57 | public: |
| 52 | 58 | atari_s1_state(const machine_config &mconfig, device_type type, const char *tag) |
| 53 | | : genpin_class(mconfig, type, tag), |
| 54 | | m_maincpu(*this, "maincpu"), |
| 55 | | m_p_ram(*this, "ram") |
| 59 | : genpin_class(mconfig, type, tag) |
| 60 | , m_maincpu(*this, "maincpu") |
| 61 | , m_p_ram(*this, "ram") |
| 62 | , m_dac(*this, "dac") |
| 56 | 63 | { } |
| 57 | 64 | |
| 65 | DECLARE_READ8_MEMBER(m1080_r); |
| 66 | DECLARE_WRITE8_MEMBER(m1080_w); |
| 67 | DECLARE_READ8_MEMBER(m1084_r); |
| 68 | DECLARE_WRITE8_MEMBER(m1084_w); |
| 69 | DECLARE_READ8_MEMBER(m1088_r); |
| 70 | DECLARE_WRITE8_MEMBER(m1088_w); |
| 71 | DECLARE_READ8_MEMBER(m108c_r); |
| 72 | DECLARE_WRITE8_MEMBER(m108c_w); |
| 58 | 73 | DECLARE_READ8_MEMBER(switch_r); |
| 59 | 74 | DECLARE_WRITE8_MEMBER(meter_w); |
| 60 | | DECLARE_WRITE8_MEMBER(audioen_w) {}; |
| 61 | | DECLARE_WRITE8_MEMBER(audiores_w) {}; |
| 62 | | |
| 75 | DECLARE_WRITE8_MEMBER(audioen_w); |
| 76 | DECLARE_WRITE8_MEMBER(audiores_w); |
| 77 | DECLARE_WRITE8_MEMBER(midearth_w); |
| 63 | 78 | TIMER_DEVICE_CALLBACK_MEMBER(nmi); |
| 64 | | |
| 65 | | protected: |
| 66 | | |
| 67 | | // devices |
| 68 | | required_device<cpu_device> m_maincpu; |
| 69 | | required_shared_ptr<UINT8> m_p_ram; |
| 70 | | |
| 71 | | // driver_device overrides |
| 72 | | virtual void machine_reset(); |
| 79 | TIMER_DEVICE_CALLBACK_MEMBER(timer_s); |
| 73 | 80 | private: |
| 81 | bool m_timer_sb; |
| 82 | bool m_audiores; |
| 83 | UINT8 m_timer_s[3]; |
| 84 | UINT8 m_vol; |
| 85 | UINT8 m_1080; |
| 86 | UINT8 m_1084; |
| 87 | UINT8 m_1088; |
| 88 | UINT8 m_108c; |
| 74 | 89 | UINT8 m_bit6; |
| 75 | 90 | UINT8 m_out_offs; |
| 76 | 91 | UINT8 m_t_c; |
| 92 | UINT8 *m_p_prom; |
| 93 | virtual void machine_reset(); |
| 94 | required_device<cpu_device> m_maincpu; |
| 95 | required_shared_ptr<UINT8> m_p_ram; |
| 96 | required_device<dac_device> m_dac; |
| 77 | 97 | }; |
| 78 | 98 | |
| 79 | 99 | static ADDRESS_MAP_START( atari_s1_map, AS_PROGRAM, 8, atari_s1_state ) |
| 80 | 100 | ADDRESS_MAP_GLOBAL_MASK(0x7fff) |
| 81 | | AM_RANGE(0x0000, 0x00ff) AM_MIRROR(0x1C00) AM_RAM AM_SHARE("ram") |
| 101 | AM_RANGE(0x0000, 0x00ff) AM_RAM AM_SHARE("ram") |
| 102 | AM_RANGE(0x1080, 0x1083) AM_READWRITE(m1080_r,m1080_w) |
| 103 | AM_RANGE(0x1084, 0x1087) AM_READWRITE(m1084_r,m1084_w) |
| 104 | AM_RANGE(0x1088, 0x108b) AM_READWRITE(m1088_r,m1088_w) |
| 105 | AM_RANGE(0x108c, 0x108f) AM_READWRITE(m108c_r,m108c_w) |
| 82 | 106 | AM_RANGE(0x2000, 0x204f) AM_MIRROR(0x0F80) AM_READ(switch_r) AM_WRITENOP // aavenger ROL 200B causes a spurious write |
| 83 | 107 | AM_RANGE(0x3000, 0x3fff) AM_WRITE(audioen_w) // audio enable |
| 84 | 108 | AM_RANGE(0x4000, 0x4fff) AM_WRITE(watchdog_reset_w) |
| r31813 | r31814 | |
| 89 | 113 | |
| 90 | 114 | static ADDRESS_MAP_START( atarians_map, AS_PROGRAM, 8, atari_s1_state ) // more ram |
| 91 | 115 | ADDRESS_MAP_GLOBAL_MASK(0x7fff) |
| 92 | | AM_RANGE(0x0000, 0x01ff) AM_MIRROR(0x1C00) AM_RAM AM_SHARE("ram") |
| 116 | AM_RANGE(0x0000, 0x01ff) AM_RAM AM_SHARE("ram") |
| 117 | AM_RANGE(0x1080, 0x1083) AM_READWRITE(m1080_r,m1080_w) |
| 118 | AM_RANGE(0x1084, 0x1087) AM_READWRITE(m1084_r,m1084_w) |
| 119 | AM_RANGE(0x1088, 0x108b) AM_READWRITE(m1088_r,m1088_w) |
| 120 | AM_RANGE(0x108c, 0x108f) AM_READWRITE(m108c_r,m108c_w) |
| 93 | 121 | AM_RANGE(0x2000, 0x204f) AM_MIRROR(0x0F80) AM_READ(switch_r) |
| 94 | 122 | AM_RANGE(0x3000, 0x3fff) AM_WRITE(audioen_w) // audio enable |
| 95 | 123 | AM_RANGE(0x4000, 0x4fff) AM_WRITE(watchdog_reset_w) |
| 124 | AM_RANGE(0x5080, 0x508c) AM_MIRROR(3) AM_WRITE(meter_w) // time2000 only |
| 96 | 125 | AM_RANGE(0x6000, 0x6fff) AM_WRITE(audiores_w) // audio reset |
| 97 | 126 | AM_RANGE(0x7000, 0x7fff) AM_ROM |
| 98 | 127 | ADDRESS_MAP_END |
| 99 | 128 | |
| 100 | 129 | static ADDRESS_MAP_START( midearth_map, AS_PROGRAM, 8, atari_s1_state ) |
| 101 | 130 | ADDRESS_MAP_GLOBAL_MASK(0x7fff) |
| 102 | | AM_RANGE(0x0000, 0x00ff) AM_MIRROR(0x1C00) AM_RAM AM_SHARE("ram") |
| 103 | | AM_RANGE(0x1100, 0x11ff) AM_WRITENOP |
| 131 | AM_RANGE(0x0000, 0x01ff) AM_RAM AM_SHARE("ram") |
| 132 | AM_RANGE(0x1000, 0x11ff) AM_WRITE(midearth_w) |
| 104 | 133 | AM_RANGE(0x2000, 0x204f) AM_MIRROR(0x0F80) AM_READ(switch_r) |
| 105 | 134 | AM_RANGE(0x3000, 0x3fff) AM_WRITE(audioen_w) // audio enable |
| 106 | 135 | AM_RANGE(0x4000, 0x4fff) AM_WRITE(watchdog_reset_w) |
| r31813 | r31814 | |
| 242 | 271 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_OTHER ) |
| 243 | 272 | INPUT_PORTS_END |
| 244 | 273 | |
| 245 | | void atari_s1_state::machine_reset() |
| 274 | READ8_MEMBER( atari_s1_state::m1080_r ) |
| 246 | 275 | { |
| 247 | | m_t_c = 0; |
| 276 | return m_1080 & 0xf0; |
| 248 | 277 | } |
| 249 | 278 | |
| 279 | WRITE8_MEMBER( atari_s1_state::m1080_w ) |
| 280 | { |
| 281 | m_1080 = data; |
| 282 | } |
| 283 | |
| 284 | READ8_MEMBER( atari_s1_state::m1084_r ) |
| 285 | { |
| 286 | return m_1084 & 0xf0; |
| 287 | } |
| 288 | |
| 289 | WRITE8_MEMBER( atari_s1_state::m1084_w ) |
| 290 | { |
| 291 | m_1084 = data; |
| 292 | |
| 293 | data &= 15; |
| 294 | |
| 295 | if (data != m_vol) |
| 296 | { |
| 297 | m_vol = data; |
| 298 | float vol = m_vol/16.666+0.1; |
| 299 | m_dac->set_output_gain(0, vol); |
| 300 | } |
| 301 | } |
| 302 | |
| 303 | READ8_MEMBER( atari_s1_state::m1088_r ) |
| 304 | { |
| 305 | return m_1088 & 0xf0; |
| 306 | } |
| 307 | |
| 308 | WRITE8_MEMBER( atari_s1_state::m1088_w ) |
| 309 | { |
| 310 | m_1088 = data; |
| 311 | } |
| 312 | |
| 313 | READ8_MEMBER( atari_s1_state::m108c_r ) |
| 314 | { |
| 315 | return m_108c; |
| 316 | } |
| 317 | |
| 318 | WRITE8_MEMBER( atari_s1_state::m108c_w ) |
| 319 | { |
| 320 | m_108c = data; |
| 321 | } |
| 322 | |
| 250 | 323 | WRITE8_MEMBER( atari_s1_state::meter_w ) |
| 251 | 324 | { |
| 252 | 325 | // time2000 has optional coin counters etc |
| 253 | 326 | } |
| 254 | 327 | |
| 328 | // midearth has a ram mirror that goes on top of the output ports |
| 329 | WRITE8_MEMBER( atari_s1_state::midearth_w ) |
| 330 | { |
| 331 | m_p_ram[offset] = data; |
| 332 | |
| 333 | switch (offset) |
| 334 | { |
| 335 | case 0x80: |
| 336 | m1080_w(space, 0, data); |
| 337 | break; |
| 338 | case 0x84: |
| 339 | m1084_w(space, 0, data); |
| 340 | break; |
| 341 | case 0x88: |
| 342 | m1088_w(space, 0, data); |
| 343 | break; |
| 344 | case 0x8c: |
| 345 | m108c_w(space, 0, data); |
| 346 | break; |
| 347 | } |
| 348 | } |
| 349 | |
| 255 | 350 | READ8_MEMBER( atari_s1_state::switch_r ) |
| 256 | 351 | { |
| 257 | 352 | char kbdrow[8]; |
| r31813 | r31814 | |
| 285 | 380 | } |
| 286 | 381 | } |
| 287 | 382 | |
| 383 | // Sound |
| 384 | // Presettable 74LS161 binary divider controlled by 1088:d0-3 |
| 385 | // Then a pair of 7493 to generate 5 address lines, enabled by audiores |
| 386 | // The address lines are merged with 1080:d0-3 to form a lookup on the prom |
| 387 | // Output of prom goes to a 4-bit DAC |
| 388 | // Volume is controlled by 1084:d0-3 |
| 389 | // Variables: |
| 390 | // m_timer_s[1] count in 74LS161 |
| 391 | // m_timer_s[2] count in 7493s |
| 392 | TIMER_DEVICE_CALLBACK_MEMBER( atari_s1_state::timer_s ) |
| 393 | { |
| 394 | m_timer_s[1]++; |
| 395 | |
| 396 | if (m_timer_s[1] > 15) |
| 397 | { |
| 398 | m_timer_s[1] = m_1088 & 15; // set to preset value |
| 399 | if (!m_audiores) |
| 400 | { |
| 401 | m_timer_s[2]++; |
| 402 | offs_t offs = (m_timer_s[2] & 31) | ((m_1080 & 15) << 5); |
| 403 | m_dac->write_unsigned8(m_p_prom[offs]<< 4); |
| 404 | } |
| 405 | else |
| 406 | m_timer_s[2] = 0; |
| 407 | } |
| 408 | } |
| 409 | |
| 410 | WRITE8_MEMBER( atari_s1_state::audioen_w ) |
| 411 | { |
| 412 | } |
| 413 | |
| 414 | WRITE8_MEMBER( atari_s1_state::audiores_w ) |
| 415 | { |
| 416 | if (data==0x5b) data=0; // spcrider |
| 417 | m_audiores = (data) ? 0 : 1; |
| 418 | } |
| 419 | |
| 420 | |
| 421 | void atari_s1_state::machine_reset() |
| 422 | { |
| 423 | m_p_prom = memregion("proms")->base(); |
| 424 | m_vol = 0; |
| 425 | m_t_c = 0; |
| 426 | m_audiores = 0; |
| 427 | } |
| 428 | |
| 288 | 429 | static MACHINE_CONFIG_START( atari_s1, atari_s1_state ) |
| 289 | 430 | /* basic machine hardware */ |
| 290 | 431 | MCFG_CPU_ADD("maincpu", M6800, MASTER_CLK) |
| 291 | 432 | MCFG_CPU_PROGRAM_MAP(atari_s1_map) |
| 292 | | MCFG_TIMER_DRIVER_ADD_PERIODIC("nmi", atari_s1_state, nmi, attotime::from_hz(NMI_INT)) |
| 293 | 433 | |
| 294 | 434 | /* Sound */ |
| 295 | 435 | MCFG_FRAGMENT_ADD( genpin_audio ) |
| 436 | MCFG_SPEAKER_STANDARD_MONO("mono") |
| 437 | MCFG_SOUND_ADD("dac", DAC, 0) |
| 438 | MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.60) |
| 296 | 439 | |
| 297 | 440 | /* Video */ |
| 298 | 441 | MCFG_DEFAULT_LAYOUT(layout_atari_s1) |
| 442 | |
| 443 | MCFG_TIMER_DRIVER_ADD_PERIODIC("nmi", atari_s1_state, nmi, attotime::from_hz(NMI_INT)) |
| 444 | MCFG_TIMER_DRIVER_ADD_PERIODIC("timer_s", atari_s1_state, timer_s, attotime::from_hz(AUDIO_CLK)) |
| 299 | 445 | MACHINE_CONFIG_END |
| 300 | 446 | |
| 301 | 447 | static MACHINE_CONFIG_DERIVED( atarians, atari_s1 ) |
| r31813 | r31814 | |
| 316 | 462 | ROM_LOAD("atarian.e00", 0x7000, 0x0800, CRC(6066bd63) SHA1(e993497d0ca9f056e18838494089def8bdc265c9)) |
| 317 | 463 | ROM_LOAD("atarian.e0", 0x7800, 0x0800, CRC(45cb0427) SHA1(e286930ca36bdd0f79acefd142d2a5431fa8005b)) |
| 318 | 464 | |
| 319 | | ROM_REGION(0x1000, "sound1", 0) |
| 465 | ROM_REGION(0x0200, "proms", 0) |
| 320 | 466 | ROM_LOAD("82s130.bin", 0x0000, 0x0200, CRC(da1f77b4) SHA1(b21fdc1c6f196c320ec5404013d672c35f95890b)) |
| 321 | 467 | ROM_END |
| 322 | 468 | |
| r31813 | r31814 | |
| 330 | 476 | ROM_LOAD("atarianb.e00", 0x7000, 0x0800, CRC(74fc86e4) SHA1(135d75e5c03feae0929fa84caa3c802353cdd94e)) |
| 331 | 477 | ROM_LOAD("atarian.e0", 0x7800, 0x0800, CRC(45cb0427) SHA1(e286930ca36bdd0f79acefd142d2a5431fa8005b)) |
| 332 | 478 | |
| 333 | | ROM_REGION(0x1000, "sound1", 0) |
| 479 | ROM_REGION(0x0200, "proms", 0) |
| 334 | 480 | ROM_LOAD("82s130.bin", 0x0000, 0x0200, CRC(da1f77b4) SHA1(b21fdc1c6f196c320ec5404013d672c35f95890b)) |
| 335 | 481 | ROM_END |
| 336 | 482 | #endif |
| r31813 | r31814 | |
| 344 | 490 | ROM_LOAD("time.e00", 0x7000, 0x0800, CRC(e380f35c) SHA1(f2b4c508c8b7a2ce9924da97c05fb31d5115f36f)) |
| 345 | 491 | ROM_LOAD("time.e0", 0x7800, 0x0800, CRC(1e79c133) SHA1(54ce5d59a00334fcec8b12c077d70e3629549af0)) |
| 346 | 492 | |
| 347 | | ROM_REGION(0x1000, "sound1", 0) |
| 493 | ROM_REGION(0x0200, "proms", 0) |
| 348 | 494 | ROM_LOAD("82s130.bin", 0x0000, 0x0200, CRC(da1f77b4) SHA1(b21fdc1c6f196c320ec5404013d672c35f95890b)) |
| 349 | 495 | ROM_END |
| 350 | 496 | |
| r31813 | r31814 | |
| 356 | 502 | ROM_LOAD("airborne.e00", 0x7000, 0x0800, CRC(05ac26b8) SHA1(114d587923ade9370d606e428af02a407d272c85)) |
| 357 | 503 | ROM_LOAD("airborne.e0", 0x7800, 0x0800, CRC(44e67c54) SHA1(7f94189c12e322c41908d651cf6a3b6061426959)) |
| 358 | 504 | |
| 359 | | ROM_REGION(0x1000, "sound1", 0) |
| 505 | ROM_REGION(0x0200, "proms", 0) |
| 360 | 506 | ROM_LOAD("82s130.bin", 0x0000, 0x0200, CRC(da1f77b4) SHA1(b21fdc1c6f196c320ec5404013d672c35f95890b)) |
| 361 | 507 | ROM_END |
| 362 | 508 | |
| r31813 | r31814 | |
| 368 | 514 | ROM_LOAD("609.bin", 0x7000, 0x0800, CRC(589df745) SHA1(4bd3e4f177e8d86bab41f3a14c169b936eeb480a)) |
| 369 | 515 | ROM_LOAD("608.bin", 0x7800, 0x0800, CRC(28b92faf) SHA1(8585770f4059049f1dcbc0c6ef5718b6ff1a5431)) |
| 370 | 516 | |
| 371 | | ROM_REGION(0x1000, "sound1", 0) |
| 517 | ROM_REGION(0x0200, "proms", 0) |
| 372 | 518 | ROM_LOAD("82s130.bin", 0x0000, 0x0200, CRC(da1f77b4) SHA1(b21fdc1c6f196c320ec5404013d672c35f95890b)) |
| 373 | 519 | ROM_END |
| 374 | 520 | |
| r31813 | r31814 | |
| 380 | 526 | ROM_LOAD("spacer.bin", 0x7000, 0x0800, CRC(3cf1cd73) SHA1(c46044fb815b439f12fb3e21c470c8b93ebdfd55)) |
| 381 | 527 | ROM_LOAD("spacel.bin", 0x7800, 0x0800, CRC(66ffb04e) SHA1(42d8b7fb7206b30478f631d0e947c0908dcf5419)) |
| 382 | 528 | |
| 383 | | ROM_REGION(0x1000, "sound1", 0) |
| 529 | ROM_REGION(0x0200, "proms", 0) |
| 384 | 530 | ROM_LOAD("82s130.bin", 0x0000, 0x0200, CRC(da1f77b4) SHA1(b21fdc1c6f196c320ec5404013d672c35f95890b)) |
| 385 | 531 | ROM_END |
| 386 | 532 | |
| 387 | 533 | |
| 388 | | GAME( 1976, atarians, 0, atarians, atari_s1, driver_device, 0, ROT0, "Atari", "The Atarians", GAME_MECHANICAL | GAME_NO_SOUND) |
| 534 | GAME( 1976, atarians, 0, atarians, atari_s1, driver_device, 0, ROT0, "Atari", "The Atarians", GAME_MECHANICAL | GAME_IMPERFECT_SOUND) |
| 389 | 535 | //GAME( 2002, atarianb, atarians, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari / Gaston", "The Atarians (working bootleg)", GAME_IS_SKELETON_MECHANICAL) |
| 390 | | GAME( 1977, time2000, 0, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari", "Time 2000", GAME_MECHANICAL | GAME_NO_SOUND) |
| 391 | | GAME( 1977, aavenger, 0, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari", "Airborne Avenger", GAME_MECHANICAL | GAME_NO_SOUND) |
| 536 | GAME( 1977, time2000, 0, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari", "Time 2000", GAME_MECHANICAL | GAME_IMPERFECT_SOUND) |
| 537 | GAME( 1977, aavenger, 0, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari", "Airborne Avenger", GAME_MECHANICAL | GAME_IMPERFECT_SOUND) |
| 392 | 538 | GAME( 1978, midearth, 0, midearth, atari_s1, driver_device, 0, ROT0, "Atari", "Middle Earth", GAME_IS_SKELETON_MECHANICAL) |
| 393 | | GAME( 1978, spcrider, 0, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari", "Space Riders", GAME_MECHANICAL | GAME_NO_SOUND) |
| 539 | GAME( 1978, spcrider, 0, atari_s1, atari_s1, driver_device, 0, ROT0, "Atari", "Space Riders", GAME_MECHANICAL | GAME_IMPERFECT_SOUND) |