1 HedgewarsScriptLoad("/Scripts/Locale.lua") |
1 HedgewarsScriptLoad("/Scripts/Locale.lua") |
2 |
2 |
3 isSinglePlayer = true |
3 local isSinglePlayer = true |
4 |
4 |
5 -- trying to allow random theme, but fixed theme objects... |
5 -- trying to allow random theme, but fixed theme objects... |
6 -- Also skip some ugly themes, or ones where the sky is "meh" |
6 -- Also skip some ugly themes, or ones where the sky is "meh" |
7 --local themes = { "Art","Cake","City","EarthRise","Halloween","Olympics","Underwater","Bamboo","Castle","Compost","Eyes","Hell","Planes","Bath","Cave","CrazyMission","Freeway","Island","Sheep","Blox","Cheese","Deepspace","Fruit","Jungle","Snow","Brick","Christmas","Desert","Golf","Nature","Stage" } |
7 --local themes = { "Art","Cake","City","EarthRise","Halloween","Olympics","Underwater","Bamboo","Castle","Compost","Eyes","Hell","Planes","Bath","Cave","CrazyMission","Freeway","Island","Sheep","Blox","Cheese","Deepspace","Fruit","Jungle","Snow","Brick","Christmas","Desert","Golf","Nature","Stage" } |
8 local themes = {"Christmas","Hell","Bamboo","City","Island","Bath","Compost","Jungle","Desert","Nature","Olympics","Brick","EarthRise","Sheep","Cake","Freeway","Snow","Castle","Fruit","Stage","Cave","Golf","Cheese","Halloween"} |
8 local themes = {"Christmas","Hell","Bamboo","City","Island","Bath","Compost","Jungle","Desert","Nature","Olympics","Brick","EarthRise","Sheep","Cake","Freeway","Snow","Castle","Fruit","Stage","Cave","Golf","Cheese","Halloween"} |
|
9 local showWaterStats = true -- uses the AI team to draw water height. |
|
10 local scaleGraph = true |
|
11 local totalHedgehogs = 0 |
|
12 local HH = {} |
|
13 local teams = {} |
|
14 local dummyHog = nil |
|
15 |
9 |
16 |
10 function onGameInit() |
17 function onGameInit() |
11 -- Ensure people get same map for same theme |
18 -- Ensure people get same map for same theme |
12 Theme = themes[GetRandom(#themes)+1] |
19 Theme = themes[GetRandom(#themes)+1] |
13 Seed = ClimbHome |
20 Seed = ClimbHome |
14 TurnTime = 999999999 |
21 TurnTime = 999999999 |
15 EnableGameFlags(gfOneClanMode) |
22 EnableGameFlags(gfOneClanMode) |
16 DisableGameFlags(gfBottomBorder+gfBorder) |
23 DisableGameFlags(gfBottomBorder+gfBorder) |
17 CaseFreq = 0 |
24 CaseFreq = 0 |
18 Explosives = 0 |
25 Explosives = 0 |
|
26 MineDudPercent = 0 |
19 Map = "ClimbHome" |
27 Map = "ClimbHome" |
20 AddTeam(loc("Lonely Hog"), 0xDD0000, "Simple", "Island", "Default") |
28 AddTeam(loc("Lonely Hog"), 0xDD0000, "Simple", "Island", "Default") |
21 player = AddHog(loc("Climber"), 0, 1, "NoHat") |
29 player = AddHog(loc("Climber"), 0, 1, "NoHat") |
22 AddTeam(loc("Water Gods"), 0x4980C1, "Simple", "Island", "Default") |
30 if showWaterStats then |
23 dummyHog = AddHog("Poseidon", 5, 1, "NoHat") |
31 AddTeam(" ", 0x545C9D, "Simple", "Island", "Default") |
24 --HideHog(dummyHog) |
32 elseif scaleGraph then |
|
33 AddTeam(" ", 0x050505, "Simple", "Island", "Default") |
|
34 end |
|
35 if showWaterStats or scaleGraph then |
|
36 dummyHog = AddHog(" ", 0, 1, "NoHat") |
|
37 HH[dummyHog] = nil |
|
38 totalHedgehogs = totalHedgehogs - 1 |
|
39 SendStat(siClanHealth, tostring(32640), " ") |
|
40 end |
25 end |
41 end |