Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: QB: INP(H&60) käsky

Jarkko [12.01.2003 11:24:06]

#

Elikkäs miks toi käsky alkaa muutaman näppäin painalluksen jälkeen piipailemaan ja jos mahdollista miten sen saa pois?

Antti Laaksonen [12.01.2003 12:04:11]

#

Sinun pitää välillä tyhjentää näppäimistöpuskuri, mikä onnistuu helpoiten INKEY$:lla, tässä esimerkissä joka sadannella kerralla:

DO
  'näppäimen luku ja tulostus
  x% = INP(&H60)
  PRINT x%
  'tyhjennys joka sadannella kerralla
  tyhj% = tyhj% + 1
  IF tyhj% = 100 THEN
    tyhj% = 0
    x$ = INKEY$
  END IF
LOOP UNTIL x% = 1

Jogge [12.01.2003 18:55:14]

#

INKEY$:a nopeampi vaihtoehto tietysti on käyttää POKE:a, joka onnistuu vaikkapa lisäämällä Antti Laaksosen koodinpätkän alkuun DEF SEG = &H40 ja x$ = INKEY$ rivin tilalle POKE(&H1A), 0 (tämä ei luultavasti tuo kovinkaan paljon lisää nopeutta)

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta