Witam,
Napisałem sobie kodzik, który będzie zliczał i wyświetlał na LCD ile razy zwarłem pind.3 do masy.
Oto kod:
Jak widać kod nie jest jakiś trudny, ale mam z nim pewien problem.
Normalnie na wyświetlaczu ładnie widać słowo temperatura, natomiast zmienną ilosc oraz znak x widać bardzo słabo:
Natomiast gdy zwieram ten pind.3 do masy to już wszystko widać dobrze.
Tutaj filmik w roli wyjaśnienia:
Co powinienem zrobić, aby wyświetlało to się dobrze?
Napisałem sobie kodzik, który będzie zliczał i wyświetlał na LCD ile razy zwarłem pind.3 do masy.
Oto kod:
$regfile = "attiny2313.dat"
$crystal = 1000000
Config Lcd = 16 * 2
Dim Ilosc As Byte
Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portd.2 , Rs = Portd.0
Config Pind.3 = Input
Portd.3 = 1
Do
If Pind.3 = 0 Then
Incr Ilosc
Waitms 200
End If
Cls : Cursor Off :
Lcd "klikniete " ; Ilosc ; " x"
Loop
EndJak widać kod nie jest jakiś trudny, ale mam z nim pewien problem.
Normalnie na wyświetlaczu ładnie widać słowo temperatura, natomiast zmienną ilosc oraz znak x widać bardzo słabo:
Natomiast gdy zwieram ten pind.3 do masy to już wszystko widać dobrze.
Tutaj filmik w roli wyjaśnienia:
Co powinienem zrobić, aby wyświetlało to się dobrze?