odczytać Stan portu

ostal · Postautor: **ostal** » 8 mar 2007, o 13:47

' na pd0,2,4,6 mam podłączone diody
Config Portd = Output
' na pa 1,2 mam przyciski
Config Porta = Input
Reset Porta

Do
   If Porta.1 = 1 Then
     Set Portd.0
   end if
   If Porta.2 = 1 Then
     Set Portd.2
   end if
Loop

moje pytanie: jak mam ustawić porty żeby po naciśnięcu przycisku zapaliła sie dioda?

edit: używam Atmegi 128

Fredy · Postautor: **Fredy** » 8 mar 2007, o 17:50

Nie sprawdzaj stanu porta.0 tylko pina.0 . Poza tym potrzebujesz zabezpieczeń przed wielokrotnym nacisnięciem .

Spróbuj wstawić taką konstrukcje:

Kod: Zaznacz cały

IF PIND.0 =0 THEN
     WAITMS 20
     IF PIND.0 THEN 
          ZRÓB COŚ 
     END IF
END IF

RcTomek · Postautor: **RcTomek** » 8 mar 2007, o 21:39

Aby wyeliminować drgania styków, można też zastosować specjalne polecenie debounce:

Kod: Zaznacz cały

Debounce Pina.0 , 0 , Procedura , Sub

Procedura:
'tu piszesz, co chcesz zrobić
Return

Więcej na ten temat znajdziesz w helpie Bascom'a.

KK · Postautor: KK » 8 mar 2007, o 21:51

Nie stosowałem podłączenia diod, styków i programu do ich obsługi. Czy wcześniejszy post dotyczył komputera amiga 128, czy procesora firmy atmel?
Dzięki za pozdrowienia.

RcTomek · Postautor: **RcTomek** » 8 mar 2007, o 23:03

Czy wcześniejszy post dotyczył komputera amiga 128, czy procesora firmy atmel?

edit: używam Atmegi 128

Chodzi o uC ATmega128

pajaczek · Postautor: **pajaczek** » 8 mar 2007, o 23:26

Czy wcześniejszy post dotyczył komputera amiga 128, czy procesora firmy atmel?

A to ciekawe... jakos nie przypominam sobie Amigi 128, skad takie dziwne przypuszczenie/pytanie ??

Commodore 128 bylo, ale nie Amisia.

almatea · Postautor: **almatea** » 9 mar 2007, o 08:03

Z tego co widzę, piny wejściowe mają reagować na stan wysoki. Mam nadzieję, że dorzuciłeś rezystory "podciągające" te piny do GND, bo inaczej Ci to nie zagra.

Szybciej miałbyś ustawić porta jako wysoki i reagować na stan 0 (przyciski podepnij do GND). Zwyczajowo atmele mają wewnętrzne rezystory pull-up, których nie musisz dodatkowo dokładać.

Pozdrawiam

odczytać Stan portu

Kto jest online