author | unc0rr |
Sat, 14 Nov 2015 17:39:45 +0300 | |
changeset 11385 | ff0fa38bdb18 |
parent 11247 | 1e55e4c5dda0 |
child 12054 | 030464f34d47 |
permissions | -rw-r--r-- |
11015 | 1 |
-- Hedgewars Bazooka Training |
2 |
-- Scripting Example |
|
3 |
||
4 |
-- Lines such as this one are comments - they are ignored |
|
5 |
-- by the game, no matter what kind of text is in there. |
|
6 |
-- It's also possible to place a comment after some real |
|
7 |
-- instruction as you see below. In short, everything |
|
8 |
-- following "--" is ignored. |
|
9 |
||
10 |
--------------------------------------------------------------- |
|
11 |
-- At first we implement the localization library using loadfile. |
|
12 |
-- This allows us to localize strings without needing to think |
|
13 |
-- about translations. |
|
14 |
-- We can use the function loc(text) to localize a string. |
|
15 |
||
16 |
HedgewarsScriptLoad("/Scripts/Locale.lua") |
|
17 |
||
18 |
-- This variable will hold the number of destroyed targets. |
|
19 |
local score = 0 |
|
20 |
-- This variable represents the number of targets to destroy. |
|
21 |
local score_goal = 5 |
|
22 |
-- This variable controls how many milliseconds/ticks we'd |
|
23 |
-- like to wait before we end the round once all targets |
|
24 |
-- have been destroyed. |
|
25 |
local end_timer = 1000 -- 1000 ms = 1 s |
|
26 |
-- This variable is set to true if the game is lost (i.e. |
|
27 |
-- time runs out). |
|
28 |
local game_lost = false |
|
29 |
-- This variable will point to the hog's gear |
|
30 |
local player = nil |
|
31 |
-- This variable will grab the time left at the end of the round |
|
32 |
local time_goal = 0 |
|
33 |
-- This variable stores the number of bazooka shots |
|
34 |
local shots = 0 |
|
35 |
||
36 |
-- This is a custom function to make it easier to |
|
37 |
-- spawn more targets with just one line of code |
|
38 |
-- You may define as many custom functions as you |
|
39 |
-- like. |
|
40 |
function spawnTarget() |
|
41 |
-- add a new target gear |
|
42 |
gear = AddGear(0, 0, gtTarget, 0, 0, 0, 0) |
|
43 |
||
44 |
-- move it to a random position within 0 and |
|
45 |
-- LAND_WIDTH - the width of the map |
|
46 |
FindPlace(gear, true, 0, LAND_WIDTH) |
|
47 |
||
48 |
-- move the target to a higher vertical position |
|
49 |
-- to ensure it's not somewhere down below |
|
50 |
x, y = GetGearPosition(gear) |
|
51 |
SetGearPosition(gear, x, 0) |
|
52 |
end |
|
53 |
||
54 |
-- This function is called before the game loads its |
|
55 |
-- resources. |
|
56 |
-- It's one of the predefined function names that will |
|
57 |
-- be called by the game. They give you entry points |
|
58 |
-- where you're able to call your own code using either |
|
59 |
-- provided instructions or custom functions. |
|
60 |
function onGameInit() |
|
61 |
-- At first we have to overwrite/set some global variables |
|
62 |
-- that define the map, the game has to load, as well as |
|
63 |
-- other things such as the game rules to use, etc. |
|
64 |
-- Things we don't modify here will use their default values. |
|
65 |
||
66 |
-- The base number for the random number generator |
|
67 |
Seed = 1 |
|
68 |
-- Game settings and rules |
|
69 |
EnableGameFlags(gfMultiWeapon, gfOneClanMode, gfSolidLand) |
|
70 |
-- Uncommenting this wouldn't do anything |
|
71 |
--EnableGameFlags(gfMultiWeapon, gfOneClanMode, gfSolidLand) |
|
72 |
-- Neither this |
|
73 |
--DisableGameFlags(gfArtillery) |
|
74 |
-- Uncommenting this would make the terrain damageable |
|
75 |
--DisableGameFlags(gfSolidLand) |
|
76 |
-- Uncommenting this would remove all flags set previously |
|
77 |
--ClearGameFlags() |
|
78 |
-- The time the player has to move each round (in ms) |
|
79 |
TurnTime = 60000 |
|
80 |
-- The frequency of crate drops |
|
81 |
CaseFreq = 0 |
|
82 |
-- The number of mines being placed |
|
83 |
MinesNum = 0 |
|
84 |
-- The number of explosives being placed |
|
85 |
Explosives = 0 |
|
86 |
-- The delay between each round |
|
87 |
Delay = 0 |
|
88 |
-- The map to be played |
|
89 |
Map = "Bamboo" |
|
90 |
-- The theme to be used |
|
91 |
Theme = "Bamboo" |
|
92 |
||
93 |
-- Create the player team |
|
94 |
AddTeam(loc("'Zooka Team"), 14483456, "Simple", "Island", "Default") |
|
95 |
-- And add a hog to it |
|
96 |
player = AddHog(loc("Hunter"), 0, 1, "NoHat") |
|
97 |
SetGearPosition(player, 936, 136) |
|
98 |
end |
|
99 |
||
100 |
-- This function is called when the round starts |
|
101 |
-- it spawns the first target that has to be destroyed. |
|
102 |
-- In addition it shows the scenario goal(s). |
|
103 |
function onGameStart() |
|
104 |
-- Disable the graph in the stats screen, we don't need it |
|
105 |
SendHealthStatsOff() |
|
106 |
-- Spawn the first target. |
|
107 |
spawnTarget() |
|
108 |
||
109 |
-- Show some nice mission goals. |
|
110 |
-- Parameters are: caption, sub caption, description, |
|
111 |
-- extra text, icon and time to show. |
|
112 |
-- A negative icon parameter (-n) represents the n-th weapon icon |
|
113 |
-- A positive icon paramter (n) represents the (n+1)-th mission icon |
|
114 |
-- A timeframe of 0 is replaced with the default time to show. |
|
115 |
ShowMission(loc("Bazooka Training"), loc("Aiming Practice"), loc("Eliminate all targets before your time runs out.|You have unlimited ammo for this mission."), -amBazooka, 0) |
|
116 |
end |
|
117 |
||
118 |
function onNewTurn() |
|
119 |
SetWeapon(amBazooka) |
|
120 |
end |
|
121 |
||
122 |
-- This function is called every game tick. |
|
123 |
-- Note that there are 1000 ticks within one second. |
|
124 |
-- You shouldn't try to calculate too complicated |
|
125 |
-- code here as this might slow down your game. |
|
126 |
function onGameTick20() |
|
127 |
-- If time's up, set the game to be lost. |
|
128 |
-- We actually check the time to be "1 ms" as it |
|
129 |
-- will be at "0 ms" right at the start of the game. |
|
130 |
if TurnTimeLeft < 40 and TurnTimeLeft > 0 and score < score_goal and not game_lost then |
|
131 |
game_lost = true |
|
132 |
-- ... and show a short message. |
|
133 |
ShowMission(loc("Bazooka Training"), loc("Aiming Practice"), loc("Oh no! Time's up! Just try again."), -amSkip, 0) |
|
134 |
-- How about killing our poor hog due to his poor performance? |
|
135 |
SetHealth(player, 0) |
|
136 |
-- Just to be sure set the goal time to 1 ms |
|
137 |
time_goal = 1 |
|
138 |
end |
|
139 |
||
140 |
if band(GetState(player), gstDrowning) == gstDrowning and game_lost == false and score < score_goal then |
|
141 |
game_lost = true |
|
142 |
time_goal = 1 |
|
143 |
AddCaption(loc("You lose!"), 0xFFFFFFFF, capgrpGameState) |
|
11247
1e55e4c5dda0
- Partial rus localization for User Missions and Basic Trainings in ru.lua
antonc27 <antonc27@mail.ru>
parents:
11015
diff
changeset
|
144 |
ShowMission(loc("Bazooka Training"), loc("Aiming Practice"), loc("Oh no! You failed! Just try again."), -amSkip, 0) |
11015 | 145 |
end |
146 |
||
147 |
-- If the goal is reached or we've lost ... |
|
148 |
if score == score_goal or game_lost then |
|
149 |
-- ... check to see if the time we'd like to |
|
150 |
-- wait has passed and then ... |
|
151 |
if end_timer == 0 then |
|
152 |
-- Let’s create some stats for the stats screen! |
|
153 |
-- We will expose the number of hit targets hit, launched bazooka and the accuracy |
|
154 |
||
155 |
SendStat(siPointType, loc("hits")) |
|
156 |
SendStat(siPlayerKills, tostring(score), loc("'Zooka Team")) |
|
157 |
SendStat(siCustomAchievement, string.format(loc("You have destroyed %d of %d targets."), score, score_goal)) |
|
158 |
SendStat(siCustomAchievement, string.format(loc("You have launched %d bazookas."), shots)) |
|
159 |
||
160 |
-- We must avoid a division by zero |
|
161 |
if(shots > 0) then |
|
162 |
SendStat(siCustomAchievement, string.format(loc("Your accuracy was %.1f%%."), (score/shots)*100)) |
|
163 |
end |
|
164 |
if score == score_goal then |
|
11247
1e55e4c5dda0
- Partial rus localization for User Missions and Basic Trainings in ru.lua
antonc27 <antonc27@mail.ru>
parents:
11015
diff
changeset
|
165 |
SendStat(siGameResult, loc("You have finished the bazooka training!")) |
11015 | 166 |
SendStat(siCustomAchievement, string.format(loc("%.1f seconds were remaining."), (time_goal/1000), math.ceil(time_goal/12))) |
167 |
end |
|
168 |
if game_lost then |
|
11247
1e55e4c5dda0
- Partial rus localization for User Missions and Basic Trainings in ru.lua
antonc27 <antonc27@mail.ru>
parents:
11015
diff
changeset
|
169 |
SendStat(siGameResult, loc("You lose!")) |
11015 | 170 |
end |
171 |
||
172 |
-- Finally we end the game ... |
|
173 |
EndGame() |
|
174 |
else |
|
175 |
-- ... or just lower the timer by 20ms. |
|
176 |
-- Reset the time left to stop the timer |
|
177 |
TurnTimeLeft = time_goal |
|
178 |
end |
|
179 |
end_timer = end_timer - 20 |
|
180 |
end |
|
181 |
end |
|
182 |
||
183 |
-- This function is called when the game is initialized |
|
184 |
-- to request the available ammo and probabilities |
|
185 |
function onAmmoStoreInit() |
|
186 |
-- add an unlimited supply of bazooka ammo |
|
187 |
SetAmmo(amBazooka, 9, 0, 0, 0) |
|
188 |
end |
|
189 |
||
190 |
-- This function is called when a new gear is added. |
|
191 |
-- We don't need it for this training, so we can |
|
192 |
-- keep it empty. |
|
193 |
-- function onGearAdd(gear) |
|
194 |
-- end |
|
195 |
||
196 |
-- This function is called before a gear is destroyed. |
|
197 |
-- We use it to count the number of targets destroyed. |
|
198 |
function onGearDelete(gear) |
|
199 |
-- We're only interested in target gears. |
|
200 |
if GetGearType(gear) == gtTarget then |
|
201 |
-- Add one point to our score/counter |
|
202 |
score = score + 1 |
|
203 |
-- If we haven't reached the goal ... |
|
204 |
if score < score_goal then |
|
205 |
-- ... spawn another target. |
|
206 |
spawnTarget() |
|
207 |
else |
|
208 |
if not game_lost then |
|
209 |
-- Otherwise show that the goal was accomplished |
|
210 |
ShowMission(loc("Bazooka Training"), loc("Aiming Practice"), loc("Congratulations! You've eliminated all targets|within the allowed time frame."), 0, 0) |
|
211 |
-- Also let the hogs shout "victory!" |
|
212 |
PlaySound(sndVictory) |
|
213 |
-- Save the time left so we may keep it. |
|
214 |
time_goal = TurnTimeLeft |
|
215 |
end |
|
216 |
end |
|
217 |
end |
|
218 |
end |
|
219 |
||
220 |
-- This function is called when a gear has been damaged. |
|
221 |
-- We only use it to determine wheather our hog took damage in order to abort the mission. |
|
222 |
function onGearDamage(gear, damage) |
|
223 |
if GetGearType(gear) == gtHedgehog then |
|
224 |
if not game_lost then |
|
225 |
game_lost = true |
|
226 |
AddCaption(loc("You lose!", 0xFFFFFFFF, capgrpGameState)) |
|
11247
1e55e4c5dda0
- Partial rus localization for User Missions and Basic Trainings in ru.lua
antonc27 <antonc27@mail.ru>
parents:
11015
diff
changeset
|
227 |
ShowMission(loc("Bazooka Training") , loc("Aiming Practice"), loc("Oh no! You failed! Just try again."), -amSkip, 0) |
11015 | 228 |
|
229 |
time_goal = 1 |
|
230 |
end |
|
231 |
end |
|
232 |
end |
|
233 |
||
234 |
||
235 |
-- This function is called after a gear is added. |
|
236 |
-- We use it to count the number of bazooka shots. |
|
237 |
function onGearAdd(gear) |
|
238 |
-- Count the number of bazooka shots for our stats |
|
239 |
if GetGearType(gear) == gtShell then |
|
240 |
shots = shots + 1 |
|
241 |
end |
|
242 |
end |