Ovladanie ledky tlacitkom

[marosh555]

Zdravim Vas, vedel by mi niekto pomoct s tymto primitivnym problemom? Ma ist o obycajne ovladanie ledky tlacitkom ale uz naozaj neviem kde robim chybu ked mi to nefunguje. Dakujem a nizsie posielam to co som napisal

$regfile = "m644def.dat"
$crystal = 8000000

Config Porta.0 = Output
Config Portc.0 = Input

Do
Portc.0 = 1
If Portc.0 = 0 Then
Reset Porta.0
End If

Loop

End

[popopepe]

Zkusím:

$regfile = "m644def.dat"
$crystal = 8000000


'INPUTS
test_button alias PINC.0
config test_button = input
portc.0 = 1 'turn on the pullup

'OUTPUTS
Red_led alias PORTA.0
config Red_led = output

do
if test_buttons=0 then
toggle red_led
end if
loop

end

[marosh555]

Malicko som to upravil ale chodi to. Vysledny kod je takyto:
$regfile = "m644def.dat"
$crystal = 8000000


'INPUTS
test_button alias PINC.0
config test_button = input
portc.0 = 1 'turn on the pullup

'OUTPUTS
Red_led alias PORTA.0
config Red_led = output

do
If Test_button = 0 Then
toggle red_led
End If
Waitms 500
loop

end


Takze chyba bola v tom ze ked chcem rozsvietit led tak treba pouzit prikaz toogle? Videl som to inak pouzite aj v manuali bascomu ale to som si vsimol pred asi minutou. Ale nechapem preco to neslo tak ako to mam ja

PS: Prisiel som na to ze pokial priradim vstupu 0 na porte C prikaz PORTC.0 tak mi to nefunguje ale akonahle to zmenim na PINC.0 tak mi funguje aj ten moj program ktory som tu postol ako prvy. Tzn ze ked chcem pouzit niektory pin ako vstup tak musim ho definovat ako PINX.X ? Prikaz toogle mi spravil akurat to ze po stlaceni tlacitka zostala len aj nadalej svietit

[danhard]

Reset Porta.0

A kdy sem se dela Set Porta.0 ?

[popopepe]

Ma

PS: Prisiel som na to ze pokial priradim vstupu 0 na porte C prikaz PORTC.0 tak mi to nefunguje ale akonahle to zmenim na PINC.0 tak mi funguje aj ten moj program ktory som tu postol ako prvy. Tzn ze ked chcem pouzit niektory pin ako vstup tak musim ho definovat ako PINX.X ? Prikaz toogle mi spravil akurat to ze po stlaceni tlacitka zostala len aj nadalej svietit

No vidíš, jak jsi šikovný. Je to tak, pozor na to definování vstupu a výstupu. Vzor už máš. Toggle je jenom změna stavu .

[marosh555]

Ano je to len invertovanie, ale aj na to som uz prisiel. Problem bol v tom definovani portov. Dakujem velmi pekne