Diff for /np2/i386c/memory.c between versions 1.4 and 1.30

version 1.4, 2003/12/25 19:21:17 version 1.30, 2005/03/11 15:12:57
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  
   
 // ---- write byte  // ---- MAIN
   
 static void MEMCALL i286_wt(UINT32 address, REG8 value) {  static REG8 MEMCALL memmain_rd8(UINT32 address) {
   
         mem[address & CPU_ADRSMASK] = (BYTE)value;          return(mem[address & CPU_ADRSMASK]);
 }  }
   
 static void MEMCALL tram_wt(UINT32 address, REG8 value) {  static REG16 MEMCALL memmain_rd16(UINT32 address) {
   
         CPU_REMCLOCK -= vramop.tramwait;  const UINT8     *ptr;
         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) {          ptr = mem + (address & CPU_ADRSMASK);
           return(LOADINTELWORD(ptr));
         CPU_REMCLOCK -= vramop.vramwait;  
         mem[address] = (BYTE)value;  
         vramupdate[LOW15(address)] |= 1;  
         gdcs.grphdisp |= 1;  
 }  }
   
 static void MEMCALL vram_w1(UINT32 address, REG8 value) {  static void MEMCALL memmain_wr8(UINT32 address, REG8 value) {
   
         CPU_REMCLOCK -= vramop.vramwait;          mem[address & CPU_ADRSMASK] = (UINT8)value;
         mem[address + VRAM_STEP] = (BYTE)value;  
         vramupdate[LOW15(address)] |= 2;  
         gdcs.grphdisp |= 2;  
 }  }
   
 static void MEMCALL grcg_rmw0(UINT32 address, REG8 value) {  static void MEMCALL memmain_wr16(UINT32 address, REG16 value) {
   
         REG8    mask;  
         BYTE    *vram;  
   
         CPU_REMCLOCK -= vramop.grcgwait;  
         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) {          UINT8   *ptr;
   
         REG8    mask;          ptr = mem + (address & CPU_ADRSMASK);
         BYTE    *vram;          STOREINTELWORD(ptr, value);
   
         CPU_REMCLOCK -= vramop.grcgwait;  
         mask = ~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;  
   
         CPU_REMCLOCK -= vramop.grcgwait;  
         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) {  // ---- N/C
   
         BYTE    *vram;  static REG8 MEMCALL memnc_rd8(UINT32 address) {
   
         CPU_REMCLOCK -= vramop.grcgwait;          (void)address;
         address = LOW15(address);          return(0xff);
         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) {
   
         egc_write(address, value);          (void)address;
           return(0xffff);
 }  }
   
 static void MEMCALL emmc_wt(UINT32 address, REG8 value) {  static void MEMCALL memnc_wr8(UINT32 address, REG8 value) {
   
         extmem.pageptr[(address >> 14) & 3][LOW14(address)] = (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  // ---- table
   
 static REG8 MEMCALL i286_rd(UINT32 address) {  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);
   
         return(mem[address & CPU_ADRSMASK]);  typedef struct {
           MEM8READ        rd8[0x20];
           MEM8WRITE       wr8[0x20];
           MEM16READ       rd16[0x20];
           MEM16WRITE      wr16[0x20];
   } MEMFN;
   
   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;
   
   typedef struct {
           MEM8READ        rd8;
           MEM8WRITE       wr8;
           MEM16READ       rd16;
           MEM16WRITE      wr16;
   } VACCTBL;
   
   static MEMFN memfn = {
              {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_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_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_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
   
   static const MMAPTBL mmaptbl[2] = {
                      {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 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}};
   
   
   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[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[0xe8000 >> 15] = mm->bwr16;
           memfn.wr16[0xf0000 >> 15] = mm->bwr16;
           memfn.wr16[0xf8000 >> 15] = mm->bwr16;
 }  }
   
 static REG8 MEMCALL tram_rd(UINT32 address) {  void MEMCALL i286_vram_dispatch(UINT func) {
   
         CPU_REMCLOCK -= vramop.tramwait;  
         if (address < 0xa4000) {  
                 return(mem[address]);  
         }  
         else if (address < 0xa5000) {  
                 if (address & 1) {  
                         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) {  const VACCTBL   *vacc;
   
         CPU_REMCLOCK -= vramop.vramwait;  #if defined(SUPPORT_PC9821)
         return(mem[address]);          if (!(func & 0x20)) {
   #endif
                   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.rd8[0xe0000 >> 15] = memnc_rd8;
                           memfn.wr8[0xe0000 >> 15] = memnc_wr8;
                           memfn.rd16[0xe0000 >> 15] = memnc_rd16;
                           memfn.wr16[0xe0000 >> 15] = memnc_wr16;
                   }
   #if defined(SUPPORT_PC9821)
           }
           else {
                   memfn.rd8[0xa8000 >> 15] = memvga0_rd8;
                   memfn.rd8[0xb0000 >> 15] = memvga0_rd8;
                   memfn.rd8[0xb8000 >> 15] = memnc_rd8;
                   memfn.rd8[0xe0000 >> 15] = memvgaio_rd8;
   
                   memfn.wr8[0xa8000 >> 15] = memvga0_wr8;
                   memfn.wr8[0xb0000 >> 15] = memvga0_wr8;
                   memfn.wr8[0xb8000 >> 15] = memnc_wr8;
                   memfn.wr8[0xe0000 >> 15] = memvgaio_wr8;
   
                   memfn.rd16[0xa8000 >> 15] = memvga0_rd16;
                   memfn.rd16[0xb0000 >> 15] = memvga0_rd16;
                   memfn.rd16[0xb8000 >> 15] = memnc_rd16;
                   memfn.rd16[0xe0000 >> 15] = memvgaio_rd16;
   
                   memfn.wr16[0xa8000 >> 15] = memvga0_wr16;
                   memfn.wr16[0xb0000 >> 15] = memvga0_wr16;
                   memfn.wr16[0xb8000 >> 15] = memnc_wr16;
                   memfn.wr16[0xe0000 >> 15] = memvgaio_wr16;
           }
   #endif
 }  }
   
 static REG8 MEMCALL vram_r1(UINT32 address) {  
   
         CPU_REMCLOCK -= vramop.vramwait;  
         return(mem[address + VRAM_STEP]);  
 }  
   
 static REG8 MEMCALL grcg_tcr0(UINT32 address) {  REG8 MEMCALL i286_memoryread(UINT32 addr) {
   
 const BYTE      *vram;          UINT32  pos;
         REG8    ret;  
   
         CPU_REMCLOCK -= vramop.grcgwait;          if (addr < I286_MEMREADMAX) {
         vram = mem + LOW15(address);                  return(mem[addr]);
         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)) {          else if (addr >= USE_HIMEM) {
                 ret |= vram[VRAM0_G] ^ grcg.tile[2].b[0];                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                   if (pos < CPU_EXTMEMSIZE) {
                           return(CPU_EXTMEM[pos]);
                   }
                   else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                           return(memfn.rd8[(addr >> 15) & 0x1f](addr - 0x00f00000));
                   }
   #if defined(SUPPORT_PC9821)
                   else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                           return(memvgaf_rd8(addr));
                   }
                   else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           return(memvgaf_rd8(addr));
                   }
   #endif
                   else {
   //                      TRACEOUT(("out of mem (read8): %x", addr));
                           return(0xff);
                   }
         }          }
         if (!(grcg.modereg & 8)) {          else {
                 ret |= vram[VRAM0_E] ^ grcg.tile[3].b[0];                  return(memfn.rd8[(addr >> 15) & 0x1f](addr));
         }          }
         return(ret ^ 0xff);  
 }  }
   
 static REG8 MEMCALL grcg_tcr1(UINT32 address) {  REG16 MEMCALL i286_memoryread_w(UINT32 addr) {
   
 const BYTE      *vram;          UINT32  pos;
         REG8    ret;          REG16   ret;
   
         CPU_REMCLOCK -= vramop.grcgwait;          if (addr < (I286_MEMREADMAX - 1)) {
         ret = 0;                  return(LOADINTELWORD(mem + addr));
         vram = mem + LOW15(address);  
         if (!(grcg.modereg & 1)) {  
                 ret |= vram[VRAM1_B] ^ grcg.tile[0].b[0];  
         }  
         if (!(grcg.modereg & 2)) {  
                 ret |= vram[VRAM1_R] ^ grcg.tile[1].b[0];  
         }          }
         if (!(grcg.modereg & 4)) {          else if ((addr + 1) & 0x7fff) {                         // non 32kb boundary
                 ret |= vram[VRAM1_G] ^ grcg.tile[2].b[0];                  if (addr >= USE_HIMEM) {
         }                          pos = (addr & CPU_ADRSMASK) - 0x100000;
         if (!(grcg.modereg & 8)) {                          if (pos < CPU_EXTMEMSIZE) {
                 ret |= vram[VRAM1_E] ^ grcg.tile[3].b[0];                                  return(LOADINTELWORD(CPU_EXTMEM + pos));
                           }
                           else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                                   return(memfn.rd16[(addr >> 15) & 0x1f](addr - 0x00f00000));
                           }
   #if defined(SUPPORT_PC9821)
                           else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                                   return(memvgaf_rd16(addr));
                           }
                           else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                                   return(memvgaf_rd16(addr));
                           }
   #endif
                           else {
   //                              TRACEOUT(("out of mem (read16): %x", addr));
                                   return(0xffff);
                           }
                   }
                   return(memfn.rd16[(addr >> 15) & 0x1f](addr));
         }          }
         return(ret ^ 0xff);          else {
 }                  ret = i286_memoryread(addr);
                   ret += (REG16)(i286_memoryread(addr + 1) << 8);
 static REG8 MEMCALL egc_rd(UINT32 address) {                  return(ret);
   
         return(egc_read(address));  
 }  
   
 static REG8 MEMCALL emmc_rd(UINT32 address) {  
   
         return(extmem.pageptr[(address >> 14) & 3][LOW14(address)]);  
 }  
   
 static REG8 MEMCALL i286_itf(UINT32 address) {  
   
         if (CPU_ITFBANK) {  
                 address = ITF_ADRS + LOW15(address);  
         }          }
         return(mem[address]);  
 }  }
   
   UINT32 MEMCALL i286_memoryread_d(UINT32 addr) {
   
 // ---- write word          UINT32  pos;
           UINT32  ret;
 static void MEMCALL i286w_wt(UINT32 address, REG16 value) {  
   
         BYTE    *ptr;  
   
         ptr = mem + (address & CPU_ADRSMASK);  
         STOREINTELWORD(ptr, value);  
 }  
   
 static void MEMCALL tramw_wt(UINT32 address, REG16 value) {          if (addr < (I286_MEMREADMAX - 3)) {
                   return(LOADINTELDWORD(mem + addr));
         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) {          else if (addr >= USE_HIMEM) {
                 STOREINTELWORD(mem + address, value);                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                 tramupdate[0] = 1;                  if ((pos + 3) < CPU_EXTMEMSIZE) {
                 tramupdate[0xfff] = 1;                          return(LOADINTELDWORD(CPU_EXTMEM + pos));
                 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 (!(addr & 1)) {
                 if (address & 1) {                  ret = i286_memoryread_w(addr);
                         address++;                  ret += (UINT32)i286_memoryread_w(addr + 2) << 16;
                         value >>= 8;          }
                 }          else {
                 if ((!(address & 2)) || (gdcs.msw_accessable)) {                  ret = i286_memoryread(addr);
                         mem[address] = (BYTE)value;                  ret += (UINT32)i286_memoryread_w(addr + 1) << 8;
                         tramupdate[LOW12(address >> 1)] = 1;                  ret += (UINT32)i286_memoryread(addr + 3) << 24;
                         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;  
                 }  
         }          }
           return(ret);
 }  }
   
   void MEMCALL i286_memorywrite(UINT32 addr, REG8 value) {
   
 #define GRCGW_NON(page) {                                                                                       \          UINT32  pos;
         CPU_REMCLOCK -= vramop.vramwait;                                                                \  
         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 -= vramop.grcgwait;                                                                \  
         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 -= vramop.grcgwait;                                                                \  
         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) {          if (addr < I286_MEMWRITEMAX) {
                   mem[addr] = (BYTE)value;
         if (!(address & 1)) {  
                 egc_write_w(address, value);  
         }          }
         else {          else if (addr >= USE_HIMEM) {
                 if (!(egc.sft & 0x1000)) {                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                         egc_write(address, (REG8)value);                  if (pos < CPU_EXTMEMSIZE) {
                         egc_write(address + 1, (REG8)(value >> 8));                          CPU_EXTMEM[pos] = (BYTE)value;
                   }
                   else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                           memfn.wr8[(addr >> 15) & 0x1f](addr - 0x00f00000, value);
                   }
   #if defined(SUPPORT_PC9821)
                   else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                           memvgaf_wr8(addr, value);
                   }
                   else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                           memvgaf_wr8(addr, value);
                 }                  }
   #endif
                 else {                  else {
                         egc_write(address + 1, (REG8)(value >> 8));  //                      TRACEOUT(("out of mem (write8): %x", addr));
                         egc_write(address, (REG8)value);  
                 }                  }
         }          }
 }  
   
 static void MEMCALL emmcw_wt(UINT32 address, REG16 value) {  
   
         BYTE    *ptr;  
   
         if ((address & 0x3fff) != 0x3fff) {  
                 ptr = extmem.pageptr[(address >> 14) & 3] + LOW14(address);  
                 STOREINTELWORD(ptr, value);  
         }  
         else {          else {
                 extmem.pageptr[(address >> 14) & 3][0x3fff] = (BYTE)value;                  memfn.wr8[(addr >> 15) & 0x1f](addr, value);
                 extmem.pageptr[((address + 1) >> 14) & 3][0] = (BYTE)(value >> 8);  
         }          }
 }  }
   
 static void MEMCALL i286w_wn(UINT32 address, REG16 value) {  void MEMCALL i286_memorywrite_w(UINT32 addr, REG16 value) {
   
         (void)address;  
         (void)value;  
 }  
   
   
 // ---- read word  
   
 static REG16 MEMCALL i286w_rd(UINT32 address) {  
   
         BYTE    *ptr;  
   
         ptr = mem + (address & CPU_ADRSMASK);  
         return(LOADINTELWORD(ptr));  
 }  
   
 static REG16 MEMCALL tramw_rd(UINT32 address) {          UINT32  pos;
   
         CPU_REMCLOCK -= vramop.tramwait;          if (addr < (I286_MEMWRITEMAX - 1)) {
         if (address < (0xa4000 - 1)) {                  STOREINTELWORD(mem + addr, value);
                 return(LOADINTELWORD(mem + address));  
         }  
         else if (address == 0xa3fff) {  
                 return(mem[address] + (fontrom[cgwindow.low] << 8));  
         }          }
         else if (address < 0xa4fff) {          else if ((addr + 1) & 0x7fff) {                         // non 32kb boundary
                 if (address & 1) {                  if (addr >= USE_HIMEM) {
                         REG16 ret;                          pos = (addr & CPU_ADRSMASK) - 0x100000;
                         ret = fontrom[cgwindow.high + ((address >> 1) & 0x0f)];                          if (pos < CPU_EXTMEMSIZE) {
                         ret += fontrom[cgwindow.low + (((address + 1) >> 1) & 0x0f)] << 8;                                  STOREINTELWORD(CPU_EXTMEM + pos, value);
                         return(ret);                          }
                           else if ((addr >= 0x00fa0000) && (addr < 0x01000000)) {
                                   memfn.wr16[(addr >> 15) & 0x1f](addr - 0x00f00000, value);
                           }
   #if defined(SUPPORT_PC9821)
                           else if ((addr >= 0x00f00000) && (addr < 0x00f80000)) {
                                   memvgaf_wr16(addr, value);
                           }
                           else if ((addr >= 0xfff00000) && (addr < 0xfff80000)) {
                                   memvgaf_wr16(addr, value);
                           }
   #endif
                           else {
   //                              TRACEOUT(("out of mem (write16): %x", addr));
                           }
                 }                  }
                 else {                  else {
                         REG16 ret;                          memfn.wr16[(addr >> 15) & 0x1f](addr, value);
                         ret = fontrom[cgwindow.low + ((address >> 1) & 0x0f)];  
                         ret += fontrom[cgwindow.high + ((address >> 1) & 0x0f)] << 8;  
                         return(ret);  
                 }                  }
         }          }
         else if (address == 0xa4fff) {          else {
                 return((mem[0xa5000] << 8) | fontrom[cgwindow.high + 15]);                  i286_memorywrite(addr, (UINT8)value);
                   i286_memorywrite(addr + 1, (UINT8)(value >> 8));
         }          }
         return(LOADINTELWORD(mem + address));  
 }  
   
 static REG16 MEMCALL vramw_r0(UINT32 address) {  
   
         CPU_REMCLOCK -= vramop.vramwait;  
         return(LOADINTELWORD(mem + address));  
 }  }
   
 static REG16 MEMCALL vramw_r1(UINT32 address) {  void MEMCALL i286_memorywrite_d(UINT32 addr, UINT32 value) {
   
         CPU_REMCLOCK -= vramop.vramwait;          UINT32  pos;
         return(LOADINTELWORD(mem + address + VRAM_STEP));  
 }  
   
 static REG16 MEMCALL grcgw_tcr0(UINT32 address) {  
   
         BYTE    *vram;          if (addr < (I286_MEMWRITEMAX - 3)) {
         REG16   ret;                  STOREINTELDWORD(mem + addr, value);
                   return;
         CPU_REMCLOCK -= vramop.grcgwait;  
         ret = 0;  
         vram = mem + LOW15(address);  
         if (!(grcg.modereg & 1)) {  
                 ret |= LOADINTELWORD(vram + VRAM0_B) ^ grcg.tile[0].w;  
         }          }
         if (!(grcg.modereg & 2)) {          else if (addr >= USE_HIMEM) {
                 ret |= LOADINTELWORD(vram + VRAM0_R) ^ grcg.tile[1].w;                  pos = (addr & CPU_ADRSMASK) - 0x100000;
                   if ((pos + 3) < CPU_EXTMEMSIZE) {
                           STOREINTELDWORD(CPU_EXTMEM + pos, value);
                           return;
                   }
         }          }
         if (!(grcg.modereg & 4)) {          if (!(addr & 1)) {
                 ret |= LOADINTELWORD(vram + VRAM0_G) ^ grcg.tile[2].w;                  i286_memorywrite_w(addr, (UINT16)value);
                   i286_memorywrite_w(addr + 2, (UINT16)(value >> 16));
         }          }
         if (!(grcg.modereg & 8)) {          else {
                 ret |= LOADINTELWORD(vram + VRAM0_E) ^ grcg.tile[3].w;                  i286_memorywrite(addr, (UINT8)value);
                   i286_memorywrite_w(addr + 1, (UINT16)(value >> 8));
                   i286_memorywrite(addr + 3, (UINT8)(value >> 24));
         }          }
         return((UINT16)~ret);  
 }  }
   
 static REG16 MEMCALL grcgw_tcr1(UINT32 address) {  #if 0
   REG8 MEMCALL i286_membyte_read(UINT seg, UINT off) {
   
         BYTE    *vram;          UINT32  address;
         REG16   ret;  
   
         CPU_REMCLOCK -= vramop.grcgwait;          address = (seg << 4) + LOW16(off);
         ret = 0;          if (address < I286_MEMREADMAX) {
         vram = mem + LOW15(address);                  return(mem[address]);
         if (!(grcg.modereg & 1)) {  
                 ret |= LOADINTELWORD(vram + VRAM1_B) ^ grcg.tile[0].w;  
         }  
         if (!(grcg.modereg & 2)) {  
                 ret |= LOADINTELWORD(vram + VRAM1_R) ^ grcg.tile[1].w;  
         }  
         if (!(grcg.modereg & 4)) {  
                 ret |= LOADINTELWORD(vram + VRAM1_G) ^ grcg.tile[2].w;  
         }          }
         if (!(grcg.modereg & 8)) {          else {
                 ret |= LOADINTELWORD(vram + VRAM1_E) ^ grcg.tile[3].w;                  return(i286_memoryread(address));
         }          }
         return((UINT16)(~ret));  
 }  }
   
 static REG16 MEMCALL egcw_rd(UINT32 address) {  REG16 MEMCALL i286_memword_read(UINT seg, UINT off) {
   
         REG16   ret;          UINT32  address;
   
         if (!(address & 1)) {          address = (seg << 4) + LOW16(off);
                 return(egc_read_w(address));          if (address < (I286_MEMREADMAX - 1)) {
                   return(LOADINTELWORD(mem + address));
         }          }
         else {          else {
                 if (!(egc.sft & 0x1000)) {                  return(i286_memoryread_w(address));
                         ret = egc_read(address);  
                         ret += egc_read(address + 1) << 8;  
                         return(ret);  
                 }  
                 else {  
                         ret = egc_read(address + 1) << 8;  
                         ret += egc_read(address);  
                         return(ret);  
                 }  
         }          }
 }  }
   
 static REG16 MEMCALL emmcw_rd(UINT32 address) {  void MEMCALL i286_membyte_write(UINT seg, UINT off, REG8 value) {
   
 const BYTE      *ptr;          UINT32  address;
         REG16   ret;  
   
         if ((address & 0x3fff) != 0x3fff) {          address = (seg << 4) + LOW16(off);
                 ptr = extmem.pageptr[(address >> 14) & 3] + LOW14(address);          if (address < I286_MEMWRITEMAX) {
                 return(LOADINTELWORD(ptr));                  mem[address] = (BYTE)value;
         }          }
         else {          else {
                 ret = extmem.pageptr[(address >> 14) & 3][0x3fff];                  i286_memorywrite(address, value);
                 ret += extmem.pageptr[((address + 1) >> 14) & 3][0] << 8;  
                 return(ret);  
         }  
 }  
   
 static REG16 MEMCALL i286w_itf(UINT32 address) {  
   
         if (CPU_ITFBANK) {  
                 address = ITF_ADRS + LOW15(address);  
         }          }
         return(LOADINTELWORD(mem + address));  
 }  
   
   
 // ---- 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);  
   
 static MEM8WRITE memory_write[] = {  
                         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  
                         emmc_wt,        emmc_wt,        i286_wn,        i286_wn,                // c0  
                         vram_w0,        i286_wn,        i286_wn,        i286_wn};               // e0  
   
 static MEM8READ memory_read[] = {  
                         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  
                         emmc_rd,        emmc_rd,        i286_rd,        i286_rd,                // c0  
                         vram_r0,        i286_rd,        i286_rd,        i286_itf};              // f0  
   
 static MEM16WRITE memword_write[] = {  
                         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  
                         emmcw_wt,       emmcw_wt,       i286w_wn,       i286w_wn,               // c0  
                         vramw_w0,       i286w_wn,       i286w_wn,       i286w_wn};              // e0  
   
 static MEM16READ memword_read[] = {  
                         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  
                         emmcw_rd,       emmcw_rd,       i286w_rd,       i286w_rd,               // c0  
                         vramw_r0,       i286w_rd,       i286w_rd,       i286w_itf};             // e0  
   
 static const MEM8WRITE vram_write[] = {  
                         vram_w0,        vram_w1,        vram_w0,        vram_w1,                // 00  
                         vram_w0,        vram_w1,        vram_w0,        vram_w1,                // 40  
                         grcg_tdw0,      grcg_tdw1,      egc_wt,         egc_wt,                 // 80 tdw/tcr  
                         grcg_rmw0,      grcg_rmw1,      egc_wt,         egc_wt};                // c0 rmw  
   
 static const MEM8READ vram_read[] = {  
                         vram_r0,        vram_r1,        vram_r0,        vram_r1,                // 00  
                         vram_r0,        vram_r1,        vram_r0,        vram_r1,                // 40  
                         grcg_tcr0,      grcg_tcr1,      egc_rd,         egc_rd,                 // 80 tdw/tcr  
                         vram_r0,        vram_r1,        egc_rd,         egc_rd};                // c0 rmw  
   
 static const MEM16WRITE vramw_write[] = {  
                         vramw_w0,       vramw_w1,       vramw_w0,       vramw_w1,               // 00  
                         vramw_w0,       vramw_w1,       vramw_w0,       vramw_w1,               // 40  
                         grcgw_tdw0,     grcgw_tdw1,     egcw_wt,        egcw_wt,                // 80 tdw/tcr  
                         grcgw_rmw0,     grcgw_rmw1,     egcw_wt,        egcw_wt};               // c0 rmw  
   
 static const MEM16READ vramw_read[] = {  
                         vramw_r0,       vramw_r1,       vramw_r0,       vramw_r1,               // 00  
                         vramw_r0,       vramw_r1,       vramw_r0,       vramw_r1,               // 40  
                         grcgw_tcr0,     grcgw_tcr1,     egcw_rd,        egcw_rd,                // 80 tdw/tcr  
                         vramw_r0,       vramw_r1,       egcw_rd,        egcw_rd};               // c0 rmw  
   
   
 static REG8 MEMCALL i286_nonram_r(UINT32 address) {  
   
         (void)address;  
         return(0xff);  
 }  }
   
 static REG16 MEMCALL i286_nonram_rw(UINT32 address) {  void MEMCALL i286_memword_write(UINT seg, UINT off, REG16 value) {
   
         (void)address;  
         return(0xffff);  
 }  
   
 void MEMCALL i286_vram_dispatch(UINT func) {  
   
         UINT    proc;          UINT32  address;
   
         proc = func & 0x0f;          address = (seg << 4) + LOW16(off);
         memory_write[0xa8000 >> 15] = vram_write[proc];          if (address < (I286_MEMWRITEMAX - 1)) {
         memory_write[0xb0000 >> 15] = vram_write[proc];                  STOREINTELWORD(mem + address, value);
         memory_write[0xb8000 >> 15] = vram_write[proc];          }
         memory_write[0xe0000 >> 15] = vram_write[proc];          else {
                   i286_memorywrite_w(address, value);
         memory_read[0xa8000 >> 15] = vram_read[proc];  
         memory_read[0xb0000 >> 15] = vram_read[proc];  
         memory_read[0xb8000 >> 15] = vram_read[proc];  
         memory_read[0xe0000 >> 15] = vram_read[proc];  
   
         memword_write[0xa8000 >> 15] = vramw_write[proc];  
         memword_write[0xb0000 >> 15] = vramw_write[proc];  
         memword_write[0xb8000 >> 15] = vramw_write[proc];  
         memword_write[0xe0000 >> 15] = vramw_write[proc];  
   
         memword_read[0xa8000 >> 15] = vramw_read[proc];  
         memword_read[0xb0000 >> 15] = vramw_read[proc];  
         memword_read[0xb8000 >> 15] = vramw_read[proc];  
         memword_read[0xe0000 >> 15] = vramw_read[proc];  
   
         if (!(func & 0x10)) {                                                   // degital  
                 memory_write[0xe0000 >> 15] = i286_wn;  
                 memword_write[0xe0000 >> 15] = i286w_wn;  
                 memory_read[0xe0000 >> 15] = i286_nonram_r;  
                 memword_read[0xe0000 >> 15] = i286_nonram_rw;  
         }          }
 #if defined(USE_ASM)  
         i286a_vram_dispatch(func);  
 #endif  
 }  }
   #endif
   
 REG8 MEMCALL __i286_memoryread(UINT32 address) {  void MEMCALL memp_read(UINT32 address, void *dat, UINT leng) {
   
         if (address < I286_MEMREADMAX) {          BYTE *out = (BYTE *)dat;
                 return(mem[address]);          UINT pos;
         }          UINT diff;
 #if defined(USE_HIMEM)  
         else if (address >= 0x10fff0) {          /* fast memory access */
                 address -= 0x100000;          if (address + leng < I286_MEMREADMAX) {
                 if (address < CPU_EXTMEMSIZE) {                  CopyMemory(dat, mem + address, leng);
                         return(CPU_EXTMEM[address]);                  return;
           } else if (address >= USE_HIMEM) {
                   pos = (address & CPU_ADRSMASK) - 0x100000;
                   if (pos + leng < CPU_EXTMEMSIZE) {
                           CopyMemory(dat, CPU_EXTMEM + pos, leng);
                           return;
                 }                  }
                 else {                  if (pos < CPU_EXTMEMSIZE) {
                         return(0xff);                          diff = CPU_EXTMEMSIZE - pos;
                           CopyMemory(out, CPU_EXTMEM + pos, diff);
                           out += diff;
                           leng -= diff;
                           address += diff;
                 }                  }
         }          }
 #endif  
         else {          /* slow memory access */
                 return(memory_read[(address >> 15) & 0x1f](address));          while (leng-- > 0) {
                   *out++ = i286_memoryread(address++);
         }          }
 }  }
   
 REG16 MEMCALL __i286_memoryread_w(UINT32 address) {  void MEMCALL memp_write(UINT32 address, const void *dat, UINT leng) {
   
         REG16   ret;          const BYTE *out = (BYTE *)dat;
           UINT pos;
           UINT diff;
   
         if (address < (I286_MEMREADMAX - 1)) {          /* fast memory access */
                 return(LOADINTELWORD(mem + address));          if (address + leng < I286_MEMREADMAX) {
         }                  CopyMemory(mem + address, dat, leng);
 #if defined(USE_HIMEM)                  return;
         else if (address >= (0x10fff0 - 1)) {          } else if (address >= USE_HIMEM) {
                 address -= 0x100000;                  pos = (address & CPU_ADRSMASK) - 0x100000;
                 if (address == (0x00fff0 - 1)) {                  if (pos + leng < CPU_EXTMEMSIZE) {
                         ret = mem[0x100000 + address];                          CopyMemory(CPU_EXTMEM + pos, dat, leng);
                 }                          return;
                 else if (address < CPU_EXTMEMSIZE) {  
                         ret = CPU_EXTMEM[address];  
                 }  
                 else {  
                         ret = 0xff;  
                 }                  }
                 address++;                  if (pos < CPU_EXTMEMSIZE) {
                 if (address < CPU_EXTMEMSIZE) {                          diff = CPU_EXTMEMSIZE - pos;
                         ret += CPU_EXTMEM[address] << 8;                          CopyMemory(CPU_EXTMEM + pos, dat, diff);
                           out += diff;
                           leng -= diff;
                           address += diff;
                 }                  }
                 else {  
                         ret += 0xff00;  
                 }  
                 return(ret);  
         }          }
 #endif  
         else if ((address & 0x7fff) != 0x7fff) {          /* slow memory access */
                 return(memword_read[(address >> 15) & 0x1f](address));          while (leng-- > 0) {
         }                  i286_memorywrite(address++, *out++);
         else {  
                 ret = memory_read[(address >> 15) & 0x1f](address);  
                 address++;  
                 ret += memory_read[(address >> 15) & 0x1f](address) << 8;  
                 return(ret);  
         }          }
 }  }
   
 UINT32 MEMCALL __i286_memoryread_d(UINT32 address) {  
   
         UINT32 ret;  // ---- Logical Space (BIOS)
   
         ret = __i286_memoryread_w(address);  static UINT32 physicaladdr(UINT32 addr, BOOL wr) {
         ret |= (UINT32)__i286_memoryread_w(address + 2) << 16;  
   
         return ret;          UINT32  a;
 }          UINT32  pde;
           UINT32  pte;
 void MEMCALL __i286_memorywrite(UINT32 address, REG8 value) {  
   
         if (address < I286_MEMWRITEMAX) {          a = CPU_STAT_PDE_BASE + ((addr >> 20) & 0xffc);
                 mem[address] = (BYTE)value;          pde = i286_memoryread_d(a);
         }          if (!(pde & CPU_PDE_PRESENT)) {
 #if defined(USE_HIMEM)                  goto retdummy;
         else if (address >= 0x10fff0) {  
                 address -= 0x100000;  
                 if (address < CPU_EXTMEMSIZE) {  
                         CPU_EXTMEM[address] = (BYTE)value;  
                 }  
         }          }
 #endif          if (!(pde & CPU_PDE_ACCESS)) {
         else {                  i286_memorywrite(a, (UINT8)(pde | CPU_PDE_ACCESS));
                 memory_write[(address >> 15) & 0x1f](address, value);  
         }  
 }  
   
 void MEMCALL __i286_memorywrite_w(UINT32 address, REG16 value) {  
   
         if (address < (I286_MEMWRITEMAX - 1)) {  
                 STOREINTELWORD(mem + address, value);  
 #if defined(TRACE)  
                 if (address == 0x00404) {  
                         TRACEOUT(("CPU_SP = %.4x [%.4x:%.4x]", value, CPU_CS, CPU_IP));  
                 }  
                 if (address == 0x00406) {  
                         TRACEOUT(("CPU_SS = %.4x [%.4x:%.4x]", value, CPU_CS, CPU_IP));  
                 }  
 #endif  
         }          }
 #if defined(USE_HIMEM)          a = (pde & CPU_PDE_BASEADDR_MASK) + ((addr >> 10) & 0xffc);
         else if (address >= (0x10fff0 - 1)) {          pte = cpu_memoryread_d(a);
                 address -= 0x100000;          if (!(pte & CPU_PTE_PRESENT)) {
                 if (address == (0x00fff0 - 1)) {                  goto retdummy;
                         mem[address] = (BYTE)value;  
                 }  
                 else if (address < CPU_EXTMEMSIZE) {  
                         CPU_EXTMEM[address] = (BYTE)value;  
                 }  
                 address++;  
                 if (address < CPU_EXTMEMSIZE) {  
                         CPU_EXTMEM[address] = (BYTE)(value >> 8);  
                 }  
         }          }
 #endif          if (!(pte & CPU_PTE_ACCESS)) {
         else if ((address & 0x7fff) != 0x7fff) {                  i286_memorywrite(a, (UINT8)(pte | CPU_PTE_ACCESS));
                 memword_write[(address >> 15) & 0x1f](address, value);  
         }          }
         else {          if ((wr) && (!(pte & CPU_PTE_DIRTY))) {
                 memory_write[(address >> 15) & 0x1f](address, (BYTE)value);                  i286_memorywrite(a, (UINT8)(pte | CPU_PTE_DIRTY));
                 address++;  
                 memory_write[(address >> 15) & 0x1f](address, (BYTE)(value >> 8));  
         }          }
 }          addr = (pte & CPU_PTE_BASEADDR_MASK) + (addr & 0x00000fff);
           return(addr);
 void MEMCALL __i286_memorywrite_d(UINT32 address, UINT32 value) {  
   
         __i286_memorywrite_w(address, value & 0xffff);  retdummy:
         __i286_memorywrite_w(address + 2, (WORD)(value >> 16));          return(0x01000000);             // てきとーにメモリが存在しない場所
 }  }
   
 #if 0  
 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  
   
 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 = ((BYTE *)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,  void MEMCALL meml_writestr(UINT seg, UINT off, const void *dat, UINT leng) {
                                                                                                 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 = ((BYTE *)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 = ((BYTE *)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 = ((BYTE *)dat) + size;
                 }                          leng -= size;
                 while(leng--) {  
                         i286_memorywrite(address++, *out++);  
                 }                  }
         }          }
 }  }

Removed from v.1.4  
changed lines
  Added in v.1.30


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