stps X_C 1000
10 PG 020 STPS X_C 1234 /* set the X counter30 PRINT X(-1) /* display the X-counter value#RUN 1234-----a=CMP_C(16,X_C) /* compare the COMP+ register to X counter