source/src/vm/pasopia7/keyboard.cpp

   1 /*
   2         TOSHIBA PASOPIA 7 Emulator 'EmuPIA7'
   3
   4         Author : Takeda.Toshiya
   5         Date   : 2006.09.20 -
   6
   7         [ keyboard ]
   8 */
   9
  10 #include "keyboard.h"
  11 #include "../z80pio.h"
  12
  13 namespace PASOPIA7 {
  14
  15 static const int key_map[12][8] = {
  16         { 0x12, 0x10, 0x14, 0x00, 0x11, 0x15, 0x00, 0x00 },
  17         { 0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67 },
  18         { 0x68, 0x69, 0x6d, 0x6b, 0x6a, 0x6f, 0x6e, 0x0d },
  19         { 0x27, 0x7a, 0x2e, 0x1b, 0x00, 0x00, 0x00, 0x00 },
  20         { 0x24, 0xe5, 0x78, 0x79, 0x25, 0x26, 0x00, 0x20 },
  21         { 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77 },
  22         { 0x31, 0x30, 0x34, 0x52, 0x59, 0xe2, 0xde, 0xdc },
  23         { 0x32, 0x33, 0x38, 0x54, 0x55, 0x37, 0xc0, 0xdb },
  24         { 0xbd, 0x35, 0x36, 0x46, 0x48, 0x39, 0xba, 0xdd },
  25         { 0x51, 0x57, 0x45, 0x47, 0x4a, 0x49, 0x4f, 0x50 },
  26         { 0x41, 0x53, 0x44, 0x56, 0x4e, 0x4b, 0x4c, 0xbb },
  27         { 0x5a, 0x58, 0x43, 0x42, 0x4d, 0xbc, 0xbe, 0xbf }
  28 };
  29
  30 void KEYBOARD::initialize()
  31 {
  32         key_stat = emu->get_key_buffer();
  33         register_frame_event(this);
  34 }
  35
  36 void KEYBOARD::write_signal(int id, uint32_t data, uint32_t mask)
  37 {
  38         if(id == SIG_KEYBOARD_Z80PIO_A) {
  39                 // from Z-80PIO Port A
  40                 sel = data & mask;
  41                 create_key();
  42         }
  43 }
  44
  45 void KEYBOARD::event_frame()
  46 {
  47         create_key();
  48 }
  49
  50 void KEYBOARD::create_key()
  51 {
  52         // update port-b
  53         uint8_t keys[256];
  54         memcpy(keys, key_stat, sizeof(keys));
  55
  56         keys[0] = 0;
  57         // backspace -> del
  58         if(keys[0x08]) keys[0x2e] = 0x80;
  59         // down -> up + shift
  60         if(keys[0x28]) keys[0x26] = keys[0x10] = 0x80;
  61         // inst -> del + shift
  62         if(keys[0x2d]) keys[0x2e] = keys[0x10] = 0x80;
  63         // tab -> esc + shift
  64         if(keys[0x09]) keys[0x1b] = keys[0x10] = 0x80;
  65
  66         uint8_t val = 0;
  67         for(int i = 0; i < 3; i++) {
  68                 if(sel & (0x10 << i)) {
  69                         for(int j = 0; j < 4; j++) {
  70                                 if(sel & (1 << j)) {
  71                                         for(int k = 0; k < 8; k++) {
  72                                                 val |= keys[key_map[i * 4 + j][k]] ? (1 << k) : 0;
  73                                         }
  74                                 }
  75                         }
  76                 }
  77         }
  78         // to Z-80PIO Port B
  79         d_pio->write_signal(SIG_Z80PIO_PORT_B, ~val, 0xff);
  80 }
  81
  82 #define STATE_VERSION   1
  83
  84 bool KEYBOARD::process_state(FILEIO* state_fio, bool loading)
  85 {
  86         if(!state_fio->StateCheckUint32(STATE_VERSION)) {
  87                 return false;
  88         }
  89         if(!state_fio->StateCheckInt32(this_device_id)) {
  90                 return false;
  91         }
  92         state_fio->StateUint8(sel);
  93         return true;
  94 }
  95
  96 }