WebSVN – pentevo – /tools/unreal_fix/0.39.0/Unreal_NS/SRC/z80_main.inl

//=============================================================================
// Àäðåñ ìîæåò ïðåâûøàòü 0xFFFF
// (÷òîáû â êàæäîé êîìàíäå ðàáîòû ñ ðåãèñòðàìè íå äåëàòü &= 0xFFFF)
u8 xm(unsigned addr)
{
   addr &= 0xFFFF;

//-----------------------------------------------------------------------------

#ifdef MOD_GSZ80
   if (temp.gsdmaon && ((addr & 0xc000)==0) && (bankr[0] >= ROM_BASE_M))
    {
     u8 tmp = GSRAM_M[(temp.gsdmaaddr-1) & 0x1FFFFF];
     temp.gsdmaaddr++;
     temp.gsdmaaddr &= 0x1FFFFF;
     z80gs::flush_gs_z80();
     return tmp;
    }
#endif

//-----------------------------------------------------------------------------

//      NEDOREPO
//   if((conf.mem_model == MM_ATM3) && (comp.pBF & 4)) 
//   {
//       //Ðàçðåøåíà ðàáîòà ñ ÎÇÓ øðèôòà äëÿ ATM3
//       unsigned idx = ((addr&0x07F8) >> 3) | ((addr & 7) << 8);
//       return fontatm2[idx];
//   }
   
//      0.39.0
//   if((conf.mem_model == MM_ATM3) && (comp.pBF & 4) && ((addr & 0xF800) == 0)) 
//   {
//       // Ðàçðåøåíà ðàáîòà ñ ÎÇÓ øðèôòà äëÿ ATM3
//       unsigned idx = (addr >> 3) | ((addr & 7) << 8);
//       return fontatm2[idx];
//   }

//-----------------------------------------------------------------------------
    if (comp.wiznet.memEna)     //NEDOREPO
    { 
        unsigned int tmp = (addr & 0xc000)>>14; 
        if((bankr[tmp] >= ROM_BASE_M)&&(tmp==(comp.wiznet.p82 & 0x03)))
        { 
            if(addr & 0x2000)
            { 
                return Wiz5300_RegRead((0x022e|(addr&0x01)|((addr>>3)&0x1c0))+((addr&0x1000)?2:0)); 
            }
            else
            { 
                return Wiz5300_RegRead(addr & 0x03ff); 
            }
            
            return 0xff; 
        } 
    }
//-----------------------------------------------------------------------------

   return *am_r(addr);
}
//=============================================================================



//=============================================================================
// Àäðåñ ìîæåò ïðåâûøàòü 0xFFFF
// (÷òîáû â êàæäîé êîìàíäå ðàáîòû ñ ðåãèñòðàìè íå äåëàòü &= 0xFFFF)
unsigned char rm(unsigned addr)
{
   addr &= 0xFFFF;

//-----------------------------------------------------------------------------
// Read Breakpoint ???
#ifdef Z80_DBG
    unsigned char *membit         = membits         + (addr & 0xFFFF);
    unsigned char *bp_disable_bit = bp_disable_bits + (addr & 0xFFFF);  // [NS]
    
    *membit |= MEMBITS_R;       // memoryband

    // íóæíî çàìåíèòü íà
    // dbgbreak |= ((*membit & MEMBITS_BPR) && (*bp_disable_bits & BP_DISABLE_BPR));
    // è èíâåðñèðîâàòü íàçíà÷åíèå áèòîâ â BP_DISABLE_XXX !!!!!
    if ((*bp_disable_bit & BP_DISABLE_BPR) == 0)        // íå îïòèìàëüíî !!!!! [NS]
    {
        dbgbreak     |= (*membit & MEMBITS_BPR);
        cpu.dbgbreak |= (*membit & MEMBITS_BPR);
    }
#endif
//-----------------------------------------------------------------------------
   return xm(addr);
}
//=============================================================================



