Witam, mam problem z obsługą klawiatury matrycowej 3x4 w BASCOMIE. Zamieszczam jak wygląda w środku:
Mam zasadnicze wątpliwości co do jej podłączenia i użycia instrukcji GETKBD. Otóż w helpie do BASOMa doczytałem się, że może być ona użyta dla klawiatur 4x4 i 4x6, czy któryś z kolegów używał do obsługi klawiatury 3x4, ew. mógłby podpowiedzieć co zrobić w tej sytuacji?
I jeszcze jedna sprawa, w helpie pokazane jest, że klawiatura 4x4 ma 8 wyprowadzeń, do każdego wiersza i kolumny po jednym (być może ma więcej tylko tutaj nie są użyte, jak mniemam) moja klawiatura jest 3x4 i posiada 9 jak widać na zdjęciu, co trochę mnie dezorientuje. Mógłby mi ktoś wytłumaczyć skąd i po co te 2 dodatkowe wyjścia?
Zamieszczam dodatkowo kod którym testuje poprawność działania klawiatury przez rs232:
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 4800
Config Kbd = Portb , Delay = 100
Dim B As Byte
Do
B = Getkbd()
Print B
Wait 2
Loop
End
Dzięki za pomoc!
Mam zasadnicze wątpliwości co do jej podłączenia i użycia instrukcji GETKBD. Otóż w helpie do BASOMa doczytałem się, że może być ona użyta dla klawiatur 4x4 i 4x6, czy któryś z kolegów używał do obsługi klawiatury 3x4, ew. mógłby podpowiedzieć co zrobić w tej sytuacji?
I jeszcze jedna sprawa, w helpie pokazane jest, że klawiatura 4x4 ma 8 wyprowadzeń, do każdego wiersza i kolumny po jednym (być może ma więcej tylko tutaj nie są użyte, jak mniemam) moja klawiatura jest 3x4 i posiada 9 jak widać na zdjęciu, co trochę mnie dezorientuje. Mógłby mi ktoś wytłumaczyć skąd i po co te 2 dodatkowe wyjścia?
Zamieszczam dodatkowo kod którym testuje poprawność działania klawiatury przez rs232:
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 4800
Config Kbd = Portb , Delay = 100
Dim B As Byte
Do
B = Getkbd()
Print B
Wait 2
Loop
End
Dzięki za pomoc!