typedef union _floats {
  unsigned long u;
  float f;
  struct {
    unsigned ml : 16;
    unsigned mh : 7;
    signed   e  : 8;
    unsigned s  : 1;
  };
} floats;


void convert1 (float in, char *dst)
{
#define shift 24
#define mask 0x00FFFFFF;

  floats intf;
  float lg10;
  floats exp2;
  unsigned long ires;
  unsigned char i;

  intf.f = in;
  exp2.u = 0;                         //заземлить :)
  exp2.e = intf.e;

  exp2.f = log10(exp2.f);         //Ex: 2^-17 = 10^-5.11751
  lg10   = floorf(exp2.f);          //10^-5.11751 = (10^-6)*(10^0.88249)
  exp2.f = exp2.f - lg10;
  exp2.f = powf(10, exp2.f);    //10^.088249 = 7.629395
  
  unsigned long long res, mul1, mul2;

  mul1 = intf.u & 0x00FFFFFF;    //1.23
  mul1 = mul1 | 0x800000;       //set hidden "1"
  mul1 = mul1 << 1;                //1.24

  mul2 = exp2.u & 0x00FFFFFF;  //1.23
  mul2 = mul2 | 0x800000;       //set hidden "1"
  mul2 = mul2 << 1;                //1.24

  res = mul1 * mul2;                //целая часть IN [1,2,...,9]
  ires = res >> 24;

   ires = ires * 10;
  i = ires >> shift;
  *dst++ = i + '0';
  
  *dst++ = '.';

  ires &= mask;
  ires = ires * 10;
  i = ires >> shift;
  *dst++ = i + '0';

  ires &= mask;
  ires = ires * 10;
  i = ires >> shift;
  *dst++ = i + '0';
}

//-------------------------------------------------------------------------------------------------
//описание формата 3хкомпонентного представления числа
//-------------------------------------------------------------------------------------------------
typedef struct _Value3{
  char  Exp;      //кол-во порядков
  char  M_int;          //целая часть мантиссы
  char  M_1;        //первая цифра дробной части мантиссы
  float Tens;
}Value3, *PValue3;


void FloatToNum3 ( float Num, PValue3 Num3)
{
  float Mantissaf, Expf, M_intf;
  Expf        = floorf( log10f( Num ) );     //целое количество порядков в числе
  Num3->Exp   = (char)Expf;
  Num3->Tens  = powf( 10, Expf );
  Mantissaf   = Num/(Num3->Tens);                //исх. число в формате [1.0..9.9)
  M_intf      = floorf( Mantissaf );    
  Num3->M_int = (char) M_intf;
  Num3->M_1   = (char)floorf( (Mantissaf - M_intf)*10 );
}

const unsigned long TwoEXPTable[];
const signed char TenEXPTable[];

typedef union _floats {
  unsigned long u;
  float f;
  struct {
    unsigned ml : 16;
    unsigned mh : 7;
    signed   e  : 8;
    unsigned s  : 1;
  };
} floats;

typedef union _ullongs {
  unsigned long long ull;
  struct{
    unsigned long ll;  
    unsigned char f3,f2,f1;
    unsigned char i;
  };
  struct {
    unsigned long LL;
    unsigned long HL;
  };
}ullongs;

typedef struct _strbuf {
  signed char bufidx;
  signed char exp;
  unsigned char M[8];  //M[0] - целая часть, далее дробная
}strbuf;

unsigned char maxdigs = 2;
#define maxconvdigs 6

char *convert (float in, char *dst)
{
  static strbuf buf;
  floats fin;
  unsigned char exp2;
  ullongs res;
  
  unsigned char digcnt = 0;
  unsigned char add = 0;

  fin.f = in;
  if (fin.s) *dst++ = '-';
  exp2 = fin.e;
  fin.s = 0;
  fin.e = 1;          //set hidden "1"
  fin.u = fin.u << 1; //format fixed-point 8.24;

  res.ull = (unsigned long long)(fin.u) *
            (unsigned long long)(TwoEXPTable[exp2]);
  res.ull = res.ull << 8;
  buf.exp = TenEXPTable[exp2];
  buf.bufidx = 0;
  if (res.i >=10)                   //normalize + exp10(+1)
  {
    res.i +=6;                      //hex to BCD
    buf.M[buf.bufidx++] = res.i >>0x04;
    buf.exp += 1;
  }
  buf.M[buf.bufidx] = res.i & 0x0F;

  //сконвертировать на 1 цифру больше чем нужно цифр
  for (digcnt = 1; digcnt <= maxconvdigs; digcnt++)
  {
    res.i = 0;
    res.HL = res.HL * 10;
    buf.M[++buf.bufidx] = res.i;
  }
  //округление от последнего нужного разряда
  buf.bufidx = maxdigs+1;

  if (buf.M[buf.bufidx]>=5) add=1;
  while ((buf.bufidx >= 0) && add)
  {
    add += buf.M[buf.bufidx];
    buf.M[buf.bufidx--] = add % 10;
    add = add / 10;
  }
  //вывод в текстовом виде
  buf.bufidx = 1;
  *dst++ = buf.M[0] + '0';
  *dst++ = '.';
  while ( buf.bufidx <= maxdigs )
    *dst++ = buf.M[buf.bufidx++]+'0';
  *dst++ = 'e';
  if (buf.exp<0) {*dst++ = '-'; buf.exp = - buf.exp;}
  else *dst++ = '+';
  
  if (buf.exp > 9) {*dst++=buf.exp/10 + '0'; *dst++=buf.exp%10 + '0';}
  else *dst++ = buf.exp + '0';

  return dst;
}