//=============================================================================
// Àäðåñ ìîæåò ïðåâûøàòü 0xFFFF
// (÷òîáû â êàæäîé êîìàíäå ðàáîòû ñ ðåãèñòðàìè íå äåëàòü &= 0xFFFF)
void wm(unsigned addr, unsigned char val)
{
    addr &= 0xFFFF;
//-----------------------------------------------------------------------------
// Write Breakpoint ?????????
#ifdef Z80_DBG
    unsigned char *membit         = membits         + (addr & 0xFFFF);
    unsigned char *bp_disable_bit = bp_disable_bits + (addr & 0xFFFF);  // [NS]
    
    *membit |= MEMBITS_W;       // memoryband
    
    // íóæíî çàìåíèòü íà
    // dbgbreak |= ((*membit & MEMBITS_BPR) && (*bp_disable_bit & BP_DISABLE_BPR));
    // è èíâåðñèðîâàòü íàçíà÷åíèå áèòîâ â BP_DISABLE_XXX !!!!!
    if ((*bp_disable_bit & BP_DISABLE_BPW) == 0)        // íå îïòèìàëüíî !!!!! [NS]
    {
        dbgbreak |= (*membit & MEMBITS_BPW);
        cpu.dbgbreak |= (*membit & MEMBITS_BPW);
    }
#endif
//-----------------------------------------------------------------------------
#ifdef MOD_GSZ80
   if (temp.gsdmaon && ((addr & 0xc000)==0) && (bankr[0] >= ROM_BASE_M))
    {
     GSRAM_M[temp.gsdmaaddr] = val;
     temp.gsdmaaddr++;
     temp.gsdmaaddr &= 0x1FFFFF;
     z80gs::flush_gs_z80();
    }
#endif
//-----------------------------------------------------------------------------
#ifdef MOD_VID_VD
   if (comp.vdbase && (unsigned)((addr & 0xFFFF) - 0x4000) < 0x1800)
   {
       comp.vdbase[addr & 0x1FFF] = val;
       return;
   }
#endif
//-----------------------------------------------------------------------------
    if (comp.wiznet.memEna) 
    { 
        unsigned int tmp = (addr & 0xc000)>>14; 
        if((bankr[tmp] >= ROM_BASE_M)&&(tmp==(comp.wiznet.p82 & 0x03)))
        { 
            if(addr & 0x2000)
            { 
                Wiz5300_RegWrite((0x022e|(addr&0x01)|((addr>>3)&0x1c0))+((addr&0x1000)?2:0),val); 
            }
            else
            { 
                Wiz5300_RegWrite(addr & 0x03ff,val); 
            } 
                return; 
        } 
    } 
//-----------------------------------------------------------------------------

// 0.39.0
//  if((conf.mem_model == MM_ATM3) && (comp.pBF & 4) && ((addr & 0xF800) == 0)) // Ðàçðåøåíà çàãðóçêà øðèôòà äëÿ ATM3

// NEDOREPO
    if((conf.mem_model == MM_ATM3) && (comp.pBF & 4)) // Ðàçðåøåíà çàãðóçêà øðèôòà äëÿ ATM3
    {
//      unsigned idx = (addr >> 3) | ((addr & 7) << 8);                 //0.39.0
        unsigned idx = ((addr&0x07F8) >> 3) | ((addr & 7) << 8);        //NEDOREPO
        fontatm2[idx] = val;
       
        update_screen();
//      return;         //ÅÑÒÜ Â 0.39.0
       //return;        //ÇÀÊÎÌÅÍ×ÅÍÍÎ Â NEDOREPO
   }
//-----------------------------------------------------------------------------
// ÇÀÊÎÌÅÍ×ÅÍÍÀß ÑÒÐÎÊÀ ÈÇ NEDOREPO
//if(cpu.nmi_in_progress&&(cpu.nmi_in_progress==conf.trdos_IORam)&&(cpu.pc & 0xc000)) return;
//-----------------------------------------------------------------------------
   unsigned char *a = bankw[(addr >> 14) & 3];
#ifndef TRASH_PAGE
   if (!a)
       return;
#endif
   a += (addr & (PAGE-1));
   if ((unsigned)(a - temp.base_2) < 0x1B00)
   {
      if (*a == val)
          return;
      update_screen();
   }
   *a = val;
}
//=============================================================================


