Stap 10: Program de Chip
Typ in deze code:
init: pauze 500' wachten voor scherm te initialiseren zo gegevens is niet verloren
serout 1, N2400, (1)' weergave opgeslagen bericht 1: "externe:" op de bovenste regel
pauze 5' wachten om te werken
serout 1, N2400, (2)' weergave opgeslagen bericht 2: "Temperatuur" op bottom line
readtemp 1, b1' lezen temperatuur in eerste instantie naar het krijgen lezen voor minimum temperatuur
B6 b1 =' minimale temperatuur instellen als huidige zodat het niet wordt weergegeven als 0
setint % 00000100, % 00000100' set interrupt gemeenschappelijke invoer pin (ingang 2)
Onderbreken:
GOSUB Maxmin'go scherm met max en min temperaturen
setint % 00000100, % 00000100' reset onderbreken omdat het wordt geannuleerd wanneer het is struikelde
Maxmin:
serout 1, N2400, (3)' weergave opgeslagen bericht 3: "Max. Temp: "op de bovenste regel
pauze 5' wachten om te werken
serout 1, N2400, (4)' weergave opgeslagen bericht 4: "Min. Temp:" op bottom line
pauze 5' wachten om te werken
serout 1, N2400, (254,140, #b5,"C") ' Toon maximumtemperatuur (variabele b5) vervolgens "C"
pauze 5' wachten om te werken
serout 1, N2400, (254,204, #b6,"C")' Toon minimumtemperatuur (variabele b6) vervolgens "C"
wacht 10' wacht 10 seconden om tijd om te lezen
serout 1, N2400, (1)' weergave opgeslagen bericht 1: "externe:" op de bovenste regel
pauze 5' wachten om te werken
serout 1, N2400, (2)' weergave opgeslagen bericht 2: "Temperatuur" op bottom line
Celsius:
readtemp 1, b1
serout 1, N2400, (254,140, #b1,"C")
serout 1,N2400,(254,140)
Als b1 > b5 vervolgens goto GT ' testen of nieuwe max temperatuur
Als b1 < b6 vervolgens goto LT ' testen of nieuwe min temperatuur
goto Celcius
GT:
B5 b1 = ' nieuwe max temperatuur instellen
goto Celcius
LT:
B6 b1 = ' nieuwe min temperatuur instellen
goto Celcius
Klik op uitvoeren en programma van de chip. Vergeet niet te zetten de stroom naar de chip tijdens programmeren.
Als niets te zien pas vervolgens het contrast op de achterkant van de kaart. Het is een kleine potentiometer.