source/src/vm/pc8201/keyboard.cpp

   1 /*
   2         NEC PC-8201 Emulator 'ePC-8201'
   3
   4         Author : Takeda.Toshiya
   5         Date   : 2009.03.31-
   6
   7         [ keyboard ]
   8 */
   9
  10 #include "keyboard.h"
  11
  12 static const int key_map[9][8] = {
  13         {0x5a, 0x58, 0x43, 0x56, 0x42, 0x4e, 0x4d, 0x4c},       //      Z       X       C       V       B       N       M       L
  14         {0x41, 0x53, 0x44, 0x46, 0x47, 0x48, 0x4a, 0x4b},       //      A       S       D       F       G       H       J       K
  15         {0x51, 0x57, 0x45, 0x52, 0x54, 0x59, 0x55, 0x49},       //      G       W       E       R       T       Y       U       I
  16 #ifdef _PC8201A
  17         // thanks apaslothy!
  18         {0x4f, 0x50, 0xbb, 0xdc, 0xbc, 0xbe, 0xbf, 0xdd},       //      O       P       =       \       ,       .       /       ]
  19         {0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38},       //      1       2       3       4       5       6       7       8
  20         {0x39, 0x30, 0xba, 0xde, 0xbd, 0xdb, 0x20, 0x2d},       //      9       0       ;       '       -       [       SPACE   INS
  21         {0x08, 0x26, 0x28, 0x25, 0x27, 0x09, 0x1b, 0x0d},       //      DEL     UP      DOWN    LEFT    RIGHT   TAB     ESC     RET
  22 #else
  23         {0x4f, 0x50, 0xc0, 0xdc, 0xbc, 0xbe, 0xbf, 0xde},       //      O       P       @       \       ,       .       /       ^
  24         {0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38},       //      1       2       3       4       5       6       7       8
  25         {0x39, 0x30, 0xbb, 0xba, 0xbd, 0x20, 0x2d, 0x08},       //      9       0       ;       :       -       SPACE   INS     BS
  26         {0x26, 0x28, 0x25, 0x27, 0x09, 0x1b, 0x0d, 0x00},       //      UP      DOWN    LEFT    RIGHT   TAB     ESC     RET
  27 #endif
  28         {0x70, 0x71, 0x72, 0x73, 0x74, 0x00, 0x00, 0x13},       //      F1      F2      F3      F4      F5                      STOP
  29         {0x10, 0x11, 0x12, 0x00, 0x00, 0x00, 0x00, 0x00}        //      SHIFT   CTRL    GRAPH           (CAPS)
  30 };
  31
  32 //2e(del) -> 08(bs)+10(shift)
  33
  34 void KEYBOARD::initialize()
  35 {
  36         key_stat = emu->get_key_buffer();
  37         column = 0;
  38         caps = true;
  39         kana = false;
  40 }
  41
  42 uint32_t KEYBOARD::read_io8(uint32_t addr)
  43 {
  44         // $E8: keyboard input
  45         uint8_t val = 0xff;
  46         for(int i = 0; i < 9; i++) {
  47                 if(!(column & (1 << i))) {
  48                         for(int j = 0; j < 8; j++) {
  49                                 if(key_stat[key_map[i][j]]) {
  50                                         val &= ~(1 << j);
  51                                 }
  52                         }
  53                         if(i == 8) {
  54                                 if(caps) {
  55                                         val &= ~0x10;
  56                                 }
  57                                 if(kana) {
  58                                         val &= ~8;
  59                                 }
  60                         }
  61                 }
  62         }
  63         return val;
  64 }
  65
  66 void KEYBOARD::write_signal(int id, uint32_t data, uint32_t mask)
  67 {
  68         if(id == SIG_KEYBOARD_COLUMN_L) {
  69                 column = (column & 0xff00) | (data & mask);
  70         } else if(id == SIG_KEYBOARD_COLUMN_H) {
  71                 column = (column & 0xff) | ((data & mask) << 8);
  72         }
  73 }
  74
  75 void KEYBOARD::key_down(int code)
  76 {
  77         if(code == 0x14) {
  78                 caps = !caps;
  79         } else if(code == 0x15) {
  80                 kana = !kana;
  81         }
  82 }
  83
  84 #define STATE_VERSION   1
  85
  86 #include "../../statesub.h"
  87
  88 void KEYBOARD::decl_state()
  89 {
  90         enter_decl_state(STATE_VERSION);
  91
  92         DECL_STATE_ENTRY_UINT16(column);
  93         DECL_STATE_ENTRY_BOOL(caps);
  94         DECL_STATE_ENTRY_BOOL(kana);
  95
  96         leave_decl_state();
  97 }
  98
  99 void KEYBOARD::save_state(FILEIO* state_fio)
 100 {
 101         if(state_entry != NULL) {
 102                 state_entry->save_state(state_fio);
 103         }
 104 //      state_fio->FputUint32(STATE_VERSION);
 105 //      state_fio->FputInt32(this_device_id);
 106
 107 //      state_fio->FputUint16(column);
 108 //      state_fio->FputBool(caps);
 109 //      state_fio->FputBool(kana);
 110 }
 111
 112 bool KEYBOARD::load_state(FILEIO* state_fio)
 113 {
 114         bool mb = false;
 115         if(state_entry != NULL) {
 116                 mb = state_entry->load_state(state_fio);
 117         }
 118         if(!mb) {
 119                 return false;
 120         }
 121 //      if(state_fio->FgetUint32() != STATE_VERSION) {
 122 //              return false;
 123 //      }
 124 //      if(state_fio->FgetInt32() != this_device_id) {
 125 //              return false;
 126 //      }
 127 //      column = state_fio->FgetUint16();
 128 //      caps = state_fio->FgetBool();
 129 //      kana = state_fio->FgetBool();
 130         return true;
 131 }
 132
 133 bool KEYBOARD::process_state(FILEIO* state_fio, bool loading)
 134 {
 135         if(!state_fio->StateCheckUint32(STATE_VERSION)) {
 136                 return false;
 137         }
 138         if(!state_fio->StateCheckInt32(this_device_id)) {
 139                 return false;
 140         }
 141         state_fio->StateUint16(column);
 142         state_fio->StateBool(caps);
 143         state_fio->StateBool(kana);
 144         return true;
 145 }