#include <sys/types.h>
#include <SDL.h>
#include <generic.h>
#include <Main.h>
#include <Input.h>
#include "glbase.h"
#include "gltexture.h"
#include "glfont.h"

CODE_BEGINS
virtual int startup() throw (GeneralException) {
    Uint8 * texture;
    verbosity = M_INFO;
    mogltk::glbase::setup();
    Input ffont("font-2.bin");
    mogltk::font font(&ffont);
    
    verbosity = M_INFO;
    
    mogltk::texture * mytex = new mogltk::texture(&Input("pattern6.bmp"), true);
    
    mogltk::glbase::Enter2DMode();
    
    mytex->Bind();
    glBegin(GL_TRIANGLE_STRIP);
    glColor3d(0, 0, 0);
    glTexCoord2i(0, 0);
    glVertex2f(50, 50);
    glColor3d(1, 0, 0);
    glTexCoord2i(511, 0);
    glVertex2f(561, 50);
    glColor3d(0, 1, 0);
    glTexCoord2i(0, 511);
    glVertex2f(50, 561);
    glColor3d(0, 0, 1);
    glTexCoord2i(511, 511);
    glVertex2f(561, 561);
    glEnd();
    
    mogltk::texture::Unbind();
    glBegin(GL_TRIANGLE_STRIP);
    glColor3d(0, 0, 0);
    glVertex2f(400, 100);
    glColor3d(1, 0, 0);
    glVertex2f(450, 100);
    glColor3d(0, 1, 0);
    glVertex2f(400, 150);
    glColor3d(0, 0, 1);
    glVertex2f(450, 150);
    glEnd();
    

    glBegin(GL_TRIANGLE_STRIP);
    CORNFLOWERBLUE.Bind();
    glVertex2f(  5,  5);
    DEEPSKYBLUE.Bind();
    glVertex2f(150,  5);
    MIDNIGHTBLUE.Bind();
    glVertex2f(  5, 80);
    NAVY.Bind();
    glVertex2f(150, 80);
    glEnd();
    font.setshadow(1);
    font.putcursor(10, 30);
    font.setcolor(WHITE);
    font.printf("PixelPawa!\n");
    font.printf("It works!!\n");
    font.printf("I can't believe it!\n");
    
    mogltk::glbase::Leave2DMode();
    mogltk::glbase::Flip();
    
//    sleep(15);
    getchar();
    
    delete mytex;
    
    return 0;
}
CODE_ENDS