//=============================================================================
Z80INLINE unsigned char m1_cycle(Z80 *cpu)
{
    unsigned char temp_op_code;         // ÊÀÊÀß ÒÎ ÌÓÒÜ ÈÇ
    comp.fddIO2Ram_wr_disable = false;  // NEDOREPO

    //-------------------------------------------------------------------------
    if ( (conf.mem_model == MM_PENTAGON) &&
         ((comp.pEFF7 & (EFF7_CMOS | EFF7_4BPP)) == (EFF7_CMOS | EFF7_4BPP)) 
     )
    {
        temp.offset_vscroll++;
    }
    //-------------------------------------------------------------------------
    if ( (conf.mem_model == MM_PENTAGON) &&
         ((comp.pEFF7 & (EFF7_384 | EFF7_4BPP)) == (EFF7_384 | EFF7_4BPP)) 
     )
    {
        temp.offset_hscroll++;
    }
    //-------------------------------------------------------------------------
    // zx evo hardware breakpoint
    if ( (conf.mem_model == MM_ATM3)    &&
         (comp.pBF & 0x10)              &&
         (comp.brk_addr == cpu->pc) 
     )
    {
        nmi_pending = 1;
        trdos_in_nmi = comp.flags & CF_TRDOS;
    }
    //-------------------------------------------------------------------------
    // Spectrum 128 MIDI                                                // [NS]
    if (cpu->pc == 0x11A3)      // $11A3 - Send Byte to MIDI Device
    {
        // Ïðèìèòèâíàÿ èìèòàöèÿ MIDI Out-à ôèðìåííîãî 128-ãî
        //---------------------------------------------------------------------
        if (conf.MIDI_128_Out)
        {
            //printf("MIDI OUT %2X\n",cpu->a);
            //printf(" $%2X",cpu->a);
            midi_write( cpu->a);
        }
        //---------------------------------------------------------------------
    }
    //-------------------------------------------------------------------------

//-----------------------------------------------------------------------------
    cpu->r_low++;// = (cpu->r & 0x80) + ((cpu->r+1) & 0x7F);
    cpu->t += 4;
//-----------------------------------------------------------------------------
//  return xm(cpu->pc++);       //ÇÀÊÎÌÅÍÒÈËÈ Â NEDOREPO
                                //ÅÑÒÜ Â 0.39.0
//-----------------------------------------------------------------------------
    temp_op_code = xm(cpu->pc++);
    if ( (conf.mem_model==MM_ATM3) && (comp.pBE) )
    {
        if(comp.pBE == 1)
        {
            if(trdos_in_nmi)
            {
                comp.flags |= CF_SETDOSROM | CF_TRDOS;
            }
            cpu->nmi_in_progress = false;
            set_banks();
        }
        comp.pBE--;
    }
//-----------------------------------------------------------------------------
    return temp_op_code;
}
//=============================================================================


//#include "z80/cmd.cpp"


//=============================================================================
void Z80FAST step()
{
        //printf("Z80FAST step()\n");   //it works
   if (comp.flags & CF_SETDOSROM)
   {
      if (cpu.pch == 0x3D)
      {
           comp.flags |= CF_TRDOS;
           set_banks();
      }
   }
   else if (comp.flags & CF_LEAVEDOSADR)
   {
      if (cpu.pch & 0xC0) // PC > 3FFF closes TR-DOS
      {
         close_dos: comp.flags &= ~CF_TRDOS;
         set_banks();
      }
      if (conf.trdos_traps)
          comp.wd.trdos_traps();
   }
   else if (comp.flags & CF_LEAVEDOSRAM)
   {
      // executing RAM closes TR-DOS
      if (bankr[(cpu.pc >> 14) & 3] < RAM_BASE_M+PAGE*MAX_RAM_PAGES)
          goto close_dos;
      if (conf.trdos_traps)
          comp.wd.trdos_traps();
   }
//-----------------------------------------------------------------------------
   if (conf.tape_traps && (cpu.pc & 0xFFFF) == 0x056B)
       tape_traps();
//-----------------------------------------------------------------------------
   if (!comp.tape.stopped && !conf.sound.enabled)
       fast_tape();
//-----------------------------------------------------------------------------
//todo if(comp.turbo)cpu.t-=tbias[cpu.dt]
   if (cpu.pch & temp.evenM1_C0)
       cpu.t += (cpu.t & 1);
//-----------------------------------------------------------------------------
//~todo
//[vv]   unsigned oldt=cpu.t; //0.37
   unsigned char opcode = m1_cycle(&cpu);
   (normal_opcode[opcode])(&cpu);
//-----------------------------------------------------------------------------
/* [vv]
//todo if(comp.turbo)cpu.t-=tbias[cpu.t-oldt]
   if( ((conf.mem_model == MM_PENTAGON) && ((comp.pEFF7 & EFF7_GIGASCREEN)==0)) ||
       ((conf.mem_model == MM_ATM710) && (comp.pFF77 & 8)))
       cpu.t -= (cpu.t-oldt) >> 1; //0.37
//~todo
*/
//-----------------------------------------------------------------------------
#ifdef Z80_DBG
   if ((comp.flags & CF_PROFROM) && ((membits[0x100] | membits[0x104] | membits[0x108] | membits[0x10C]) & MEMBITS_R))
   {
      if (membits[0x100] & MEMBITS_R)
          set_scorp_profrom(0);
      if (membits[0x104] & MEMBITS_R)
          set_scorp_profrom(1);
      if (membits[0x108] & MEMBITS_R)
          set_scorp_profrom(2);
      if (membits[0x10C] & MEMBITS_R)
          set_scorp_profrom(3);
   }
#endif
}
//=============================================================================



