diff --git a/mystic/HISTORY.txt b/mystic/HISTORY.txt
index 9ad01e8..4c91697 100644
--- a/mystic/HISTORY.txt
+++ b/mystic/HISTORY.txt
@@ -3996,3 +3996,6 @@
    supplied as well.  IE:  mutil mutil.cfg -noscreen This is useful for
    Linux/OSX people that may want to execute MUTIL during a login or
    something but do not want their users to see the MUTIL screen.
+
+ + Mystic now has 10 colors definable per theme, with 10 new MCI codes
+   |T0 to |T9 to display them.
diff --git a/mystic/bbs_cfg_theme.pas b/mystic/bbs_cfg_theme.pas
index fd3cfdf..3b6fbed 100644
--- a/mystic/bbs_cfg_theme.pas
+++ b/mystic/bbs_cfg_theme.pas
@@ -175,12 +175,12 @@ Begin
   List.LoChars  := #13#27#47;
   List.NoWindow := True;
 
-  Box.Open (8, 6, 73, 18);
+  Box.Open (8, 6, 73, 19);
 
   WriteXY (10,  8, 112, 'File Name             Description');
   WriteXY (10,  9, 112, strRep(#196, 62));
-  WriteXY (10, 16, 112, strRep(#196, 62));
-  WriteXY (29, 17, 112, cfgCommandList);
+  WriteXY (10, 17, 112, strRep(#196, 62));
+  WriteXY (29, 18, 112, cfgCommandList);
 
   Repeat
     List.Clear;
@@ -195,7 +195,7 @@ Begin
 
     List.Add ('', 0);
 
-    List.Open (8, 9, 73, 16);
+    List.Open (8, 9, 73, 17);
     List.Close;
 
     Case List.ExitCode of
diff --git a/mystic/bbs_io.pas b/mystic/bbs_io.pas
index 14d593d..82ed66b 100644
--- a/mystic/bbs_io.pas
+++ b/mystic/bbs_io.pas
@@ -579,6 +579,8 @@ Begin
             'X' : LastMCIValue := strI2S(TBBSCore(Core).User.Security.MaxDLs);
           End;
     'T' : Case Code[2] of
+            '0'..
+            '9' : LastMCIValue := Attr2Ansi(Session.Lang.Colors[strS2I(Code[2])]);
             'B' : LastMCIValue := strI2S(TBBSCore(Core).User.ThisUser.TimeBank);
             'C' : LastMCIValue := strI2S(Config.SystemCalls);
             'E' : If Graphics = 1 Then LastMCIValue := 'Ansi' Else LastMCIValue := 'Ascii'; //++lang