Zapis zmiennej ISngle do Eepromu


Przepraszam że dokopuje temat ale wczoraj ze 6h wlaczyłem z tym problememi nic...
Czy może którys z kolegów "łopatologicznie" napisac jak zapisać zmienną Single do pamięci
deklaracje wyglądaja tak:

Dim Sr1twys As Single
dim Dt As Byte
Dim Dzientyg As Eram Byte

W programie przed pętlą głowna robie odczyt:

Dt = Dzientyg 
Readeeprom Sr1twys , 710

a w programie głównym raz na dobę ( w pętli funkcji if) dokonuje zapisu obu zmiennych do eeprom:

Opcja 2 dla mnie to pomnożyć zmienna single x 10 i zmienić jej typ na jakiś całkowity ale nie wiem jak.. jak robie np "zmienna single"=zmienna integer" wywala bład...

Writeeeprom Sr1twys , 710 
Dzientyg = Dt

Dla zmiennej Dt/Dzientyg wszystko jest w porządku - zarówno zapis ja i odczyt jest poprawny natomiast zmienna Sr1twys bądz nie zapisuje się bądz nie oczytuje (zwraca wartość 0.0) Co robie nie tak? - zrobiłem wyświetlanie wartści miennej przed zapiem i jet np 25,5555 a po zapiesie reecie i oczycie 0.0...




Portret użytkownika mlassota

Wykonane - okazało się że

Wykonane - okazało się że błąd krył sie nie w zapiie do pamięci a w dalszych obliczeniach - zmienna byłą wynikiem dzielnia i po odczycie była zasępawana przez ten wynik który był zerowy...
Pozrawiam