Witam serdecznie!
Mam problem z uruchomieniem menu jak na obrazku , proszę chociaż o podpowiedź
Poza tym klawiatura wydaje się być głucha na "Menu=0"
Dzięki
Tematy związane z programowaniem mikrokontrolerów proszę zakładać w dziale Mikrokontrolery.
Przeniosłem z Programowanie początkujący.
[Dr.Vee]
Mam problem z uruchomieniem menu jak na obrazku , proszę chociaż o podpowiedź
$regfile = "m16def.dat"
$crystal = 12000000
Config Lcd = 20 * 4
Deflcdchar 0 , 16 , 24 , 28 , 30 , 30 , 28 , 24 , 16
Dim X as byte
Up Alias Porta.0
Menu Alias Porta.1
Left1 Alias Porta.2
Down Alias Porta.3
Right1 Alias Porta.4
set Porta.0
set Porta.1
set Porta.2
set Porta.3
set Porta.4
Cls
Do
Locate 1 , 2
Lcd "xxxxxxxxxxxx"
Locate 2 , 2
Lcd "xxxxxxxxxxxx"
Locate 3 , 2
Lcd "xxxxxxxxxxxx"
Locate 4 , 2
Lcd "xxxxxxxxxxxx"
If Down=0 then
X=1
...........
...........
...........
end if
Locate X, 1
Lcd Chr(0);
Loop
End
Poza tym klawiatura wydaje się być głucha na "Menu=0"
Dzięki
Tematy związane z programowaniem mikrokontrolerów proszę zakładać w dziale Mikrokontrolery.
Przeniosłem z Programowanie początkujący.
[Dr.Vee]