-- WALL TO WALL 0.7

--0.5

----------------

-- Support for multiple sets of walls per map (instead of “all or nothing”)

-- Ropes, ShoppaKing, ShoppaHell and ShoppaNeon can now be played with the classic left and right walls

-- New wall sets for Ropes, ShoppaNeon, ShoppaDesert, ShoppaWild, ShoppaKing and ShoppaHell, and more.

-- Basic support for a bunch of Shoppa maps

-- Alternative configuration method with Script parameter

-- Possible to set max. number of weapons in game (script parameter only)

-- Possible to set number of crates per turn

-- Menu can be disabled (with script parameter) for insant game start

-- WxW is now fully functional even without a map border.

-- WxW now allows for almost all game modifiers and game settings to be changed

-- More sound effects

-- No smoke when hog is near near a WxW wall but Walls Before Crate rule is not in place

-- More readable mission display after configuration has been accepted

-- Hide “Surf Before Crate” setting if surfing is disabled for this map, or the bottom is active and water never rises

-- Hide walls setting if script does not provide walls for map yet

-- Bugfix: Other player was able to change the menu config in the short period before the first "turn"

-- Lots of refactoring

----------------

--0.6

----------------

-- Bugfix: 2 crates spawned at the 1st turn if script parameter was set to “menu=false, walls=none” or similar

-- Bugfix: Annoying faulty error message appeared when hitting attack when on a rope with a weapon selected

----------------

--0.7

----------------

-- To enforce the rules more strictly, all crates will be frozen at turn start if WBC or SBC rule is in place.

--	The crates are unfrozen if you met the crate criteria (that is, surfed and/or bounced off all walls).

--      Frozen crates can't be collected and appear as small white dots in the radar.

-- Add support for the “Crate Before Attack” rule

-- Add support for the “All But Last” rule

-- Add support for the “Kill The Leader” rule

-- Allow toggling crate radar with “switch hog” key while roping

-- The game continues now with the first team after the menu has been closed (rather than the second team)

----------------

--TODO

--[[

# CONFIGURATION

By default, this script is easily configured via the in-game menu. The player of the first team can choose the rules and

required walls (or none at all). After accepted, the game will start with the second team (!).

= SCRIPT PARAMETER =

Using the script parameter is optional, it mostly is just an alternative way for configuration and for convenience

reasons, so often-used configurations can be saved and loaded.

The script parameter is specified as a comma-sperated list of “key=value” pairs (see examples below).

Truth values can be set true or false, and numeric values always use a whole number.

== Basic parameters ==

key		default	description

----------------------------------------

menu		true	Show configuration menu at the beginning. If no menu is used, a random wall set is used (see wall filters below)

SBC		false	Surf Before Crate: Player must bounce off the water (“surfing”) before crates can be collected

AFR		false	Attack From Rope: Players must attack from the rope. Weapons which can't be fired from rope are removed

CBA		false	Crate Before Attack: Player must collect at least one crate before attacking

attackrule	off	If present, enable one of the attack rules “ABL” or “KTL”:

			ABL: All But Last: Players must not only attack the team with the lowest total health

			KTL: Kill The Leader: If players hit some enemy hedgehog, at least one of them must be a hog from

			the team with the highest total health.

			The ABL and KTL rules exclude each other. If a player breaks the rule (if enabled), he must

			skip in the next round.

SW		false	Super Weapons: A few crates may contain very powerful weapons (melon, hellish grenade, RC plane, ballgun)

maxcrates	12	Number of crates which can be at maximum in the game (limited to up to 100 to avoid lag)

cratesperturn	1	Number of crates which appear each turn

== Advanced parameters ==

Wall filters: The following parameters allow you to filter out wall sets based on their type and number of walls.

If this is used together with the menu, the filtered wall sets can't be selected. Without a menu, the wall set

will be randomly selected among the wall sets that meet all criteria.

If the criteria filter out all available wall sets of the map, the game is played without the Walls Before Crate rule.

parameter	default	description

----------------------------------------

walls		N/A	

Permitted values:

- leftright:		The left and right part of the border. Traditional W2W-style.

- roof:			Only the top part of the border

- leftrightroof:	Combination of the two above

- inside:		Map-specific wall set where all walls are part of the terrain

- mixed:		Map-specific wall set where some walls are part of the terrain, and some are part of the map border

- none:			No walls required.

- all:			Shorthand: All wall sets are allowed.

Combination of multiple types is possible by concatenating the names with plus signs (see examples below).

Restrict wall numbers: With the following parameters you can restrict the pool of wall sets to only those with a certain

number of walls. Note that 2 walls are the most common type of wall set, as this is often available by default.

parameter	default	description

----------------------------------------

minwalls	N/A	Filter out wall sets with less than this

maxwalls	N/A	Filter out wall sets with more than this

wallsnum	N/A	Shorthand: Combintion of minwalls and maxwalls if they are the equal.

== Examples ==

SBC=true

--> Keep the menu, enable Surf Before Crate by default (if available).

SBC=true, menu=false

--> Enable Surf Before Crate (if available) and use the defaul walls set.

AFR=true, menu=false, wallsnum=2

--> Attack From Rope rule active, and use a random wall set with 2 walls

menu=false, walls=leftright

--> Always use the classic left/right wall set automatically. Traditional W2W-style.

walls=none, menu=false

--> Like classic Shoppa

walls=leftright+inside+mixed, menu=false

--> Randomly use either the left/right wall set, an Inside or Mixed wall set.

= MORE GAME SCHEME CONFIGURATION =

You can almost set everything in the game scheme freely, and the script will work just fine together with it.

Feel free to experiment a bit.

The only exception are the crate frequencies. Setting them has no effect, crates are handled uniquiely in this game.

At this stage, the script does not allow for custom weapon sets.

]]

