doubleTriggerBurstRandomSequence.cxx

{
printf("starting double trigger burst random sequence\n");

const int length=150;
const unsigned long ntrigs=100000;

int* ttrigs = new int[length];
printf ("allocated ttrigs[%d]\n",length);

for (int i=0; i<length; ++i){
  ttrigs[i]=0;
}

// add a couple of L1As:
ttrigs[0]=0x01;
ttrigs[130]=0x01;
// sequence end


// reset sequence control - need to do this before loading the sequence
tapi.timRegLoad(0x1a,0x0200);
tapi.timRegLoad(0x1a,0x0);

// load the sequence
tapi.timRegLoad(0x1C,length-1);
for (int i=0; i<length; ++i){
  tapi.timRegLoad(0x8000 + i*2, ttrigs[i]);
  int in = tapi.timReadRegister(0x8000 + i*2);
  //printf("in[%d]=0x%x (%x)\n",i,in,trigs[i]);
}

// L1 counters
tapi.timRegLoad(0x12,0x0); 
tapi.timRegLoad(0x10,0x0);

// set the burst counter
tapi.timRegLoad(0x04, (ntrigs & 0xffff ) );
tapi.timRegLoad(0x8e, (ntrigs >> 16) );

// set burst mode
tapi.timRegLoad(0x02,0x200);

// trigger, go, non-cyclic
tapi.timRegLoad(0x1a,0x0401);
// set triggers to act as SeqGo
tapi.timRegLoad(0x42,0x100);
  
// Set up internal random trigger source
tapi.timRegLoad(0x00, 0x12); 

// set frequency to 50kHz
tapi.timRegLoad(0x02,0x600);

unsigned long l1id=0;
unsigned long poll=0;
unsigned long unchanged_polls=0;
bool stalled=false;
unsigned long lastl1id=-1;
do{
  poll++;
  l1id = ((tapi.timReadRegister(0x12)<<16) + (tapi.timReadRegister(0x10)));

  //intermittent diagnostics
  if (poll%(ntrigs/10)==0){
    printf("%d of %d sent \n",l1id,ntrigs,lastl1id);

    // check if l1id has stopped increasing
    if (l1id==lastl1id) {
      unchanged_polls++;
      if (unchanged_polls>10) stalled=true;
    }else{
      unchanged_polls=0;
    }
  }
  lastl1id=l1id;
} while (l1id<ntrigs && !stalled);

if (stalled) printf("stalled\n");
const bool incomplete=(l1id!=ntrigs);
if (incomplete){
  printf("Incorrect number of triggers sent - %d rather than %d\n",l1id,ntrigs);
}

if (incomplete || stalled || true) {
  for (unsigned reg=0; reg<0x1F; ++reg){
     printf ("reg 0x%x=0x%x\t",reg,tapi.timReadRegister(reg));
     if (reg%4==0) printf("\n");
  }
  printf("\n\n");
}

// stop the sequence, reset other registers
tapi.timRegLoad(0x1a,0x0);
tapi.timRegLoad(0x02,0x0);
tapi.timRegLoad(0x04,0x0);
tapi.timRegLoad(0x8e,0x0);
tapi.timRegLoad(0x00,0x0);
tapi.timRegLoad(0x02,0x0);

unsigned outl1id = tapi.timReadRegister(0x10) + (tapi.timReadRegister(0x12)<<16);
printf("number of l1ids sent was %d \n\n",outl1id);


for (int i=0; i<length; ++i){
  int out = tapi.timReadRegister(0x8000 + i*2);
  if (out==0){
    printf(".");
  }else if (out==0xffff){
    printf("x");
  }else{
    printf("\nOutput[%d]=0x%x\n",i,out);
  }
}
printf("\n");

delete[] ttrigs;

} // end of macro

---