mirror of
https://github.com/RevCurtisP/C02.git
synced 2024-11-22 16:34:15 +00:00
17 lines
200 B
Plaintext
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;
|