hypercube-0.3.1

[polytopiary:hypercube.git] / test-palette.c

/* test palettes */

#include <stdlib.h>
#include <vga.h>
#include <vgagl.h>

#include "fixed.h"
#include "geometry.h"
#include "palette.h"
#include "r2vga.h"
#include "raster.h"
#include "stack.h"

int main(void) {

    GraphicsContext *s_phys;
    GraphicsContext *s_virt;
    int t, b, i;
    raster rb, tb;
    rgb256 p;
    vector2 v2[3];
    stack s;

    vga_init();
    vga_setmode(G320x200x256);

    gl_setcontextvga(G320x200x256);
    s_phys = gl_allocatecontext();
    gl_getcontext(s_phys);
    gl_setcontextvgavirtual(G320x200x256);
    s_virt = gl_allocatecontext();
    gl_getcontext(s_virt);

    gl_setcontext(s_virt);

    f_init();

    for (t = 0; 1; t++) {

    p_planar8bit(&p, t);
    p_set(&p);

    r_clear(&rb, 0);
    r_clear(&tb, 0);

    for (b = 0; b < 8; b++) {
        s_clear(&s);
        for (i = 0; i < 3; i++) {
            v2[i][0] = rand()%320;
            v2[i][1] = rand()%200;
            s_push(&s, &(v2[i]));
        }
        r_fillpoly(&tb, &s, 1 << b);
        r_bitor(&rb, &tb);
    }

    r2vga(&rb, 0, 0, 320, 200, 0, 0);

    gl_copyscreen(s_phys);

    }

    vga_getch();

    gl_clearscreen(0);
    vga_setmode(TEXT);
    return (EXIT_SUCCESS);

}

/* EOF */