CRT unit with colored console example added

Examples/ConsoleColors/ConsoleColors.dpr

@@ -0,0 +1,80 @@
+program ConsoleColors;
+
+uses
+  CRT;
+
+begin
+  ConsoleInit('Console Colors');
+
+  TextBackground(Black);
+  WriteLn('Black');
+  TextBackground(Blue);
+  WriteLn('Blue');
+  TextBackground(Green);
+  WriteLn('Green');
+  TextBackground(Cyan);
+  WriteLn('Cyan');
+  TextBackground(Red);
+  WriteLn('Red');
+  TextBackground(Magenta);
+  WriteLn('Magenta');
+  TextBackground(Brown);
+  WriteLn('Brown');
+  TextBackground(LightGray);
+  WriteLn('LightGray');
+  TextBackground(DarkGray);
+  WriteLn('DarkGray');
+  TextBackground(LightBlue);
+  WriteLn('LightBlue');
+  TextBackground(LightGreen);
+  WriteLn('LightGreen');
+  TextBackground(LightCyan);
+  WriteLn('LightCyan');
+  TextBackground(LightRed);
+  WriteLn('LightRed');
+  TextBackground(LightMagenta);
+  WriteLn('LightMagenta');
+  TextBackground(Yellow);
+  WriteLn('Yellow');
+  TextBackground(White);
+  WriteLn('White');
+
+  ResetAttributes;
+
+  TextColor(Black);
+  WriteLn('Black');
+  TextColor(Blue);
+  WriteLn('Blue');
+  TextColor(Green);
+  WriteLn('Green');
+  TextColor(Cyan);
+  WriteLn('Cyan');
+  TextColor(Red);
+  WriteLn('Red');
+  TextColor(Magenta);
+  WriteLn('Magenta');
+  TextColor(Brown);
+  WriteLn('Brown');
+  TextColor(LightGray);
+  WriteLn('LightGray');
+  TextColor(DarkGray);
+  WriteLn('DarkGray');
+  TextColor(LightBlue);
+  WriteLn('LightBlue');
+  TextColor(LightGreen);
+  WriteLn('LightGreen');
+  TextColor(LightCyan);
+  WriteLn('LightCyan');
+  TextColor(LightRed);
+  WriteLn('LightRed');
+  TextColor(LightMagenta);
+  WriteLn('LightMagenta');
+  TextColor(Yellow);
+  WriteLn('Yellow');
+  TextColor(White);
+  WriteLn('White');
+
+  ReadKey;
+
+  ConsoleExit(True);
+end.

Examples/ConsoleColors/build.bat

@@ -0,0 +1 @@
+@call "%~dp0..\..\Lib\build.bat" "%~dp0ConsoleColors"