Opdracht timer

De code voor de 'timer' ziet er als volgt uit:

If toestand = 3 Then
  If waarde = 0 Then
    T2 = Clock.ElapsedMilliseconds
    'Alleen wanneer de tijd verstreken is moet de lamp worden uitgezet
    If T2-T1 > tijd Then
      lamp = "uit"
      toestand = 1
      LCD.Clear()
      LCD.Write(10, 40, "Waarde = " + waarde)
      LCD.Write(10, 60, "Toestand = " + toestand)
      LCD.Write(10, 80, "Lamp = " + lamp)
    Endif
  Endif
Endif
If toestand = 3 Then
  If waarde = 100 Then
    lamp = "aan"
    toestand = 2
    LCD.Clear()
    LCD.Write(10, 40, "Waarde = " + waarde)
    LCD.Write(10, 60, "Toestand = " + toestand)
    LCD.Write(10, 80, "Lamp = " + lamp)
  Endif
EndIf