mirror of
https://github.com/RevCurtisP/C02.git
synced 2024-11-01 16:04:59 +00:00
19 lines
223 B
Plaintext
19 lines
223 B
Plaintext
/* C02 Apple II Test Program */
|
|
|
|
#include <appl2std.h02>
|
|
|
|
char c;
|
|
|
|
main:
|
|
|
|
loop:
|
|
c = plkey();
|
|
if (!c) goto loop;
|
|
newlin();
|
|
prbyte(c);
|
|
prchr(' ');
|
|
echo(c);
|
|
prchr(' ');
|
|
prchr(c);
|
|
goto loop;
|