mirror of
https://github.com/cc65/cc65.git
synced 2024-07-18 00:29:02 +00:00
83 lines
2.0 KiB
C
83 lines
2.0 KiB
C
|
|
||
|
/* this program prints all available "petscii" characters to screen, once
|
||
|
using putchar (which wraps to kernal i/o) and once using conio (which
|
||
|
will do direct videoram access). after that the produced screencodes
|
||
|
are compared (they should match) (related to issue #988 */
|
||
|
|
||
|
#include <conio.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <stdio.h>
|
||
|
#include <string.h>
|
||
|
|
||
|
#if defined(__C64__)
|
||
|
#define VRAMPEEK(x) (*(char*)(0x0400 + (x)))
|
||
|
#define CRAMPOKE(x, y) *(char*)(0xd800 + (x)) = (y)
|
||
|
#else
|
||
|
#error "this target is not supported yet"
|
||
|
#endif
|
||
|
|
||
|
unsigned char x, y, c;
|
||
|
unsigned char c1, c2;
|
||
|
unsigned char *p1, *p2;
|
||
|
|
||
|
int err = 0;
|
||
|
|
||
|
int main(void)
|
||
|
{
|
||
|
clrscr();
|
||
|
bgcolor(COLOR_BLACK);
|
||
|
bordercolor(COLOR_BLACK);
|
||
|
|
||
|
/* output all characters using putchar() */
|
||
|
c = 0;
|
||
|
for (y = 0; y < 16; y++) {
|
||
|
for (x = 0; x < 16; x++) {
|
||
|
/* skip the codes that are unprintable control codes */
|
||
|
if (!((c < 32) || ((c > 127) && (c < 160)))) {
|
||
|
gotoxy(x, y); putchar(c);
|
||
|
}
|
||
|
c++;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* output all characters using conio */
|
||
|
c = 0;
|
||
|
for (y = 0; y < 16; y++) {
|
||
|
for (x = 0; x < 16; x++) {
|
||
|
/* skip the codes that are unprintable control codes */
|
||
|
if (!((c < 32) || ((c > 127) && (c < 160)))) {
|
||
|
gotoxy(x + 20, y); cputc(c);
|
||
|
}
|
||
|
c++;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* compare the two outputs */
|
||
|
for (y = 0; y < 16; y++) {
|
||
|
for (x = 0; x < 16; x++) {
|
||
|
c1 = VRAMPEEK((y * 40) + x);
|
||
|
c2 = VRAMPEEK((y * 40) + x + 0x14);
|
||
|
if (c1 == c2) {
|
||
|
c = COLOR_GREEN;
|
||
|
} else {
|
||
|
c = COLOR_RED;
|
||
|
err = 1;
|
||
|
}
|
||
|
CRAMPOKE((y * 40) + x, c);
|
||
|
CRAMPOKE((y * 40) + x + 0x14, c);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* show the result */
|
||
|
textcolor(COLOR_WHITE);
|
||
|
gotoxy(0, 17);
|
||
|
if (err) {
|
||
|
bordercolor(COLOR_RED);
|
||
|
cputs("errors detected");
|
||
|
} else {
|
||
|
bordercolor(COLOR_GREEN);
|
||
|
cputs("all fine");
|
||
|
}
|
||
|
return 0;
|
||
|
}
|