diff -r 447860ec0093 -r 304a83637eb4 share/hedgewars/Data/Maps/FlightJoust/map.lua --- a/share/hedgewars/Data/Maps/FlightJoust/map.lua Sat Aug 07 23:32:43 2010 -0400 +++ b/share/hedgewars/Data/Maps/FlightJoust/map.lua Tue Aug 10 21:57:33 2010 +0200 @@ -1,79 +1,79 @@ -local hogs = {} -local spawncrate = 0 - -function mapM_(func, tbl) - for i,v in pairs(tbl) do - func(v) - end -end - -function map(func, tbl) - local newtbl = {} - for i,v in pairs(tbl) do - newtbl[i] = func(v) - end - return newtbl -end - -function filter(func, tbl) - local newtbl = {} - for i,v in pairs(tbl) do - if func(v) then - table.insert(newtbl, v) - end - end - return newtbl -end - -function onGameInit() - GameFlags = gfSolidLand + gfDivideTeams - TurnTime = 10000 - CaseFreq = 0 - LandAdds = 0 - Explosives = 0 - Delay = 500 - SuddenDeathTurns = 99999 -- "disable" sudden death - Theme = Compost -end - -function onGameStart() - local offset = 50 - local team1hh = filter(function(h) return GetHogClan(h) == 0 end, hogs) - local team2hh = filter(function(h) return GetHogClan(h) == 1 end, hogs) - - for i,h in ipairs(team1hh) do - SetGearPosition(h, 250+(i-1)*offset, 1000) - end - for i,h in ipairs(team2hh) do - SetGearPosition(h, 3500-(i-1)*offset, 1000) - end - - SpawnHealthCrate(1800, 1150) -end - -function onAmmoStoreInit() - SetAmmo(amRCPlane, 9, 0, 0, 0) - SetAmmo(amSkip, 9, 0, 0, 0) -end - -function onGearAdd(gear) - if GetGearType(gear) == gtRCPlane then - SetTimer(gear,60000) - end - if GetGearType(gear) == gtHedgehog then - table.insert(hogs, gear) - end -end - -function onGameTick() - if (TurnTimeLeft == 9999 and spawncrate == 1) then - SpawnHealthCrate(1800, 1150) - spawncrate = 0 - end -end - -function onGearDelete(gear) - if GetGearType(gear) == gtCase then - spawncrate = 1 - end +local hogs = {} +local spawncrate = 0 + +function mapM_(func, tbl) + for i,v in pairs(tbl) do + func(v) + end +end + +function map(func, tbl) + local newtbl = {} + for i,v in pairs(tbl) do + newtbl[i] = func(v) + end + return newtbl +end + +function filter(func, tbl) + local newtbl = {} + for i,v in pairs(tbl) do + if func(v) then + table.insert(newtbl, v) + end + end + return newtbl +end + +function onGameInit() + GameFlags = gfSolidLand + gfDivideTeams + TurnTime = 10000 + CaseFreq = 0 + LandAdds = 0 + Explosives = 0 + Delay = 500 + SuddenDeathTurns = 99999 -- "disable" sudden death + Theme = Compost +end + +function onGameStart() + local offset = 50 + local team1hh = filter(function(h) return GetHogClan(h) == 0 end, hogs) + local team2hh = filter(function(h) return GetHogClan(h) == 1 end, hogs) + + for i,h in ipairs(team1hh) do + SetGearPosition(h, 250+(i-1)*offset, 1000) + end + for i,h in ipairs(team2hh) do + SetGearPosition(h, 3500-(i-1)*offset, 1000) + end + + SpawnHealthCrate(1800, 1150) +end + +function onAmmoStoreInit() + SetAmmo(amRCPlane, 9, 0, 0, 0) + SetAmmo(amSkip, 9, 0, 0, 0) +end + +function onGearAdd(gear) + if GetGearType(gear) == gtRCPlane then + SetTimer(gear,60000) + end + if GetGearType(gear) == gtHedgehog then + table.insert(hogs, gear) + end +end + +function onGameTick() + if (TurnTimeLeft == 9999 and spawncrate == 1) then + SpawnHealthCrate(1800, 1150) + spawncrate = 0 + end +end + +function onGearDelete(gear) + if GetGearType(gear) == gtCase then + spawncrate = 1 + end end \ No newline at end of file