anchor.diff:  
   type
     TSceneTitle = class(TScene)
  +  private const
  +    MaxRows = 10;
     private
  +    FMin: UInt;
  +    FMax: UInt;
       FCur: UInt;
  +    FTop: UInt;
       FCount: UInt;
       procedure Load;
     public
  
positive.code: var
    I: UInt;
  begin
    FCount := 5;
    if (FCount = 0) then
      Exit;
  
    Terminal.ForegroundColor(clWhite);
    Terminal.Print(L + 4, T, _('Which hero shall you play?'));
  
    for I := 0 to FCount - 1 do
    begin
      Terminal.Print(L, T + I + 2, UI.MenuItem(Chr(I + 65), '==========', FCur = I));
    end;
  end;
  
  
negative.code: constructor TSceneTitle.Create;
  begin
    FCur := 0;
    FTop := 0;
    FMin := 0;
    FMax := 0;
    FCount := 0;
  end;
  
  