Witam
Mam pytanko. W jaki sposób odebrać liczbe dwucyfrową np 11. Jeżeli używa w bascomie funkcji inkey() i chce z komputera przesłać liczbę 11 to uC odbiera tą liczbę jako dwie jedynki a nie jako liczbę 11, co uniemożliwia mi wykonanie instrukcji która znajduje sie pod CASE 11: . Jest na to jakiś sposób? Pytam ponieważ chcę skorzystać później z funkcji SELECT CASE ( wybór bedzie ok 65 pozycji) no i chciałbym przesyłać do uC liczby od 1 do 65 i na podstawie wybranej liczby skoczyć do danego CASE i wykonać określoną instrukcję.
Dziekuję i pozdrawiam
Dawid
Dodano po 1 [minuty]:
kod:
Dodałem znaczniki [code]
[zumek]
Mam pytanko. W jaki sposób odebrać liczbe dwucyfrową np 11. Jeżeli używa w bascomie funkcji inkey() i chce z komputera przesłać liczbę 11 to uC odbiera tą liczbę jako dwie jedynki a nie jako liczbę 11, co uniemożliwia mi wykonanie instrukcji która znajduje sie pod CASE 11: . Jest na to jakiś sposób? Pytam ponieważ chcę skorzystać później z funkcji SELECT CASE ( wybór bedzie ok 65 pozycji) no i chciałbym przesyłać do uC liczby od 1 do 65 i na podstawie wybranej liczby skoczyć do danego CASE i wykonać określoną instrukcję.
Dziekuję i pozdrawiam
Dawid
Dodano po 1 [minuty]:
kod:
Config Portb = Output
Portb = &B00000000
Config Portd = Output
Portd = &B0000000
Dim A As Byte
Do
A = Inkey()
If A > 0 Then
Select Case A
Case 1:
Set Portb.1
Set Portb.3
Case 2:
Reset Portb.1
Reset Portb.3
End Select
End If
Loop
EndDodałem znaczniki [code]
[zumek]