[BACK]Return to memory.c CVS log [TXT] [DIR] Up to [RetroPC.NET] / np2 / i386c

Diff for /np2/i386c/memory.c between versions 1.10 and 1.33

version 1.10, 2004/02/20 16:09:04 version 1.33, 2005/03/16 08:01:12
Line 3 Line 3
 #ifndef NP2_MEMORY_ASM  #ifndef NP2_MEMORY_ASM
   
 #include        "cpucore.h"  #include        "cpucore.h"
 #include        "memory.h"  
 #include        "egcmem.h"  
 #include        "pccore.h"  #include        "pccore.h"
 #include        "iocore.h"  #include        "iocore.h"
   #include        "memtram.h"
   #include        "memvram.h"
   #include        "memegc.h"
   #if defined(SUPPORT_PC9821)
   #include        "memvga.h"
   #endif
   #include        "memems.h"
   #include        "memepp.h"
 #include        "vram.h"  #include        "vram.h"
 #include        "font.h"  #include        "font.h"
   
   
         BYTE    mem[0x200000];          UINT8   mem[0x200000];
   
   
 #define USE_HIMEM               0x110000  
   
 // ---- write byte  typedef void (MEMCALL * MEM8WRITE)(UINT32 address, REG8 value);
   typedef REG8 (MEMCALL * MEM8READ)(UINT32 address);
   typedef void (MEMCALL * MEM16WRITE)(UINT32 address, REG16 value);
   typedef REG16 (MEMCALL * MEM16READ)(UINT32 address);
   
 static void MEMCALL i286_wt(UINT32 address, REG8 value) {  
   
         mem[address & CPU_ADRSMASK] = (BYTE)value;  // ---- MAIN
 }  
   
 static void MEMCALL tram_wt(UINT32 address, REG8 value) {  static REG8 MEMCALL memmain_rd8(UINT32 address) {
   
         CPU_REMCLOCK -= MEMWAIT_TRAM;          return(mem[address]);
         if (address < 0xa2000) {  
                 mem[address] = (BYTE)value;  
                 tramupdate[LOW12(address >> 1)] = 1;  
                 gdcs.textdisp |= 1;  
         }  
         else if (address < 0xa3fe0) {  
                 if (!(address & 1)) {  
                         mem[address] = (BYTE)value;  
                         tramupdate[LOW12(address >> 1)] = 1;  
                         gdcs.textdisp |= 1;  
                 }  
         }  
         else if (address < 0xa4000) {  
                 if (!(address & 1)) {  
                         if ((!(address & 2)) || (gdcs.msw_accessable)) {  
                                 mem[address] = (BYTE)value;  
                                 tramupdate[LOW12(address >> 1)] = 1;  
                                 gdcs.textdisp |= 1;  
                         }  
                 }  
         }  
         else if (address < 0xa5000) {  
                 if ((address & 1) && (cgwindow.writable & 1)) {  
                         cgwindow.writable |= 0x80;  
                         fontrom[cgwindow.high + ((address >> 1) & 0x0f)] = (BYTE)value;  
                 }  
         }  
 }  }
   
 static void MEMCALL vram_w0(UINT32 address, REG8 value) {  static REG16 MEMCALL memmain_rd16(UINT32 address) {
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;  const UINT8     *ptr;
         mem[address] = (BYTE)value;  
         vramupdate[LOW15(address)] |= 1;  
         gdcs.grphdisp |= 1;  
 }  
   
 static void MEMCALL vram_w1(UINT32 address, REG8 value) {  
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;          ptr = mem + address;
         mem[address + VRAM_STEP] = (BYTE)value;          return(LOADINTELWORD(ptr));
         vramupdate[LOW15(address)] |= 2;  
         gdcs.grphdisp |= 2;  
 }  }
   
 static void MEMCALL grcg_rmw0(UINT32 address, REG8 value) {  static void MEMCALL memmain_wr8(UINT32 address, REG8 value) {
   
         REG8    mask;  
         BYTE    *vram;  
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          mem[address] = (UINT8)value;
         mask = ~value;  
         address = LOW15(address);  
         vramupdate[address] |= 1;  
         gdcs.grphdisp |= 1;  
         vram = mem + address;  
         if (!(grcg.modereg & 1)) {  
                 vram[VRAM0_B] &= mask;  
                 vram[VRAM0_B] |= (value & grcg.tile[0].b[0]);  
         }  
         if (!(grcg.modereg & 2)) {  
                 vram[VRAM0_R] &= mask;  
                 vram[VRAM0_R] |= (value & grcg.tile[1].b[0]);  
         }  
         if (!(grcg.modereg & 4)) {  
                 vram[VRAM0_G] &= mask;  
                 vram[VRAM0_G] |= (value & grcg.tile[2].b[0]);  
         }  
         if (!(grcg.modereg & 8)) {  
                 vram[VRAM0_E] &= mask;  
                 vram[VRAM0_E] |= (value & grcg.tile[3].b[0]);  
         }  
 }  }
   
 static void MEMCALL grcg_rmw1(UINT32 address, REG8 value) {  static void MEMCALL memmain_wr16(UINT32 address, REG16 value) {
   
         REG8    mask;          UINT8   *ptr;
         BYTE    *vram;  
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          ptr = mem + address;
         mask = ~value;          STOREINTELWORD(ptr, value);
         address = LOW15(address);  
         vramupdate[address] |= 2;  
         gdcs.grphdisp |= 2;  
         vram = mem + address;  
         if (!(grcg.modereg & 1)) {  
                 vram[VRAM1_B] &= mask;  
                 vram[VRAM1_B] |= (value & grcg.tile[0].b[0]);  
         }  
         if (!(grcg.modereg & 2)) {  
                 vram[VRAM1_R] &= mask;  
                 vram[VRAM1_R] |= (value & grcg.tile[1].b[0]);  
         }  
         if (!(grcg.modereg & 4)) {  
                 vram[VRAM1_G] &= mask;  
                 vram[VRAM1_G] |= (value & grcg.tile[2].b[0]);  
         }  
         if (!(grcg.modereg & 8)) {  
                 vram[VRAM1_E] &= mask;  
                 vram[VRAM1_E] |= (value & grcg.tile[3].b[0]);  
         }  
 }  }
   
 static void MEMCALL grcg_tdw0(UINT32 address, REG8 value) {  
   
         BYTE    *vram;  // ---- N/C
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;  static REG8 MEMCALL memnc_rd8(UINT32 address) {
         address = LOW15(address);  
         vramupdate[address] |= 1;  
         gdcs.grphdisp |= 1;  
         vram = mem + address;  
         if (!(grcg.modereg & 1)) {  
                 vram[VRAM0_B] = grcg.tile[0].b[0];  
         }  
         if (!(grcg.modereg & 2)) {  
                 vram[VRAM0_R] = grcg.tile[1].b[0];  
         }  
         if (!(grcg.modereg & 4)) {  
                 vram[VRAM0_G] = grcg.tile[2].b[0];  
         }  
         if (!(grcg.modereg & 8)) {  
                 vram[VRAM0_E] = grcg.tile[3].b[0];  
         }  
         (void)value;  
 }  
   
 static void MEMCALL grcg_tdw1(UINT32 address, REG8 value) {  
   
         BYTE    *vram;          (void)address;
           return(0xff);
         CPU_REMCLOCK -= MEMWAIT_GRCG;  
         address = LOW15(address);  
         vramupdate[address] |= 2;  
         gdcs.grphdisp |= 2;  
         vram = mem + address;  
         if (!(grcg.modereg & 1)) {  
                 vram[VRAM1_B] = grcg.tile[0].b[0];  
         }  
         if (!(grcg.modereg & 2)) {  
                 vram[VRAM1_R] = grcg.tile[1].b[0];  
         }  
         if (!(grcg.modereg & 4)) {  
                 vram[VRAM1_G] = grcg.tile[2].b[0];  
         }  
         if (!(grcg.modereg & 8)) {  
                 vram[VRAM1_E] = grcg.tile[3].b[0];  
         }  
         (void)value;  
 }  }
   
 static void MEMCALL egc_wt(UINT32 address, REG8 value) {  static REG16 MEMCALL memnc_rd16(UINT32 address) {
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          (void)address;
         egc_write(address, value);          return(0xffff);
 }  }
   
 static void MEMCALL i286_wb(UINT32 address, REG8 value) {  static void MEMCALL memnc_wr8(UINT32 address, REG8 value) {
   
         mem[address + 0x1c8000 - 0xe8000] = (BYTE)value;          (void)address;
           (void)value;
 }  }
   
 static void MEMCALL i286_wn(UINT32 address, REG8 value) {  static void MEMCALL memnc_wr16(UINT32 address, REG16 value) {
   
         (void)address;          (void)address;
         (void)value;          (void)value;
 }  }
   
   
 // ---- read byte  // ---- memory 000000-0ffffff + 64KB
   
 static REG8 MEMCALL i286_rd(UINT32 address) {  
   
         return(mem[address & CPU_ADRSMASK]);  
 }  
   
 static REG8 MEMCALL tram_rd(UINT32 address) {  
   
         CPU_REMCLOCK -= MEMWAIT_TRAM;  typedef struct {
         if (address < 0xa4000) {          MEM8READ        rd8[0x22];
                 return(mem[address]);          MEM8WRITE       wr8[0x22];
         }          MEM16READ       rd16[0x22];
         else if (address < 0xa5000) {          MEM16WRITE      wr16[0x22];
                 if (address & 1) {  } MEMFN0;
                         return(fontrom[cgwindow.high + ((address >> 1) & 0x0f)]);  
                 }  
                 else {  
                         return(fontrom[cgwindow.low + ((address >> 1) & 0x0f)]);  
                 }  
         }  
         return(mem[address]);  
 }  
   
 static REG8 MEMCALL vram_r0(UINT32 address) {  typedef struct {
           MEM8READ        brd8;           // E8000-F7FFF byte read
           MEM8READ        ird8;           // F8000-FFFFF byte read
           MEM8WRITE       bwr8;           // E8000-FFFFF byte write
           MEM16READ       brd16;          // E8000-F7FFF word read
           MEM16READ       ird16;          // F8000-FFFFF word read
           MEM16WRITE      bwr16;          // F8000-FFFFF word write
   } MMAPTBL;
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;  typedef struct {
         return(mem[address]);          MEM8READ        rd8;
 }          MEM8WRITE       wr8;
           MEM16READ       rd16;
           MEM16WRITE      wr16;
   } VACCTBL;
   
 static REG8 MEMCALL vram_r1(UINT32 address) {  static MEMFN0 memfn0 = {
              {memmain_rd8,        memmain_rd8,    memmain_rd8,    memmain_rd8,    // 00
                   memmain_rd8,    memmain_rd8,    memmain_rd8,    memmain_rd8,    // 20
                   memmain_rd8,    memmain_rd8,    memmain_rd8,    memmain_rd8,    // 40
                   memmain_rd8,    memmain_rd8,    memmain_rd8,    memmain_rd8,    // 60
                   memmain_rd8,    memmain_rd8,    memmain_rd8,    memmain_rd8,    // 80
                   memtram_rd8,    memvram0_rd8,   memvram0_rd8,   memvram0_rd8,   // a0
                   memems_rd8,             memems_rd8,             memmain_rd8,    memmain_rd8,    // c0
                   memvram0_rd8,   memmain_rd8,    memmain_rd8,    memf800_rd8,    // e0
                   memmain_rd8,    memmain_rd8},
   
              {memmain_wr8,        memmain_wr8,    memmain_wr8,    memmain_wr8,    // 00
                   memmain_wr8,    memmain_wr8,    memmain_wr8,    memmain_wr8,    // 20
                   memmain_wr8,    memmain_wr8,    memmain_wr8,    memmain_wr8,    // 40
                   memmain_wr8,    memmain_wr8,    memmain_wr8,    memmain_wr8,    // 60
                   memmain_wr8,    memmain_wr8,    memmain_wr8,    memmain_wr8,    // 80
                   memtram_wr8,    memvram0_wr8,   memvram0_wr8,   memvram0_wr8,   // a0
                   memems_wr8,             memems_wr8,             memd000_wr8,    memd000_wr8,    // c0
                   memvram0_wr8,   memnc_wr8,              memnc_wr8,              memnc_wr8,              // e0
                   memmain_wr8,    memmain_wr8},
   
              {memmain_rd16,       memmain_rd16,   memmain_rd16,   memmain_rd16,   // 00
                   memmain_rd16,   memmain_rd16,   memmain_rd16,   memmain_rd16,   // 20
                   memmain_rd16,   memmain_rd16,   memmain_rd16,   memmain_rd16,   // 40
                   memmain_rd16,   memmain_rd16,   memmain_rd16,   memmain_rd16,   // 60
                   memmain_rd16,   memmain_rd16,   memmain_rd16,   memmain_rd16,   // 80
                   memtram_rd16,   memvram0_rd16,  memvram0_rd16,  memvram0_rd16,  // a0
                   memems_rd16,    memems_rd16,    memmain_rd16,   memmain_rd16,   // c0
                   memvram0_rd16,  memmain_rd16,   memmain_rd16,   memf800_rd16,   // e0
                   memmain_rd16,   memmain_rd16},
   
              {memmain_wr16,       memmain_wr16,   memmain_wr16,   memmain_wr16,   // 00
                   memmain_wr16,   memmain_wr16,   memmain_wr16,   memmain_wr16,   // 20
                   memmain_wr16,   memmain_wr16,   memmain_wr16,   memmain_wr16,   // 40
                   memmain_wr16,   memmain_wr16,   memmain_wr16,   memmain_wr16,   // 60
                   memmain_wr16,   memmain_wr16,   memmain_wr16,   memmain_wr16,   // 80
                   memtram_wr16,   memvram0_wr16,  memvram0_wr16,  memvram0_wr16,  // a0
                   memems_wr16,    memems_wr16,    memd000_wr16,   memd000_wr16,   // c0
                   memvram0_wr16,  memnc_wr16,             memnc_wr16,             memnc_wr16,             // e0
                   memmain_wr16,   memmain_wr16}};
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;  static const MMAPTBL mmaptbl[2] = {
         return(mem[address + VRAM_STEP]);                     {memmain_rd8,        memf800_rd8,    memnc_wr8,
 }                          memmain_rd16,   memf800_rd16,   memnc_wr16},
                      {memf800_rd8,        memf800_rd8,    memepson_wr8,
                           memf800_rd16,   memf800_rd16,   memepson_wr16}};
   
 static REG8 MEMCALL grcg_tcr0(UINT32 address) {  static const VACCTBL vacctbl[0x10] = {
                   {memvram0_rd8,  memvram0_wr8,   memvram0_rd16,  memvram0_wr16}, // 00
                   {memvram1_rd8,  memvram1_wr8,   memvram1_rd16,  memvram1_wr16},
                   {memvram0_rd8,  memvram0_wr8,   memvram0_rd16,  memvram0_wr16},
                   {memvram1_rd8,  memvram1_wr8,   memvram1_rd16,  memvram1_wr16},
                   {memvram0_rd8,  memvram0_wr8,   memvram0_rd16,  memvram0_wr16}, // 40
                   {memvram1_rd8,  memvram1_wr8,   memvram1_rd16,  memvram1_wr16},
                   {memvram0_rd8,  memvram0_wr8,   memvram0_rd16,  memvram0_wr16},
                   {memvram1_rd8,  memvram1_wr8,   memvram1_rd16,  memvram1_wr16},
                   {memtcr0_rd8,   memtdw0_wr8,    memtcr0_rd16,   memtdw0_wr16},  // 80
                   {memtcr1_rd8,   memtdw1_wr8,    memtcr1_rd16,   memtdw1_wr16},
                   {memegc_rd8,    memegc_wr8,             memegc_rd16,    memegc_wr16},
                   {memegc_rd8,    memegc_wr8,             memegc_rd16,    memegc_wr16},
                   {memvram0_rd8,  memrmw0_wr8,    memvram0_rd16,  memrmw0_wr16},  // c0
                   {memvram1_rd8,  memrmw1_wr8,    memvram1_rd16,  memrmw1_wr16},
                   {memegc_rd8,    memegc_wr8,             memegc_rd16,    memegc_wr16},
                   {memegc_rd8,    memegc_wr8,             memegc_rd16,    memegc_wr16}};
   
 const BYTE      *vram;  
         REG8    ret;  
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;  void MEMCALL i286_memorymap(UINT type) {
         vram = mem + LOW15(address);  
         ret = 0;  
         if (!(grcg.modereg & 1)) {  
                 ret |= vram[VRAM0_B] ^ grcg.tile[0].b[0];  
         }  
         if (!(grcg.modereg & 2)) {  
                 ret |= vram[VRAM0_R] ^ grcg.tile[1].b[0];  
         }  
         if (!(grcg.modereg & 4)) {  
                 ret |= vram[VRAM0_G] ^ grcg.tile[2].b[0];  
         }  
         if (!(grcg.modereg & 8)) {  
                 ret |= vram[VRAM0_E] ^ grcg.tile[3].b[0];  
         }  
         return(ret ^ 0xff);  
 }  
   
 static REG8 MEMCALL grcg_tcr1(UINT32 address) {  const MMAPTBL   *mm;
   
 const BYTE      *vram;          mm = mmaptbl + (type & 1);
         REG8    ret;  
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          memfn0.rd8[0xe8000 >> 15] = mm->brd8;
         ret = 0;          memfn0.rd8[0xf0000 >> 15] = mm->brd8;
         vram = mem + LOW15(address);          memfn0.rd8[0xf8000 >> 15] = mm->ird8;
         if (!(grcg.modereg & 1)) {          memfn0.wr8[0xe8000 >> 15] = mm->bwr8;
                 ret |= vram[VRAM1_B] ^ grcg.tile[0].b[0];          memfn0.wr8[0xf0000 >> 15] = mm->bwr8;
         }          memfn0.wr8[0xf8000 >> 15] = mm->bwr8;
         if (!(grcg.modereg & 2)) {  
                 ret |= vram[VRAM1_R] ^ grcg.tile[1].b[0];          memfn0.rd16[0xe8000 >> 15] = mm->brd16;
         }          memfn0.rd16[0xf0000 >> 15] = mm->brd16;
         if (!(grcg.modereg & 4)) {          memfn0.rd16[0xf8000 >> 15] = mm->ird16;
                 ret |= vram[VRAM1_G] ^ grcg.tile[2].b[0];          memfn0.wr16[0xe8000 >> 15] = mm->bwr16;
         }          memfn0.wr16[0xf0000 >> 15] = mm->bwr16;
         if (!(grcg.modereg & 8)) {          memfn0.wr16[0xf8000 >> 15] = mm->bwr16;
                 ret |= vram[VRAM1_E] ^ grcg.tile[3].b[0];  
         }  
         return(ret ^ 0xff);  
 }  }
   
 static REG8 MEMCALL egc_rd(UINT32 address) {  void MEMCALL i286_vram_dispatch(UINT func) {
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;  
         return(egc_read(address));  
 }  
   
 static REG8 MEMCALL i286_rb(UINT32 address) {  const VACCTBL   *vacc;
   
         if (CPU_ITFBANK) {  #if defined(SUPPORT_PC9821)
                 address += VRAM_STEP;          if (!(func & 0x20)) {
   #endif
                   vacc = vacctbl + (func & 0x0f);
                   memfn0.rd8[0xa8000 >> 15] = vacc->rd8;
                   memfn0.rd8[0xb0000 >> 15] = vacc->rd8;
                   memfn0.rd8[0xb8000 >> 15] = vacc->rd8;
                   memfn0.rd8[0xe0000 >> 15] = vacc->rd8;
   
                   memfn0.wr8[0xa8000 >> 15] = vacc->wr8;
                   memfn0.wr8[0xb0000 >> 15] = vacc->wr8;
                   memfn0.wr8[0xb8000 >> 15] = vacc->wr8;
                   memfn0.wr8[0xe0000 >> 15] = vacc->wr8;
   
                   memfn0.rd16[0xa8000 >> 15] = vacc->rd16;
                   memfn0.rd16[0xb0000 >> 15] = vacc->rd16;
                   memfn0.rd16[0xb8000 >> 15] = vacc->rd16;
                   memfn0.rd16[0xe0000 >> 15] = vacc->rd16;
   
                   memfn0.wr16[0xa8000 >> 15] = vacc->wr16;
                   memfn0.wr16[0xb0000 >> 15] = vacc->wr16;
                   memfn0.wr16[0xb8000 >> 15] = vacc->wr16;
                   memfn0.wr16[0xe0000 >> 15] = vacc->wr16;
   
                   if (!(func & 0x10)) {                                                   // digital
                           memfn0.rd8[0xe0000 >> 15] = memnc_rd8;
                           memfn0.wr8[0xe0000 >> 15] = memnc_wr8;
                           memfn0.rd16[0xe0000 >> 15] = memnc_rd16;
                           memfn0.wr16[0xe0000 >> 15] = memnc_wr16;
                   }
   #if defined(SUPPORT_PC9821)
           }
           else {
                   memfn0.rd8[0xa8000 >> 15] = memvga0_rd8;
                   memfn0.rd8[0xb0000 >> 15] = memvga1_rd8;
                   memfn0.rd8[0xb8000 >> 15] = memnc_rd8;
                   memfn0.rd8[0xe0000 >> 15] = memvgaio_rd8;
   
                   memfn0.wr8[0xa8000 >> 15] = memvga0_wr8;
                   memfn0.wr8[0xb0000 >> 15] = memvga1_wr8;
                   memfn0.wr8[0xb8000 >> 15] = memnc_wr8;
                   memfn0.wr8[0xe0000 >> 15] = memvgaio_wr8;
   
                   memfn0.rd16[0xa8000 >> 15] = memvga0_rd16;
                   memfn0.rd16[0xb0000 >> 15] = memvga1_rd16;
                   memfn0.rd16[0xb8000 >> 15] = memnc_rd16;
                   memfn0.rd16[0xe0000 >> 15] = memvgaio_rd16;
   
                   memfn0.wr16[0xa8000 >> 15] = memvga0_wr16;
                   memfn0.wr16[0xb0000 >> 15] = memvga1_wr16;
                   memfn0.wr16[0xb8000 >> 15] = memnc_wr16;
                   memfn0.wr16[0xe0000 >> 15] = memvgaio_wr16;
         }          }
         return(mem[address]);  #endif
 }  }
   
   
 // ---- write word  // ---- memory f00000-fffffff
   
 static void MEMCALL i286w_wt(UINT32 address, REG16 value) {  typedef struct {
           MEM8READ        rd8[8];
           MEM8WRITE       wr8[8];
           MEM16READ       rd16[8];
           MEM16WRITE      wr16[8];
   } MEMFNF;
   
         BYTE    *ptr;  
   
         ptr = mem + (address & CPU_ADRSMASK);  static REG8 MEMCALL memsys_rd8(UINT32 address) {
         STOREINTELWORD(ptr, value);  
 }  
   
 static void MEMCALL tramw_wt(UINT32 address, REG16 value) {          address -= 0xf00000;
           return(memfn0.rd8[address >> 15](address));
         CPU_REMCLOCK -= MEMWAIT_TRAM;  
         if (address < 0xa1fff) {  
                 STOREINTELWORD(mem + address, value);  
                 tramupdate[LOW12(address >> 1)] = 1;  
                 tramupdate[LOW12((address + 1) >> 1)] = 1;  
                 gdcs.textdisp |= 1;  
         }  
         else if (address == 0xa1fff) {  
                 STOREINTELWORD(mem + address, value);  
                 tramupdate[0] = 1;  
                 tramupdate[0xfff] = 1;  
                 gdcs.textdisp |= 1;  
         }  
         else if (address < 0xa3fe0) {  
                 if (address & 1) {  
                         address++;  
                         value >>= 8;  
                 }  
                 mem[address] = (BYTE)value;  
                 tramupdate[LOW12(address >> 1)] = 1;  
                 gdcs.textdisp |= 1;  
         }  
         else if (address < 0xa3fff) {  
                 if (address & 1) {  
                         address++;  
                         value >>= 8;  
                 }  
                 if ((!(address & 2)) || (gdcs.msw_accessable)) {  
                         mem[address] = (BYTE)value;  
                         tramupdate[LOW12(address >> 1)] = 1;  
                         gdcs.textdisp |= 1;  
                 }  
         }  
         else if (address < 0xa5000) {  
                 if (address & 1) {  
                         value >>= 8;  
                 }  
                 if (cgwindow.writable & 1) {  
                         cgwindow.writable |= 0x80;  
                         fontrom[cgwindow.high + ((address >> 1) & 0x0f)] = (BYTE)value;  
                 }  
         }  
 }  }
   
   static REG16 MEMCALL memsys_rd16(UINT32 address) {
   
 #define GRCGW_NON(page) {                                                                                       \          address -= 0xf00000;
         CPU_REMCLOCK -= MEMWAIT_VRAM;                                                                   \          return(memfn0.rd16[address >> 15](address));
         STOREINTELWORD(mem + address + VRAM_STEP*(page), value);                \  
         vramupdate[LOW15(address)] |= (1 << page);                                              \  
         vramupdate[LOW15(address + 1)] |= (1 << page);                                  \  
         gdcs.grphdisp |= (1 << page);                                                                   \  
 }  
   
 #define GRCGW_RMW(page) {                                                                                       \  
         BYTE    *vram;                                                                                                  \  
         CPU_REMCLOCK -= MEMWAIT_GRCG;                                                                   \  
         address = LOW15(address);                                                                               \  
         vramupdate[address] |= (1 << page);                                                             \  
         vramupdate[address + 1] |= (1 << page);                                                 \  
         gdcs.grphdisp |= (1 << page);                                                                   \  
         vram = mem + address + (VRAM_STEP * (page));                                    \  
         if (!(grcg.modereg & 1)) {                                                                              \  
                 BYTE tmp;                                                                                                       \  
                 tmp = (BYTE)value;                                                                                      \  
                 vram[VRAM0_B+0] &= (~tmp);                                                                      \  
                 vram[VRAM0_B+0] |= (tmp & grcg.tile[0].b[0]);                           \  
                 tmp = (BYTE)(value >> 8);                                                                       \  
                 vram[VRAM0_B+1] &= (~tmp);                                                                      \  
                 vram[VRAM0_B+1] |= (tmp & grcg.tile[0].b[0]);                           \  
         }                                                                                                                               \  
         if (!(grcg.modereg & 2)) {                                                                              \  
                 BYTE tmp;                                                                                                       \  
                 tmp = (BYTE)value;                                                                                      \  
                 vram[VRAM0_R+0] &= (~tmp);                                                                      \  
                 vram[VRAM0_R+0] |= (tmp & grcg.tile[1].b[0]);                           \  
                 tmp = (BYTE)(value >> 8);                                                                       \  
                 vram[VRAM0_R+1] &= (~tmp);                                                                      \  
                 vram[VRAM0_R+1] |= (tmp & grcg.tile[1].b[0]);                           \  
         }                                                                                                                               \  
         if (!(grcg.modereg & 4)) {                                                                              \  
                 BYTE tmp;                                                                                                       \  
                 tmp = (BYTE)value;                                                                                      \  
                 vram[VRAM0_G+0] &= (~tmp);                                                                      \  
                 vram[VRAM0_G+0] |= (tmp & grcg.tile[2].b[0]);                           \  
                 tmp = (BYTE)(value >> 8);                                                                       \  
                 vram[VRAM0_G+1] &= (~tmp);                                                                      \  
                 vram[VRAM0_G+1] |= (tmp & grcg.tile[2].b[0]);                           \  
         }                                                                                                                               \  
         if (!(grcg.modereg & 8)) {                                                                              \  
                 BYTE tmp;                                                                                                       \  
                 tmp = (BYTE)value;                                                                                      \  
                 vram[VRAM0_E+0] &= (~tmp);                                                                      \  
                 vram[VRAM0_E+0] |= (tmp & grcg.tile[3].b[0]);                           \  
                 tmp = (BYTE)(value >> 8);                                                                       \  
                 vram[VRAM0_E+1] &= (~tmp);                                                                      \  
                 vram[VRAM0_E+1] |= (tmp & grcg.tile[3].b[0]);                           \  
         }                                                                                                                               \  
 }  
   
 #define GRCGW_TDW(page) {                                                                                       \  
         BYTE    *vram;                                                                                                  \  
         CPU_REMCLOCK -= MEMWAIT_GRCG;                                                                   \  
         address = LOW15(address);                                                                               \  
         vramupdate[address] |= (1 << page);                                                             \  
         vramupdate[address + 1] |= (1 << page);                                                 \  
         gdcs.grphdisp |= (1 << page);                                                                   \  
         vram = mem + address + (VRAM_STEP * (page));                                    \  
         if (!(grcg.modereg & 1)) {                                                                              \  
                 vram[VRAM0_B+0] = grcg.tile[0].b[0];                                            \  
                 vram[VRAM0_B+1] = grcg.tile[0].b[0];                                            \  
         }                                                                                                                               \  
         if (!(grcg.modereg & 2)) {                                                                              \  
                 vram[VRAM0_R+0] = grcg.tile[1].b[0];                                            \  
                 vram[VRAM0_R+1] = grcg.tile[1].b[0];                                            \  
         }                                                                                                                               \  
         if (!(grcg.modereg & 4)) {                                                                              \  
                 vram[VRAM0_G+0] = grcg.tile[2].b[0];                                            \  
                 vram[VRAM0_G+1] = grcg.tile[2].b[0];                                            \  
         }                                                                                                                               \  
         if (!(grcg.modereg & 8)) {                                                                              \  
                 vram[VRAM0_E+0] = grcg.tile[3].b[0];                                            \  
                 vram[VRAM0_E+1] = grcg.tile[3].b[0];                                            \  
         }                                                                                                                               \  
         (void)value;                                                                                                    \  
 }  
   
 static void MEMCALL vramw_w0(UINT32 address, REG16 value) GRCGW_NON(0)  
 static void MEMCALL vramw_w1(UINT32 address, REG16 value) GRCGW_NON(1)  
 static void MEMCALL grcgw_rmw0(UINT32 address, REG16 value) GRCGW_RMW(0)  
 static void MEMCALL grcgw_rmw1(UINT32 address, REG16 value) GRCGW_RMW(1)  
 static void MEMCALL grcgw_tdw0(UINT32 address, REG16 value) GRCGW_TDW(0)  
 static void MEMCALL grcgw_tdw1(UINT32 address, REG16 value) GRCGW_TDW(1)  
   
 static void MEMCALL egcw_wt(UINT32 address, REG16 value) {  
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;  
         if (!(address & 1)) {  
                 egc_write_w(address, value);  
         }  
         else {  
                 if (!(egc.sft & 0x1000)) {  
                         egc_write(address, (REG8)value);  
                         egc_write(address + 1, (REG8)(value >> 8));  
                 }  
                 else {  
                         egc_write(address + 1, (REG8)(value >> 8));  
                         egc_write(address, (REG8)value);  
                 }  
         }  
 }  }
   
 static void MEMCALL i286w_wb(UINT32 address, REG16 value) {  static void MEMCALL memsys_wr8(UINT32 address, REG8 value) {
   
         mem[address + 0x1c8000 - 0xe8000] = (BYTE)value;          address -= 0xf00000;
         mem[address + 0x1c8001 - 0xe8000] = (BYTE)(value >> 8);          memfn0.wr8[address >> 15](address, value);
 }  }
   
 static void MEMCALL i286w_wn(UINT32 address, REG16 value) {  static void MEMCALL memsys_wr16(UINT32 address, REG16 value) {
   
         (void)address;          address -= 0xf00000;
         (void)value;          memfn0.wr16[address >> 15](address, value);
 }  }
   
   #if defined(SUPPORT_PC9821)
   static const MEMFNF memfnf = {
              {memvgaf_rd8,        memvgaf_rd8,    memvgaf_rd8,    memvgaf_rd8,
                   memnc_rd8,              memsys_rd8,             memsys_rd8,             memsys_rd8},
              {memvgaf_wr8,        memvgaf_wr8,    memvgaf_wr8,    memvgaf_wr8,
                   memnc_wr8,              memsys_wr8,             memsys_wr8,             memsys_wr8},
   
 // ---- read word             {memvgaf_rd16,       memvgaf_rd16,   memvgaf_rd16,   memvgaf_rd16,
                   memnc_rd16,             memsys_rd16,    memsys_rd16,    memsys_rd16},
              {memvgaf_wr16,       memvgaf_wr16,   memvgaf_wr16,   memvgaf_wr16,
                   memnc_wr16,             memsys_wr16,    memsys_wr16,    memsys_wr16}};
   #else
   static const MEMFNF memfnf = {
              {memnc_rd8,          memnc_rd8,              memnc_rd8,              memnc_rd8,
                   memnc_rd8,              memsys_rd8,             memsys_rd8,             memsys_rd8},
              {memnc_wr8,          memnc_wr8,              memnc_wr8,              memnc_wr8,
                   memnc_wr8,              memsys_wr8,             memsys_wr8,             memsys_wr8},
   
 static REG16 MEMCALL i286w_rd(UINT32 address) {             {memnc_rd16,         memnc_rd16,             memnc_rd16,             memnc_rd16,
                   memnc_rd16,             memsys_rd16,    memsys_rd16,    memsys_rd16},
              {memnc_wr16,         memnc_wr16,             memnc_wr16,             memnc_wr16,
                   memnc_wr16,             memsys_wr16,    memsys_wr16,    memsys_wr16}};
   #endif
   
         BYTE    *ptr;  
   
         ptr = mem + (address & CPU_ADRSMASK);  // ----
         return(LOADINTELWORD(ptr));  
 }  
   
 static REG16 MEMCALL tramw_rd(UINT32 address) {  REG8 MEMCALL i286_memoryread(UINT32 addr) {
   
         CPU_REMCLOCK -= MEMWAIT_TRAM;          if (addr < I286_MEMREADMAX) {
         if (address < (0xa4000 - 1)) {                  return(mem[addr]);
                 return(LOADINTELWORD(mem + address));          }
         }          else {
         else if (address == 0xa3fff) {                  addr = addr & CPU_ADRSMASK;
                 return(mem[address] + (fontrom[cgwindow.low] << 8));                  if (addr < USE_HIMEM) {
         }                          return(memfn0.rd8[addr >> 15](addr));
         else if (address < 0xa4fff) {                  }
                 if (address & 1) {                  else if (addr < CPU_EXTLIMIT16) {
                         REG16 ret;                          return(CPU_EXTMEMBASE[addr]);
                         ret = fontrom[cgwindow.high + ((address >> 1) & 0x0f)];                  }
                         ret += fontrom[cgwindow.low + (((address + 1) >> 1) & 0x0f)] << 8;                  else if (addr < 0x00f00000) {
                         return(ret);                          return(0xff);
                   }
                   else if (addr < 0x01000000) {
                           return(memfnf.rd8[(addr >> 17) & 7](addr));
                 }                  }
                   else if (addr < CPU_EXTLIMIT) {
                           return(CPU_EXTMEMBASE[addr]);
                   }
   #if defined(SUPPORT_PC9821)
                   else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           return(memvgaf_rd8(addr));
                   }
   #endif
                 else {                  else {
                         REG16 ret;  //                      TRACEOUT(("out of mem (read8): %x", addr));
                         ret = fontrom[cgwindow.low + ((address >> 1) & 0x0f)];                          return(0xff);
                         ret += fontrom[cgwindow.high + ((address >> 1) & 0x0f)] << 8;  
                         return(ret);  
                 }                  }
         }          }
         else if (address == 0xa4fff) {  
                 return((mem[0xa5000] << 8) | fontrom[cgwindow.high + 15]);  
         }  
         return(LOADINTELWORD(mem + address));  
 }  }
   
 static REG16 MEMCALL vramw_r0(UINT32 address) {  REG16 MEMCALL i286_memoryread_w(UINT32 addr) {
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;  
         return(LOADINTELWORD(mem + address));  
 }  
   
 static REG16 MEMCALL vramw_r1(UINT32 address) {  
   
         CPU_REMCLOCK -= MEMWAIT_VRAM;  
         return(LOADINTELWORD(mem + address + VRAM_STEP));  
 }  
   
 static REG16 MEMCALL grcgw_tcr0(UINT32 address) {  
   
         BYTE    *vram;  
         REG16   ret;          REG16   ret;
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          if (addr < (I286_MEMREADMAX - 1)) {
         ret = 0;                  return(LOADINTELWORD(mem + addr));
         vram = mem + LOW15(address);  
         if (!(grcg.modereg & 1)) {  
                 ret |= LOADINTELWORD(vram + VRAM0_B) ^ grcg.tile[0].w;  
         }          }
         if (!(grcg.modereg & 2)) {          else if ((addr + 1) & 0x7fff) {                         // non 32kb boundary
                 ret |= LOADINTELWORD(vram + VRAM0_R) ^ grcg.tile[1].w;                  addr = addr & CPU_ADRSMASK;
         }                  if (addr < USE_HIMEM) {
         if (!(grcg.modereg & 4)) {                          return(memfn0.rd16[addr >> 15](addr));
                 ret |= LOADINTELWORD(vram + VRAM0_G) ^ grcg.tile[2].w;                  }
                   else if (addr < CPU_EXTLIMIT16) {
                           return(LOADINTELWORD(CPU_EXTMEMBASE + addr));
                   }
                   else if (addr < 0x00f00000) {
                           return(0xffff);
                   }
                   else if (addr < 0x01000000) {
                           return(memfnf.rd16[(addr >> 17) & 7](addr));
                   }
                   else if (addr < CPU_EXTLIMIT) {
                           return(LOADINTELWORD(CPU_EXTMEMBASE + addr));
                   }
   #if defined(SUPPORT_PC9821)
                   else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           return(memvgaf_rd16(addr));
                   }
   #endif
                   else {
   //                      TRACEOUT(("out of mem (read16): %x", addr));
                           return(0xffff);
                   }
         }          }
         if (!(grcg.modereg & 8)) {          else {
                 ret |= LOADINTELWORD(vram + VRAM0_E) ^ grcg.tile[3].w;                  ret = i286_memoryread(addr);
                   ret += (REG16)(i286_memoryread(addr + 1) << 8);
                   return(ret);
         }          }
         return((UINT16)~ret);  
 }  }
   
 static REG16 MEMCALL grcgw_tcr1(UINT32 address) {  UINT32 MEMCALL i286_memoryread_d(UINT32 addr) {
   
         BYTE    *vram;          UINT32  pos;
         REG16   ret;          UINT32  ret;
   
         CPU_REMCLOCK -= MEMWAIT_GRCG;          if (addr < (I286_MEMREADMAX - 3)) {
         ret = 0;                  return(LOADINTELDWORD(mem + addr));
         vram = mem + LOW15(address);  
         if (!(grcg.modereg & 1)) {  
                 ret |= LOADINTELWORD(vram + VRAM1_B) ^ grcg.tile[0].w;  
         }          }
         if (!(grcg.modereg & 2)) {          else if (addr >= USE_HIMEM) {
                 ret |= LOADINTELWORD(vram + VRAM1_R) ^ grcg.tile[1].w;                  pos = addr & CPU_ADRSMASK;
                   if ((pos >= USE_HIMEM) && ((pos + 3) < CPU_EXTLIMIT16)) {
                           return(LOADINTELDWORD(CPU_EXTMEMBASE + pos));
                   }
         }          }
         if (!(grcg.modereg & 4)) {          if (!(addr & 1)) {
                 ret |= LOADINTELWORD(vram + VRAM1_G) ^ grcg.tile[2].w;                  ret = i286_memoryread_w(addr);
                   ret += (UINT32)i286_memoryread_w(addr + 2) << 16;
         }          }
         if (!(grcg.modereg & 8)) {          else {
                 ret |= LOADINTELWORD(vram + VRAM1_E) ^ grcg.tile[3].w;                  ret = i286_memoryread(addr);
                   ret += (UINT32)i286_memoryread_w(addr + 1) << 8;
                   ret += (UINT32)i286_memoryread(addr + 3) << 24;
         }          }
         return((UINT16)(~ret));          return(ret);
 }  }
   
 static REG16 MEMCALL egcw_rd(UINT32 address) {  void MEMCALL i286_memorywrite(UINT32 addr, REG8 value) {
   
         REG16   ret;          if (addr < I286_MEMWRITEMAX) {
                   mem[addr] = (UINT8)value;
         CPU_REMCLOCK -= MEMWAIT_GRCG;  
         if (!(address & 1)) {  
                 return(egc_read_w(address));  
         }          }
         else {          else {
                 if (!(egc.sft & 0x1000)) {                  addr = addr & CPU_ADRSMASK;
                         ret = egc_read(address);                  if (addr < USE_HIMEM) {
                         ret += egc_read(address + 1) << 8;                          memfn0.wr8[addr >> 15](addr, value);
                         return(ret);  
                 }                  }
                 else {                  else if (addr < CPU_EXTLIMIT16) {
                         ret = egc_read(address + 1) << 8;                          CPU_EXTMEMBASE[addr] = (UINT8)value;
                         ret += egc_read(address);  
                         return(ret);  
                 }                  }
         }                  else if (addr < 0x00f00000) {
 }                  }
                   else if (addr < 0x01000000) {
 static REG16 MEMCALL i286w_rb(UINT32 address) {                          memfnf.wr8[(addr >> 17) & 7](addr, value);
                   }
         if (CPU_ITFBANK) {                  else if (addr < CPU_EXTLIMIT) {
                 address += VRAM_STEP;                          CPU_EXTMEMBASE[addr] = (UINT8)value;
         }                  }
         return(LOADINTELWORD(mem + address));  #if defined(SUPPORT_PC9821)
 }                  else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           memvgaf_wr8(addr, value);
   
 // ---- table  
   
 typedef void (MEMCALL * MEM8WRITE)(UINT32 address, REG8 value);  
 typedef REG8 (MEMCALL * MEM8READ)(UINT32 address);  
 typedef void (MEMCALL * MEM16WRITE)(UINT32 address, REG16 value);  
 typedef REG16 (MEMCALL * MEM16READ)(UINT32 address);  
   
 typedef struct {  
         MEM8READ        rd8[0x20];  
         MEM8WRITE       wr8[0x20];  
         MEM16READ       rd16[0x20];  
         MEM16WRITE      wr16[0x20];  
 } MEMFN;  
   
 typedef struct {  
         MEM8READ        brd8;  
         MEM8READ        ird8;  
         MEM8WRITE       ewr8;  
         MEM8WRITE       bwr8;  
         MEM16READ       brd16;  
         MEM16READ       ird16;  
         MEM16WRITE      ewr16;  
         MEM16WRITE      bwr16;  
 } MMAPTBL;  
   
 typedef struct {  
         MEM8READ        rd8;  
         MEM8WRITE       wr8;  
         MEM16READ       rd16;  
         MEM16WRITE      wr16;  
 } VACCTBL;  
   
 static MEMFN memfn = {  
                    {i286_rd,    i286_rd,        i286_rd,        i286_rd,                // 00  
                         i286_rd,        i286_rd,        i286_rd,        i286_rd,                // 20  
                         i286_rd,        i286_rd,        i286_rd,        i286_rd,                // 40  
                         i286_rd,        i286_rd,        i286_rd,        i286_rd,                // 60  
                         i286_rd,        i286_rd,        i286_rd,        i286_rd,                // 80  
                         tram_rd,        vram_r0,        vram_r0,        vram_r0,                // a0  
                         i286_rd,        i286_rd,        i286_rd,        i286_rd,                // c0  
                         vram_r0,        i286_rd,        i286_rd,        i286_rb},               // e0  
   
                    {i286_wt,    i286_wt,        i286_wt,        i286_wt,                // 00  
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 20  
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 40  
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 60  
                         i286_wt,        i286_wt,        i286_wt,        i286_wt,                // 80  
                         tram_wt,        vram_w0,        vram_w0,        vram_w0,                // a0  
                         i286_wn,        i286_wn,        i286_wn,        i286_wn,                // c0  
                         vram_w0,        i286_wn,        i286_wn,        i286_wn},               // e0  
   
                    {i286w_rd,   i286w_rd,       i286w_rd,       i286w_rd,               // 00  
                         i286w_rd,       i286w_rd,       i286w_rd,       i286w_rd,               // 20  
                         i286w_rd,       i286w_rd,       i286w_rd,       i286w_rd,               // 40  
                         i286w_rd,       i286w_rd,       i286w_rd,       i286w_rd,               // 60  
                         i286w_rd,       i286w_rd,       i286w_rd,       i286w_rd,               // 80  
                         tramw_rd,       vramw_r0,       vramw_r0,       vramw_r0,               // a0  
                         i286w_rd,       i286w_rd,       i286w_rd,       i286w_rd,               // c0  
                         vramw_r0,       i286w_rd,       i286w_rd,       i286w_rb},              // e0  
   
                    {i286w_wt,   i286w_wt,       i286w_wt,       i286w_wt,               // 00  
                         i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 20  
                         i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 40  
                         i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 60  
                         i286w_wt,       i286w_wt,       i286w_wt,       i286w_wt,               // 80  
                         tramw_wt,       vramw_w0,       vramw_w0,       vramw_w0,               // a0  
                         i286w_wn,       i286w_wn,       i286w_wn,       i286w_wn,               // c0  
                         vramw_w0,       i286w_wn,       i286w_wn,       i286w_wn}};             // e0  
   
 static const MMAPTBL mmaptbl[2] = {  
                    {i286_rd,    i286_rb,        i286_wn,        i286_wn,  
                         i286w_rd,       i286w_rb,       i286w_wn,       i286w_wn},  
                    {i286_rb,    i286_rb,        i286_wt,        i286_wb,  
                         i286w_rb,       i286w_rb,       i286w_wt,       i286w_wb}};  
   
 static const VACCTBL vacctbl[0x10] = {  
                         {vram_r0,       vram_w0,        vramw_r0,       vramw_w0},              // 00  
                         {vram_r1,       vram_w1,        vramw_r1,       vramw_w1},  
                         {vram_r0,       vram_w0,        vramw_r0,       vramw_w0},  
                         {vram_r1,       vram_w1,        vramw_r1,       vramw_w1},  
                         {vram_r0,       vram_w0,        vramw_r0,       vramw_w0},              // 40  
                         {vram_r1,       vram_w1,        vramw_r1,       vramw_w1},  
                         {vram_r0,       vram_w0,        vramw_r0,       vramw_w0},  
                         {vram_r1,       vram_w1,        vramw_r1,       vramw_w1},  
                         {grcg_tcr0,     grcg_tdw0,      grcgw_tcr0,     grcgw_tdw0},    // 80 tdw/tcr  
                         {grcg_tcr1,     grcg_tdw1,      grcgw_tcr1,     grcgw_tdw1},  
                         {egc_rd,        egc_wt,         egcw_rd,        egcw_wt},  
                         {egc_rd,        egc_wt,         egcw_rd,        egcw_wt},  
                         {vram_r0,       grcg_rmw0,      vramw_r0,       grcgw_rmw0},    // c0 rmw  
                         {vram_r1,       grcg_rmw1,      vramw_r1,       grcgw_rmw1},  
                         {egc_rd,        egc_wt,         egcw_rd,        egcw_wt},  
                         {egc_rd,        egc_wt,         egcw_rd,        egcw_wt}};  
   
   
 static REG8 MEMCALL i286_nonram_r(UINT32 address) {  
   
         (void)address;  
         return(0xff);  
 }  
   
 static REG16 MEMCALL i286_nonram_rw(UINT32 address) {  
   
         (void)address;  
         return(0xffff);  
 }  
   
   
 void MEMCALL i286_memorymap(UINT type) {  
   
 const MMAPTBL   *mm;  
   
         mm = mmaptbl + (type & 1);  
   
         memfn.rd8[0xe8000 >> 15] = mm->brd8;  
         memfn.rd8[0xf0000 >> 15] = mm->brd8;  
         memfn.rd8[0xf8000 >> 15] = mm->ird8;  
   
         memfn.wr8[0xd0000 >> 15] = mm->ewr8;  
         memfn.wr8[0xd8000 >> 15] = mm->ewr8;  
         memfn.wr8[0xe8000 >> 15] = mm->bwr8;  
         memfn.wr8[0xf0000 >> 15] = mm->bwr8;  
         memfn.wr8[0xf8000 >> 15] = mm->bwr8;  
   
         memfn.rd16[0xe8000 >> 15] = mm->brd16;  
         memfn.rd16[0xf0000 >> 15] = mm->brd16;  
         memfn.rd16[0xf8000 >> 15] = mm->ird16;  
   
         memfn.wr16[0xd0000 >> 15] = mm->ewr16;  
         memfn.wr16[0xd8000 >> 15] = mm->ewr16;  
         memfn.wr16[0xe8000 >> 15] = mm->bwr16;  
         memfn.wr16[0xf0000 >> 15] = mm->bwr16;  
         memfn.wr16[0xf8000 >> 15] = mm->bwr16;  
 }  
   
 void MEMCALL i286_vram_dispatch(UINT func) {  
   
 const VACCTBL   *vacc;  
   
         vacc = vacctbl + (func & 0x0f);  
   
         memfn.rd8[0xa8000 >> 15] = vacc->rd8;  
         memfn.rd8[0xb0000 >> 15] = vacc->rd8;  
         memfn.rd8[0xb8000 >> 15] = vacc->rd8;  
         memfn.rd8[0xe0000 >> 15] = vacc->rd8;  
   
         memfn.wr8[0xa8000 >> 15] = vacc->wr8;  
         memfn.wr8[0xb0000 >> 15] = vacc->wr8;  
         memfn.wr8[0xb8000 >> 15] = vacc->wr8;  
         memfn.wr8[0xe0000 >> 15] = vacc->wr8;  
   
         memfn.rd16[0xa8000 >> 15] = vacc->rd16;  
         memfn.rd16[0xb0000 >> 15] = vacc->rd16;  
         memfn.rd16[0xb8000 >> 15] = vacc->rd16;  
         memfn.rd16[0xe0000 >> 15] = vacc->rd16;  
   
         memfn.wr16[0xa8000 >> 15] = vacc->wr16;  
         memfn.wr16[0xb0000 >> 15] = vacc->wr16;  
         memfn.wr16[0xb8000 >> 15] = vacc->wr16;  
         memfn.wr16[0xe0000 >> 15] = vacc->wr16;  
   
         if (!(func & 0x10)) {                                                   // digital  
                 memfn.wr8[0xe0000 >> 15] = i286_wn;  
                 memfn.wr16[0xe0000 >> 15] = i286w_wn;  
                 memfn.rd8[0xe0000 >> 15] = i286_nonram_r;  
                 memfn.rd16[0xe0000 >> 15] = i286_nonram_rw;  
         }  
 }  
   
   
 REG8 MEMCALL i286_memoryread(UINT32 paddr) {  
   
         UINT32  address = paddr & CPU_ADRSMASK;  
   
         if (address < I286_MEMREADMAX) {  
                 return(mem[address]);  
         }  
         else if (address >= USE_HIMEM) {  
                 address -= 0x100000;  
                 if (address < CPU_EXTMEMSIZE) {  
                         return(CPU_EXTMEM[address]);  
                 }                  }
   #endif
                 else {                  else {
                         return(0xff);  //                      TRACEOUT(("out of mem (write8): %x", addr));
                 }                  }
         }          }
         else {  
                 return(memfn.rd8[(address >> 15) & 0x1f](address));  
         }  
 }  }
   
 REG16 MEMCALL i286_memoryread_w(UINT32 paddr) {  void MEMCALL i286_memorywrite_w(UINT32 addr, REG16 value) {
   
         UINT32  address = paddr & CPU_ADRSMASK;          if (addr < (I286_MEMWRITEMAX - 1)) {
         REG16   ret;                  STOREINTELWORD(mem + addr, value);
   
         if (address < (I286_MEMREADMAX - 1)) {  
                 return(LOADINTELWORD(mem + address));  
         }          }
         else if (address >= (USE_HIMEM - 1)) {          else if ((addr + 1) & 0x7fff) {                         // non 32kb boundary
                 address -= 0x100000;                  addr = addr & CPU_ADRSMASK;
                 if (address == (USE_HIMEM - 0x100000 - 1)) {                  if (addr < USE_HIMEM) {
                         ret = mem[0x100000 + address];                          memfn0.wr16[addr >> 15](addr, value);
                 }                  }
                 else if (address < CPU_EXTMEMSIZE) {                  else if (addr < CPU_EXTLIMIT16) {
                         ret = CPU_EXTMEM[address];                          STOREINTELWORD(CPU_EXTMEMBASE + addr, value);
                 }                  }
                 else {                  else if (addr < 0x00f00000) {
                         ret = 0xff;                  }
                   else if (addr < 0x01000000) {
                           memfnf.wr16[(addr >> 17) & 7](addr, value);
                   }
                   else if (addr < CPU_EXTLIMIT) {
                           STOREINTELWORD(CPU_EXTMEMBASE + addr, value);
                 }                  }
                 address++;  #if defined(SUPPORT_PC9821)
                 if (address < CPU_EXTMEMSIZE) {                  else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                         ret += CPU_EXTMEM[address] << 8;                          memvgaf_wr16(addr, value);
                 }                  }
   #endif
                 else {                  else {
                         ret += 0xff00;  //                      TRACEOUT(("out of mem (write16): %x", addr));
                 }                  }
                 return(ret);  
         }  
         else if ((address & 0x7fff) != 0x7fff) {  
                 return(memfn.rd16[(address >> 15) & 0x1f](address));  
         }          }
         else {          else {
                 ret = memfn.rd8[(address >> 15) & 0x1f](address);                  i286_memorywrite(addr, (UINT8)value);
                 address++;                  i286_memorywrite(addr + 1, (UINT8)(value >> 8));
                 ret += (REG16)(memfn.rd8[(address >> 15) & 0x1f](address)) << 8;  
                 return(ret);  
         }          }
 }  }
   
 UINT32 MEMCALL i286_memoryread_d(UINT32 paddr) {  void MEMCALL i286_memorywrite_d(UINT32 addr, UINT32 value) {
   
         UINT32  address = paddr & CPU_ADRSMASK;          UINT32  pos;
         UINT32  adrs;  
         UINT32  ret;  
   
         if (address < (I286_MEMREADMAX - 3)) {          if (addr < (I286_MEMWRITEMAX - 3)) {
                 return(LOADINTELDWORD(mem + address));                  STOREINTELDWORD(mem + addr, value);
                   return;
         }          }
         else if (address >= USE_HIMEM) {          else if (addr >= USE_HIMEM) {
                 adrs = address - 0x100000;                  pos = addr & CPU_ADRSMASK;
                 if (adrs + 3 < CPU_EXTMEMSIZE) {                  if ((pos >= USE_HIMEM) && ((pos + 3) < CPU_EXTLIMIT16)) {
                         return(LOADINTELDWORD(CPU_EXTMEM + adrs));                          STOREINTELDWORD(CPU_EXTMEMBASE + pos, value);
                           return;
                 }                  }
         }          }
         ret = i286_memoryread_w(address);          if (!(addr & 1)) {
         ret += (UINT32)i286_memoryread_w(address + 2) << 16;                  i286_memorywrite_w(addr, (UINT16)value);
         return ret;                  i286_memorywrite_w(addr + 2, (UINT16)(value >> 16));
           }
           else {
                   i286_memorywrite(addr, (UINT8)value);
                   i286_memorywrite_w(addr + 1, (UINT16)(value >> 8));
                   i286_memorywrite(addr + 3, (UINT8)(value >> 24));
           }
 }  }
   
 void MEMCALL i286_memorywrite(UINT32 paddr, REG8 value) {  void MEMCALL memp_read(UINT32 address, void *dat, UINT leng) {
   
         UINT32  address = paddr & CPU_ADRSMASK;          UINT8 *out = (UINT8 *)dat;
           UINT diff;
   
         if (address < I286_MEMWRITEMAX) {          /* fast memory access */
                 mem[address] = (BYTE)value;          if ((address + leng) < I286_MEMREADMAX) {
                   CopyMemory(dat, mem + address, leng);
                   return;
         }          }
         else if (address >= USE_HIMEM) {          address = address & CPU_ADRSMASK;
                 address -= 0x100000;          if ((address >= USE_HIMEM) && (address < CPU_EXTLIMIT16)) {
                 if (address < CPU_EXTMEMSIZE) {                  diff = CPU_EXTLIMIT16 - address;
                         CPU_EXTMEM[address] = (BYTE)value;                  if (diff >= leng) {
                           CopyMemory(dat, CPU_EXTMEMBASE + address, leng);
                           return;
                 }                  }
                   CopyMemory(dat, CPU_EXTMEMBASE + address, diff);
                   out += diff;
                   leng -= diff;
                   address += diff;
         }          }
         else {  
                 memfn.wr8[(address >> 15) & 0x1f](address, value);          /* slow memory access */
           while (leng-- > 0) {
                   *out++ = i286_memoryread(address++);
         }          }
 }  }
   
 void MEMCALL i286_memorywrite_w(UINT32 paddr, REG16 value) {  void MEMCALL memp_write(UINT32 address, const void *dat, UINT leng) {
   
         UINT32  address = paddr & CPU_ADRSMASK;          const UINT8 *out = (UINT8 *)dat;
           UINT diff;
   
         if (address < (I286_MEMWRITEMAX - 1)) {          /* fast memory access */
                 STOREINTELWORD(mem + address, value);          if ((address + leng) < I286_MEMREADMAX) {
                   CopyMemory(mem + address, dat, leng);
                   return;
         }          }
         else if (address >= (USE_HIMEM - 1)) {          address = address & CPU_ADRSMASK;
                 address -= 0x100000;          if ((address >= USE_HIMEM) && (address < CPU_EXTLIMIT16)) {
                 if (address == (USE_HIMEM - 0x100000 - 1)) {                  diff = CPU_EXTLIMIT16 - address;
                         mem[address] = (BYTE)value;                  if (diff >= leng) {
                 }                          CopyMemory(CPU_EXTMEMBASE + address, dat, leng);
                 else if (address < CPU_EXTMEMSIZE) {                          return;
                         CPU_EXTMEM[address] = (BYTE)value;  
                 }  
                 address++;  
                 if (address < CPU_EXTMEMSIZE) {  
                         CPU_EXTMEM[address] = (BYTE)(value >> 8);  
                 }                  }
                   CopyMemory(CPU_EXTMEMBASE + address, dat, diff);
                   out += diff;
                   leng -= diff;
                   address += diff;
         }          }
         else if ((address & 0x7fff) != 0x7fff) {  
                 memfn.wr16[(address >> 15) & 0x1f](address, value);          /* slow memory access */
         }          while (leng-- > 0) {
         else {                  i286_memorywrite(address++, *out++);
                 memfn.wr8[(address >> 15) & 0x1f](address, (BYTE)value);  
                 address++;  
                 memfn.wr8[(address >> 15) & 0x1f](address, (BYTE)(value >> 8));  
         }          }
 }  }
   
 void MEMCALL i286_memorywrite_d(UINT32 paddr, UINT32 value) {  
   
         UINT32  address = paddr & CPU_ADRSMASK;  // ---- Logical Space (BIOS)
         UINT32  adrs;  
   
         if (address < (I286_MEMWRITEMAX - 3)) {  static UINT32 physicaladdr(UINT32 addr, BOOL wr) {
                 STOREINTELDWORD(mem + address, value);  
                 return;          UINT32  a;
           UINT32  pde;
           UINT32  pte;
   
           a = CPU_STAT_PDE_BASE + ((addr >> 20) & 0xffc);
           pde = i286_memoryread_d(a);
           if (!(pde & CPU_PDE_PRESENT)) {
                   goto retdummy;
         }          }
         else if (address >= USE_HIMEM) {          if (!(pde & CPU_PDE_ACCESS)) {
                 adrs = address - 0x100000;                  i286_memorywrite(a, (UINT8)(pde | CPU_PDE_ACCESS));
                 if (adrs + 3 < CPU_EXTMEMSIZE) {          }
                         STOREINTELDWORD(CPU_EXTMEM + adrs, value);          a = (pde & CPU_PDE_BASEADDR_MASK) + ((addr >> 10) & 0xffc);
                         return;          pte = cpu_memoryread_d(a);
                 }          if (!(pte & CPU_PTE_PRESENT)) {
                   goto retdummy;
         }          }
         i286_memorywrite_w(address, value & 0xffff);          if (!(pte & CPU_PTE_ACCESS)) {
         i286_memorywrite_w(address + 2, (WORD)(value >> 16));                  i286_memorywrite(a, (UINT8)(pte | CPU_PTE_ACCESS));
           }
           if ((wr) && (!(pte & CPU_PTE_DIRTY))) {
                   i286_memorywrite(a, (UINT8)(pte | CPU_PTE_DIRTY));
           }
           addr = (pte & CPU_PTE_BASEADDR_MASK) + (addr & 0x00000fff);
           return(addr);
   
   retdummy:
           return(0x01000000);             // てきとーにメモリが存在しない場所
 }  }
   
 #ifdef NP2_MEMORY_ASM  
 REG8 MEMCALL i286_membyte_read(UINT seg, UINT off) {  
   
         UINT32  address;  REG8 MEMCALL meml_read8(UINT seg, UINT off) {
   
         address = (seg << 4) + LOW16(off);          UINT32  addr;
         if (address < I286_MEMREADMAX) {  
                 return(mem[address]);          addr = (seg << 4) + LOW16(off);
         }          if (CPU_STAT_PAGING) {
         else {                  addr = physicaladdr(addr, FALSE);
                 return(i286_memoryread(address));  
         }          }
           return(i286_memoryread(addr));
 }  }
   
 REG16 MEMCALL i286_memword_read(UINT seg, UINT off) {  REG16 MEMCALL meml_read16(UINT seg, UINT off) {
   
         UINT32  address;          UINT32  addr;
   
         address = (seg << 4) + LOW16(off);          addr = (seg << 4) + LOW16(off);
         if (address < (I286_MEMREADMAX - 1)) {          if (!CPU_STAT_PAGING) {
                 return(LOADINTELWORD(mem + address));                  return(i286_memoryread_w(addr));
         }          }
         else {          else if ((addr + 1) & 0xfff) {
                 return(i286_memoryread_w(address));                  return(i286_memoryread_w(physicaladdr(addr, FALSE)));
         }          }
           return(meml_read8(seg, off) + (meml_read8(seg, off + 1) << 8));
 }  }
   
 void MEMCALL i286_membyte_write(UINT seg, UINT off, REG8 value) {  void MEMCALL meml_write8(UINT seg, UINT off, REG8 dat) {
   
         UINT32  address;          UINT32  addr;
   
         address = (seg << 4) + LOW16(off);          addr = (seg << 4) + LOW16(off);
         if (address < I286_MEMWRITEMAX) {          if (CPU_STAT_PAGING) {
                 mem[address] = (BYTE)value;                  addr = physicaladdr(addr, TRUE);
         }  
         else {  
                 i286_memorywrite(address, value);  
         }          }
           i286_memorywrite(addr, dat);
 }  }
   
 void MEMCALL i286_memword_write(UINT seg, UINT off, REG16 value) {  void MEMCALL meml_write16(UINT seg, UINT off, REG16 dat) {
   
         UINT32  address;          UINT32  addr;
   
         address = (seg << 4) + LOW16(off);          addr = (seg << 4) + LOW16(off);
         if (address < (I286_MEMWRITEMAX - 1)) {          if (!CPU_STAT_PAGING) {
                 STOREINTELWORD(mem + address, value);                  i286_memorywrite_w(addr, dat);
           }
           else if ((addr + 1) & 0xfff) {
                   i286_memorywrite_w(physicaladdr(addr, TRUE), dat);
         }          }
         else {          else {
                 i286_memorywrite_w(address, value);                  meml_write8(seg, off, (REG8)dat);
                   meml_write8(seg, off + 1, (REG8)(dat >> 8));
         }          }
 }  }
 #endif /* NP2_MEMORY_ASM */  
   
 void MEMCALL i286_memstr_read(UINT seg, UINT off, void *dat, UINT leng) {  void MEMCALL meml_readstr(UINT seg, UINT off, void *dat, UINT leng) {
   
         BYTE    *out;          UINT32  addr;
         UINT32  adrs;          UINT    rem;
         UINT    size;          UINT    size;
   
         out = (BYTE *)dat;          while(leng) {
         adrs = seg << 4;                  off = LOW16(off);
         off = LOW16(off);                  addr = (seg << 4) + off;
         if ((I286_MEMREADMAX >= 0x10000) &&                  rem = 0x10000 - off;
                 (adrs < (I286_MEMREADMAX - 0x10000))) {                  size = min(leng, rem);
                 if (leng) {                  if (CPU_STAT_PAGING) {
                         size = 0x10000 - off;                          rem = 0x1000 - (addr & 0xfff);
                         if (size >= leng) {                          size = min(size, rem);
                                 CopyMemory(out, mem + adrs + off, leng);                          addr = physicaladdr(addr, FALSE);
                                 return;                  }
                         }                  memp_read(addr, dat, size);
                         CopyMemory(out, mem + adrs + off, size);                  off += size;
                         out += size;                  dat = ((UINT8 *)dat) + size;
                         leng -= size;                  leng -= size;
                 }  
                 while(leng >= 0x10000) {  
                         CopyMemory(out, mem + adrs, 0x10000);  
                         out += 0x10000;  
                         leng -= 0x10000;  
                 }  
                 if (leng) {  
                         CopyMemory(out, mem + adrs, leng);  
                 }  
         }  
         else {  
                 while(leng--) {  
                         *out++ = i286_memoryread(adrs + off);  
                         off = LOW16(off + 1);  
                 }  
         }          }
 }  }
   
 void MEMCALL i286_memstr_write(UINT seg, UINT off, const void *dat, UINT leng) {  void MEMCALL meml_writestr(UINT seg, UINT off, const void *dat, UINT leng) {
   
         BYTE    *out;          UINT32  addr;
         UINT32  adrs;          UINT    rem;
         UINT    size;          UINT    size;
   
         out = (BYTE *)dat;          while(leng) {
         adrs = seg << 4;                  off = LOW16(off);
         off = LOW16(off);                  addr = (seg << 4) + off;
         if ((I286_MEMWRITEMAX >= 0x10000) &&                  rem = 0x10000 - off;
                 (adrs < (I286_MEMWRITEMAX - 0x10000))) {                  size = min(leng, rem);
                 if (leng) {                  if (CPU_STAT_PAGING) {
                         size = 0x10000 - off;                          rem = 0x1000 - (addr & 0xfff);
                         if (size >= leng) {                          size = min(size, rem);
                                 CopyMemory(mem + adrs + off, out, leng);                          addr = physicaladdr(addr, TRUE);
                                 return;                  }
                         }                  memp_write(addr, dat, size);
                         CopyMemory(mem + adrs + off, out, size);                  off += size;
                         out += size;                  dat = ((UINT8 *)dat) + size;
                         leng -= size;                  leng -= size;
                 }  
                 while(leng >= 0x10000) {  
                         CopyMemory(mem + adrs, out, 0x10000);  
                         out += 0x10000;  
                         leng -= 0x10000;  
                 }  
                 if (leng) {  
                         CopyMemory(mem + adrs, out, leng);  
                 }  
         }  
         else {  
                 while(leng--) {  
                         i286_memorywrite(adrs + off, *out++);  
                         off = LOW16(off + 1);  
                 }  
         }          }
 }  }
   
 void MEMCALL i286_memx_read(UINT32 address, void *dat, UINT leng) {  void MEMCALL meml_read(UINT32 address, void *dat, UINT leng) {
   
         if ((address + leng) < I286_MEMREADMAX) {          UINT    size;
                 CopyMemory(dat, mem + address, leng);  
           if (!CPU_STAT_PAGING) {
                   memp_read(address, dat, leng);
         }          }
         else {          else {
                 BYTE *out = (BYTE *)dat;                  while(leng) {
                 if (address < I286_MEMREADMAX) {                          size = 0x1000 - (address & 0xfff);
                         CopyMemory(out, mem + address, I286_MEMREADMAX - address);                          size = min(size, leng);
                         out += I286_MEMREADMAX - address;                          memp_read(physicaladdr(address, FALSE), dat, size);
                         leng -= I286_MEMREADMAX - address;                          address += size;
                         address = I286_MEMREADMAX;                          dat = ((UINT8 *)dat) + size;
                 }                          leng -= size;
                 while(leng--) {  
                         *out++ = i286_memoryread(address++);  
                 }                  }
         }          }
 }  }
   
 void MEMCALL i286_memx_write(UINT32 address, const void *dat, UINT leng) {  void MEMCALL meml_write(UINT32 address, const void *dat, UINT leng) {
   
 const BYTE      *out;          UINT    size;
   
         if ((address + leng) < I286_MEMWRITEMAX) {          if (!CPU_STAT_PAGING) {
                 CopyMemory(mem + address, dat, leng);                  memp_write(address, dat, leng);
         }          }
         else {          else {
                 out = (BYTE *)dat;                  while(leng) {
                 if (address < I286_MEMWRITEMAX) {                          size = 0x1000 - (address & 0xfff);
                         CopyMemory(mem + address, out, I286_MEMWRITEMAX - address);                          size = min(size, leng);
                         out += I286_MEMWRITEMAX - address;                          memp_write(physicaladdr(address, TRUE), dat, size);
                         leng -= I286_MEMWRITEMAX - address;                          address += size;
                         address = I286_MEMWRITEMAX;                          dat = ((UINT8 *)dat) + size;
                 }                          leng -= size;
                 while(leng--) {  
                         i286_memorywrite(address++, *out++);  
                 }                  }
         }          }
 }  }
   
 #endif  #endif
   
Removed from v.1.10  
changed lines
  Added in v.1.33

RetroPC.NET-CVS <cvs@retropc.net>