src/mess/drivers/abc80x.c
| r9211 | r9212 | |
| 67 | 67 | Keyboard PCB Layout |
| 68 | 68 | ------------------- |
| 69 | 69 | |
| 70 | KTC A65-02201-201K |
| 71 | |
| 70 | 72 | |---------------| |
| 71 | 73 | |---| CN1 |---------------------------------------------------| |
| 72 | 74 | | | |
| 73 | 75 | | LS193 LS374 8048 22-008-03 | |
| 74 | | | LS13 LS193 22-050-3B XTAL | |
| 76 | | LS13 LS193 22-050-3B 5.9904MHz | |
| 75 | 77 | | | |
| 76 | 78 | | | |
| 77 | 79 | | | |
| r9211 | r9212 | |
| 88 | 90 | 8048 - National Semiconductor INS8048 MCU "8048-132" |
| 89 | 91 | 22-008-03 - Exar Semiconductor XR22-008-03 keyboard matrix capacitive readout latch |
| 90 | 92 | 22-050-3B - Exar Semiconductor XR22-050-3B keyboard matrix row driver with 4 to 12 decoder/demultiplexer |
| 91 | | XTAL - Luxor part number 48-300-06 |
| 92 | 93 | CN1 - keyboard data connector |
| 93 | 94 | |
| 94 | 95 | |
| r9211 | r9212 | |
| 127 | 128 | |
| 128 | 129 | TODO: |
| 129 | 130 | |
| 131 | - check compatibility with new MC6845 |
| 132 | - ABC800 keyboard: T1 clock frequency, caps lock led, keydown |
| 133 | - ABC802/806 ABC77 keyboard |
| 130 | 134 | - find ROMs for ABC800C |
| 131 | | - ABC800M/C integrated keyboard |
| 132 | | - ABC802/806 ABC77 keyboard |
| 133 | | - floppy controller board |
| 134 | 135 | - hard disks (ABC-850 10MB, ABC-852 20MB, ABC-856 60MB) |
| 135 | 136 | |
| 136 | 137 | */ |
| r9211 | r9212 | |
| 173 | 174 | CHANNEL_B |
| 174 | 175 | }; |
| 175 | 176 | |
| 176 | | |
| 177 | 177 | static int keylatch; |
| 178 | 178 | |
| 179 | 179 | static const UINT8 abc800_keycodes[7*4][8] = |
| r9211 | r9212 | |
| 512 | 512 | |
| 513 | 513 | /* Keyboard */ |
| 514 | 514 | |
| 515 | | #ifdef UNUSED_FUNCTION |
| 515 | static TIMER_DEVICE_CALLBACK( keyboard_t1_tick ) |
| 516 | { |
| 517 | abc800_state *state = timer.machine->driver_data<abc800_state>(); |
| 518 | |
| 519 | state->kb_clk = !state->kb_clk; |
| 520 | |
| 521 | z80dart_rxtxcb_w(state->z80dart, state->kb_clk); |
| 522 | } |
| 523 | |
| 516 | 524 | static READ_LINE_DEVICE_HANDLER( keyboard_txd_r ) |
| 517 | 525 | { |
| 518 | 526 | abc800_state *state = device->machine->driver_data<abc800_state>(); |
| r9211 | r9212 | |
| 524 | 532 | { |
| 525 | 533 | cpu_set_input_line(device, MCS48_INPUT_IRQ, state ? CLEAR_LINE : ASSERT_LINE); |
| 526 | 534 | } |
| 527 | | #endif |
| 528 | 535 | |
| 529 | 536 | static READ8_HANDLER( keyboard_col_r ) |
| 530 | 537 | { |
| 531 | 538 | abc800_state *state = space->machine->driver_data<abc800_state>(); |
| 532 | 539 | |
| 533 | | static const char *const ABC800_KEYNAMES[] = { "X0", "X1", "X2", "X3", "X4", "X5", "X6", "X7", "X8", "X9", "X10", "X11" }; |
| 540 | static const char *const ABC800_KEY_ROW[] = { "Y0", "Y1", "Y2", "Y3", "Y4", "Y5", "Y6", "Y7", "Y8", "Y9", "Y10", "Y11" }; |
| 534 | 541 | UINT8 data = 0xff; |
| 535 | 542 | |
| 536 | | if (state->kb_row < 12) |
| 543 | if (state->kb_stb && state->kb_row < 12) |
| 537 | 544 | { |
| 538 | | data = input_port_read(space->machine, ABC800_KEYNAMES[state->kb_row]); |
| 545 | data = input_port_read(space->machine, ABC800_KEY_ROW[state->kb_row]); |
| 539 | 546 | } |
| 540 | 547 | |
| 541 | 548 | return data; |
| r9211 | r9212 | |
| 551 | 558 | 1 A1 |
| 552 | 559 | 2 A2 |
| 553 | 560 | 3 A3 |
| 554 | | 4 |
| 555 | | 5 |
| 561 | 4 ? |
| 562 | 5 ? |
| 556 | 563 | 6 |
| 557 | 564 | 7 |
| 558 | 565 | |
| r9211 | r9212 | |
| 560 | 567 | |
| 561 | 568 | abc800_state *state = space->machine->driver_data<abc800_state>(); |
| 562 | 569 | |
| 563 | | if (data == 0xff) return; |
| 564 | | |
| 565 | | /* keyboard row */ |
| 566 | | state->kb_row = data & 0x0f; |
| 570 | // keyboard row |
| 571 | if (!state->kb_stb) |
| 572 | { |
| 573 | state->kb_row = data & 0x0f; |
| 574 | } |
| 567 | 575 | } |
| 568 | 576 | |
| 569 | 577 | static WRITE8_HANDLER( keyboard_ctrl_w ) |
| r9211 | r9212 | |
| 576 | 584 | 1 |
| 577 | 585 | 2 |
| 578 | 586 | 3 |
| 579 | | 4 |
| 580 | | 5 |
| 581 | | 6 |
| 582 | | 7 |
| 587 | 4 TxD |
| 588 | 5 ? |
| 589 | 6 22-008-03 CLR, 22-050-3B STB |
| 590 | 7 22-008-03 HYS |
| 583 | 591 | |
| 584 | 592 | */ |
| 593 | |
| 594 | abc800_state *state = space->machine->driver_data<abc800_state>(); |
| 595 | |
| 596 | // TxD |
| 597 | state->kb_txd = !BIT(data, 4); |
| 598 | |
| 599 | // keydown |
| 600 | z80dart_dcdb_w(state->z80dart, !BIT(data, 5)); |
| 601 | |
| 602 | // strobe |
| 603 | state->kb_stb = BIT(data, 6); |
| 585 | 604 | } |
| 586 | 605 | |
| 606 | static READ8_HANDLER( keyboard_t1_r ) |
| 607 | { |
| 608 | abc800_state *state = space->machine->driver_data<abc800_state>(); |
| 609 | |
| 610 | return state->kb_clk; |
| 611 | } |
| 612 | |
| 587 | 613 | /* Memory Maps */ |
| 588 | 614 | |
| 589 | 615 | // ABC 800M |
| r9211 | r9212 | |
| 619 | 645 | static ADDRESS_MAP_START( keyboard_io_map, ADDRESS_SPACE_IO, 8 ) |
| 620 | 646 | AM_RANGE(MCS48_PORT_P1, MCS48_PORT_P1) AM_READWRITE(keyboard_col_r, keyboard_row_w) |
| 621 | 647 | AM_RANGE(MCS48_PORT_P2, MCS48_PORT_P2) AM_WRITE(keyboard_ctrl_w) |
| 622 | | AM_RANGE(MCS48_PORT_T1, MCS48_PORT_T1) AM_READNOP |
| 648 | AM_RANGE(MCS48_PORT_T1, MCS48_PORT_T1) AM_READ(keyboard_t1_r) |
| 623 | 649 | ADDRESS_MAP_END |
| 624 | 650 | |
| 625 | 651 | // ABC 800C |
| r9211 | r9212 | |
| 723 | 749 | |
| 724 | 750 | /* Input Ports */ |
| 725 | 751 | |
| 752 | INPUT_PORTS_START( abc800 ) |
| 753 | PORT_START("Y0") |
| 754 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!') |
| 755 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("CAPS LOCK") PORT_CODE(KEYCODE_CAPSLOCK) PORT_CHAR(UCHAR_MAMEKEY(CAPSLOCK)) |
| 756 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("CTRL") PORT_CODE(KEYCODE_LCONTROL) PORT_CHAR(UCHAR_MAMEKEY(LCONTROL)) |
| 757 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Left SHIFT") PORT_CODE(KEYCODE_LSHIFT) PORT_CHAR(UCHAR_SHIFT_1) |
| 758 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) // 80 |
| 759 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) // 81 |
| 760 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) // 82 |
| 761 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) // 83 |
| 762 | |
| 763 | PORT_START("Y1") |
| 764 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('"') |
| 765 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Q) PORT_CHAR('q') PORT_CHAR('Q') |
| 766 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_A) PORT_CHAR('a') PORT_CHAR('A') |
| 767 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Z) PORT_CHAR('z') PORT_CHAR('Z') |
| 768 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad -") PORT_CODE(KEYCODE_MINUS_PAD) PORT_CHAR(UCHAR_MAMEKEY(MINUS_PAD)) |
| 769 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad RETURN") PORT_CODE(KEYCODE_ENTER_PAD) PORT_CHAR(UCHAR_MAMEKEY(ENTER_PAD)) |
| 770 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) // 84 |
| 771 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) // 85 |
| 772 | |
| 773 | PORT_START("Y2") |
| 774 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#') |
| 775 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_W) PORT_CHAR('w') PORT_CHAR('W') |
| 776 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('s') PORT_CHAR('S') |
| 777 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('x') PORT_CHAR('X') |
| 778 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) // 18 |
| 779 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 6") PORT_CODE(KEYCODE_6_PAD) PORT_CHAR(UCHAR_MAMEKEY(6_PAD)) |
| 780 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 3") PORT_CODE(KEYCODE_3_PAD) PORT_CHAR(UCHAR_MAMEKEY(3_PAD)) |
| 781 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) // 86 |
| 782 | |
| 783 | PORT_START("Y3") |
| 784 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("4 \xC2\xA4") PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR(0x00A4) |
| 785 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_E) PORT_CHAR('e') PORT_CHAR('E') |
| 786 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_D) PORT_CHAR('d') PORT_CHAR('D') |
| 787 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C') |
| 788 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 9") PORT_CODE(KEYCODE_9_PAD) PORT_CHAR(UCHAR_MAMEKEY(9_PAD)) |
| 789 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 5") PORT_CODE(KEYCODE_5_PAD) PORT_CHAR(UCHAR_MAMEKEY(5_PAD)) |
| 790 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 2") PORT_CODE(KEYCODE_2_PAD) PORT_CHAR(UCHAR_MAMEKEY(2_PAD)) |
| 791 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("SPACE") PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') |
| 792 | |
| 793 | PORT_START("Y4") |
| 794 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%') |
| 795 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_R) PORT_CHAR('r') PORT_CHAR('R') |
| 796 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F) PORT_CHAR('f') PORT_CHAR('F') |
| 797 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V') |
| 798 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 8") PORT_CODE(KEYCODE_8_PAD) PORT_CHAR(UCHAR_MAMEKEY(8_PAD)) |
| 799 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 4") PORT_CODE(KEYCODE_4_PAD) PORT_CHAR(UCHAR_MAMEKEY(4_PAD)) |
| 800 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 1") PORT_CODE(KEYCODE_1_PAD) PORT_CHAR(UCHAR_MAMEKEY(1_PAD)) |
| 801 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad .") PORT_CODE(KEYCODE_DEL_PAD) PORT_CHAR(UCHAR_MAMEKEY(DEL_PAD)) |
| 802 | |
| 803 | PORT_START("Y5") |
| 804 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&') |
| 805 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_T) PORT_CHAR('t') PORT_CHAR('T') |
| 806 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G') |
| 807 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B') |
| 808 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 7") PORT_CODE(KEYCODE_7_PAD) PORT_CHAR(UCHAR_MAMEKEY(7_PAD)) |
| 809 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF4") PORT_CODE(KEYCODE_F4) PORT_CHAR(UCHAR_MAMEKEY(F4)) |
| 810 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF6") PORT_CODE(KEYCODE_F6) PORT_CHAR(UCHAR_MAMEKEY(F6)) |
| 811 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Keypad 0") PORT_CODE(KEYCODE_0_PAD) PORT_CHAR(UCHAR_MAMEKEY(0_PAD)) |
| 812 | |
| 813 | PORT_START("Y6") |
| 814 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('/') |
| 815 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y') |
| 816 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H') |
| 817 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N') |
| 818 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF2") PORT_CODE(KEYCODE_F2) PORT_CHAR(UCHAR_MAMEKEY(F2)) |
| 819 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF3") PORT_CODE(KEYCODE_F3) PORT_CHAR(UCHAR_MAMEKEY(F3)) |
| 820 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF5") PORT_CODE(KEYCODE_F5) PORT_CHAR(UCHAR_MAMEKEY(F5)) |
| 821 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF8") PORT_CODE(KEYCODE_F8) PORT_CHAR(UCHAR_MAMEKEY(F8)) |
| 822 | |
| 823 | PORT_START("Y7") |
| 824 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('(') |
| 825 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U') |
| 826 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J') |
| 827 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_M) PORT_CHAR('m') PORT_CHAR('M') |
| 828 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF1") PORT_CODE(KEYCODE_F1) PORT_CHAR(UCHAR_MAMEKEY(F1)) |
| 829 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("RETURN") PORT_CODE(KEYCODE_ENTER) PORT_CHAR('\r') |
| 830 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xE2\x86\x90") PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(8) |
| 831 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF7") PORT_CODE(KEYCODE_F7) PORT_CHAR(UCHAR_MAMEKEY(F7)) |
| 832 | |
| 833 | PORT_START("Y8") |
| 834 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')') |
| 835 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_I) PORT_CHAR('i') PORT_CHAR('I') |
| 836 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_K) PORT_CHAR('k') PORT_CHAR('K') |
| 837 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR(';') |
| 838 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR('<') PORT_CHAR('>') |
| 839 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\xBC \xC3\x9C") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR(0x00FC) PORT_CHAR(0x00DC) |
| 840 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_BACKSLASH2) PORT_CHAR('\'') PORT_CHAR('*') |
| 841 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xE2\x86\x92") PORT_CODE(KEYCODE_TAB) PORT_CHAR(UCHAR_MAMEKEY(TAB)) |
| 842 | |
| 843 | PORT_START("Y9") |
| 844 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR('=') |
| 845 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_O) PORT_CHAR('o') PORT_CHAR('O') |
| 846 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_L) PORT_CHAR('l') PORT_CHAR('L') |
| 847 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_CHAR(':') |
| 848 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\xA9 \xC3\x89") PORT_CODE(KEYCODE_EQUALS) PORT_CHAR(0x00E9) PORT_CHAR(0x00C9) |
| 849 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\xA5 \xC3\x85") PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR(0x00E5) PORT_CHAR(0x00C5) |
| 850 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\xA4 \xC3\x84") PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(0x00E4) PORT_CHAR(0x00C4) |
| 851 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Right SHIFT") PORT_CODE(KEYCODE_RSHIFT) |
| 852 | |
| 853 | PORT_START("Y10") |
| 854 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_MINUS) PORT_CHAR('+') PORT_CHAR('?') |
| 855 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P') |
| 856 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\xB6 \xC3\x96") PORT_CODE(KEYCODE_COLON) PORT_CHAR(0x00F6) PORT_CHAR(0x00D6) |
| 857 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_SLASH) PORT_CHAR('-') PORT_CHAR('_') |
| 858 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) // 87 |
| 859 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) // 88 |
| 860 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) // 89 |
| 861 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) // 8a |
| 862 | |
| 863 | PORT_START("Y11") |
| 864 | PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNUSED ) // 03 |
| 865 | PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNUSED ) // 23 |
| 866 | PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_UNUSED ) // 96 |
| 867 | PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNUSED ) // 8b |
| 868 | PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) // 8c |
| 869 | PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) // 8d |
| 870 | PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) // 8e |
| 871 | PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) // 8f |
| 872 | |
| 873 | PORT_START("SB") |
| 874 | PORT_DIPNAME( 0xff, 0xaa, "Serial Communications" ) PORT_DIPLOCATION("SB:1,2,3,4,5,6,7,8") |
| 875 | PORT_DIPSETTING( 0xaa, "Asynchronous, Single Speed" ) |
| 876 | PORT_DIPSETTING( 0x2e, "Asynchronous, Split Speed" ) |
| 877 | PORT_DIPSETTING( 0x50, "Synchronous" ) |
| 878 | PORT_DIPSETTING( 0x8b, "ABC NET" ) |
| 879 | |
| 880 | PORT_INCLUDE(luxor_55_21046) |
| 881 | INPUT_PORTS_END |
| 882 | |
| 726 | 883 | static INPUT_PORTS_START( fake_keyboard ) |
| 727 | 884 | PORT_START("ROW0") |
| 728 | 885 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!') |
| r9211 | r9212 | |
| 796 | 953 | |
| 797 | 954 | PORT_START("ROW7") |
| 798 | 955 | PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("LEFT SHIFT") PORT_CODE(KEYCODE_LSHIFT) PORT_CHAR(UCHAR_SHIFT_1) |
| 799 | | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("RIGHT SHIFT") PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1) |
| 956 | PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("RIGHT SHIFT") PORT_CODE(KEYCODE_RSHIFT) |
| 800 | 957 | PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("UPPER CASE") PORT_CODE(KEYCODE_CAPSLOCK) PORT_CHAR(UCHAR_MAMEKEY(CAPSLOCK)) PORT_TOGGLE |
| 801 | 958 | PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("CTRL") PORT_CODE(KEYCODE_LCONTROL) PORT_CHAR(UCHAR_MAMEKEY(LCONTROL)) |
| 802 | 959 | PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| r9211 | r9212 | |
| 805 | 962 | PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_UNUSED ) |
| 806 | 963 | INPUT_PORTS_END |
| 807 | 964 | |
| 808 | | INPUT_PORTS_START( abc800 ) |
| 809 | | PORT_INCLUDE(fake_keyboard) |
| 810 | | |
| 811 | | PORT_START("SB") |
| 812 | | PORT_DIPNAME( 0xff, 0xaa, "Serial Communications" ) PORT_DIPLOCATION("SB:1,2,3,4,5,6,7,8") |
| 813 | | PORT_DIPSETTING( 0xaa, "Asynchronous, Single Speed" ) |
| 814 | | PORT_DIPSETTING( 0x2e, "Asynchronous, Split Speed" ) |
| 815 | | PORT_DIPSETTING( 0x50, "Synchronous" ) |
| 816 | | PORT_DIPSETTING( 0x8b, "ABC NET" ) |
| 817 | | |
| 818 | | PORT_INCLUDE(luxor_55_21046) |
| 819 | | INPUT_PORTS_END |
| 820 | | |
| 821 | 965 | static INPUT_PORTS_START( abc802 ) |
| 822 | 966 | PORT_INCLUDE(fake_keyboard) |
| 823 | 967 | |
| r9211 | r9212 | |
| 829 | 973 | PORT_DIPSETTING( 0x8b, "ABC NET" ) |
| 830 | 974 | |
| 831 | 975 | PORT_START("CONFIG") |
| 832 | | PORT_CONFNAME( 0x01, 0x00, "Clear Screen Time Out" ) |
| 833 | | PORT_CONFSETTING( 0x00, DEF_STR( Off ) ) |
| 834 | | PORT_CONFSETTING( 0x01, DEF_STR( On ) ) |
| 835 | | PORT_CONFNAME( 0x02, 0x02, DEF_STR( Unknown ) ) |
| 836 | | PORT_CONFSETTING( 0x00, DEF_STR( Off ) ) |
| 837 | | PORT_CONFSETTING( 0x02, DEF_STR( On ) ) |
| 838 | | PORT_CONFNAME( 0x04, 0x00, "Characters Per Line" ) |
| 839 | | PORT_CONFSETTING( 0x00, "40" ) |
| 840 | | PORT_CONFSETTING( 0x04, "80" ) |
| 841 | | PORT_CONFNAME( 0x08, 0x08, "Frame Frequency" ) |
| 842 | | PORT_CONFSETTING( 0x00, "60 Hz" ) |
| 843 | | PORT_CONFSETTING( 0x08, "50 Hz" ) |
| 976 | PORT_DIPNAME( 0x01, 0x00, "Clear Screen Time Out" ) PORT_DIPLOCATION("S1:1") |
| 977 | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 978 | PORT_DIPSETTING( 0x01, DEF_STR( On ) ) |
| 979 | PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) ) PORT_DIPLOCATION("S2:1") |
| 980 | PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) |
| 981 | PORT_DIPSETTING( 0x02, DEF_STR( On ) ) |
| 982 | PORT_DIPNAME( 0x04, 0x00, "Characters Per Line" ) PORT_DIPLOCATION("S3:1") |
| 983 | PORT_DIPSETTING( 0x00, "40" ) |
| 984 | PORT_DIPSETTING( 0x04, "80" ) |
| 985 | PORT_DIPNAME( 0x08, 0x08, "Frame Frequency" ) |
| 986 | PORT_DIPSETTING( 0x00, "60 Hz" ) |
| 987 | PORT_DIPSETTING( 0x08, "50 Hz" ) |
| 844 | 988 | |
| 845 | 989 | PORT_INCLUDE(luxor_55_21046) |
| 846 | 990 | INPUT_PORTS_END |
| r9211 | r9212 | |
| 996 | 1140 | DEVCB_NULL, |
| 997 | 1141 | DEVCB_NULL, |
| 998 | 1142 | |
| 999 | | DEVCB_NULL,//DEVCB_LINE(keyboard_txd_r), |
| 1000 | | DEVCB_NULL,//DEVCB_DEVICE_LINE(I8048_TAG, keyboard_rxd_w), |
| 1143 | DEVCB_LINE(keyboard_txd_r), |
| 1144 | DEVCB_DEVICE_LINE(I8048_TAG, keyboard_rxd_w), |
| 1001 | 1145 | DEVCB_NULL, |
| 1002 | 1146 | DEVCB_NULL, |
| 1003 | 1147 | DEVCB_NULL, |
| r9211 | r9212 | |
| 1124 | 1268 | state_save_register_global(machine, state->kb_row); |
| 1125 | 1269 | state_save_register_global(machine, state->kb_txd); |
| 1126 | 1270 | state_save_register_global(machine, state->kb_clk); |
| 1271 | state_save_register_global(machine, state->kb_stb); |
| 1127 | 1272 | state_save_register_global(machine, state->pling); |
| 1128 | 1273 | state_save_register_global(machine, state->z80sio_rxcb); |
| 1129 | 1274 | state_save_register_global(machine, state->z80sio_txcb); |
| r9211 | r9212 | |
| 1135 | 1280 | |
| 1136 | 1281 | state->fetch_charram = 0; |
| 1137 | 1282 | abc800_bankswitch(machine); |
| 1283 | |
| 1284 | z80dart_ria_w(state->z80dart, 1); |
| 1285 | |
| 1286 | /* 50/60 Hz */ |
| 1287 | z80dart_ctsb_w(state->z80dart, 0); // 0 = 50Hz, 1 = 60Hz |
| 1138 | 1288 | } |
| 1139 | 1289 | |
| 1140 | 1290 | static MACHINE_START( abc802 ) |
| r9211 | r9212 | |
| 1236 | 1386 | e0516_clk_w(state->e0516, 1); |
| 1237 | 1387 | e0516_dio_w(state->e0516, 1); |
| 1238 | 1388 | |
| 1239 | | /* 40/80 char */ |
| 1240 | | z80dart_ria_w(state->z80dart, 1); // 0 = 40, 1 = 80 |
| 1389 | z80dart_ria_w(state->z80dart, 1); |
| 1241 | 1390 | |
| 1242 | 1391 | /* 50/60 Hz */ |
| 1243 | 1392 | z80dart_ctsb_w(state->z80dart, 0); // 0 = 50Hz, 1 = 60Hz |
| r9211 | r9212 | |
| 1245 | 1394 | |
| 1246 | 1395 | /* Machine Drivers */ |
| 1247 | 1396 | |
| 1248 | | static MACHINE_CONFIG_START( abc800m, abc800_state ) |
| 1249 | | |
| 1397 | static MACHINE_CONFIG_START( abc800, abc800_state ) |
| 1250 | 1398 | /* basic machine hardware */ |
| 1251 | 1399 | MDRV_CPU_ADD(Z80_TAG, Z80, ABC800_X01/2/2) |
| 1252 | 1400 | MDRV_CPU_CONFIG(abc800_daisy_chain) |
| 1253 | 1401 | MDRV_CPU_PROGRAM_MAP(abc800m_map) |
| 1254 | 1402 | MDRV_CPU_IO_MAP(abc800m_io_map) |
| 1255 | 1403 | |
| 1256 | | MDRV_CPU_ADD(I8048_TAG, I8048, 4608000) |
| 1404 | MDRV_CPU_ADD(I8048_TAG, I8048, XTAL_5_9904MHz) |
| 1257 | 1405 | MDRV_CPU_IO_MAP(keyboard_io_map) |
| 1258 | 1406 | |
| 1259 | 1407 | MDRV_MACHINE_START(abc800) |
| 1260 | 1408 | MDRV_MACHINE_RESET(abc800) |
| 1261 | 1409 | |
| 1262 | | /* video hardware */ |
| 1263 | | MDRV_FRAGMENT_ADD(abc800m_video) |
| 1264 | | |
| 1265 | 1410 | /* sound hardware */ |
| 1266 | 1411 | MDRV_SPEAKER_STANDARD_MONO("mono") |
| 1267 | 1412 | MDRV_SOUND_ADD("discrete", DISCRETE, 0) |
| r9211 | r9212 | |
| 1275 | 1420 | MDRV_Z80DART_ADD(Z80DART_TAG, ABC800_X01/2/2, abc800_dart_intf) |
| 1276 | 1421 | MDRV_PRINTER_ADD("printer") |
| 1277 | 1422 | MDRV_CASSETTE_ADD(CASSETTE_TAG, abc800_cassette_config) |
| 1423 | MDRV_TIMER_ADD_PERIODIC("keyboard_t1", keyboard_t1_tick, HZ(XTAL_5_9904MHz/(3*5)/20)) // TODO correct frequency? |
| 1278 | 1424 | |
| 1279 | 1425 | /* ABC bus */ |
| 1280 | 1426 | MDRV_ABCBUS_ADD(ABCBUS_TAG, abcbus_daisy, Z80_TAG) |
| 1281 | 1427 | MDRV_ABC830_ADD("luxor_55_21046", ABCBUS_TAG, DRIVE_BASF_6106_08) |
| 1282 | 1428 | |
| 1283 | | /* fake keyboard */ |
| 1284 | | MDRV_TIMER_ADD_PERIODIC("keyboard", keyboard_tick, USEC(2500)) |
| 1285 | | |
| 1286 | 1429 | /* internal ram */ |
| 1287 | 1430 | MDRV_RAM_ADD("messram") |
| 1288 | 1431 | MDRV_RAM_DEFAULT_SIZE("16K") |
| 1289 | 1432 | MDRV_RAM_EXTRA_OPTIONS("32K") |
| 1290 | 1433 | MACHINE_CONFIG_END |
| 1291 | 1434 | |
| 1292 | | static MACHINE_CONFIG_START( abc800c, abc800_state ) |
| 1435 | static MACHINE_CONFIG_DERIVED( abc800m, abc800 ) |
| 1436 | /* video hardware */ |
| 1437 | MDRV_FRAGMENT_ADD(abc800m_video) |
| 1438 | MACHINE_CONFIG_END |
| 1293 | 1439 | |
| 1440 | static MACHINE_CONFIG_DERIVED( abc800c, abc800 ) |
| 1294 | 1441 | /* basic machine hardware */ |
| 1295 | | MDRV_CPU_ADD(Z80_TAG, Z80, ABC800_X01/2/2) |
| 1296 | | MDRV_CPU_CONFIG(abc800_daisy_chain) |
| 1442 | MDRV_CPU_MODIFY(Z80_TAG) |
| 1297 | 1443 | MDRV_CPU_PROGRAM_MAP(abc800c_map) |
| 1298 | 1444 | MDRV_CPU_IO_MAP(abc800c_io_map) |
| 1299 | 1445 | |
| 1300 | | MDRV_MACHINE_START(abc800) |
| 1301 | | MDRV_MACHINE_RESET(abc800) |
| 1302 | | |
| 1303 | 1446 | /* video hardware */ |
| 1304 | 1447 | MDRV_FRAGMENT_ADD(abc800c_video) |
| 1305 | | |
| 1306 | | /* sound hardware */ |
| 1307 | | MDRV_SPEAKER_STANDARD_MONO("mono") |
| 1308 | | MDRV_SOUND_ADD("discrete", DISCRETE, 0) |
| 1309 | | MDRV_SOUND_CONFIG_DISCRETE(abc800) |
| 1310 | | MDRV_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.80) |
| 1311 | | |
| 1312 | | /* peripheral hardware */ |
| 1313 | | MDRV_Z80CTC_ADD(Z80CTC_TAG, ABC800_X01/2/2, ctc_intf) |
| 1314 | | MDRV_TIMER_ADD_PERIODIC("ctc", ctc_tick, HZ(ABC800_X01/2/2/2)) |
| 1315 | | MDRV_Z80SIO2_ADD(Z80SIO_TAG, ABC800_X01/2/2, sio_intf) |
| 1316 | | MDRV_Z80DART_ADD(Z80DART_TAG, ABC800_X01/2/2, abc800_dart_intf) |
| 1317 | | MDRV_PRINTER_ADD("printer") |
| 1318 | | MDRV_CASSETTE_ADD(CASSETTE_TAG, abc800_cassette_config) |
| 1319 | | |
| 1320 | | /* ABC bus */ |
| 1321 | | MDRV_ABCBUS_ADD(ABCBUS_TAG, abcbus_daisy, Z80_TAG) |
| 1322 | | MDRV_ABC830_ADD("luxor_55_21046", ABCBUS_TAG, DRIVE_BASF_6106_08) |
| 1323 | | |
| 1324 | | /* fake keyboard */ |
| 1325 | | MDRV_TIMER_ADD_PERIODIC("keyboard", keyboard_tick, USEC(2500)) |
| 1326 | | |
| 1327 | | /* internal ram */ |
| 1328 | | MDRV_RAM_ADD("messram") |
| 1329 | | MDRV_RAM_DEFAULT_SIZE("16K") |
| 1330 | | MDRV_RAM_EXTRA_OPTIONS("32K") |
| 1331 | 1448 | MACHINE_CONFIG_END |
| 1332 | 1449 | |
| 1333 | 1450 | static MACHINE_CONFIG_START( abc802, abc802_state ) |
| 1334 | | |
| 1335 | 1451 | /* basic machine hardware */ |
| 1336 | 1452 | MDRV_CPU_ADD(Z80_TAG, Z80, ABC800_X01/2/2) |
| 1337 | 1453 | MDRV_CPU_CONFIG(abc800_daisy_chain) |
| r9211 | r9212 | |
| 1372 | 1488 | MACHINE_CONFIG_END |
| 1373 | 1489 | |
| 1374 | 1490 | static MACHINE_CONFIG_START( abc806, abc806_state ) |
| 1375 | | |
| 1376 | 1491 | /* basic machine hardware */ |
| 1377 | 1492 | MDRV_CPU_ADD(Z80_TAG, Z80, ABC800_X01/2/2) |
| 1378 | 1493 | MDRV_CPU_CONFIG(abc800_daisy_chain) |
| r9211 | r9212 | |
| 1454 | 1569 | ROM_LOAD( "abc 7-22.2j", 0x7000, 0x1000, CRC(774511ab) SHA1(5171e43213a402c2d96dee33453c8306ac1aafc8) ) |
| 1455 | 1570 | |
| 1456 | 1571 | ROM_REGION( 0x400, I8048_TAG, 0 ) |
| 1457 | | ROM_LOAD( "8048-132", 0x0000, 0x0400, CRC(05c4dce5) SHA1(1824c5d304bbd09f97056cfa408e1b18b5219ba2) ) |
| 1572 | ROM_LOAD( "8048-132.z9", 0x0000, 0x0400, CRC(05c4dce5) SHA1(1824c5d304bbd09f97056cfa408e1b18b5219ba2) ) |
| 1458 | 1573 | |
| 1459 | 1574 | ROM_REGION( 0x800, "chargen", 0 ) |
| 1460 | 1575 | ROM_LOAD( "vum se.7c", 0x0000, 0x0800, CRC(f9152163) SHA1(997313781ddcbbb7121dbf9eb5f2c6b4551fc799) ) |
| r9211 | r9212 | |
| 1649 | 1764 | /* System Drivers */ |
| 1650 | 1765 | |
| 1651 | 1766 | /* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ |
| 1652 | | COMP( 1981, abc800m, 0, 0, abc800m, abc800, abc800m, "Luxor Datorer AB", "ABC 800 M/HR", GAME_IMPERFECT_GRAPHICS | GAME_IMPERFECT_SOUND ) |
| 1653 | | COMP( 1981, abc800c, abc800m, 0, abc800c, abc800, abc800c, "Luxor Datorer AB", "ABC 800 C/HR", GAME_NOT_WORKING ) |
| 1654 | | COMP( 1983, abc802, 0, 0, abc802, abc802, abc802, "Luxor Datorer AB", "ABC 802", GAME_IMPERFECT_GRAPHICS | GAME_IMPERFECT_SOUND ) |
| 1655 | | COMP( 1983, abc806, 0, 0, abc806, abc806, abc806, "Luxor Datorer AB", "ABC 806", GAME_IMPERFECT_GRAPHICS | GAME_IMPERFECT_SOUND | GAME_NO_SOUND) |
| 1767 | COMP( 1981, abc800m, 0, 0, abc800m, abc800, abc800m, "Luxor Datorer AB", "ABC 800 M/HR", GAME_SUPPORTS_SAVE ) |
| 1768 | COMP( 1981, abc800c, abc800m, 0, abc800c, abc800, abc800c, "Luxor Datorer AB", "ABC 800 C/HR", GAME_SUPPORTS_SAVE | GAME_NOT_WORKING ) |
| 1769 | COMP( 1983, abc802, 0, 0, abc802, abc802, abc802, "Luxor Datorer AB", "ABC 802", GAME_SUPPORTS_SAVE ) |
| 1770 | COMP( 1983, abc806, 0, 0, abc806, abc806, abc806, "Luxor Datorer AB", "ABC 806", GAME_SUPPORTS_SAVE | GAME_NO_SOUND ) |