Keskustelu: Ohjelmointikysymykset: Nuolinäppäimet QB:ssä

Hmmm... mitenkähän saisin QBasin INKEY$ komennon noteeraamaan tavallisten nuolinäppäiten painalluksen, näitä kun ei ainakaan ASCII -taulukosta tunnu löytyvän. Eli apua kaivataan - jälleen.

Näinkö?

DO
SELECT CASE INKEY$
CASE CHR$(0) + CHR$(75): PRINT "Vasen"
CASE CHR$(0) + CHR$(80): PRINT "Alas"
CASE CHR$(0) + CHR$(77): PRINT "Oikea"
CASE CHR$(0) + CHR$(72): PRINT "Ylös"
END SELECT
LOOP

(tuo on jostain muokattu)

Löytyy ne sieltä. Esim. alaspäin nuoli:
inkey$ = chr$(0) + chr$(80)

Ks. https://www.ohjelmointiputka.net/oppaat/opas.php?tunnus=napk kohdasta "DOS:in näppäinkoodi".

Toimii :)