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