//if(byh == 0xa)  {         /*ANA XRA*/


/*
 *
 * This function executes ANA, XRA.
 *
 */
      

 int ana_xra(int byl, float *lap)
 {
  *lap = (byl == 6 || byl == 0xe) ? 7.0 / 3.0 : 4.0 / 3.0;
  rf[7] = 0;
  rf[3] = 0;
  if(byl == 6 || byl == 0xe)  reg[6] = mhlr();
  if(byl < 8) {
	reg[7] &= reg[byl];
	rf[3]++;
  }
  else reg[7] ^= reg[byl - 8];
  setrf(reg[7]);
  return(0);
 }