Keyboard input/Keypress check: Difference between revisions

Content added Content deleted
No edit summary
Line 37: Line 37:


=={{header|BASIC}}==
=={{header|BASIC}}==

==={{header|BaCon}}===
<lang freebasic>
PRINT "Press <escape> to exit now..."
key = GETKEY
IF key = 27 THEN
END
END IF</lang>


==={{header|Applesoft BASIC}}===
==={{header|Applesoft BASIC}}===