PVcollib  1.5.0
A devkit for ColecoVision
graphics/f18a/f18atest/f18atest.c
/*---------------------------------------------------------------------------------
f18a test with no specific feature
-- alekmaul
---------------------------------------------------------------------------------*/
#include "f18atest.h"
//---------------------------------------------------------------------------------
// The NMI routine. Gets called 50 or 60 times per second
// nothing to update for bitmap example
void nmi (void) {
}
//---------------------------------------------------------------------------------
void main (void) {
// Check if f18a is available
// display a message regarding result of test
if (vdp_f18aok==1) {
// put screen in mode 1 with no specific f18a stuffs
// Put default char in VRAM and duplicate to all areas
// as we are going to write to line 8, it is in the first area
vdp_setdefaultchar(FNTNORMAL);
vdp_fillvram(0x2000,0xF1,128*8);
// Print text as we are not going to do something else
vdp_putstring(8,5,"F18A SUPPORT OK !");
}
else {
// Put screen in text mode 2
// Put default char in VRAM and duplicate to all areas
// as we are going to write to line 8, it is in the second area
vdp_setdefaultchar(FNTNORMAL);
vdp_fillvram(0x2000,0xf1,128*8); // Change color (or we will see nothing)
// Print text as we are not going to do something else
vdp_putstring(8,5,"NO F18A SUPPORT...");
}
// Wait for nothing :P
while(1) {
// Wait Vblank
}
// startup module will issue a soft reboot if it comes here
}