require '../src/ClanRuby'
include ClanRuby

SetupCore::init();
SetupDisplay::init();

Display::setVideoMode(320, 200, 16, false);

# Create the resource manager

resources = ResourceManager.new("font.scr", false);

# Load fonts

font = Font::load("Fonts/fnt_clansoft", resources);
font_alpha = Font::load("Fonts/fnt_avantgarde", resources);

while ( ! KeyBoard.getKeycode( CL_KEY_ESCAPE) )

	Display::fillRect(0, 0, 160, 200, 0.0, 0.0, 0.0, 1.0);
	Display::fillRect(160, 0, 320, 200, 0.5, 0.5, 0.0, 1.0);

	# Show some text centered

	font.printCenter(160, 80, "Hello World", 1);
	font_alpha.printCenter(160, 120, "Hello World", 1);

	Display::flipDisplay()
	System::keepAlive(2)
	System::sleep(10);
end

#
# Clean up
#
SetupDisplay.deinit()
SetupCore.deinit()