Add a Credits menu. Fixes #2864.

OpenRA.Mods.RA/OpenRA.Mods.RA.csproj

@@ -452,6 +452,7 @@
     <Compile Include="Render\WithVoxelBody.cs" />
     <Compile Include="Render\WithVoxelBarrel.cs" />
     <Compile Include="Render\WithVoxelWalkerBody.cs" />
+    <Compile Include="Widgets\Logic\CreditsLogic.cs" />
   </ItemGroup>
   <ItemGroup>
     <ProjectReference Include="..\OpenRA.FileFormats\OpenRA.FileFormats.csproj">
@@ -501,4 +502,4 @@ cd "$(SolutionDir)thirdparty/"
 copy "FuzzyLogicLibrary.dll" "$(SolutionDir)"
 cd "$(SolutionDir)"</PostBuildEvent>
   </PropertyGroup>
-</Project>
+</Project>

OpenRA.Mods.RA/Widgets/Logic/CreditsLogic.cs

@@ -0,0 +1,46 @@
+#region Copyright & License Information
+/*
+ * Copyright 2007-2013 The OpenRA Developers (see AUTHORS)
+ * This file is part of OpenRA, which is free software. It is made
+ * available to you under the terms of the GNU General Public License
+ * as published by the Free Software Foundation. For more information,
+ * see COPYING.
+ */
+
+#endregion
+
+using System;
+using OpenRA.FileFormats;
+using OpenRA.Widgets;
+
+namespace OpenRA.Mods.RA.Widgets.Logic
+{
+	public class CreditsLogic
+	{
+		[ObjectCreator.UseCtor]
+		public CreditsLogic(Widget widget,  Action onExit)
+		{
+			var panel = widget.Get("CREDITS_PANEL");
+
+			panel.Get<ButtonWidget>("BACK_BUTTON").OnClick = () =>
+			{
+				Ui.CloseWindow();
+				onExit();
+			};
+
+			var scrollPanel = panel.Get<ScrollPanelWidget>("CREDITS_DISPLAY");
+			var template = scrollPanel.Get<LabelWidget>("CREDITS_TEMPLATE");
+			scrollPanel.RemoveChildren();
+
+			var lines = FileSystem.Open("AUTHORS").ReadAllLines();
+			foreach (var l in lines)
+			{
+				// Improve the formatting
+				var line = l.Replace("\t", "    ").Replace("*", "\u2022");
+				var label = template.Clone() as LabelWidget;
+				label.GetText = () => line;
+				scrollPanel.AddChild(label);
+			}
+		}
+	}
+}

OpenRA.Mods.RA/Widgets/Logic/MainMenuButtonsLogic.cs

@@ -62,6 +62,15 @@ namespace OpenRA.Mods.RA.Widgets.Logic
 				});
 			};
 
+			widget.Get<ButtonWidget>("MAINMENU_BUTTON_CREDITS").OnClick = () =>
+			{
+				Menu = MenuType.None;
+				Ui.OpenWindow("CREDITS_PANEL", new WidgetArgs()
+				{
+					{ "onExit", () => Menu = MenuType.Main },
+				});
+			};
+
 			widget.Get<ButtonWidget>("MAINMENU_BUTTON_REPLAY_VIEWER").OnClick = () =>
 			{
 				Menu = MenuType.None;