1 |
|
2 HedgewarsScriptLoad("/Scripts/Locale.lua") |
|
3 |
|
4 local player = nil |
|
5 local enemy = nil |
|
6 local failed = false |
|
7 |
|
8 local hhs = {} |
|
9 local numhhs = 0 |
|
10 |
|
11 function onGameInit() |
|
12 |
|
13 Seed = 0 |
|
14 TurnTime = 60000 |
|
15 CaseFreq = 0 |
|
16 MinesTime = 1000 |
|
17 SuddenDeathTurns = 999999 |
|
18 HealthCaseProb = 35 |
|
19 Explosives = 0 |
|
20 MinesNum = 0 |
|
21 Map = "Hammock" |
|
22 Theme = "Nature" |
|
23 |
|
24 AddTeam(loc("Pathetic Resistance"), 14483456, "Simple", "Island", "Default") |
|
25 player = AddHog(loc("Ikeda"), 0, 48, "StrawHat") |
|
26 |
|
27 AddTeam(loc("Cybernetic Empire"), 1175851, "Simple", "Island", "Default") |
|
28 enemy = AddHog(loc("Unit") .. " 811", 1, 100, "cyborg1") |
|
29 |
|
30 SetGearPosition(player,430,1540) |
|
31 SetGearPosition(enemy,1464,1960) |
|
32 |
|
33 end |
|
34 |
|
35 |
|
36 function onGameStart() |
|
37 |
|
38 AddAmmo(enemy, amShotgun, 100) |
|
39 AddAmmo(enemy, amFirePunch, 100) |
|
40 |
|
41 --GIRDER LIST. |
|
42 PlaceGirder(1073,2009,0) |
|
43 PlaceGirder(524,1487,3) |
|
44 PlaceGirder(638,1453,4) |
|
45 PlaceGirder(761,1453,0) |
|
46 PlaceGirder(840,1421,3) |
|
47 PlaceGirder(302,1388,6) |
|
48 PlaceGirder(327,1506,1) |
|
49 PlaceGirder(1669,1832,3) |
|
50 --MINE LIST. |
|
51 AddGear(1056,1987,gtMine, 0, 0, 0, 0) |
|
52 AddGear(1086,1988,gtMine, 0, 0, 0, 0) |
|
53 --STICKY MINE LIST. |
|
54 AddGear(1089,965,gtSMine, 0, 0, 0, 0) |
|
55 AddGear(1133,945,gtSMine, 0, 0, 0, 0) |
|
56 AddGear(1010,1081,gtSMine, 0, 0, 0, 0) |
|
57 AddGear(1036,1049,gtSMine, 0, 0, 0, 0) |
|
58 AddGear(1057,1004,gtSMine, 0, 0, 0, 0) |
|
59 AddGear(784,1252,gtSMine, 0, 0, 0, 0) |
|
60 AddGear(841,1257,gtSMine, 0, 0, 0, 0) |
|
61 AddGear(902,1263,gtSMine, 0, 0, 0, 0) |
|
62 AddGear(952,1281,gtSMine, 0, 0, 0, 0) |
|
63 AddGear(517,1546,gtSMine, 0, 0, 0, 0) |
|
64 AddGear(559,1597,gtSMine, 0, 0, 0, 0) |
|
65 AddGear(613,1650,gtSMine, 0, 0, 0, 0) |
|
66 AddGear(674,1705,gtSMine, 0, 0, 0, 0) |
|
67 AddGear(746,1692,gtSMine, 0, 0, 0, 0) |
|
68 AddGear(810,1692,gtSMine, 0, 0, 0, 0) |
|
69 AddGear(872,1673,gtSMine, 0, 0, 0, 0) |
|
70 AddGear(933,1666,gtSMine, 0, 0, 0, 0) |
|
71 AddGear(981,1662,gtSMine, 0, 0, 0, 0) |
|
72 AddGear(1016,1634,gtSMine, 0, 0, 0, 0) |
|
73 AddGear(1063,1595,gtSMine, 0, 0, 0, 0) |
|
74 AddGear(1100,1574,gtSMine, 0, 0, 0, 0) |
|
75 AddGear(1002,1461,gtSMine, 0, 0, 0, 0) |
|
76 AddGear(1052,1438,gtSMine, 0, 0, 0, 0) |
|
77 AddGear(1102,1464,gtSMine, 0, 0, 0, 0) |
|
78 --WEAPON CRATE LIST. |
|
79 SpawnAmmoCrate(1565,642,amSineGun) |
|
80 SpawnAmmoCrate(548,858,amBazooka) |
|
81 --UTILITY CRATE LIST. |
|
82 SpawnUtilityCrate(479,847,amJetpack) |
|
83 SpawnUtilityCrate(1550,1715,amBlowTorch) |
|
84 SpawnUtilityCrate(1227,1941,amJetpack) |
|
85 SpawnUtilityCrate(1070,1964,amInvulnerable) |
|
86 SpawnUtilityCrate(1070,1875,amTeleport) |
|
87 --HOG POSITION LIST. |
|
88 if hhs[0] ~= nil then |
|
89 SetGearPosition(hhs[0],397,865) |
|
90 end |
|
91 if hhs[1] ~= nil then |
|
92 SetGearPosition(hhs[1],561,1365) |
|
93 end |
|
94 |
|
95 ShowMission(loc("Newton's Hammock"), loc("User Challenge"), loc("Eliminate the enemy before the time runs out"), -amParachute, 0) |
|
96 |
|
97 end |
|
98 |
|
99 function onAmmoStoreInit() |
|
100 SetAmmo(amSkip, 9, 0, 0, 1) |
|
101 SetAmmo(amBazooka, 0, 0, 0, 1) |
|
102 SetAmmo(amJetpack, 0, 0, 0, 1) |
|
103 SetAmmo(amTeleport, 0, 0, 0, 1) |
|
104 SetAmmo(amSineGun, 0, 0, 0, 1) |
|
105 SetAmmo(amInvulnerable, 0, 0, 0, 1) |
|
106 SetAmmo(amBlowTorch, 0, 0, 0, 1) |
|
107 end |
|
108 |
|
109 function onGearDamage(gear, damage) |
|
110 if (gear == player) and (damage >= 48) then |
|
111 failed = true |
|
112 end |
|
113 end |
|
114 |
|
115 function onGearAdd(gear) |
|
116 |
|
117 if GetGearType(gear) == gtHedgehog then |
|
118 hhs[numhhs] = gear |
|
119 numhhs = numhhs + 1 |
|
120 end |
|
121 |
|
122 end |
|
123 |
|
124 function onGearDelete(gear) |
|
125 |
|
126 if (gear == enemy) and (failed == false) then |
|
127 ShowMission(loc("Newton's Hammock"), loc("MISSION SUCCESSFUL"), loc("Congratulations!"), 0, 0) |
|
128 elseif gear == player then |
|
129 ShowMission(loc("Newton's Hammock"), loc("MISSION FAILED"), loc("Oh no! Just try again!"), -amSkip, 0) |
|
130 end |
|
131 |
|
132 end |
|