Strona główna » Fora » Pytania » Programowanie

Zapamiętywanie T_Max i T_Min w termometrze

beleco, 6 marzec, 2011 - 09:19


Witam

Chciałem zmodernizować program termometru o funkcje zapamiętywania temperatury maksymalnej i minimalnej. / Dodatnich jak i ujemnych/

Starałem się napisać odpowiednie zależności , ale kod zawiera błędy. Szczególnie widoczne przy Temp_dwor=0, Temp_max = 0, Temp_min = 0.

Proszę o krytykę i konstruktywne podpowiedzi.

Dim Temp_dwor As Integer , Temp_max As Integer , Temp_min As Integer
 
 
  If Temp_dwor >= 0 And Temp_max < 0 Then Temp_max = Temp_dwor
 
  If Temp_dwor <= 0 And Temp_min > 0 Then Temp_min = Temp_dwor
 
  If Temp_dwor > 0 And Temp_max >= 0 Then
   If Temp_dwor > Temp_max Then Temp_max = Temp_dwor
  End If
 
  If Temp_dwor > 0 And Temp_min >= 0 Then
   If Temp_dwor < Temp_min Then Temp_min = Temp_dwor
   End If
 
  If Temp_dwor < 0 And Temp_max <= 0 Then
   If Temp_dwor > Temp_max Then Temp_max = Temp_dwor
   End If
 
  If Temp_dwor < 0 And Temp_min <= 0 Then
   If Temp_dwor < Temp_min Then Temp_min = Temp_dwor
   End If

‹ termostat Moduły nadawczo odbiorcze. ›



#1mirley, 7 marzec, 2011 - 12:05
Portret użytkownika mirley

T_min i Tmax

Strasznie to masz skomplikowane, nie wystarczyło napisac po jednym ifie?

Dim Temp_dwor As Integer , Temp_max As Integer , Temp_min As Integer
 
If Temp_max < Temp_dwor Then Temp_max = Temp_dwor 
If Temp_min > Temp_dwor Then Temp_min = Temp_dwor

Chyba ze twój zamysł jest inny niż mój :)

-

UWAGA! Możliwy jest zakup zaprogramowanych uC i zestawów elementów itp. do niektórych projektów. O dostępność proszę pytać via email. Konkretne oferty pojawiają się w cenniku.