source/src/vm/mz2500/keyboard.cpp

   1 /*\r
   2         SHARP MZ-80B Emulator 'EmuZ-80B'\r
   3         SHARP MZ-2200 Emulator 'EmuZ-2200'\r
   4         SHARP MZ-2500 Emulator 'EmuZ-2500'\r
   5 \r
   6         Author : Takeda.Toshiya\r
   7         Date   : 2006.12.01 -\r
   8 \r
   9         [ keyboard ]\r
  10 */\r
  11 \r
  12 #include "keyboard.h"\r
  13 #include "../i8255.h"\r
  14 #include "../z80pio.h"\r
  15 #include "../../fileio.h"\r
  16 \r
  17 #ifdef _MZ2500\r
  18 #define MAX_COLUMN 14\r
  19 #else\r
  20 #define MAX_COLUMN 12\r
  21 #endif\r
  22 \r
  23 static const int key_map[14][8] = {\r
  24         {0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77},\r
  25         {0x78, 0x79, 0x68, 0x69, 0x6c, 0x6e, 0x6b, 0x6d},\r
  26         {0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67},\r
  27         {0x09, 0x20, 0x0d, 0x26, 0x28, 0x25, 0x27, 0x13},\r
  28         {0xbf, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47},\r
  29         {0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f},\r
  30         {0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57},\r
  31         {0x58, 0x59, 0x5a, 0xde, 0xdc, 0xe2, 0xbe, 0xbc},\r
  32         {0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37},\r
  33         {0x38, 0x39, 0xba, 0xbb, 0xbd, 0xc0, 0xdb, 0x00},\r
  34         {0xdd, 0x7b, 0x24, 0x2e, 0x08, 0x1b, 0x6a, 0x6f},\r
  35         {0x12, 0x14, 0x10, 0x15, 0x11, 0x00, 0x00, 0x00},\r
  36         {0x1d, 0x1c, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00},\r
  37         {0x19, 0x7a, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}\r
  38 };\r
  39 \r
  40 void KEYBOARD::initialize()\r
  41 {\r
  42         key_stat = emu->key_buffer();\r
  43         column = 0;\r
  44         register_frame_event(this);\r
  45 }\r
  46 \r
  47 void KEYBOARD::write_signal(int id, uint32 data, uint32 mask)\r
  48 {\r
  49         if(id == SIG_KEYBOARD_COLUMN) {\r
  50                 column = data & mask;   // from z80pio port a\r
  51                 create_keystat();\r
  52         }\r
  53 }\r
  54 \r
  55 void KEYBOARD::event_frame()\r
  56 {\r
  57         // update key status\r
  58         memset(keys, 0xff, sizeof(keys));\r
  59         key_stat[0] = 0;\r
  60         for(int i = 0; i < MAX_COLUMN; i++) {\r
  61                 uint8 tmp = 0;\r
  62                 for(int j = 0; j < 8; j++) {\r
  63                         tmp |= (key_stat[key_map[i][j]]) ? 0 : (1 << j);\r
  64                 }\r
  65                 keys[i] = tmp;\r
  66                 keys[0x0f] &= tmp;\r
  67         }\r
  68         create_keystat();\r
  69 }\r
  70 \r
  71 void KEYBOARD::create_keystat()\r
  72 {\r
  73         uint8 val = keys[(column & 0x10) ? (column & 0x0f) : 0x0f];\r
  74         d_pio_i->write_signal(SIG_I8255_PORT_B, val, 0x80);     // to i8255 port b\r
  75         d_pio->write_signal(SIG_Z80PIO_PORT_B, val, 0xff);      // to z80pio port b\r
  76 }\r
  77 \r
  78 #define STATE_VERSION   1\r
  79 \r
  80 void KEYBOARD::save_state(FILEIO* state_fio)\r
  81 {\r
  82         state_fio->FputUint32(STATE_VERSION);\r
  83         state_fio->FputInt32(this_device_id);\r
  84         \r
  85         state_fio->FputUint8(column);\r
  86 }\r
  87 \r
  88 bool KEYBOARD::load_state(FILEIO* state_fio)\r
  89 {\r
  90         if(state_fio->FgetUint32() != STATE_VERSION) {\r
  91                 return false;\r
  92         }\r
  93         if(state_fio->FgetInt32() != this_device_id) {\r
  94                 return false;\r
  95         }\r
  96         column = state_fio->FgetUint8();\r
  97         return true;\r
  98 }\r
  99 \r