atari5200: get rid of conio_colors table
use system color variables instead; improve testcode/lib/atari5200/hello.c test program
This commit is contained in:
committed by
Oliver Schmidt
parent
dfb7c0f24d
commit
d7eecb57f8
@@ -22,6 +22,7 @@
|
||||
|
||||
|
||||
static const char Text [] = "Hello world!";
|
||||
static unsigned char colors[] = { COLOR_WHITE, COLOR_LIGHTGREEN, COLOR_LIGHTRED, COLOR_BLACK };
|
||||
|
||||
|
||||
|
||||
@@ -35,6 +36,7 @@ int main (void)
|
||||
{
|
||||
unsigned char XSize, YSize;
|
||||
unsigned char PosY;
|
||||
unsigned char i = 0;
|
||||
|
||||
/* Set screen colors */
|
||||
(void) textcolor (COLOR_WHITE);
|
||||
@@ -47,55 +49,61 @@ int main (void)
|
||||
/* Ask for the screen size */
|
||||
screensize (&XSize, &YSize);
|
||||
|
||||
/* Draw a border around the screen */
|
||||
|
||||
/* Top line */
|
||||
cputc (CH_ULCORNER);
|
||||
chline (XSize - 2);
|
||||
cputc (CH_URCORNER);
|
||||
|
||||
/* Vertical line, left side */
|
||||
cvlinexy (0, 1, YSize - 2);
|
||||
|
||||
/* Bottom line */
|
||||
cputc (CH_LLCORNER);
|
||||
chline (XSize - 2);
|
||||
cputc (CH_LRCORNER);
|
||||
|
||||
/* Vertical line, right side */
|
||||
cvlinexy (XSize - 1, 1, YSize - 2);
|
||||
|
||||
/* Write the greeting in the mid of the screen */
|
||||
gotoxy ((XSize - strlen (Text)) / 2, YSize / 2);
|
||||
cprintf ("%s", Text);
|
||||
|
||||
PosY = wherey ();
|
||||
textcolor (0); /* switch to color #0 */
|
||||
cputsxy(3, ++PosY, "COLOR 0");
|
||||
textcolor (1); /* switch to color #1 */
|
||||
cputsxy(3, ++PosY, "COLOR 1");
|
||||
textcolor (2); /* switch to color #2 */
|
||||
cputsxy(3, ++PosY, "COLOR 2");
|
||||
textcolor (3); /* switch to color #3 */ /* color #3 is the background color. So written text isn't visible. */
|
||||
cputsxy(3, ++PosY, "COLOR 3");
|
||||
|
||||
#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) || defined(__ATARI5200__)
|
||||
|
||||
/* Wait for the user to press a button */
|
||||
/* Install joystick driver */
|
||||
joy_install (joy_static_stddrv);
|
||||
while (!joy_read (JOY_1)) ;
|
||||
|
||||
while (1) {
|
||||
/* Draw a border around the screen */
|
||||
|
||||
/* Top line */
|
||||
cputc (CH_ULCORNER);
|
||||
chline (XSize - 2);
|
||||
cputc (CH_URCORNER);
|
||||
|
||||
/* Vertical line, left side */
|
||||
cvlinexy (0, 1, YSize - 2);
|
||||
|
||||
/* Bottom line */
|
||||
cputc (CH_LLCORNER);
|
||||
chline (XSize - 2);
|
||||
cputc (CH_LRCORNER);
|
||||
|
||||
/* Vertical line, right side */
|
||||
cvlinexy (XSize - 1, 1, YSize - 2);
|
||||
|
||||
/* Write the greeting in the mid of the screen */
|
||||
gotoxy ((XSize - strlen (Text)) / 2, YSize / 2);
|
||||
cprintf ("%s", Text);
|
||||
|
||||
PosY = wherey ();
|
||||
textcolor (colors[i]); /* switch to color #0 */
|
||||
cputsxy(3, ++PosY, "COLOR 0");
|
||||
textcolor ((colors[i] + 1) & 3); /* switch to color #1 */
|
||||
cputsxy(3, ++PosY, "COLOR 1");
|
||||
textcolor ((colors[i] + 2) & 3); /* switch to color #2 */
|
||||
cputsxy(3, ++PosY, "COLOR 2");
|
||||
textcolor ((colors[i] + 3) & 3); /* switch to color #3 */ /* color #3 is the background color. So written text isn't visible. */
|
||||
cputsxy(3, ++PosY, "COLOR 3");
|
||||
|
||||
/* Wait for the user to press and release a button */
|
||||
while (!joy_read (JOY_1))
|
||||
;
|
||||
while (joy_read (JOY_1))
|
||||
;
|
||||
|
||||
i = (i + 1) & 3;
|
||||
|
||||
/* Change colors */
|
||||
textcolor (colors[i]);
|
||||
bgcolor ((colors[i] + 3) & 3);
|
||||
|
||||
/* Clear the screen again */
|
||||
clrscr ();
|
||||
}
|
||||
/* not reached */
|
||||
|
||||
joy_uninstall ();
|
||||
|
||||
#else
|
||||
|
||||
/* Wait for the user to press a key */
|
||||
cgetc ();
|
||||
|
||||
#endif
|
||||
|
||||
/* Clear the screen again */
|
||||
clrscr ();
|
||||
|
||||
/* Done */
|
||||
return EXIT_SUCCESS;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user