September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Keyboard-input-Keypress-check/BASIC/keyboard-input-keypress-check-1.basic
+++ b/Task/Keyboard-input-Keypress-check/BASIC/keyboard-input-keypress-check-1.basic
@ -1 +1,5 @@
-K = PEEK(-16384) : IF K > 127 THEN POKE -16368,0 : K$ = CHR$(K)
+PRINT "Press <escape> to exit now..."
+key = GETKEY
+IF key = 27 THEN
+    END
+END IF