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
Ovladanie ledky tlacitkom
Moderátori: psichac, Moderátori
Re: Ovladanie ledky tlacitkom
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
$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
0
Re: Ovladanie ledky tlacitkom
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
$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
0
Re: Ovladanie ledky tlacitkom
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 napísal: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
0
Re: Ovladanie ledky tlacitkom
Ano je to len invertovanie, ale aj na to som uz prisiel. Problem bol v tom definovani portov. Dakujem velmi pekne
0
-
- Podobné témy
- Odpovedí
- Zobrazení
- Posledný príspevok
-
- 0 Odpovedí
- 1276 Zobrazení
-
Posledný príspevok od používateľa MrWifiHifi
-
- 6 Odpovedí
- 2940 Zobrazení
-
Posledný príspevok od používateľa Atlan