Hi,
das Deklarieren schreibt zunächst mal gar nichts, sondern reserviert einfach nur Speicher für die Variable.
Wenn Du Single speichern willst, solltest Du natürlich auch die EEPROM-Variable und die Vergleichsvariable K als Single deklarieren, sonst wird das nix, weil die Kommastellen beim Wandeln auf Word abgeschnitten werden und Du anschließend Äpfel mit Birnen vergleichst - im Endergebnis ist dann "K" immer ungleich "Zuspeichernderwert"...
Versuch mal den folgenden Code. Müsste gehen, ist aber nicht getestet...
Viele GrüßeCode:Dim Z As Long Dim Zuspeichernderwert As Single Dim K As Single Dim Speicher As Eram Single 'Timer mit 100 Hz Config Timer0 = Timer , Prescale = 1024 On Timer0 Timer_irq Const Timervorgabe = 100 Enable Timer0 Enable Interrupts 'Einmaliges Rücklesen der EEPROM-Variable K = Speicher Do If Z = 90000 And K <> Zuspeichernderwert Then 'K = Zuspeichernderwert Speicher = Zuspeichernderwert Z = 0 End If Loop Timer_irq: Timer0 = Timervorgabe Incr Z Return
Torsten







Zitieren

Lesezeichen