Kod: Zaznacz cały
Config Int0 = High LevelNiekoniecznie. Porty AVR maja diody zabezpieczajace, a napiecie 12V jest podawane przez rezystor 10k, ktory znaczaco ograniczy prad. Powinno dzialac. Jednakze nie jest to rozwiazanie zgodne z regulami sztuki i powinno byc jakies dodatkowe zabezpieczenie. Jezeli dolaczysz Zenerke 5V1 do portu uK to bedzie OK.Na pewno musisz przejść na 5V
a co za różnica? zwykle przerwanie reaguje na poziom niski więc dla mnie nie ma to znaczenia czy poziom czy zbocze. a jak to rozróżnić? jaka jest dyrektywa ustawiania przerwania zboczem lub poziomem? jak to wygląda?snow pisze:INT0 i tak musisz ustawić na reagowanie albo na zbocze albo na poziom więc nie bardzo rozumiem pytanie:
Kod: Zaznacz cały
do
if licznik = 0 then
call wybor
end if
loop
wybor: 'zlicza ile razy nacisnieto przycisk na pilocie
incr x
set licznik
if x = 1 then 'jesli raz to wezwij program do zamykania bramy
call otwieram
end if
if x = 2 then 'jesli drugi raz nacisnieto to zatrzymuje brame
call stopuje
end if
if x = 3 then 'jesli nacisnieto trzeci raz to wzywam podprogram zamykania beamy
call zamykam
end if
if x = 4 then 'jesli przycisk nacisniety poraz czwarty to zatrzymuje brame
set spza
set slza
x = 0
end if
returntak to wiem, ale o co innego biega. powiedzmy że do portu B.7 mam podpięty przycisk który zwiera mi ten pin do masy. a pętla główna programu wygląda jak wyżej. to spełnienie warunkusnow pisze:Przerwania są nadrzędne nad programem.
Kod: Zaznacz cały
if PINB.7 = 0 then
call wybor
end ifa ja to widzę inaczej i symulacja pokazuje mi to tak jak widzę to ja, czyli tak:Pikczu pisze:Wykona się wszytko na raz popatrz na to jak na PB.7 będzie stan niski to skacze do call wybór -> potem jest incr x i teraz ustawiasz licznik na set czyli znowu zaczynasz od nowa jak byś miał na PB.7 stan 0 wiec x sie zwiększy kolejny raz itd.
bo chciałem żeby było jasniej. a jeśli przy konfiguracji napiszę:Pikczu pisze:post usunąłem bo ty zmieniłeś to na if pinb.7=0
Kod: Zaznacz cały
licznik alias pinb.7Kod: Zaznacz cały
if licznik=0 then
call wybor
end ifdobra to jak pokaże trochę więcej kodu to zobaczysz że nie potrzebna eliminacja drgania styków.Pikczu pisze:nie wiem czy nie lepiej dać debounce będziesz miał pewność co do drgania styków
Kod: Zaznacz cały
do
if licznik = 0 then 'jesli nacisne przycisk to
call wybor 'wzywam podprogram wybor
end if
loop
wybor: 'zlicza ile razy nacisnieto przycisk na pilocie
incr x
set licznik
if x = 1 then 'jesli raz to wezwij program do zamykania bramy
call otwieram
end if
if x = 2 then 'jesli drugi raz nacisnieto to zatrzymuje brame
call stopuje
end if
if x = 3 then 'jesli nacisnieto trzeci raz to wzywam podprogram zamykania
call zamykam
end if
if x = 4 then 'jesli przycisk nacisniety poraz czwarty to zatrzymuje brame
set spza
set slza 'i resetuje zmienna pomocnicza X
x = 0
end if
return
otwieram: 'poprogram otwierania bramy
set slot
set spot
set slza
set spza
do
if clot = 0 then 'sprawdzam czy lewa połowa bramy otworzyla sie
set slot 'wylaczam otwieranie lewej polowy
else
reset slot 'w przeciwnym razie zalaczam go
end if
if cpot = 0 then 'sprawdzam czy prawa polowa otworzyla sie
set spot 'i wylaczam otwieranie prawej polowy
else
wait 1
reset spot 'w przeciwnym razie zalaczam otwieranie
end if
if licznik = 0 then 'jesli nacisnieto przycisk nr1 na pilocie
call wybor 'licz ile razy?
exit do
end if
set clza 'ustawiam czujki zamknietej bramy do odczytu
set cpza
if clot = 0 then 'jesli obie polowy bramy otworzyly sie to
if cpot = 0 then
set slot 'wylaczam silniki otwierania
set spot
incr x
exit do 'wychodze z petli
end if
end if
loop
return