source/src/vm/rx78/keyboard.cpp

   1 /*
   2         BANDAI RX-78 Emulator 'eRX-78'
   3
   4         Author : Takeda.Toshiya
   5         Date   : 2006.08.21 -
   6
   7         [ keyboard ]
   8 */
   9
  10 #include "keyboard.h"
  11
  12 namespace RX78 {
  13
  14 static const int key_map[9][8] = {
  15         {0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37},
  16         {0x38, 0x39, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf},
  17         {0xc0, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47},
  18         {0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f},
  19         {0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57},
  20         {0x58, 0x59, 0x5a, 0xdb, 0xdc, 0xdd, 0xde, 0xe2},
  21         {0x20, 0x28, 0x26, 0x27, 0x25, 0x24, 0x00, 0x2e},
  22         {0x00, 0x00, 0x00, 0x08, 0x00, 0x0d, 0x00, 0x14},
  23         {0x11, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00}
  24 };
  25
  26 void KEYBOARD::initialize()
  27 {
  28         key_stat = emu->get_key_buffer();
  29 //      joy_stat = emu->get_joy_buffer();
  30
  31         // register event to update the key status
  32         register_frame_event(this);
  33 }
  34
  35 void KEYBOARD::write_io8(uint32_t addr, uint32_t data)
  36 {
  37         column = data;
  38 }
  39
  40 uint32_t KEYBOARD::read_io8(uint32_t addr)
  41 {
  42         return (column == 0x30) ? status[15] : (1 <= column && column <= 15) ? status[column - 1] : 0;
  43 }
  44
  45 void KEYBOARD::event_frame()
  46 {
  47         memset(status, 0, sizeof(status));
  48
  49         for(int i = 0; i < 9; i++) {
  50                 uint8_t val = 0;
  51                 val |= key_stat[key_map[i][0]] ? 0x01 : 0;
  52                 val |= key_stat[key_map[i][1]] ? 0x02 : 0;
  53                 val |= key_stat[key_map[i][2]] ? 0x04 : 0;
  54                 val |= key_stat[key_map[i][3]] ? 0x08 : 0;
  55                 val |= key_stat[key_map[i][4]] ? 0x10 : 0;
  56                 val |= key_stat[key_map[i][5]] ? 0x20 : 0;
  57                 val |= key_stat[key_map[i][6]] ? 0x40 : 0;
  58                 val |= key_stat[key_map[i][7]] ? 0x80 : 0;
  59                 status[i] = val;
  60         }
  61
  62         // joystick #1
  63         joy_stat = emu->get_joy_buffer();
  64         switch(joy_stat[0] & 0x0f) {
  65                 case 0x1: status[ 9] |= 0x11; break;    // u
  66                 case 0x2: status[11] |= 0x11; break;    // d
  67                 case 0x4: status[ 9] |= 0x44; break;    // l
  68                 case 0x5: status[ 9] |= 0x22; break;    // lu
  69                 case 0x6: status[10] |= 0x11; break;    // ld
  70                 case 0x8: status[11] |= 0x44; break;    // r
  71                 case 0x9: status[10] |= 0x22; break;    // ru
  72                 case 0xa: status[11] |= 0x22; break;    // rd
  73         }
  74         if(joy_stat[0] & 0x10) status[ 9] |= 0x88;      // b1
  75         if(joy_stat[0] & 0x20) status[11] |= 0x88;      // b2
  76
  77         switch(joy_stat[1] & 0x0f) {
  78                 case 0x1: status[12] |= 0x11; break;    // u
  79                 case 0x2: status[14] |= 0x11; break;    // d
  80                 case 0x4: status[12] |= 0x44; break;    // l
  81                 case 0x5: status[12] |= 0x22; break;    // lu
  82                 case 0x6: status[13] |= 0x11; break;    // ld
  83                 case 0x8: status[14] |= 0x44; break;    // r
  84                 case 0x9: status[13] |= 0x22; break;    // ru
  85                 case 0xa: status[14] |= 0x22; break;    // rd
  86         }
  87         if(joy_stat[1] & 0x10) status[12] |= 0x88;      // b1
  88         if(joy_stat[1] & 0x20) status[14] |= 0x88;      // b2
  89         emu->release_joy_buffer(joy_stat);
  90         // $30
  91         uint8_t total = 0;
  92         for(int i = 0; i < 15; i++) {
  93                 total |= status[i];
  94         }
  95         status[15] = total;
  96 }
  97
  98 #define STATE_VERSION   1
  99
 100 bool KEYBOARD::process_state(FILEIO* state_fio, bool loading)
 101 {
 102         if(!state_fio->StateCheckUint32(STATE_VERSION)) {
 103                 return false;
 104         }
 105         if(!state_fio->StateCheckInt32(this_device_id)) {
 106                 return false;
 107         }
 108         state_fio->StateArray(status, sizeof(status), 1);
 109         state_fio->StateValue(column);
 110         return true;
 111 }
 112
 113 }