C02/apple2/a2keys.c02

17 lines
200 B
Plaintext

/* 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;