Various Input Speed Comparisons

[SMcNeill]

Here's another old program which I stumbled across while cleaning up my drive:

Code: QB64: [Select]

1. DEFLNG A-Z
2.  
3. DO
4.     a$ = INKEY$
5.     count = count + 1
6.     IF timeit = 0 THEN t# = TIMER(0.001) + 5: timeit = -1
7. LOOP UNTIL timeit AND TIMER(0.001) > t#
8. LOCATE 1, 1: PRINT count
9.  
10. count = 0: timeit = 0
11. DO
12.     a = _KEYHIT
13.     count = count + 1
14.     IF timeit = 0 THEN t# = TIMER(0.001) + 5: timeit = -1
15. LOOP UNTIL timeit AND TIMER(0.001) > t#
16. LOCATE 2, 1: PRINT count
17.  
18. count = 0: timeit = 0
19. DO
20.     IF _KEYDOWN(65) THEN REM 'lets do nothing but check for that keydown event
21.     count = count + 1
22.     IF timeit = 0 THEN t# = TIMER(0.001) + 5: timeit = -1
23. LOOP UNTIL timeit AND TIMER(0.001) > t#
24. LOCATE 3, 1: PRINT count
25.  
26. DO
27.     _LIMIT 30
28. LOOP UNTIL _KEYHIT = 27

Compile and run it, and give it 15 seconds to do its thing.  When finished, there'll be three numbers on the screen which represent how many times QB64 can process an INKEY$ event, _KEYHIT, and _KEYDOWN, each over 5 seconds.

People sometimes ask me why I always tend to use KEYHIT over the other methods.  I think this should showcase why quite readily.  ;D

[Petr]

Thank you, Steve. Very interrest outputs!

  [ You are not allowed to view this attachment ]  

[TempodiBasic]

Yes great tip!

I can confirm the so strong difference among the 3 way to take input from keyboard on my old TOSHIBA  Celeron 1GigaHzh 4Giga RAM windows 10
  [ You are not allowed to view this attachment ]  

Thanks