HedgewarsScriptLoad("/Scripts/Params.lua")

-- HARDCODED values

local ammoTypesNum = 58	-- number of weapon types (permanent TODO: Check this number for each Hedgewars version)

local PlacementTime = 15000

-- menu stuff

--[[ WxW preparation phase.

0 = Game not started yet

1 = Configuration phase

2 = Hedgehog placement phase

100 = Game phase

]]

-- Used to select one of the wall sets

-- 0: no walls

-- 1 and above: ID of wall sets

local wallSetID = 0

-- Store the wall sets here

local wallSets = {}

-- Wall set types and wall number limits for filtering

local allWallSetTypes = {"roof", "leftright", "leftrightroof", "mixed", "inside"}

local allowedWallSetTypes = {roof=true, leftright=true, leftrightroof=true, mixed=true, inside=true}

local minWalls, maxWalls = nil, nil

local useMenu = true

local AFR = false		-- Attack From Rope

local WBC = true		-- Wall(s) Before Crate, will later only be set again in script parameter

local CBA = false		-- Crate Before Attack

local attackRule = nil		-- Either nil, "KTL" (Kill The Leader) or "ABL" (All But Last)

local allowCrazyWeps = false	-- Super weapons

local requireSurfer = false	-- Surf Before Crate

local crateSpawned = false	-- Has the crate (or crates) been spawned in this turn yet?

local cratesPerTurn = 1		-- How many crates appear per turn (respects crate limit)

local maxCrates = 12		-- default crate limit, can be configured with params

local maxCratesHard = 100	-- "hard" crate limit, to avoid extreme lagging due to many crates

local crateGearsInGame = 0

local crateCollected = false

-- ABL and KTL stuff

local teamNames = {}		-- List of all teams

local teamsAttacked = {}	-- List of attacked teams (in this turn)

local lastTeam = nil		-- Team with the least health. Determined only at start of turn. If it's a tie, use nil.

local leaderTeam = nil		-- Team with the most health. Determined only at start of turn. If it's a tie, use nil.

local runnerUpTeam = nil	-- Team with the second-most health

local previousTeam = nil	-- Remember the name of the team in the previous turn

local crates = {}

-- Variables for place hedgehogs mode

local hogCount = 0		-- Used to detect the end of the hog placement phase

local turnsCount = 0

-- Set the initial radar mode here

-- 0: Radar is always active

-- 1: Radar is only active shortly after crate spawn

-- 2: Radar is disabled

local radarMode = 0

				amRCPlane, amSniperRifle, amBirdy, amBlowTorch,

				amFlamethrower, amMortar, amHammer}

				amWatermelon, amHellishBomb, amDrill, amMolotov,

				amSMine, amGasBomb}

local msgColorTech = 0xFFBA00FF

