devredeki arızayı bulmama yardım eder misiniz ?

[MAIN_LOOP]

while

********
******
*****

pause 10
wend

 

[SeMPo]

while

********
******
*****

pause 10
wend

Ustam sağol.. Devreye filtre görevi görsün diye kondansatör eklemiştim. Onları söktüm pause 10 ekledim sorunsuz çalışıyor şimdilik. bir iki gün bu şekilde denicem. burada pause 10 un görevi nedir ? İlerleyen zamanlarda tekrar karşıma çıkarsa bilgim olsun.
Devre konusunda diyebileceğin bir şey var mı ? hatalı da olsa bu şekilde çalışıyor bırakayım kalsın mı

 

[MAIN_LOOP]

pause 10 komutu 10ms lik bir gecikme sadece. burdaki görevi while ile wend arası önceden okadar hızlı dönüyorduki anlatamam. 10ms eklenince hızı düşürdük yani buton tarama hızını düşürdük. önceki haliyle 4mhz kristal kullandığını varsayarsak yaklaşık saniyede 1.000.000 kez tarama yapıyordu. bundan dolayı ufak tefek buton hattındaki gerilim dalgalanmalarının hızını algılayabilecek kapasitede çalışıyordu. yazılımsal olarak debouncer yapmış oldun.