trunk/src/emu/bus/a2bus/a2mockingboard.c
| r26895 | r26896 | |
| 40 | 40 | |
| 41 | 41 | MACHINE_CONFIG_FRAGMENT( mockingboard ) |
| 42 | 42 | MCFG_DEVICE_ADD(VIA1_TAG, VIA6522, 1022727) |
| 43 | | MCFG_VIA6522_READPA_HANDLER(READ8(a2bus_ayboard_device, via1_in_a)) |
| 44 | | MCFG_VIA6522_READPB_HANDLER(READ8(a2bus_ayboard_device, via1_in_b)) |
| 45 | 43 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(a2bus_ayboard_device, via1_out_a)) |
| 46 | 44 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(a2bus_ayboard_device, via1_out_b)) |
| 47 | 45 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(a2bus_ayboard_device, via1_irq_w)) |
| 48 | 46 | |
| 49 | 47 | MCFG_DEVICE_ADD(VIA2_TAG, VIA6522, 1022727) |
| 50 | | MCFG_VIA6522_READPA_HANDLER(READ8(a2bus_ayboard_device, via2_in_a)) |
| 51 | | MCFG_VIA6522_READPB_HANDLER(READ8(a2bus_ayboard_device, via2_in_b)) |
| 52 | 48 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(a2bus_ayboard_device, via2_out_a)) |
| 53 | 49 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(a2bus_ayboard_device, via2_out_b)) |
| 54 | 50 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(a2bus_ayboard_device, via2_irq_w)) |
| r26895 | r26896 | |
| 64 | 60 | |
| 65 | 61 | MACHINE_CONFIG_FRAGMENT( phasor ) |
| 66 | 62 | MCFG_DEVICE_ADD(VIA1_TAG, VIA6522, 1022727) |
| 67 | | MCFG_VIA6522_READPA_HANDLER(READ8(a2bus_ayboard_device, via1_in_a)) |
| 68 | | MCFG_VIA6522_READPB_HANDLER(READ8(a2bus_ayboard_device, via1_in_b)) |
| 69 | 63 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(a2bus_ayboard_device, via1_out_a)) |
| 70 | 64 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(a2bus_ayboard_device, via1_out_b)) |
| 71 | 65 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(a2bus_ayboard_device, via1_irq_w)) |
| 72 | 66 | |
| 73 | 67 | MCFG_DEVICE_ADD(VIA2_TAG, VIA6522, 1022727) |
| 74 | | MCFG_VIA6522_READPA_HANDLER(READ8(a2bus_ayboard_device, via2_in_a)) |
| 75 | | MCFG_VIA6522_READPB_HANDLER(READ8(a2bus_ayboard_device, via2_in_b)) |
| 76 | 68 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(a2bus_ayboard_device, via2_out_a)) |
| 77 | 69 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(a2bus_ayboard_device, via2_out_b)) |
| 78 | 70 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(a2bus_ayboard_device, via2_irq_w)) |
| r26895 | r26896 | |
| 95 | 87 | |
| 96 | 88 | MACHINE_CONFIG_FRAGMENT( echoplus ) |
| 97 | 89 | MCFG_DEVICE_ADD(VIA1_TAG, VIA6522, 1022727) |
| 98 | | MCFG_VIA6522_READPA_HANDLER(READ8(a2bus_ayboard_device, via1_in_a)) |
| 99 | | MCFG_VIA6522_READPB_HANDLER(READ8(a2bus_ayboard_device, via1_in_b)) |
| 100 | 90 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(a2bus_ayboard_device, via1_out_a)) |
| 101 | 91 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(a2bus_ayboard_device, via1_out_b)) |
| 102 | 92 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(a2bus_ayboard_device, via1_irq_w)) |
| 103 | 93 | |
| 104 | 94 | MCFG_DEVICE_ADD(VIA2_TAG, VIA6522, 1022727) |
| 105 | | MCFG_VIA6522_READPA_HANDLER(READ8(a2bus_ayboard_device, via2_in_a)) |
| 106 | | MCFG_VIA6522_READPB_HANDLER(READ8(a2bus_ayboard_device, via2_in_b)) |
| 107 | 95 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(a2bus_ayboard_device, via2_out_a)) |
| 108 | 96 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(a2bus_ayboard_device, via2_out_b)) |
| 109 | 97 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(a2bus_ayboard_device, via2_irq_w)) |
| r26895 | r26896 | |
| 323 | 311 | } |
| 324 | 312 | } |
| 325 | 313 | |
| 326 | | READ8_MEMBER( a2bus_ayboard_device::via1_in_a ) |
| 327 | | { |
| 328 | | return 0; |
| 329 | | } |
| 330 | | |
| 331 | 314 | WRITE8_MEMBER( a2bus_ayboard_device::via1_out_a ) |
| 332 | 315 | { |
| 333 | 316 | m_porta1 = data; |
| 334 | 317 | } |
| 335 | 318 | |
| 336 | | READ8_MEMBER( a2bus_ayboard_device::via1_in_b ) |
| 337 | | { |
| 338 | | return 0; |
| 339 | | } |
| 340 | | |
| 341 | 319 | WRITE8_MEMBER( a2bus_ayboard_device::via1_out_b ) |
| 342 | 320 | { |
| 343 | 321 | if (!(data & 4)) |
| r26895 | r26896 | |
| 426 | 404 | } |
| 427 | 405 | } |
| 428 | 406 | |
| 429 | | READ8_MEMBER( a2bus_ayboard_device::via2_in_a ) |
| 430 | | { |
| 431 | | return 0; |
| 432 | | } |
| 433 | | |
| 434 | 407 | WRITE8_MEMBER( a2bus_ayboard_device::via2_out_a ) |
| 435 | 408 | { |
| 436 | 409 | m_porta2 = data; |
| 437 | 410 | } |
| 438 | 411 | |
| 439 | | READ8_MEMBER( a2bus_ayboard_device::via2_in_b ) |
| 440 | | { |
| 441 | | return 0; |
| 442 | | } |
| 443 | | |
| 444 | 412 | WRITE8_MEMBER( a2bus_ayboard_device::via2_out_b ) |
| 445 | 413 | { |
| 446 | 414 | if (!(data & 4)) |
trunk/src/mess/machine/microtan.c
| r26895 | r26896 | |
| 162 | 162 | return data; |
| 163 | 163 | } |
| 164 | 164 | |
| 165 | | READ8_MEMBER(microtan_state::via_0_in_b) |
| 166 | | { |
| 167 | | int data = 0xff; |
| 168 | | LOG(("microtan_via_0_in_b %02X\n", data)); |
| 169 | | return data; |
| 170 | | } |
| 171 | | |
| 172 | 165 | WRITE8_MEMBER(microtan_state::via_0_out_a) |
| 173 | 166 | { |
| 174 | 167 | LOG(("microtan_via_0_out_a %02X\n", data)); |
| r26895 | r26896 | |
| 201 | 194 | /************************************************************** |
| 202 | 195 | * VIA callback functions for VIA #1 |
| 203 | 196 | **************************************************************/ |
| 204 | | READ8_MEMBER(microtan_state::via_1_in_a) |
| 205 | | { |
| 206 | | int data = 0xff; |
| 207 | | LOG(("microtan_via_1_in_a %02X\n", data)); |
| 208 | | return data; |
| 209 | | } |
| 210 | 197 | |
| 211 | | READ8_MEMBER(microtan_state::via_1_in_b) |
| 212 | | { |
| 213 | | int data = 0xff; |
| 214 | | LOG(("microtan_via_1_in_b %02X\n", data)); |
| 215 | | return data; |
| 216 | | } |
| 217 | | |
| 218 | 198 | WRITE8_MEMBER(microtan_state::via_1_out_a) |
| 219 | 199 | { |
| 220 | 200 | LOG(("microtan_via_1_out_a %02X\n", data)); |
| r26895 | r26896 | |
| 492 | 472 | m_timer = timer_alloc(TIMER_READ_CASSETTE); |
| 493 | 473 | |
| 494 | 474 | m_via6522_0->write_ca1(1); |
| 475 | m_via6522_0->write_ca2(1); |
| 476 | |
| 477 | m_via6522_0->write_pb0(1); |
| 478 | m_via6522_0->write_pb1(1); |
| 479 | m_via6522_0->write_pb2(1); |
| 480 | m_via6522_0->write_pb3(1); |
| 481 | m_via6522_0->write_pb4(1); |
| 482 | m_via6522_0->write_pb5(1); |
| 483 | m_via6522_0->write_pb6(1); |
| 484 | m_via6522_0->write_pb7(1); |
| 495 | 485 | m_via6522_0->write_cb1(1); |
| 496 | | m_via6522_0->write_ca2(1); |
| 497 | 486 | m_via6522_0->write_cb2(1); |
| 498 | 487 | |
| 488 | m_via6522_1->write_pa0(1); |
| 489 | m_via6522_1->write_pa1(1); |
| 490 | m_via6522_1->write_pa2(1); |
| 491 | m_via6522_1->write_pa3(1); |
| 492 | m_via6522_1->write_pa4(1); |
| 493 | m_via6522_1->write_pa5(1); |
| 494 | m_via6522_1->write_pa6(1); |
| 495 | m_via6522_1->write_pa7(1); |
| 499 | 496 | m_via6522_1->write_ca1(1); |
| 497 | m_via6522_1->write_ca2(1); |
| 498 | |
| 499 | m_via6522_1->write_pb0(1); |
| 500 | m_via6522_1->write_pb1(1); |
| 501 | m_via6522_1->write_pb2(1); |
| 502 | m_via6522_1->write_pb3(1); |
| 503 | m_via6522_1->write_pb4(1); |
| 504 | m_via6522_1->write_pb5(1); |
| 505 | m_via6522_1->write_pb6(1); |
| 506 | m_via6522_1->write_pb7(1); |
| 500 | 507 | m_via6522_1->write_cb1(1); |
| 501 | | m_via6522_1->write_ca2(1); |
| 502 | 508 | m_via6522_1->write_cb2(1); |
| 503 | 509 | } |
| 504 | 510 | |
trunk/src/mess/machine/lisa.c
| r26895 | r26896 | |
| 387 | 387 | address_space &space = m_maincpu->space(AS_PROGRAM); |
| 388 | 388 | |
| 389 | 389 | m_COPS_Ready = 0; |
| 390 | m_via0->write_pb6(m_COPS_Ready); |
| 390 | 391 | |
| 391 | 392 | /*logerror("read_COPS_command : trying to send data to VIA\n");*/ |
| 392 | 393 | COPS_send_data_if_possible(); |
| r26895 | r26896 | |
| 557 | 558 | TIMER_CALLBACK_MEMBER(lisa_state::set_COPS_ready) |
| 558 | 559 | { |
| 559 | 560 | m_COPS_Ready = 1; |
| 561 | m_via0->write_pb6(m_COPS_Ready); |
| 560 | 562 | |
| 561 | 563 | /* impulsion width : +/- 20us */ |
| 562 | 564 | machine().scheduler().timer_set(attotime::from_usec(20), timer_expired_delegate(FUNC(lisa_state::read_COPS_command),this)); |
| r26895 | r26896 | |
| 620 | 622 | void lisa_state::init_COPS() |
| 621 | 623 | { |
| 622 | 624 | m_COPS_Ready = 0; |
| 625 | m_via0->write_pb6(m_COPS_Ready); |
| 623 | 626 | |
| 624 | 627 | reset_COPS(); |
| 625 | 628 | } |
| r26895 | r26896 | |
| 663 | 666 | CB1 : not used |
| 664 | 667 | CB2 (O) : sound output |
| 665 | 668 | */ |
| 666 | | READ8_MEMBER(lisa_state::COPS_via_in_b) |
| 667 | | { |
| 668 | | int val = 0; |
| 669 | 669 | |
| 670 | | if (m_COPS_Ready) |
| 671 | | val |= 0x40; |
| 672 | | |
| 673 | | if (m_FDIR) |
| 674 | | val |= 0x10; |
| 675 | | |
| 676 | | return val; |
| 677 | | } |
| 678 | | |
| 679 | 670 | WRITE8_MEMBER(lisa_state::COPS_via_out_b) |
| 680 | 671 | { |
| 681 | 672 | /* pull-up */ |
| r26895 | r26896 | |
| 734 | 725 | CB1 : not used |
| 735 | 726 | CB2 (I) : current parity latch value |
| 736 | 727 | */ |
| 737 | | READ8_MEMBER(lisa_state::parallel_via_in_b) |
| 738 | | { |
| 739 | | int val = 0; |
| 740 | 728 | |
| 741 | | if (m_DISK_DIAG) |
| 742 | | val |= 0x40; |
| 743 | 729 | |
| 744 | | /* tell there is no hard disk : */ |
| 745 | | val |= 0x1; |
| 746 | 730 | |
| 747 | | /* keep busy high to work around a bug??? */ |
| 748 | | //val |= 0x2; |
| 749 | | |
| 750 | | return val; |
| 751 | | } |
| 752 | | |
| 753 | | |
| 754 | | |
| 755 | | |
| 756 | | |
| 757 | | |
| 758 | 731 | /* |
| 759 | 732 | LISA video emulation |
| 760 | 733 | */ |
| r26895 | r26896 | |
| 1010 | 983 | m_video_address_latch = 0; |
| 1011 | 984 | m_videoram_ptr = (UINT16 *) m_ram_ptr; |
| 1012 | 985 | |
| 986 | m_FDIR = 0; |
| 987 | m_via0->write_pb4(m_FDIR); |
| 988 | |
| 989 | /* tell there is no hard disk : */ |
| 990 | m_via1->write_pb0(1); |
| 991 | |
| 992 | /* keep busy high to work around a bug??? */ |
| 993 | //m_via1->write_pb1(1); |
| 994 | |
| 995 | m_DISK_DIAG = 0; |
| 996 | m_via1->write_pb6(m_DISK_DIAG); |
| 997 | |
| 1013 | 998 | /* reset COPS keyboard/mouse controller */ |
| 1014 | 999 | init_COPS(); |
| 1015 | 1000 | |
| r26895 | r26896 | |
| 1177 | 1162 | break; |
| 1178 | 1163 | case 6: |
| 1179 | 1164 | m_DISK_DIAG = offset & 1; |
| 1165 | m_via1->write_pb6(m_DISK_DIAG); |
| 1180 | 1166 | break; |
| 1181 | 1167 | case 7: |
| 1182 | 1168 | m_FDIR = offset & 1; /* Interrupt request to 68k */ |
| 1169 | m_via0->write_pb4(m_FDIR); |
| 1183 | 1170 | field_interrupts(); |
| 1184 | 1171 | break; |
| 1185 | 1172 | } |
trunk/src/mess/machine/apple3.c
| r26895 | r26896 | |
| 249 | 249 | |
| 250 | 250 | INTERRUPT_GEN_MEMBER(apple3_state::apple3_interrupt) |
| 251 | 251 | { |
| 252 | | via6522_device *via_1 = machine().device<via6522_device>("via6522_1"); |
| 253 | | |
| 254 | | via_1->write_ca2((AY3600_keydata_strobe_r(machine()) & 0x80) ? 1 : 0); |
| 255 | | via_1->write_cb1(machine().primary_screen->vblank()); |
| 256 | | via_1->write_cb2(machine().primary_screen->vblank()); |
| 252 | m_via_1->write_ca2((AY3600_keydata_strobe_r(machine()) & 0x80) ? 1 : 0); |
| 253 | m_via_1->write_cb1(machine().primary_screen->vblank()); |
| 254 | m_via_1->write_cb2(machine().primary_screen->vblank()); |
| 257 | 255 | } |
| 258 | 256 | |
| 259 | 257 | |
| r26895 | r26896 | |
| 444 | 442 | |
| 445 | 443 | /* reinstall VIA handlers */ |
| 446 | 444 | { |
| 447 | | via6522_device *via_0 = machine().device<via6522_device>("via6522_0"); |
| 448 | | via6522_device *via_1 = machine().device<via6522_device>("via6522_1"); |
| 449 | | |
| 450 | | space.install_readwrite_handler(0xFFD0, 0xFFDF, 0, 0, read8_delegate(FUNC(via6522_device::read),via_0), write8_delegate(FUNC(via6522_device::write),via_0)); |
| 451 | | space.install_readwrite_handler(0xFFE0, 0xFFEF, 0, 0, read8_delegate(FUNC(via6522_device::read),via_1), write8_delegate(FUNC(via6522_device::write),via_1)); |
| 445 | space.install_readwrite_handler(0xFFD0, 0xFFDF, 0, 0, read8_delegate(FUNC(via6522_device::read),m_via_0.target()), write8_delegate(FUNC(via6522_device::write),m_via_0.target())); |
| 446 | space.install_readwrite_handler(0xFFE0, 0xFFEF, 0, 0, read8_delegate(FUNC(via6522_device::read),m_via_1.target()), write8_delegate(FUNC(via6522_device::write),m_via_1.target())); |
| 452 | 447 | } |
| 453 | 448 | } |
| 454 | 449 | |
| r26895 | r26896 | |
| 464 | 459 | } |
| 465 | 460 | |
| 466 | 461 | |
| 467 | | /* these are here to appease the Apple /// confidence tests */ |
| 468 | | READ8_MEMBER(apple3_state::apple3_via_1_in_a){ return ~0; } |
| 469 | | READ8_MEMBER(apple3_state::apple3_via_1_in_b){ return ~0; } |
| 470 | | |
| 471 | 462 | WRITE8_MEMBER(apple3_state::apple3_via_0_out_a) |
| 472 | 463 | { |
| 473 | 464 | apple3_via_out(&m_via_0_a, data); |
| r26895 | r26896 | |
| 690 | 681 | m_via_0_a = ~0; |
| 691 | 682 | m_via_1_a = ~0; |
| 692 | 683 | m_via_1_irq = 0; |
| 684 | |
| 685 | /* these are here to appease the Apple /// confidence tests */ |
| 686 | m_via_1->write_pa0(1); |
| 687 | m_via_1->write_pa1(1); |
| 688 | m_via_1->write_pa2(1); |
| 689 | m_via_1->write_pa3(1); |
| 690 | m_via_1->write_pa4(1); |
| 691 | m_via_1->write_pa5(1); |
| 692 | m_via_1->write_pa6(1); |
| 693 | m_via_1->write_pa7(1); |
| 694 | |
| 695 | m_via_1->write_pb0(1); |
| 696 | m_via_1->write_pb1(1); |
| 697 | m_via_1->write_pb2(1); |
| 698 | m_via_1->write_pb3(1); |
| 699 | m_via_1->write_pb4(1); |
| 700 | m_via_1->write_pb5(1); |
| 701 | m_via_1->write_pb6(1); |
| 702 | m_via_1->write_pb7(1); |
| 703 | |
| 693 | 704 | apple3_update_memory(); |
| 694 | 705 | |
| 695 | 706 | m_maincpu->space(AS_PROGRAM).set_direct_update_handler(direct_update_delegate(FUNC(apple3_state::apple3_opbase), this)); |
trunk/src/mess/includes/apple3.h
| r26895 | r26896 | |
| 27 | 27 | { |
| 28 | 28 | public: |
| 29 | 29 | apple3_state(const machine_config &mconfig, device_type type, const char *tag) |
| 30 | | : apple2_state(mconfig, type, tag) { } |
| 30 | : apple2_state(mconfig, type, tag), |
| 31 | m_via_0(*this, "via6522_0"), |
| 32 | m_via_1(*this, "via6522_1") |
| 33 | { |
| 34 | } |
| 31 | 35 | |
| 36 | required_device<via6522_device> m_via_0; |
| 37 | required_device<via6522_device> m_via_1; |
| 38 | |
| 32 | 39 | UINT32 m_flags; |
| 33 | 40 | UINT8 m_via_0_a; |
| 34 | 41 | UINT8 m_via_0_b; |
| r26895 | r26896 | |
| 61 | 68 | DECLARE_VIDEO_START(apple3); |
| 62 | 69 | UINT32 screen_update_apple3(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); |
| 63 | 70 | INTERRUPT_GEN_MEMBER(apple3_interrupt); |
| 64 | | DECLARE_READ8_MEMBER(apple3_via_1_in_a); |
| 65 | | DECLARE_READ8_MEMBER(apple3_via_1_in_b); |
| 66 | 71 | DECLARE_WRITE8_MEMBER(apple3_via_0_out_a); |
| 67 | 72 | DECLARE_WRITE8_MEMBER(apple3_via_0_out_b); |
| 68 | 73 | DECLARE_WRITE8_MEMBER(apple3_via_1_out_a); |
trunk/src/mess/includes/rmnimbus.h
| r26895 | r26896 | |
| 396 | 396 | m_ay8910(*this, AY8910_TAG), |
| 397 | 397 | m_scsibus(*this, SCSIBUS_TAG ":host"), |
| 398 | 398 | m_ram(*this, RAM_TAG), |
| 399 | | m_eeprom(*this, ER59256_TAG) |
| 399 | m_eeprom(*this, ER59256_TAG), |
| 400 | m_via(*this, VIA_TAG) |
| 400 | 401 | { |
| 401 | 402 | } |
| 402 | 403 | |
| r26895 | r26896 | |
| 406 | 407 | required_device<scsicb_device> m_scsibus; |
| 407 | 408 | required_device<ram_device> m_ram; |
| 408 | 409 | required_device<er59256_device> m_eeprom; |
| 410 | required_device<via6522_device> m_via; |
| 409 | 411 | |
| 410 | 412 | UINT32 m_debug_machine; |
| 411 | 413 | // i186_state m_i186; |
| r26895 | r26896 | |
| 468 | 470 | DECLARE_READ16_MEMBER(sio_serial_receive); |
| 469 | 471 | DECLARE_WRITE_LINE_MEMBER(nimbus_fdc_intrq_w); |
| 470 | 472 | DECLARE_WRITE_LINE_MEMBER(nimbus_fdc_drq_w); |
| 471 | | DECLARE_READ8_MEMBER(nimbus_via_read_portb); |
| 472 | 473 | DECLARE_WRITE8_MEMBER(nimbus_via_write_portb); |
| 473 | 474 | DECLARE_WRITE_LINE_MEMBER(nimbus_via_irq_w); |
| 474 | 475 | DECLARE_WRITE_LINE_MEMBER(nimbus_ack_w); |
trunk/src/mess/drivers/a6809.c
| r26895 | r26896 | |
| 71 | 71 | , m_crtc(*this, "mc6845") |
| 72 | 72 | { } |
| 73 | 73 | |
| 74 | | DECLARE_READ8_MEMBER(pb_r); |
| 75 | 74 | DECLARE_WRITE8_MEMBER(kbd_put); |
| 76 | 75 | DECLARE_READ8_MEMBER(videoram_r); |
| 77 | 76 | DECLARE_WRITE8_MEMBER(a6809_address_w); |
| r26895 | r26896 | |
| 86 | 85 | private: |
| 87 | 86 | UINT8 m_cass_data[4]; |
| 88 | 87 | bool m_cass_state; |
| 89 | | UINT8 m_term_data; |
| 90 | 88 | UINT8 m_video_index; |
| 91 | 89 | required_device<via6522_device> m_via; |
| 92 | 90 | required_device<cassette_image_device> m_cass; |
| r26895 | r26896 | |
| 117 | 115 | |
| 118 | 116 | MACHINE_RESET_MEMBER( a6809_state, a6809) |
| 119 | 117 | { |
| 120 | | m_term_data = 0; |
| 118 | m_via->write_pb0(0); |
| 119 | m_via->write_pb1(0); |
| 120 | m_via->write_pb2(0); |
| 121 | m_via->write_pb3(0); |
| 122 | m_via->write_pb4(0); |
| 123 | m_via->write_pb5(0); |
| 124 | m_via->write_pb6(0); |
| 125 | m_via->write_pb7(0); |
| 121 | 126 | } |
| 122 | 127 | |
| 123 | 128 | static MC6845_UPDATE_ROW( a6809_update_row ) |
| r26895 | r26896 | |
| 188 | 193 | m_cursor_address = data | (temq & 0x3f00); |
| 189 | 194 | } |
| 190 | 195 | |
| 191 | | READ8_MEMBER( a6809_state::pb_r ) |
| 192 | | { |
| 193 | | return m_term_data | m_cass_data[2]; |
| 194 | | } |
| 195 | | |
| 196 | 196 | WRITE_LINE_MEMBER( a6809_state::cass_w ) |
| 197 | 197 | { |
| 198 | 198 | m_cass_state = state; |
| r26895 | r26896 | |
| 217 | 217 | if (cass_ws != m_cass_data[0]) |
| 218 | 218 | { |
| 219 | 219 | m_cass_data[0] = cass_ws; |
| 220 | | m_cass_data[2] = ((m_cass_data[1] < 12) ? 128 : 0); |
| 220 | m_via->write_pb7(m_cass_data[1] < 12); |
| 221 | 221 | m_cass_data[1] = 0; |
| 222 | 222 | } |
| 223 | 223 | } |
| 224 | 224 | |
| 225 | 225 | WRITE8_MEMBER( a6809_state::kbd_put ) |
| 226 | 226 | { |
| 227 | | m_term_data = data & 0x7f; |
| 228 | | if (data == 8) m_term_data = 0x7f; // allow backspace to work |
| 227 | UINT8 d = data & 0x7f; |
| 228 | if (d == 8) d = 0x7f; // allow backspace to work |
| 229 | 229 | |
| 230 | m_via->write_pb0((d>>0)&1); |
| 231 | m_via->write_pb1((d>>1)&1); |
| 232 | m_via->write_pb2((d>>2)&1); |
| 233 | m_via->write_pb3((d>>3)&1); |
| 234 | m_via->write_pb4((d>>4)&1); |
| 235 | m_via->write_pb5((d>>5)&1); |
| 236 | m_via->write_pb6((d>>6)&1); |
| 230 | 237 | m_via->write_cb1(1); |
| 231 | 238 | m_via->write_cb1(0); |
| 232 | 239 | } |
| r26895 | r26896 | |
| 259 | 266 | |
| 260 | 267 | /* Devices */ |
| 261 | 268 | MCFG_DEVICE_ADD("via", VIA6522, XTAL_4MHz / 4) |
| 262 | | MCFG_VIA6522_READPB_HANDLER(READ8(a6809_state, pb_r)) |
| 263 | 269 | MCFG_VIA6522_CB2_HANDLER(WRITELINE(a6809_state, cass_w)) |
| 264 | 270 | MCFG_VIA6522_IRQ_HANDLER(DEVWRITELINE("maincpu", m6809e_device, irq_line)) |
| 265 | 271 | |
trunk/src/mess/drivers/microtan.c
| r26895 | r26896 | |
| 260 | 260 | /* via */ |
| 261 | 261 | MCFG_DEVICE_ADD("via6522_0", VIA6522, 0) |
| 262 | 262 | MCFG_VIA6522_READPA_HANDLER(READ8(microtan_state, via_0_in_a)) |
| 263 | | MCFG_VIA6522_READPB_HANDLER(READ8(microtan_state, via_0_in_b)) |
| 264 | 263 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(microtan_state, via_0_out_a)) |
| 265 | 264 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(microtan_state, via_0_out_b)) |
| 266 | 265 | MCFG_VIA6522_CA2_HANDLER(WRITELINE(microtan_state, via_0_out_ca2)) |
| r26895 | r26896 | |
| 268 | 267 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(microtan_state, via_0_irq)) |
| 269 | 268 | |
| 270 | 269 | MCFG_DEVICE_ADD("via6522_1", VIA6522, 0) |
| 271 | | MCFG_VIA6522_READPA_HANDLER(READ8(microtan_state, via_1_in_a)) |
| 272 | | MCFG_VIA6522_READPB_HANDLER(READ8(microtan_state, via_1_in_b)) |
| 273 | 270 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(microtan_state, via_1_out_a)) |
| 274 | 271 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(microtan_state, via_1_out_b)) |
| 275 | 272 | MCFG_VIA6522_CA2_HANDLER(WRITELINE(microtan_state, via_1_out_ca2)) |
trunk/src/mess/drivers/ec65.c
| r26895 | r26896 | |
| 28 | 28 | public: |
| 29 | 29 | ec65_state(const machine_config &mconfig, device_type type, const char *tag) |
| 30 | 30 | : driver_device(mconfig, type, tag), |
| 31 | | m_via_0(*this, VIA6522_0_TAG), |
| 32 | | m_p_videoram(*this, "videoram"), |
| 31 | m_via_0(*this, VIA6522_0_TAG), |
| 32 | m_via_1(*this, VIA6522_1_TAG), |
| 33 | m_p_videoram(*this, "videoram"), |
| 33 | 34 | m_maincpu(*this, "maincpu") { } |
| 34 | 35 | |
| 35 | | DECLARE_READ8_MEMBER(ec65_via_read_a); |
| 36 | | DECLARE_READ8_MEMBER(ec65_via_read_b); |
| 37 | | DECLARE_WRITE8_MEMBER(ec65_via_write_a); |
| 38 | | DECLARE_WRITE8_MEMBER(ec65_via_write_b); |
| 39 | 36 | DECLARE_WRITE8_MEMBER(kbd_put); |
| 40 | 37 | UINT8 *m_p_chargen; |
| 41 | | UINT8 m_keyboard_input; |
| 42 | 38 | optional_device<via6522_device> m_via_0; |
| 39 | optional_device<via6522_device> m_via_1; |
| 43 | 40 | required_shared_ptr<UINT8> m_p_videoram; |
| 44 | 41 | virtual void machine_reset(); |
| 45 | 42 | virtual void video_start(); |
| r26895 | r26896 | |
| 94 | 91 | DEVCB_NULL |
| 95 | 92 | }; |
| 96 | 93 | |
| 97 | | READ8_MEMBER( ec65_state::ec65_via_read_a) |
| 98 | | { |
| 99 | | return m_keyboard_input; |
| 100 | | } |
| 101 | | |
| 102 | | READ8_MEMBER( ec65_state::ec65_via_read_b) |
| 103 | | { |
| 104 | | return 0xff; |
| 105 | | } |
| 106 | | |
| 107 | | WRITE8_MEMBER( ec65_state::ec65_via_write_a ) |
| 108 | | { |
| 109 | | } |
| 110 | | |
| 111 | | WRITE8_MEMBER( ec65_state::ec65_via_write_b ) |
| 112 | | { |
| 113 | | } |
| 114 | | |
| 115 | 94 | /* Input ports */ |
| 116 | 95 | static INPUT_PORTS_START( ec65 ) |
| 117 | 96 | INPUT_PORTS_END |
| r26895 | r26896 | |
| 120 | 99 | { |
| 121 | 100 | if (data) |
| 122 | 101 | { |
| 123 | | m_keyboard_input = data; |
| 102 | m_via_0->write_pa0((data>>0)&1); |
| 103 | m_via_0->write_pa1((data>>1)&1); |
| 104 | m_via_0->write_pa2((data>>2)&1); |
| 105 | m_via_0->write_pa3((data>>3)&1); |
| 106 | m_via_0->write_pa4((data>>4)&1); |
| 107 | m_via_0->write_pa5((data>>5)&1); |
| 108 | m_via_0->write_pa6((data>>6)&1); |
| 109 | m_via_0->write_pa7((data>>7)&1); |
| 124 | 110 | m_via_0->write_ca1(1); |
| 125 | 111 | m_via_0->write_ca1(0); |
| 126 | 112 | } |
| r26895 | r26896 | |
| 134 | 120 | |
| 135 | 121 | void ec65_state::machine_reset() |
| 136 | 122 | { |
| 123 | m_via_1->write_pb0(1); |
| 124 | m_via_1->write_pb1(1); |
| 125 | m_via_1->write_pb2(1); |
| 126 | m_via_1->write_pb3(1); |
| 127 | m_via_1->write_pb4(1); |
| 128 | m_via_1->write_pb5(1); |
| 129 | m_via_1->write_pb6(1); |
| 130 | m_via_1->write_pb7(1); |
| 137 | 131 | } |
| 138 | 132 | |
| 139 | 133 | void ec65_state::video_start() |
| r26895 | r26896 | |
| 231 | 225 | MCFG_ACIA6850_ADD(ACIA6850_TAG, ec65_acia_intf) |
| 232 | 226 | |
| 233 | 227 | MCFG_DEVICE_ADD(VIA6522_0_TAG, VIA6522, XTAL_4MHz / 4) |
| 234 | | MCFG_VIA6522_READPA_HANDLER(READ8(ec65_state, ec65_via_read_a)) |
| 235 | 228 | |
| 236 | 229 | MCFG_DEVICE_ADD(VIA6522_1_TAG, VIA6522, XTAL_4MHz / 4) |
| 237 | | MCFG_VIA6522_READPB_HANDLER(READ8(ec65_state, ec65_via_read_b)) |
| 238 | | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(ec65_state, ec65_via_write_a)) |
| 239 | | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(ec65_state, ec65_via_write_b)) |
| 240 | 230 | |
| 241 | 231 | MCFG_DEVICE_ADD(ACIA6551_TAG, MOS6551, XTAL_1_8432MHz) |
| 242 | 232 | MCFG_ASCII_KEYBOARD_ADD(KEYBOARD_TAG, keyboard_intf) |
trunk/src/mess/drivers/mirage.c
| r26895 | r26896 | |
| 55 | 55 | { |
| 56 | 56 | public: |
| 57 | 57 | mirage_state(const machine_config &mconfig, device_type type, const char *tag) |
| 58 | | : driver_device(mconfig, type, tag), |
| 59 | | m_maincpu(*this, "maincpu"), |
| 60 | | m_fdc(*this, "wd1772") |
| 61 | | { } |
| 58 | : driver_device(mconfig, type, tag), |
| 59 | m_maincpu(*this, "maincpu"), |
| 60 | m_fdc(*this, "wd1772"), |
| 61 | m_via(*this, "via6522") |
| 62 | { |
| 63 | } |
| 62 | 64 | |
| 63 | 65 | required_device<m6809e_device> m_maincpu; |
| 64 | 66 | required_device<wd1772_t> m_fdc; |
| 67 | required_device<via6522_device> m_via; |
| 65 | 68 | |
| 66 | 69 | virtual void machine_reset(); |
| 67 | 70 | |
| r26895 | r26896 | |
| 76 | 79 | UINT32 screen_update_mirage(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect); |
| 77 | 80 | DECLARE_WRITE8_MEMBER(mirage_via_write_porta); |
| 78 | 81 | DECLARE_WRITE8_MEMBER(mirage_via_write_portb); |
| 79 | | DECLARE_READ8_MEMBER(mirage_via_read_porta); |
| 80 | | DECLARE_READ8_MEMBER(mirage_via_read_portb); |
| 81 | 82 | |
| 82 | 83 | DECLARE_WRITE_LINE_MEMBER(acia_irq_w); |
| 83 | 84 | |
| r26895 | r26896 | |
| 220 | 221 | } |
| 221 | 222 | } |
| 222 | 223 | |
| 223 | | // port A: front panel |
| 224 | | READ8_MEMBER(mirage_state::mirage_via_read_porta) |
| 225 | | { |
| 226 | | return 0; |
| 227 | | } |
| 228 | | |
| 229 | | // port B: |
| 230 | | // bit 6: IN FDC disk ready |
| 231 | | // bit 5: IN 5503 sync (?) |
| 232 | | READ8_MEMBER(mirage_state::mirage_via_read_portb) |
| 233 | | { |
| 234 | | return 0x60; |
| 235 | | } |
| 236 | | |
| 237 | 224 | static ACIA6850_INTERFACE( mirage_acia6850_interface ) |
| 238 | 225 | { |
| 239 | 226 | 0, // tx clock |
| r26895 | r26896 | |
| 255 | 242 | MCFG_SOUND_ROUTE(1, "rspeaker", 1.0) |
| 256 | 243 | |
| 257 | 244 | MCFG_DEVICE_ADD("via6522", VIA6522, 1000000) |
| 258 | | MCFG_VIA6522_READPA_HANDLER(READ8(mirage_state, mirage_via_read_porta)) |
| 259 | | MCFG_VIA6522_READPB_HANDLER(READ8(mirage_state, mirage_via_read_portb)) |
| 260 | 245 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(mirage_state, mirage_via_write_porta)) |
| 261 | 246 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(mirage_state, mirage_via_write_portb)) |
| 262 | 247 | MCFG_VIA6522_IRQ_HANDLER(DEVWRITELINE("maincpu", m6809e_device, irq_line)) |
| r26895 | r26896 | |
| 292 | 277 | |
| 293 | 278 | m_l_hi = m_r_hi = 9; |
| 294 | 279 | m_l_segs = m_r_segs = 0; |
| 280 | |
| 281 | // port A: front panel |
| 282 | m_via->write_pa0(0); |
| 283 | m_via->write_pa1(0); |
| 284 | m_via->write_pa2(0); |
| 285 | m_via->write_pa3(0); |
| 286 | m_via->write_pa4(0); |
| 287 | m_via->write_pa5(0); |
| 288 | m_via->write_pa6(0); |
| 289 | m_via->write_pa7(0); |
| 290 | |
| 291 | // port B: |
| 292 | // bit 6: IN FDC disk ready |
| 293 | // bit 5: IN 5503 sync (?) |
| 294 | m_via->write_pb0(0); |
| 295 | m_via->write_pb1(0); |
| 296 | m_via->write_pb2(0); |
| 297 | m_via->write_pb3(0); |
| 298 | m_via->write_pb4(0); |
| 299 | m_via->write_pb5(1); |
| 300 | m_via->write_pb6(1); |
| 301 | m_via->write_pb7(0); |
| 295 | 302 | } |
| 296 | 303 | |
| 297 | 304 | CONS( 1984, enmirage, 0, 0, mirage, mirage, mirage_state, mirage, "Ensoniq", "Ensoniq Mirage", GAME_NOT_WORKING ) |
trunk/src/mess/drivers/lisa.c
| r26895 | r26896 | |
| 173 | 173 | |
| 174 | 174 | /* via */ |
| 175 | 175 | MCFG_DEVICE_ADD("via6522_0", VIA6522, 500000) |
| 176 | | MCFG_VIA6522_READPB_HANDLER(READ8(lisa_state, COPS_via_in_b)) |
| 177 | 176 | MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(lisa_state, COPS_via_out_a)) |
| 178 | 177 | MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(lisa_state, COPS_via_out_b)) |
| 179 | 178 | MCFG_VIA6522_CA1_HANDLER(WRITELINE(lisa_state, COPS_via_out_ca2)) |
| r26895 | r26896 | |
| 181 | 180 | MCFG_VIA6522_IRQ_HANDLER(WRITELINE(lisa_state, COPS_via_irq_func)) |
| 182 | 181 | |
| 183 | 182 | MCFG_DEVICE_ADD("via6522_1", VIA6522, 500000) |
| 184 | | MCFG_VIA6522_READPB_HANDLER(READ8(lisa_state, parallel_via_in_b)) |
| 185 | 183 | |
| 186 | 184 | MCFG_SCC8530_ADD("scc", 7833600, line_cb_t(FUNC(lisa_state::set_scc_interrupt), static_cast<lisa_state *>(owner))) |
| 187 | 185 | MACHINE_CONFIG_END |