|
1 |
|
2 loadfile(GetDataPath() .. "Scripts/Locale.lua")() |
|
3 |
|
4 local player = nil |
|
5 local enemy = nil |
|
6 local firedShell = false |
|
7 local turnNumber = 0 |
|
8 |
|
9 local hhs = {} |
|
10 local numhhs = 0 |
|
11 |
|
12 function onGameInit() |
|
13 |
|
14 Seed = 0 |
|
15 TurnTime = 20000 |
|
16 CaseFreq = 0 |
|
17 MinesNum = 0 |
|
18 Explosives = 0 |
|
19 Map = "Bamboo" |
|
20 Theme = "Bamboo" |
|
21 |
|
22 AddTeam(loc("Pathetic Resistance"), 14483456, "Simple", "Island", "Default") |
|
23 player = AddHog("Ikeda", 0, 10, "StrawHat") |
|
24 |
|
25 AddTeam(loc("Cybernetic Empire"), 1175851, "Simple", "Island", "Default") |
|
26 enemy = AddHog(loc("Unit 835"), 5, 10, "cyborg") |
|
27 |
|
28 SetGearPosition(player,1166,1680) |
|
29 SetGearPosition(enemy,2848,1443) |
|
30 |
|
31 end |
|
32 |
|
33 |
|
34 function onGameStart() |
|
35 |
|
36 ShowMission(loc("Bamboo Thicket"), loc("User Challenge"), loc("Eliminate the enemy before the time runs out"), -amBazooka, 0) |
|
37 |
|
38 --WEAPON CRATE LIST. WCRATES: 1 |
|
39 SpawnAmmoCrate(1915,1876,amBazooka) |
|
40 --UTILITY CRATE LIST. UCRATES: 2 |
|
41 SpawnUtilityCrate(1986,1141,amBlowTorch) |
|
42 SpawnUtilityCrate(1427,1527,amParachute) |
|
43 |
|
44 AddAmmo(enemy, amGrenade, 100) |
|
45 |
|
46 end |
|
47 |
|
48 function onNewTurn() |
|
49 SetWind(100) |
|
50 turnNumber = turnNumber + 1 |
|
51 end |
|
52 |
|
53 function onAmmoStoreInit() |
|
54 SetAmmo(amSkip, 9, 0, 0, 0) |
|
55 SetAmmo(amGirder, 4, 0, 0, 0) |
|
56 SetAmmo(amBlowTorch, 0, 0, 0, 1) |
|
57 SetAmmo(amParachute, 0, 0, 0, 2) |
|
58 SetAmmo(amBazooka, 0, 0, 0, 2) |
|
59 end |
|
60 |
|
61 |
|
62 function onGearAdd(gear) |
|
63 |
|
64 if GetGearType(gear) == gtHedgehog then |
|
65 hhs[numhhs] = gear |
|
66 numhhs = numhhs + 1 |
|
67 elseif GetGearType(gear) == gtShell then |
|
68 firedShell = true |
|
69 end |
|
70 |
|
71 end |
|
72 |
|
73 function onGearDelete(gear) |
|
74 |
|
75 if (gear == enemy) then |
|
76 |
|
77 ShowMission(loc("Bamboo Thicket"), loc("MISSION SUCCESSFUL"), loc("Congratulations!"), 0, 0) |
|
78 |
|
79 if (turnNumber < 6) and (firedShell == false) then |
|
80 AddCaption(loc("Achievement Unlocked") .. ": " .. loc("Energetic Engineer"),0xffba00ff,capgrpMessage2) |
|
81 end |
|
82 |
|
83 elseif gear == player then |
|
84 ShowMission(loc("Bamboo Thicket"), loc("MISSION FAILED"), loc("Oh no! Just try again!"), -amSkip, 0) |
|
85 end |
|
86 |
|
87 end |