local msgColorWarn = 0xFF4000FF

	--name,					surfer, roof, 	LRwalls

	{"Alien",				true, 	true,  true},

	{"Atlantis Shoppa",			true, 	true,  true},

	{"BasketballField",			false,  false, false},

	{"BattleCity_v1",			true,	true, true},

	{"BIGshoppa",				true,	true, true},

	{"BambooPlinko",			true,	false, true},

	{"BoatWxW",				true,	true,  true},

	{"BrickShoppa",				false, 	false, true},

	{"BubbleFlow",				true, 	false, true},

	{"Citrouille",				true, 	true,  true},

	{"Cave",				false, 	false, true},

	{"Cheese_Ropes", 			false, 	true,  true},

	{"CookieShoppa", 			true, 	false, true},

	{"CrossRopes",				false,	false, true},

	{"FutuShoppa",				true,	false, true},

	{"Garden",				false,	false, true},

	{"Glass Shoppa",			true, 	false, true},

	{"GlassShoppa2",			true, 	false, true},

	{"HardIce",      			false, 	false, true},

	{"Industrial",       			false,	false, true},

	{"Islands",       			true, 	false, true},

	{"IslandsFlipped",     			true, 	false, true},

	{"IslandsRearranged",  			true, 	false, true},

	{"Hedgelove",       			true, 	false, true},

	{"HellishRopes",       			false, 	false, true},

	{"Hedgeland_v1",			true,	false, true},

	{"HeyLandShoppa",			false,	false, true},

	{"NeonStyle",       			false, 	false, true},

	{"MaskedRopes",       			false, 	false, true},

	{"Octorama",       			false, 	false, true},

	{"red vs blue - True Shoppa Sky",	true,	false, true},

	{"Ropes",       			false, 	false, true},

	{"RopeLikeAKingInHellWithNeon",		false, 	true,  true},

	{"Ropes Flipped",      			false, 	false, true},

	{"Ropes Rearranged",      		false, 	false, true},

	{"RopesThree",      			false, 	false, true},

	{"RopesTwo",      			false, 	false, true},

	{"Ruler",	      			false, 	false, true},

	{"SandShoppa",				false,	false, true},

	{"ShapeShoppa1.0",     			true, 	false, true},

	{"ShapeShoppa Darkhow",      		true, 	false, true},

	{"SheepyShoppa_v2",      		true, 	false, true},

	{"shopppa",				false,  true,  true},

	{"ShoppaCave2",      			true, 	false, true},

	{"ShoppaChallenge",    			false, 	true, true},

	{"ShoppaDesert",    			false, 	false, true},

	{"ShoppaEvoRope_v1",			true, 	false, true},

	{"ShoppaFun",      			true, 	false, true},

	{"ShoppaFun2",      			true, 	false, true},

	{"ShoppaGolf",      			false, 	false, true},

	{"ShoppaHalloween",    			false, 	false, true},

	{"ShoppaHell",      			false,	true,  false},

	{"ShoppaHellFlipped",  			true,	true,  false},

	{"ShoppaHellRemake",			false,	true,  false},

	{"ShoppaKing",       			false, 	true, false},

	{"ShoppaKingFlipped",      		true, 	false, false},

	{"ShoppaKingSideways",      		true, 	true,  false},

	{"ShoppaMeme",				false,	true, false},

	{"ShoppaNeon",       			false, 	false, true},

	{"ShoppaNeonFlipped",			true, 	false, true},

	{"ShoppaOnePiece2",			false, 	true, false},

	{"ShoppaQuotes2",			false,  true,  true},

	{"ShoppaRainbow",			false,  false, false},

	{"ShoppaRadigme",			false,  true,  true},

	{"ShoppaSilhouette",			false,  false, true},

	{"ShoppaSpace",				true,   false, true},

	{"ShoppaSea",				true,  false, false},

	{"ShoppaShapex_v1",			false,  true, true},

	{"ShoppaSparkle",			true,  true, true},

	{"ShoppaSky",				false,  false, true},

	{"ShoppaSky2",				true,  false, true},

	{"ShoppaSsion",				false,  false, true},

	{"ShoppaStyle2",			true,  false, true},

	{"ShoppaThology",			false,  false, true},

	{"ShoppaTournament2012",		false,  false, true},

	{"ShoppaWild",				false,  false, true},

	{"Shoppawall",				false,  false, false},

	{"ShoppaWall2",				false,  false, false},

	{"ShBall",				false,  true, false},

	{"ShHell",				false,  true, false},

	{"ShNeon",       			false, 	false, true},

	{"ShoppaSky",       			false, 	false, true},

	{"SloppyShoppa",       			false, 	true,  true},

	{"SloppyShoppa2",      			false, 	true,  true},

	{"SkatePark",       			false, 	true,  true},

	{"Snow_Ropes",       			false, 	true, false},

	{"Sticks",       			true, 	false, true},

	{"Symmetrical Ropes",       		false, 	false, true},

	{"SpartanShoppa",       		false, 	true,  true},

	{"Tetris",       			false, 	false, true},

	{"TransRopes2",      			false, 	false, true},

	{"TRBShoppa",      			false, 	false, true},

	{"TrickyShoppa",      			false, 	true, false},

	{"Wildmap",      			false, 	false, true},

	{"Winter Shoppa",      			false, 	false, true},

	{"WarShoppa",      			false, 	true,  true},

	{"2Cshoppa",      			true, 	false, true},

