Debounce - problem

Marek11 · Postautor: **Marek11** » 1 maja 2003, o 07:30

CZy ktoś może mi podpowiedziec w czym tkwi błąd że trzymając wciśnięty ciągle przycisk S1 program odlicza w doł automatycznie, ale gdy dochodzi do wartości 9 to już trzeba klikać na przyciska za każdym razem zeby zmniejszyl o jeden. I tak samo jest przy zliczaniu w górę, dochodzi do wartości 104 i znów trzeba klikać ciągle. I żeby dojechać do np 500 to jest kłopotliwe. I tak sobie myślę czy pies nie jest pogrzebany w Bascomie ?

Sub Mainprogram
Cls
Lcd "Turns: " ; Opoznienie
Do
Debounce S1 , 0 , Predkdol , Sub
Debounce S2 , 0 , Predkgora , Sub
Debounce S3 , 0 , Go_on , Sub
Loop
End Sub

Predkdol:
Decr Opoznienie

If Opoznienie = 0 Then
Opoznienie = 1
End If

Locate 1 , 8
Lcd " "
Locate 1 , 8
Lcd Opoznienie
Waitms 50
Return

Predkgora:
Incr Opoznienie

If Opoznienie = 1501 Then
Opoznienie = 1500
End If

Locate 1 , 8
Lcd " "
Locate 1 , 8
Lcd Opoznienie
Waitms 50
Return

Marek11 · Postautor: **Marek11** » 2 maja 2003, o 18:04

Czy nikt nie wie w czym jest problem ??

piotrs · Postautor: **piotrs** » 3 kwie 2004, o 23:25

Ja mam jeszcze inny problem z Debounce .Jak narazie to doszedlem do wniosku , ze wszystko zalezy od CONFIG LCD . Zmien na 16*1a to dopiero zobaczysz jakie cyrki powstaja . Zobacz na temat - Debounce-pomocy ?
pzdr

W.K · Postautor: **W.K** » 4 kwie 2004, o 22:16

Nie używaj Alias gdy stosujesz Debounce.
Pozdrawiam!

piotrs · Postautor: **piotrs** » 6 kwie 2004, o 05:05

Wielkie dzieki za podpowiedz .Nareszcie dziala tak jak powinno .

Debounce - problem

Kto jest online