source/src/vm/mz700/kanji.cpp

   1 /*
   2         SHARP MZ-700 Emulator 'EmuZ-700'
   3         SHARP MZ-800 Emulator 'EmuZ-800'
   4         SHARP MZ-1500 Emulator 'EmuZ-1500'
   5
   6         Author : Takeda.Toshiya
   7         Date   : 2014.12.26-
   8
   9         [ kanji/dictionary rom ]
  10 */
  11
  12 #include "kanji.h"
  13
  14 void KANJI::initialize()
  15 {
  16         memset(kanji, 0xff, sizeof(kanji));
  17         memset(dic, 0xff, sizeof(dic));
  18
  19         // load rom images
  20         FILEIO* fio = new FILEIO();
  21         if(fio->Fopen(create_local_path(_T("KANJI.ROM")), FILEIO_READ_BINARY)) {
  22                 fio->Fread(kanji, sizeof(kanji), 1);
  23                 fio->Fclose();
  24         } else if(fio->Fopen(create_local_path(_T("MZ1R23.ROM")), FILEIO_READ_BINARY)) {
  25                 fio->Fread(kanji, sizeof(kanji), 1);
  26                 fio->Fclose();
  27         }
  28         if(fio->Fopen(create_local_path(_T("DICT.ROM")), FILEIO_READ_BINARY)) {
  29                 fio->Fread(dic, sizeof(dic), 1);
  30                 fio->Fclose();
  31         } else if(fio->Fopen(create_local_path(_T("MZ1R24.ROM")), FILEIO_READ_BINARY)) {
  32                 fio->Fread(dic, sizeof(dic), 1);
  33                 fio->Fclose();
  34         }
  35         delete fio;
  36 }
  37
  38 void KANJI::reset()
  39 {
  40         control_reg = kanji_addr = dic_addr = 0;
  41 }
  42
  43 void KANJI::write_io8(uint32_t addr, uint32_t data)
  44 {
  45         switch(addr & 0xff) {
  46         case 0xb8:
  47                 control_reg = data;
  48                 break;
  49         case 0xb9:
  50                 dic_addr = (addr & 0xff00) | data;
  51                 kanji_addr = dic_addr << 5;
  52                 break;
  53         }
  54 }
  55
  56 uint32_t KANJI::read_io8(uint32_t addr)
  57 {
  58         uint32_t val;
  59
  60         switch(addr & 0xff) {
  61         case 0xb9:
  62                 if(control_reg & 0x80) {
  63                         val = kanji[(kanji_addr++) & 0x1ffff];
  64                 } else {
  65                         val = dic[((control_reg & 3) << 16) | ((dic_addr++) & 0xffff)];
  66                 }
  67                 if(control_reg & 0x40) {
  68                         val = ((val & 0x80) >> 7) | ((val & 0x40) >> 5) | ((val & 0x20) >> 3) | ((val & 0x10) >> 1) | ((val & 8) << 1) | ((val & 4) << 3) | ((val & 2) << 5) | ((val & 1) << 7);
  69                 }
  70                 return val;
  71         }
  72         return 0xff;
  73 }
  74
  75 #define STATE_VERSION   1
  76
  77 bool KANJI::process_state(FILEIO* state_fio, bool loading)
  78 {
  79         if(!state_fio->StateCheckUint32(STATE_VERSION)) {
  80                 return false;
  81         }
  82         if(!state_fio->StateCheckInt32(this_device_id)) {
  83                 return false;
  84         }
  85         state_fio->StateUint32(control_reg);
  86         state_fio->StateUint32(kanji_addr);
  87         state_fio->StateUint32(dic_addr);
  88         return true;
  89 }