1
0
mirror of https://github.com/RevCurtisP/C02.git synced 2024-11-28 10:51:14 +00:00
C02/apple2/a2keys.c02

17 lines
200 B
Plaintext
Raw Normal View History

2018-03-03 18:26:47 +00:00
/* C02 Apple II Test Program */
#include <appl2std.h02>
char c;
main:
loop:
c = getkey();
if (c=$1B) goto exit;
newlin();
prbyte(c);
prchr(' ');
prchr(c);
goto loop;