function value = monopoly_community_chest ( index )

%*****************************************************************************80
%
%% monopoly_community_chest() returns the text of a community chest card.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    03 January 2020
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer INDEX: the index of the card.
%    1 <= INDEX <= 16.
%
%  Output:
%
%    string VALUE: the text of the card.
%
  label = [ ...
    "Advance to Go (Collect $200)", ...
    "Bank error in your favor. Collect $200", ...
    "Doctor's fee. Pay $50", ...
    "From sale of stock you get $50", ...
    "Get Out of Jail Free", ...
    "Go to Jail.  Go directly to jail.  Do not pass Go.  Do not collect $200", ...
    "Holiday fund matures. Receive $100", ...
    "Income tax refund. Collect $20", ...
    "It is your birthday. Collect $10 from every player", ...
    "Life insurance matures. Collect $100", ...
    "Pay hospital fees of $100", ...
    "Pay school fees of $50", ...
    "Receive $25 consultancy fee", ...
    "You are assessed for street repair.  Pay $40 per house. $115 per hotel", ...
    "You have won second prize in a beauty contest. Collect $10", ...
    "You inherit $100" ];

  if ( 1 <= index & index <= 16 )
    value = label(index)
  else
    value = "?";
  end

  return
end

