Added fill bar and font colour...

source/ui.adb

@@ -57,13 +57,13 @@ package body ui is
 	structure_limit : constant natural := 12;
 
 	font_tint : array (style) of core.colour := (
-		(136, 136, 136, 255),
-		(  0, 136, 238, 255),
-		(119, 238, 238, 255),
-		(136, 136, 136, 255),
-		(238, 119, 238, 255),
-		(  0, 238, 119, 255),
-		(238, 119,   0, 255)
+		main   => (127, 127, 127, 255),
+		fairy  => (  0, 127, 255, 255),
+		dwarf  => (127, 255, 255, 255),
+		gnoll  => (255, 255,   0, 255),
+		kobold => (255, 127, 255, 255),
+		goblin => (  0, 255, 127, 255),
+		imp    => (255, 127,   0, 255)
 	);
 
 	sprite : array (style, element) of core.sprite;