nedoPC.org

/*** 04-12-2012 ****************** aav@lora.nsk.su [Алексеев А.В.] ***
 * Цикл записи                                                       *
 *********************************************************************/

void _stdcall mWrite3(bool F1,bool F2,x80* o) { // ****** такт 3 ... *
  if(F1) {
  } else {
   o->pinMREQ=true;
   o->pinWR  =true;
   o->tNxt=tNxtT;
  }
}  // *************************************************** ... такт 3 *
void _stdcall mWrite2(bool F1,bool F2,x80* o) { // ****** такт 2 ... *
  if(F1) {
  } else {
   o->pinWR=false;
   o->tNxt=mWrite3;
  }
} // **************************************************** ... такт 2 *
void _stdcall mWrite1(bool F1,bool F2,x80* o) { // ****** такт 1 ... *
  if(F1) {
    o->tNxt=mWrite1;
  } else {
   o->pinMREQ=false;
   o->busData=Data;
   o->tNxt=mWrite2;
  }
} // **************************************************** ... твкт 1 *
void _stdcall mWrite(bool F1,bool F2,x80* o,unsigned short A,unsigned char D,tagTx T) { // * запись ... *
  o->busAddr=A;
  Data=D;
  tNxtT=T;
  mWrite1(F1,F2,o);
//sh(o,"mWrite");
} // **************************************************** ... запись *

/*** 27-11-2012 ***************** aav@lora.nsk.su [Алексеев А.В.] ***
 * Симуляция                                                        *
 ********************************************************************/

VOID x80model::simulate (ABSTIME time,DSIMMODES mode) {

  Digital::time=time;

  if(!time) { // **************************** запуск симулятора ... *
   Reset();
   oldCLK=false;
   return;
  } // ************************************** ... запуск симулятора *

  if(!pinReset) Reset(); // сброс

  bool CLK=pinCLK;           // состояние CLK
  if(CLK == oldCLK) return;  // CLK не изменился
  oldCLK=CLK;
   
  Exec(CLK,0);

}

/*** 28-11-2012 ***************** aav@lora.nsk.su [Алексеев А.В.] ***
 * Сброс                                                            *
 ********************************************************************/

unsigned long _stdcall x80::Reset(void) {

  tNxt=m1t1; // первый такт первый цикл

  busAddr=PC=0;
  busData.Z();

  pinMREQ=true;
  pinRD  =true;
  pinWR  =true;
  pinM1  =true;
  pinRFSH=true;

  return 0;

}

  if(pinC1->isposedge())  //--- если фронт сигнала на выводе C1
    {
     dbPopup->print("\n> Front C1");
...
     return;
    }
//   else //------------------- если спад сигнала на выводе C1:
  if(pinC1->isnegedge())
    {
     dbPopup->print("\n> Spad_ C1");
...
     return;
    }

  if(pinC2->isposedge())  //--- если фронт сигнала на выводе C2
    {
     dbPopup->print("\n> Front C2");
...
     return;
    }
//   else //------------------- если спад сигнала на выводе C2:
  if(pinC2->isnegedge())
    {
     dbPopup->print("\n> Spad_ C2");
...
     return;
    }

 STC
 MVI A,042h
 RLC
 CC  err     
 RLC
 CNC err
 CPI 0009h    ;? 1
 CNZ err      ;? 2
 RRC
 CNC err
 RRC
 CPI 042h
 CNZ err