mirror of
https://github.com/RevCurtisP/C02.git
synced 2024-11-26 13:49:21 +00:00
64 lines
925 B
Plaintext
64 lines
925 B
Plaintext
/***********************************************
|
|
* TESTIOX - Test Library stdiox.h for py65mon *
|
|
***********************************************/
|
|
|
|
#include <py65.h02>
|
|
#include <stdlib.h02>
|
|
#include <stdio.h02>
|
|
#include <stdiox.h02>
|
|
|
|
char c, i;
|
|
char s = "string";
|
|
|
|
main:
|
|
|
|
i = 0;
|
|
|
|
putln("prtdec()");
|
|
do {
|
|
putdec(i);
|
|
putc(':');
|
|
i++;
|
|
if (!i&15) newlin();
|
|
} while (i);
|
|
anykey();
|
|
|
|
putln("prtdel()");
|
|
do {
|
|
putdel(i);
|
|
putc(':');
|
|
i++;
|
|
if (!i&15) newlin();
|
|
} while (i);
|
|
anykey();
|
|
|
|
putln("prtder()");
|
|
do {
|
|
putder(i);
|
|
putc(':');
|
|
i++;
|
|
if (!i&15) newlin();
|
|
} while (i);
|
|
anykey();
|
|
|
|
do {
|
|
if (i<32) printf(" H='%h' R='%r' L='%l' D='%d'");
|
|
else printf("C='%c' H='%h' R='%r' L='%l' D='%d'");
|
|
newlin();
|
|
i++;
|
|
if (!i&15) anykey();
|
|
} while (i<128);
|
|
|
|
setdst(&s);
|
|
printf("S=\"%s\"");
|
|
newlin();
|
|
|
|
done:
|
|
goto exit;
|
|
|
|
void anykey() {
|
|
newlin();
|
|
putln("Press any key...");
|
|
c = getc();
|
|
newlin();
|
|
} |