unsigned char Mirr1( unsigned char qq )
 {
  register unsigned char rr, ww;
  
  // Биты в позициях 7 и 0 разнятся?
  rr = (qq & 0x81);
  rr -= 1;
  if( rr < 0x80 )  { ww = 0x81; }
  else             { ww = 0;    }

  // Биты в позициях 6 и 1 разнятся?
  rr = (qq & 0x42);
  rr -= 2;
  if( rr < 0x40 )  { ww |= 0x42; }

  // Биты в позициях 5 и 2 разнятся?
  rr = (qq & 0x24);
  rr -= 4;
  if( rr < 0x20 )  { ww |= 0x24; }

  // Биты в позициях 4 и 3 разнятся?
  rr = (qq & 0x18);
  rr -= 8;
  if( rr < 0x10 )  { ww |= 0x18; }

  // Маска ww готова...
  return ( qq ^ ww );
  
 }/*Mirr1*/