credits.lua

--       _________ __                 __
--      /   _____//  |_____________ _/  |______     ____  __ __  ______
--      \_____  \\   __\_  __ \__  \\   __\__  \   / ___\|  |  \/  ___/
--      /        \|  |  |  | \// __ \|  |  / __ \_/ /_/  >  |  /\___ \
--     /_______  /|__|  |__|  (____  /__| (____  /\___  /|____//____  >
--             \/                  \/          \//_____/            \/
--  ______________________                           ______________________
--                        T H E   W A R   B E G I N S
--         Stratagus - A free fantasy real time strategy game engine
--
--      credits.lua - Define the menu for credits.
--
--      (c) Copyright 2015 by Andrettin
--
--      This program is free software; you can redistribute it and/or modify
--      it under the terms of the GNU General Public License as published by
--      the Free Software Foundation; either version 2 of the License, or
--      (at your option) any later version.
--
--      This program is distributed in the hope that it will be useful,
--      but WITHOUT ANY WARRANTY; without even the implied warranty of
--      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
--      GNU General Public License for more details.
--
--      You should have received a copy of the GNU General Public License
--      along with this program; if not, write to the Free Software
--      Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
--

function RunShowCreditsMenu()
  local menu = WarMenu(nil, GetBackground("ui/backgrounds/wyrm.png"))
  local offx = (Video.Width - 640) / 2
  local offy = (Video.Height - 480) / 2

  if (wyr.preferences.EnableOAML) then
    SetMusicCondition(10, 1)
  end

  local credits = {
	_("Wyrmsun Design and Maintenance"),
	"  Andrettin",
	_("Programming and Scripting"),
	"  Andrettin",
	"  cybermind",
	"  Francois Beerten",
	"  Jimmy Salmon",
	"  Joris Dauphin",
	"  Nehal Mistry",
	"  Pali Rohar",
	"  Russell Smith",
	"  a-detiste",
	"  Akien",
	"  Chris Beck (iceiceice)",
	"  DinkyDyeAussie",
	"  Dmitry Marakasov",
	"  marcelofg55",
	"  Spfnym",
	"  Szunti",
	"  Martin Renold",
	"  Carlos Perello Marin",
	"  Pludov",
	"  Andreas 'Ari' Arens",
	"  Lutz 'Johns' Sammer",
	"  Edgar 'Froese' Toernig",
	"  Crestez Leonard",
	"  Mark Pazolli",
	"  Valery Shchedrin",
	"  Iftikhar Rathore",
	"  Charles K Hardin",
	"  Fabrice Rossi",
	"  DigiCat",
	"  Josh Cogliati",
	"  Patrick Mullen",
	"  Vladi Belperchinov-Shabanski",
	"  Cris Daniluk",
	"  Patrice Fortier",
	"  FT Rathore",
	"  Trent Piepho",
	"  Jon Gabrielson",
	"  Lukas Hejtmanek",
	"  Steinar Hamre",
	"  Ian Farmer",
	"  Sebastian Drews",
	"  Jarek Sobieszek",
	"  Anthony Towns",
	"  Stefan Dirsch",
	"  Al Koskelin",
	"  George J. Carrette",
	"  Dirk 'Guardian' Richartz",
	"  Michael O'Reilly",
	"  Dan Hensley",
	"  Sean McMillian",
	"  Mike Earl",
	"  Ian Turner",
	"  David Slimp",
	"  Iuri Fiedoruk",
	"  Luke Mauldin",
	"  Nathan Adams",
	"  Stephan Rasenberger",
	"  Dave Reed",
	"  Josef Spillner",
	"  James Dessart",
	"  Jan Uerpmann",
	"  Aaron Berger",
	"  Latimerius",
	"  Antonis Chaniotis",
	"  Samuel Hays",
	"  David Martinez Moreno",
	"  Flavio Silvestrow",
	"  Daniel Burrows",
	"  Dave Turner",
	"  Ben Hines",
	"  Kachalov Anton",
	"  Martin Hajduch",
	"  Jeff Binder",
	"  Ludovic",
	"  Juan Pablo",
	"  Phil Hannent",
	"  Alexander MacLean",
	_("Graphics and Artwork"),
	"  b_o",
	"  João Victor G. Costa (Jinn)",
	"  Leo",
	"  Tanja Nov.",
	"  2D-Retroperspectives",
	"  badbuckle (Cenk Açan)",
	"  Battle for Wesnoth Team",
	"  Brian Brickwagon Jennings",
	"  Cuzco",
	"  Elvish_Hunter",
	"  Emilien Rotival (LordBob)",
	"  Francois Beerten",
	"  Frank Loeffler",
	"  igoku",
	"  J. W. Bjerk (eleazzaar)",
	"  Jim16",
	"  KPJ",
	"  Mikodrak",
	"  Nikita_Sadkov",
	"  Oray Studios",
	"  Paolo D'Inca",
	"  Ransom.00",
	"  Rick Elliot",
	"  Soeren Soendergaard Jensen",
	"  StumpyStrust",
	"  TaShadan",
	"  Tina Petersen Jensen",
	"  TimberDragon",
	"  Vladislav \"iDreamRunner\"",
	_("Sound Effects"),
	"  b_o",
	"  Battle for Wesnoth Team",
	"  Brian Brickwagon Jennings",
	"  Corey Woodworth (woodwizzle)",
	"  David Slimp",
	"  J. W. Bjerk (eleazzaar)",
	"  Jute",
	"  Lari Nieminen (zookeeper)",
	"  Manuel Senfft",
	"  TinyWorlds",
	"  Wildfire Games",
	"  Wolfgang Kohler",
	_("Music"),
	"  bart",
	"  Battle for Wesnoth Team",
	"  cynicmusic",
	"  Écrivain",
	"  yd",
	"  Aleksi Aubry-Carlson (Aleksi)",
	"  Doug Kaufman (dkaufman)",
	"  Gianmarco Leone (gmlion)",
	"  Jeremy Nicoll (jeremy2/eltiare)",
	"  Joseph G. Toscano (ZhayTee)",
	"  Mattias Westlund (West)",
	"  Ryan Reilly (Rain)",
	"  Timothy Pinkham (TimothyP)",
	_("Maps"),
	"  Battle for Wesnoth Team",
	"  David White (Sirp)",
	"  Dyson Logos", -- The Tomb of Durahn Oakenshield map
	"  Eric S. Raymond (ESR)", -- Northern Rebirth maps and scenarios
	"  GM1530",
	"  John Ericson",
	"  Joseph Simmons (turin)",
	"  Kyran Jackson",
	"  Lari Nieminen (zookeeper)",
	"  Martin McMahon",
	"  Mathieu Roy",
	"  Miguel Farah F.",
	"  Paolo Sammicheli",
	"  Rob Best",
	"  Taurus", -- Northern Rebirth maps and scenarios
	_("Events and Quests"),
	"  Andrettin",
	"  Battle for Wesnoth Team",
	"  Asa Swain",
	"  Joseph Simmons (turin)",
	"  Lari Nieminen (zookeeper)",
	"  Piotr Cychowski (Mist/cycholka)",
	_("Encyclopedia"),
	"  Andrettin",
	"  Battle for Wesnoth Team",
	_("Historical and Mythological Research"),
	"  Andrettin",
	"  b_o",
	"  Galaahd",
	"  Rey",
	_("Translation"),
	"  Dmitry Shamshurin",
	_("Testing"),
	"  Andrettin",
	"  b_o",
	"  cybermind",
	"  Dinomaniak",
	"  Ferk",
	"  Jeff",
	"  João Victor G. Costa (Jinn)",
	"  KPJ",
	"  KroArtem",
	"  Kyran",
	"  Leo",
	"  Little Luigi",
	"  Mladen Milovanović",
	"  paipan",
	"  pirro",
	"  Spfnym",
	"  Szunti",
	"  TaShadan",
	"  X3M",
	"  zenorogue",
	"",
	_("Code used:"),
	"  SDL Copyright by Sam Lantinga",
	"  ZLIB Copyright by Jean-loup Gailly and Mark Adler",
	"  BZ2LIB Copyright by Julian Seward",
	"  PNG Copyright by Glenn Randers-Pehrson",
	"  OGG/Vorbis Copyright by Xiph.org Foundation",
	"  Theora codec Copyright by Xiph.org Foundation.",
	"  Guichan Copyright by Per Larsson and Olof Naessen",
	"  tolua++ Copyright by Codenix",
	"",
	"",
	"The Stratagus Team thanks all the people who have contributed",
	"patches, bug reports, and ideas.",
	"",
	wyrmsun.Name .. " Homepage: ", wyrmsun.Homepage,
	"Stratagus Homepage: ", GetStratagusHomepage(),
	"",
	"",
	"",
	"",
	"",
	"",
	"",
	"",
	"",
	"",
	"",
	"",
  }

  local sw = ScrollingWidget(328, 275)
  menu:add(sw, offx + 140, offy + 80)
  sw:setBackgroundColor(Color(0,0,0,0))
  sw:setActionCallback(function() sw:restart() end)
  for i,f in ipairs(credits) do
    sw:add(Label(f), 0, 24 * (i - 1) + 275)
  end

  menu:addHalfButton(_("~!Continue"), "c", offx + 455, offy + 440,
    function() menu:stop() end)

  local speed = GetGameSpeed()
  SetGameSpeed(30)

  menu:run()

  SetGameSpeed(speed)
  if (wyr.preferences.EnableOAML) then
    SetMusicCondition(10, 0)
  end
end