/***************************************
 * PRDEC0 TEST - Test routine prdecr   *
 *   from file prdec.asm for Apple 1   *
 ***************************************/
 
#include <apple1.h>
#include <apple1.asm>
#include <prdec.asm>

byte i;

main:

i = 0;
loop:
  prdecr(i);
  echo(32);
  i++;
  if (i<>0) goto loop;
goto exit;