По какой формуле переводятся ренгтгены в зиверты? например 11 мкР/ч - сколько зивертов покажет?
Ну, или если совсем в лом, то нате формулу
Спойлер
Код: Выделить всё
nlcd_Print("час",74,2,0);
if (sv)
{
nlcd_Print("@",34,2,0);
if (rad<9999)
{
//nlcd_Print("@",34,2,0);
int_to_str(txt, rad/100, 2, 0);
nlcd_Print_16_24(txt,2,0);
int_to_str(txt, rad%100, 2, 1);
nlcd_Print_16_24(txt,39,0);
nlcd_Print("uSv",74,1,0);
//nlcd_Print("---",72,1,0);
}
else
{
//nlcd_Print("@",34,2,0);
int_to_str(txt, rad/100000, 2, 0);
nlcd_Print_16_24(txt,2,0);
int_to_str(txt, (rad/1000)%100, 2, 1);
nlcd_Print_16_24(txt,39,0);
nlcd_Print("mSv",74,1,0);
//nlcd_Print("---",74,1,0);
}
}
else
{
if (rad>999999)
{
nlcd_Print_16_24(" ",23,0);
nlcd_Print("@",50,2,0);
int_to_str(txt, rad/1000000, 3, 0);
nlcd_Print_16_24(txt,2,0);
int_to_str(txt, ((rad/1000)%1000)/100, 1, 0);
nlcd_Print_16_24(txt,54,0);
nlcd_Print(" Р",74,1,0);
}
else if (rad>999)
{
nlcd_Print_16_24(" ",23,0);
nlcd_Print("@",50,2,0);
int_to_str(txt, rad/1000, 3, 0);
nlcd_Print_16_24(txt,2,0);
int_to_str(txt, (rad%1000)/100, 1, 0);
nlcd_Print_16_24(txt,54,0);
nlcd_Print(" мР",74,1,0);
//nlcd_Print("час",74,2,0);
}
else
{
nlcd_Print_16_24(" ",2,0);
int_to_str(txt, rad, 3, 0);
nlcd_Print_16_24(txt,23,0);
nlcd_Print("мкР",74,1,0);
//nlcd_Print("час",74,2,0);
}
Совсем плохо с оперативкой? Чем залил?