//=============================================================================
void z80loop()
{
    cpu.haltpos = 0;

    cpu.int_pend = true;
//-----------------------------------------------------------------------------
    // INT check separated from main Z80 loop to improve emulation speed
    while (cpu.t < conf.intlen)
    {
        if (conf.mem_model == MM_ATM3 && nmi_pending)
        {
            nmi_pending = 0;
//          cpu.nmi_in_progress = true; //0.39.0
            cpu.nmi_in_progress = 255;  //NEDOREPO
            set_banks();
            m_nmi(RM_NOCHANGE);
            continue;
        }
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
//0.39.0
//    if ( cpu.int_pend && cpu.iff1 && cpu.t != cpu.eipos && // int enabled in CPU not issued after EI
//       !((conf.mem_model == MM_ATM710 || conf.mem_model == MM_ATM3) && !(comp.pFF77 & 0x20))) // int enabled by ATM hardware

//NEDOREPO - àøî â ïåíòåâå èíò íåëüçÿ îòêëþ÷èòü êàê â ÀÒÌ?
    if ( cpu.int_pend && cpu.iff1 && cpu.t != cpu.eipos && // int enabled in CPU not issued after EI
         !((conf.mem_model == MM_ATM710/* || conf.mem_model == MM_ATM3*/) && !(comp.pFF77 & 0x20))) // 
        {
            //int enabled by ATM hardware
            handle_int(&cpu, cpu.IntVec());     // Íà÷àëî îáðàáîòêè int (çàïèñü â ñòåê àäðåñà âîçâðàòà è ò.ï.)
        }
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
#ifdef Z80_DBG
      debug_events(&cpu);               //òàì æå âûçîâ äåáàãåðà
#endif
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
      step();

      if (!cpu.int_pend)
          break;
/*
      if (cpu.halted)
          break;
*/
   }
//-----------------------------------------------------------------------------
   cpu.int_pend = false;
   cpu.eipos = -1U;

//-----------------------------------------------------------------------------
   while (cpu.t < conf.frame)
   {
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
#ifdef Z80_DBG
      debug_events(&cpu);
#endif
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
/*
      if (cpu.halted)
      {
         //cpu.t += 4, cpu.r = (cpu.r & 0x80) + ((cpu.r+1) & 0x7F); continue;
         unsigned st = (conf.frame-cpu.t-1)/4+1;
         cpu.t += 4*st;
         cpu.r_low += st;
         break;
      }
*/
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
      step();
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
// ÓÄÀËÅÍÎ â NEDOREPO
//      if(comp.pBE)            //ÅÑÒÜ Â 0.39.0
//      {
//          if(comp.pBE == 1)
//          {
//              cpu.nmi_in_progress = false;
//              set_banks();
//          }
//          comp.pBE--;
//      }

// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
      if (nmi_pending)
      {
      
// 0.39.0
//         if((conf.mem_model == MM_PROFSCORP || conf.mem_model == MM_SCORP))
//         {
//             nmi_pending--;
//             if(cpu.pc >= 0x4000)
//             {
//    //             printf("pc=%x\n", cpu.pc);
//                 ::m_nmi(RM_DOS);
//                 nmi_pending = 0;
//             }
//         }

        if ( conf.mem_model==MM_ATM3 && (comp.pBF&0x10) )       //NEDOREPO
        {
            nmi_pending = 0;
            cpu.nmi_in_progress = 0xff;
            set_banks();
            m_nmi(RM_NOCHANGE);
            continue;
        }
        else if ((conf.mem_model == MM_PROFSCORP || conf.mem_model == MM_SCORP))
        {
            nmi_pending--;
            if (cpu.pc >= 0x4000)
            {
                //printf("pc=%x\n", cpu.pc);
                ::m_nmi(RM_DOS);
                nmi_pending = 0;
            }
        }       //NEDOREPO
      }
// . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 
   }
//-----------------------------------------------------------------------------
}
//=============================================================================
Top secrets sources NedoPC pentevo

(root)/tools/unreal_fix/0.39.0/Unreal_NS/SRC/z80_main.inl @ 1126 – Rev 1088
