anchor.diff:    Terminal.ForegroundColor(Terminal.GetColorFromIni('Title', 'Yellow'));
     Terminal.Print(X, AY, Format(FT, [ATitleStr]), TK_ALIGN_CENTER);
     Terminal.ForegroundColor(clDefault);
  +end;
  +
  +procedure TScene.AddKeyLabel(AKey, S: string; AColor: Cardinal);
  +begin
  +
   end;
   
   procedure TScene.FromAToZ;
  
positive.code:   begin
      if F then
        Terminal.Print(1, Y, TScene.KeyStr(Chr(V + Ord('A'))))
          else
          begin
            Terminal.ForegroundColor(clWhite);
            Terminal.Print(1, Y, '[[' + Chr(V + Ord('A')) + ']]');
          end;
  
negative.code:   private
      KStr: string;
      CX, CY: Byte;
      P: TPoint;
    public
      procedure Render; virtual; abstract;
      procedure Update(var Key: Word); virtual; abstract;
  