local Ropes_WallSet = {

	{ add="none", {299,932,20,856}, {4056,0,30,1788} },

	{ add="none", {299,109,20,779}, {4056,0,30,1788} },

	{ add="none", {299,109,20,779}, {299,932,20,856}, {4056,0,30,1788} },

	{ add="default", {2253,326,20,574}, {3280,326,33,253}, needsborder=false },

	{ add="roof", {2322,326,457,20} },

	{ add="default", {1092,934,54,262}, {2822,323,33,137}, needsborder=false },

	{ add="none", {203,1193,20,595}, {3280,326,20,253}, needsborder=false },

}

local Shoppawall_WallSet = {

	{ add="none", {80+290,61+878,20,1018}, {3433+290,61+878,20,1018}, default=true, needsborder=false },

}

-- List of map with special wall settings

local SpecialMapList = {

	["Ropes"] = Ropes_WallSet,

	["HellishRopes"] = Ropes_WallSet,

	["MaskedRopes"] = Ropes_WallSet,

	["TransRopes2"] = Ropes_WallSet,

	["ShoppaKing"] = {

		{ add="none", {3777,1520,50,196}, {1658,338,46,670}, needsborder=false },

		{ add="none", {125,0,30,2048}, {4066,515,30,1528}, default=true},

	},

	["ShoppaHell"] = {

		{ add="none", {3491,697,30,1150}, {0,0,30,1847}, default=true},

		{ add="none", {3810,0,30,1616}, {0,0,30,1847}, },

		{ add="none", {2045,832,20,260}, {2107,832,20,260}, needsborder=false },

		{ add="default", {2035,831,30,263}, {3968,1668,31,383}, needsborder=false },

	},

	["ShoppaNeon"] = {

		{ add="default", {980,400,20,300}, {1940,400,20,300}, {3088,565,26,284}, {187,270,28,266}, needsborder=false },

	},

	["Shoppawall"] = Shoppawall_WallSet,

	["ShoppaWall2"] = Shoppawall_WallSet,

	["ShoppaDesert"] = {

		{ add="none", {2322,349,20,471}, {295,93,24,1479}, needsborder=false },

		{ add="none", {3001,1535,20,232}, {2264,349,20,495},{716,696,20,119}, needsborder=false },

		{ add="leftright", {209,656,20,367},{2810,838,20,96}, needsborder=false},

		{ add="none", {2649,0,445,20}, {2322,349,947,20},{299,696,381,20}},

	},

	["ShoppaOnePiece2"] = {

		{ add="default", {42,0,20,2048}, {4048,0,20,2048}, needsborder=false, },

		{ add="default", {42,0,20,2048}, {3852,273,20,1637}, needsborder=false, default="noborder" },

	},

	["ShoppaWild"] = {

		{ add="default", {2123,1365,20,293}, {3102,1365,20,293}, {1215,1391,20,291}, needsborder=false },

		{ add="none", {144,167,1904,20}, {2350,167,753,20}, {3793,167,303,20}, needsborder=false},

	},

	["ShoppaRainbow"] = {

		{ add="none", {67+602,61+80,20,1847}, {2779+602,61+80,20,1847}, needsborder=false },

	},

}

function AttackRuleToCfgTxt(attackRule)

	if attackRule == nil then

		return loc("Disabled")

	elseif attackRule == "ABL" then

		return loc("All But Last")

	elseif attackRule == "KTL" then

		return loc("Kill The Leader")

	else

		return "ERROR"

	end

end

function NewWallSet(newWallSet, wType)

	-- Filter out wall sets which are not in allowed categories or have too many or few walls

	if allowedWallSetTypes[wType] == true then

		local inBounds = true

		if minWalls ~= nil and #newWallSet < minWalls then

			inBounds = false

		end

		if maxWalls ~= nil and #newWallSet > maxWalls then

			inBounds = false

		end

		if inBounds then

			table.insert(wallSets, newWallSet)

		end

	end

end