|
單片機浮點數運算實現：浮點數顯示子函數和顯示十進制尾數和階的子函數。 (1)浮點數顯示子函數。 /******************************** 函數名稱: void DispF(float f) 功能 ：用科學記數法顯示浮點數，在float全范圍內精確顯示，超出范圍給出提示。 說明 ：浮點數表示范圍為+-1.175494E-38到+-3.402823E+38 入口參數：f為要顯示的浮點數 返回值 ：無 ********************************/
void DispF(float f)
{
float tf, b;
unsigned long w, tw;
char i, j;
if(f<0)
{
PrintChar(’-’);
f=-1.0*f;
}
if(f<1.175494E-38)
{
printf("?.??????"); //太小了，超出了最小范圍。
return;
}
if(f>1E35) //f>10^35
{
tf=f/1E35;
b=1000.0;
for(i=0,j=38;i<4;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f/(1E29*b); //1E35*b/1E6
PrintW(w,j);
}
}
else if(f>1E28)
{
tf=f/1E28;
b=1E7;
for(i=0,j=35;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f/(1E22*b); //1E28*b/1E6
PrintW(w,j);
}
}
else if(f>1E21)
{
tf=f/1E21;
b=1E7;
for(i=0,j=28;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f/(1E15*b); //1E21*b/1E6
PrintW(w,j);
}
}
else if(f>1E14)
{
tf=f/1E14;
b=1E7;
for(i=0,j=21;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f/(1E8*b); //1E14*b/1E6
PrintW(w,j);
}
}
else if(f>1E7)
{
tf=f/1E7;
b=1E7;
for(i=0,j=14;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f/(10.0*b); //1E28*b/1E6
PrintW(w,j);
}
}
else if(f>1)
{
tf=f;
b=1E7;
for(i=0,j=7;i<8;i++,j--)
if(tf/b<1)
b=b/10.0;
else
break;
w=f/(1E-6*b); //1E0*b/1E6
PrintW(w,j);
}
else if(f>1E-7)
{
tf=f*1E7; //10^-7
b=1E7;
for(i=0,j=0;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f*(1E13/b); //(1E7/b)*1E6
PrintW(w,j);
}
}
else if(f>1E-14)
{
tf=f*1E14; //10^-14
b=1E7;
for(i=0,j=-7;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f*(1E20/b); //(1E14/b)*1E6
PrintW(w,j);
}
}
else if(f>1E-21)
{
tf=f*1E21; //10^-21
b=1E7;
for(i=0,j=-14;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f*(1E27/b); //(1E21/b)*1E6
PrintW(w,j);
}
}
else if(f>1E-28)
{
tf=f*1E28; //10^-28
b=1E7;
for(i=0,j=-21;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f*(1E34/b); //(1E28/b)*1E6
PrintW(w,j);
}
}
else if(f>1E-35)
{
tf=f*1E35; //10^-35
b=1E7;
for(i=0,j=-28;i<8;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f*(1E35/b)*1E6; //(1E35/b)*1E6
PrintW(w,j);
}
}
else
{
tf=f*1E38; //f<=10^-35
b=1000.0;
for(i=0,j=-35;i<4;i++,j--)
{
if(tf/b<1)
b=b/10.0;
else
break;
w=f*(1E38/b)*1E6; //(1E38/b)*1E6
PrintW(w,j);
}
}
}
（2）顯示十進制尾數和階的子函數。
/********************************
函數名稱: void PrintW(unsigned long w,char j)
功能 ：科學記數法，顯示十進制尾數和階碼
入口參數：w為尾數，j為階碼
返回值 ：無
********************************/
void PrintW(unsigned long w,char j)
{
char i;
unsigned long tw,b;
if(j<-38) //太小了，超出最小表數范圍。
{
printf("?.??????");
return;
}
if(j>38) //此算法不會出現j>38的情況
{
printf("*.******");
return;
}
tw=w/1000000;
PrintChar(tw+’0’);
PrintChar(’-’);
w=w-tw*1000000;
b=100000;
for(i=0;i<6;i++)
{
tw=w/b;
PrintChar(tw+’0’);
w=w-tw*b;
b=b/10;
}
printf("E%d",(int)j);
} | 
