witam
popiąłem 8 diod pod portD, pod pin B0 przycisk, chciałem zeby program po nacisnieciu przycisku zapalał kolejną diodę
działa ok, ale jesli dluzej go przytrzymuje to zapalają sie cały czas kolejne diody, jak przerobic program zeby po dłuższym przytrzymaniu przycisku nie zapalał kolejnych diod tylko czekłl na następne wciśnięcie
Dodałem znaczniki [code] - proszę je stosować w przyszłości.
Poprawiłem tytuł - regulamin p.11
[zumek]
popiąłem 8 diod pod portD, pod pin B0 przycisk, chciałem zeby program po nacisnieciu przycisku zapalał kolejną diodę
działa ok, ale jesli dluzej go przytrzymuje to zapalają sie cały czas kolejne diody, jak przerobic program zeby po dłuższym przytrzymaniu przycisku nie zapalał kolejnych diod tylko czekłl na następne wciśnięcie
$regfile = "m8def.dat"
$crystal = 1000000
Config Portd = Output
Config Pinb.0 = Input
Przycisk Alias Pinb.0
Set Portb.0
portd = &B11111110
Do
If Przycisk = 0 Then
Waitms 100
Rotate Portd , Right
End If
Loop
End
Dodałem znaczniki [code] - proszę je stosować w przyszłości.
Poprawiłem tytuł - regulamin p.11
[zumek]