share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/fruit01.lua
author Wuzzy <almikes@aol.com>
Tue, 11 Apr 2017 02:44:59 +0200
changeset 12224 d62d6f8ebef1
parent 12088 1da37e2ba6fd
child 12514 d89dabfd07ce
permissions -rw-r--r--
Disable Sudden Death consistently in all missions which don't require it
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     1
------------------- ABOUT ----------------------
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     2
--
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     3
-- In this adventure hero visits the fruit planet
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     4
-- to search for the missing part. However, a war
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     5
-- has broke out and hero has to take part or leave.
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     6
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
     7
-- NOTES:
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
     8
-- There is an ugly hack out there! I use 2 Captain Limes
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
     9
-- One in human level and one in bot level
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    10
-- I want to have a Captain Lime in human level when the game
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    11
-- begins because in animation if the hog is in bot level skip
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    12
-- doesn't work - onPrecise() isn't triggered
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    13
-- Later I want the hog to take place in the battle in bot level
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    14
-- However if I use SetHogLevel I get an error: Engine bug: AI may break demos playing
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    15
-- So I have 2 hogs, one in bot level and one in hog level that I hide them
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    16
-- or restore them regarding the case
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
    17
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    18
HedgewarsScriptLoad("/Scripts/Locale.lua")
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    19
HedgewarsScriptLoad("/Scripts/Animate.lua")
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
    20
HedgewarsScriptLoad("/Missions/Campaign/A_Space_Adventure/global_functions.lua")
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    21
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    22
----------------- VARIABLES --------------------
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    23
-- globals
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    24
local missionName = loc("Bad timing")
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
    25
local chooseToBattle = false
9498
54bfc44f9554 fixed bug that make hog not able to move
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9496
diff changeset
    26
local previousHog = 0
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
    27
local heroPlayedFirstTurn = false
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
    28
local startBattleCalled = false
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    29
-- dialogs
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    30
local dialog01 = {}
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
    31
local dialog02 = {}
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
    32
local dialog03 = {}
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    33
-- mission objectives
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    34
local goals = {
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
    35
	[dialog01] = {missionName, loc("Ready for Battle?"), loc("Walk left if you want to join Captain Lime or right if you want to decline his offer."), 1, 4000},
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
    36
	[dialog02] = {missionName, loc("Battle Starts Now!"), loc("You have chosen to fight! Lead the Green Bananas to battle and eliminate all the enemies!"), 1, 4000},
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
    37
	[dialog03] = {missionName, loc("Time to run!"), loc("You have chosen to flee ... Unfortunately, the only place where you can launch your saucer is the left-most place on the map."), 1, 4000},
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    38
}
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
    39
-- crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
    40
local crateWMX = 2170
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
    41
local crateWMY = 1950
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
    42
local health1X = 2680
9508
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
    43
local health1Y = 916
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    44
-- hogs
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    45
local hero = {}
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    46
local yellow1 = {}
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    47
local green1 = {}
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    48
local green2 = {}
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    49
local green3 = {}
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    50
local green4 = {}
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    51
local green5 = {}
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    52
-- teams
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    53
local teamA = {}
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    54
local teamB = {}
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    55
local teamC = {}
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    56
local teamD = {}
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    57
-- hedgehogs values
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    58
hero.name = loc("Hog Solo")
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    59
hero.x = 3350
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    60
hero.y = 365
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    61
hero.dead = false
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    62
green1.name = loc("Captain Lime")
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    63
green1.x = 3300
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    64
green1.y = 395
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
    65
green1.dead = false
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    66
green2.name = loc("Mister Pear")
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    67
green2.x = 3600
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    68
green2.y = 1570
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    69
green3.name = loc("Lady Mango")
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    70
green3.x = 2170
9500
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
    71
green3.y = 980
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    72
green4.name = loc("Green Hog Grape")
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    73
green4.x = 2900
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    74
green4.y = 1650
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    75
green5.name = loc("Mr Mango")
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    76
green5.x = 1350
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    77
green5.y = 850
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    78
yellow1.name = loc("General Lemon")
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    79
yellow1.x = 140
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    80
yellow1.y = 1980
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    81
local yellowArmy = {
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    82
	{name = loc("Robert Yellow Apple"), x = 710, y = 1780, health = 100},
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    83
	{name = loc("Summer Squash"), x = 315 , y = 1960, health = 100},
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    84
	{name = loc("Tall Potato"), x = 830 , y = 1748, health = 80},
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    85
	{name = loc("Yellow Pepper"), x = 2160 , y = 820, health = 60},
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    86
	{name = loc("Corn"), x = 1320 , y = 740, health = 60},
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    87
	{name = loc("Max Citrus"), x = 1900 , y = 1700, health = 40},
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9525
diff changeset
    88
	{name = loc("Naranja Jed"), x = 960 , y = 516, health = 40},
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
    89
}
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    90
teamA.name = loc("Hog Solo")
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
    91
teamA.color = tonumber("38D61C",16) -- green
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    92
teamB.name = loc("Green Bananas")
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    93
teamB.color = tonumber("38D61C",16) -- green
9508
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
    94
teamC.name = loc("Yellow Watermelons")
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    95
teamC.color = tonumber("DDFF00",16) -- yellow
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    96
teamD.name = loc("Captain Lime")
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
    97
teamD.color = tonumber("38D61C",16) -- green
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    98
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    99
function onGameInit()
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   100
	Seed = 1
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   101
	TurnTime = 20000
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   102
	CaseFreq = 0
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   103
	MinesNum = 0
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   104
	MinesTime = 1
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   105
	Explosives = 0
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   106
	Delay = 3
12224
d62d6f8ebef1 Disable Sudden Death consistently in all missions which don't require it
Wuzzy <almikes@aol.com>
parents: 12088
diff changeset
   107
	-- Disable Sudden Death
d62d6f8ebef1 Disable Sudden Death consistently in all missions which don't require it
Wuzzy <almikes@aol.com>
parents: 12088
diff changeset
   108
	HealthDecrease = 0
d62d6f8ebef1 Disable Sudden Death consistently in all missions which don't require it
Wuzzy <almikes@aol.com>
parents: 12088
diff changeset
   109
	WaterRise = 0
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   110
	HealthCaseAmount = 50
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   111
	Map = "fruit01_map"
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   112
	Theme = "Fruit"
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   113
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   114
	-- Hog Solo
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   115
	AddTeam(teamA.name, teamA.color, "Bone", "Island", "HillBilly", "hedgewars")
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   116
	hero.gear = AddHog(hero.name, 0, 100, "war_desertgrenadier1")
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   117
	AnimSetGearPosition(hero.gear, hero.x, hero.y)
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   118
	HogTurnLeft(hero.gear, true)
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   119
	-- Captain Lime
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   120
	AddTeam(teamD.name, teamD.color, "Bone", "Island", "HillBilly", "congo-brazzaville")
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   121
	green1.bot = AddHog(green1.name, 1, 200, "war_desertofficer")
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   122
	AnimSetGearPosition(green1.bot, green1.x, green1.y)
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   123
	green1.human =  AddHog(green1.name, 0, 200, "war_desertofficer")
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   124
	AnimSetGearPosition(green1.human, green1.x, green1.y)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   125
	green1.gear = green1.human
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   126
	-- Green Bananas
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   127
	AddTeam(teamB.name, teamB.color, "Bone", "Island", "HillBilly", "congo-brazzaville")
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   128
	green2.gear = AddHog(green2.name, 0, 100, "war_britmedic")
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   129
	AnimSetGearPosition(green2.gear, green2.x, green2.y)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   130
	HogTurnLeft(green2.gear, true)
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   131
	green3.gear = AddHog(green3.name, 0, 100, "hair_red")
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   132
	AnimSetGearPosition(green3.gear, green3.x, green3.y)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   133
	HogTurnLeft(green3.gear, true)
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   134
	green4.gear = AddHog(green4.name, 0, 100, "war_desertsapper1")
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   135
	AnimSetGearPosition(green4.gear, green4.x, green4.y)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   136
	HogTurnLeft(green4.gear, true)
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   137
	green5.gear = AddHog(green5.name, 0, 100, "war_sovietcomrade2")
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   138
	AnimSetGearPosition(green5.gear, green5.x, green5.y)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   139
	HogTurnLeft(green5.gear, true)
9508
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   140
	-- Yellow Watermelons
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   141
	AddTeam(teamC.name, teamC.color, "Bone", "Island", "HillBilly", "cm_mog")
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   142
	yellow1.gear = AddHog(yellow1.name, 1, 100, "war_desertgrenadier2")
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   143
	AnimSetGearPosition(yellow1.gear, yellow1.x, yellow1.y)
9508
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   144
	-- the rest of the Yellow Watermelons
9629
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9626
diff changeset
   145
	local yellowHats = { "fr_apple", "fr_banana", "fr_lemon", "fr_orange" }
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   146
	for i=1,7 do
9810
54c0fdec4600 changing math functions that may cause desyncs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   147
		yellowArmy[i].gear = AddHog(yellowArmy[i].name, 1, yellowArmy[i].health, yellowHats[GetRandom(4)+1])
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   148
		AnimSetGearPosition(yellowArmy[i].gear, yellowArmy[i].x, yellowArmy[i].y)
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   149
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   150
9582
bf314b2258b3 less variables used to save the checkpoints - potential breakage xD
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9578
diff changeset
   151
	initCheckpoint("fruit01")
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   152
12088
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12049
diff changeset
   153
	AnimInit(true)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   154
	AnimationSetup()
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   155
end
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   156
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   157
function onGameStart()
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   158
	AnimWait(hero.gear, 3000)
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   159
	FollowGear(hero.gear)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   160
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   161
	AddEvent(onHeroDeath, {hero.gear}, heroDeath, {hero.gear}, 0)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   162
	AddEvent(onHeroSelect, {hero.gear}, heroSelect, {hero.gear}, 0)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   163
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   164
	-- Green team weapons
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   165
	local greenArmy = { green1, green2 }
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   166
	for i=1,2 do
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   167
		AddAmmo(greenArmy[i].gear, amBlowTorch, 5)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   168
		AddAmmo(greenArmy[i].gear, amRope, 5)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   169
		AddAmmo(greenArmy[i].gear, amBazooka, 10)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   170
		AddAmmo(greenArmy[i].gear, amGrenade, 7)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   171
		AddAmmo(greenArmy[i].gear, amFirePunch, 2)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   172
		AddAmmo(greenArmy[i].gear, amDrill, 3)
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   173
		AddAmmo(greenArmy[i].gear, amSwitch, 2)
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   174
		AddAmmo(greenArmy[i].gear, amSkip, 100)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   175
	end
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   176
	-- Yellow team weapons
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   177
	AddAmmo(yellow1.gear, amBlowTorch, 1)
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   178
	AddAmmo(yellow1.gear, amRope, 1)
9500
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   179
	AddAmmo(yellow1.gear, amBazooka, 10)
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   180
	AddAmmo(yellow1.gear, amGrenade, 10)
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   181
	AddAmmo(yellow1.gear, amFirePunch, 5)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   182
	AddAmmo(yellow1.gear, amDrill, 3)
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   183
	AddAmmo(yellow1.gear, amBee, 1)
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   184
	AddAmmo(yellow1.gear, amMortar, 3)
9500
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   185
	AddAmmo(yellow1.gear, amDEagle, 4)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   186
	AddAmmo(yellow1.gear, amDynamite, 1)
9500
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   187
	AddAmmo(yellow1.gear, amSwitch, 100)
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   188
	for i=3,7 do
c9487f415fd3 some changes in the map, hog placing etc
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9498
diff changeset
   189
		HideHog(yellowArmy[i].gear)
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   190
	end
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   191
	HideHog(green1.bot)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   192
9508
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   193
	-- crates
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   194
	SpawnHealthCrate(health1X, health1Y)
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   195
	SpawnAmmoCrate(crateWMX, crateWMY, amWatermelon)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   196
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   197
	AddAnim(dialog01)
9486
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   198
	SendHealthStatsOff()
036fece2fb5f forgot to commit the new files :/
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   199
end
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   200
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   201
function onNewTurn()
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   202
	if not heroPlayedFirstTurn and CurrentHedgehog ~= hero.gear and startBattleCalled then
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   203
		TurnTimeLeft = 0
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   204
	elseif not heroPlayedFirstTurn and CurrentHedgehog == hero.gear and startBattleCalled then
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   205
		heroPlayedFirstTurn = true
9740
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   206
	elseif not heroPlayedFirstTurn and CurrentHedgehog == green1.gear then
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   207
		TurnTimeLeft = 0
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   208
	else
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   209
		if chooseToBattle then
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   210
			if CurrentHedgehog == green1.gear then
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   211
				TotalRounds = TotalRounds - 2
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   212
				AnimSwitchHog(previousHog)
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   213
				TurnTimeLeft = 0
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   214
			end
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   215
			previousHog = CurrentHedgehog
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   216
		end
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   217
		getNextWave()
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   218
	end
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   219
end
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   220
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   221
function onGameTick()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   222
	AnimUnWait()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   223
	if ShowAnimation() == false then
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   224
		return
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   225
	end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   226
	ExecuteAfterAnimations()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   227
	CheckEvents()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   228
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   229
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   230
function onGearDelete(gear)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   231
	if gear == hero.gear then
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   232
		hero.dead = true
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   233
	elseif gear == green1.gear then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   234
		green1.dead = true
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   235
	end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   236
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   237
9508
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   238
function onAmmoStoreInit()
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   239
	SetAmmo(amWatermelon, 0, 0, 0, 1)
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   240
end
c23bff98e3d2 added crates
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9506
diff changeset
   241
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   242
function onPrecise()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   243
	if GameTime > 3000 then
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   244
		SetAnimSkip(true)
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   245
	end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   246
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   247
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   248
function onHogHide(gear)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   249
	for i=3,7 do
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   250
		if gear == yellowArmy[i].gear then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   251
			yellowArmy[i].hidden = true
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   252
			break
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   253
		end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   254
	end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   255
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   256
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   257
function onHogRestore(gear)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   258
	for i=3,7 do
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   259
		if gear == yellowArmy[i].gear then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   260
			yellowArmy[i].hidden = false
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   261
			break
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   262
		end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   263
	end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   264
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   265
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   266
-------------- EVENTS ------------------
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   267
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   268
function onHeroDeath(gear)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   269
	if hero.dead then
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   270
		return true
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   271
	end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   272
	return false
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   273
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   274
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   275
function onGreen1Death(gear)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   276
	if green1.dead then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   277
		return true
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   278
	end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   279
	return false
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   280
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   281
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   282
function onBattleWin(gear)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   283
	local win = true
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   284
	for i=1,7 do
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   285
		if i<3 then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   286
			if GetHealth(yellowArmy[i].gear) then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   287
				win = false
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   288
			end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   289
		else
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   290
			if GetHealth(yellowArmy[i].gear) and not yellowArmy[i].hidden then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   291
				win = false
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   292
			end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   293
		end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   294
	end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   295
	if GetHealth(yellow1.gear) then
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   296
		win = false
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   297
	end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   298
	return win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   299
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   300
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   301
function onEscapeWin(gear)
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   302
	local escape = false
9506
adc05ca2cb10 some fixes to the map and the events
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9504
diff changeset
   303
	if not hero.dead and GetX(hero.gear) < 170 and GetY(hero.gear) > 1980 and StoppedGear(hero.gear) then
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   304
		escape = true
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   305
		local yellowTeam = { yellow1, unpack(yellowArmy) }
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   306
		for i=1,8 do
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   307
			if not yellowTeam[i].hidden and GetHealth(yellowTeam[i].gear) and GetX(yellowTeam[i].gear) < 170 then
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   308
				escape = false
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   309
				break
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   310
			end
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   311
		end
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   312
	end
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   313
	return escape
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   314
end
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   315
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   316
function onHeroSelect(gear)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   317
	if GetX(hero.gear) ~= hero.x then
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   318
		return true
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   319
	end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   320
	return false
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   321
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   322
9639
6b2ae2eaf1b2 remove unnecessary comments
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9629
diff changeset
   323
-------------- ACTIONS ------------------
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   324
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   325
function heroDeath(gear)
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   326
	gameLost()
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   327
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   328
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   329
function green1Death(gear)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   330
	gameLost()
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   331
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   332
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   333
function battleWin(gear)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   334
	-- add stats
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   335
	saveVariables()
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   336
	SendStat(siGameResult, loc("Green Bananas won!"))
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   337
	SendStat(siCustomAchievement, loc("You have eliminated all visible enemy hedgehogs!"))
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   338
	SendStat(siPlayerKills,'1',teamA.name)
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   339
	SendStat(siPlayerKills,'1',teamB.name)
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   340
	SendStat(siPlayerKills,'0',teamC.name)
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   341
	EndGame()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   342
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   343
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   344
function escapeWin(gear)
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   345
	-- add stats
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   346
	saveVariables()
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   347
	SendStat(siGameResult, loc("Hog Solo escaped successfully!"))
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   348
	SendStat(siCustomAchievement, loc("You have reached the take-off area successfully!"))
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   349
	SendStat(siPlayerKills,'1',teamA.name)
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   350
	SendStat(siPlayerKills,'0',teamB.name)
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   351
	SendStat(siPlayerKills,'0',teamC.name)
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   352
	EndGame()
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   353
end
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   354
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   355
function heroSelect(gear)
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   356
	TurnTimeLeft = 0
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   357
	FollowGear(hero.gear)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   358
	if GetX(hero.gear) < hero.x then
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   359
		chooseToBattle = true
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   360
		AddEvent(onGreen1Death, {green1.gear}, green1Death, {green1.gear}, 0)
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   361
		AddEvent(onBattleWin, {hero.gear}, battleWin, {hero.gear}, 0)
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   362
		AddAnim(dialog02)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   363
	elseif GetX(hero.gear) > hero.x then
9506
adc05ca2cb10 some fixes to the map and the events
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9504
diff changeset
   364
		HogTurnLeft(hero.gear, true)
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   365
		AddAmmo(green1.gear, amSwitch, 100)
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   366
		AddEvent(onEscapeWin, {hero.gear}, escapeWin, {hero.gear}, 0)
9525
8bcfb3a9f92b small fix and image/description
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9523
diff changeset
   367
		local greenTeam = { green2, green3, green4, green5 }
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   368
		for i=1,4 do
9504
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   369
			SetHogLevel(greenTeam[i].gear, 1)
cdba61cfba93 event for escape win
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9502
diff changeset
   370
		end
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   371
		AddAnim(dialog03)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   372
	end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   373
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   374
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   375
-------------- ANIMATIONS ------------------
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   376
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   377
function Skipanim(anim)
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   378
	if goals[anim] ~= nil then
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   379
		ShowMission(unpack(goals[anim]))
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   380
    end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   381
    if anim == dialog01 then
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   382
		AnimSwitchHog(hero.gear)
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   383
	elseif anim == dialog02 or anim == dialog03 then
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   384
		startBattle()
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   385
    end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   386
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   387
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   388
function AnimationSetup()
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   389
	-- DIALOG 01 - Start, Captain Lime talks explains to Hog Solo
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   390
	AddSkipFunction(dialog01, Skipanim, {dialog01})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   391
	table.insert(dialog01, {func = AnimWait, args = {hero.gear, 3000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   392
	table.insert(dialog01, {func = AnimCaption, args = {hero.gear, loc("Somewhere on the Planet of Fruits a terrible war is about to begin ..."), 5000}})
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   393
	table.insert(dialog01, {func = AnimSay, args = {hero.gear, loc("I was told that as the leader of the king's guard, no one knows this world better than you!"), SAY_SAY, 5000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   394
	table.insert(dialog01, {func = AnimSay, args = {hero.gear, loc("So, I kindly ask for your help."), SAY_SAY, 3000}})
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   395
	table.insert(dialog01, {func = AnimWait, args = {green1.gear, 2000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   396
	table.insert(dialog01, {func = AnimSay, args = {green1.gear, loc("You couldn't have come to a worse time, Hog Solo!"), SAY_SAY, 3000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   397
	table.insert(dialog01, {func = AnimSay, args = {green1.gear, loc("The clan of the Red Strawberry wants to take over the dominion and overthrow King Pineapple."), SAY_SAY, 5000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   398
	table.insert(dialog01, {func = AnimSay, args = {green1.gear, loc("Under normal circumstances we could easily defeat them but we have kindly sent most of our men to the Kingdom of Sand to help with the annual dusting of the king's palace."), SAY_SAY, 8000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   399
	table.insert(dialog01, {func = AnimSay, args = {green1.gear, loc("However, the army of Yellow Watermelons is about to attack any moment now."), SAY_SAY, 4000}})
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   400
	table.insert(dialog01, {func = AnimSay, args = {green1.gear, loc("I would gladly help you if we won this battle but under these circumstances I'll only help you if you fight for our side."), SAY_SAY, 6000}})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   401
	table.insert(dialog01, {func = AnimSay, args = {green1.gear, loc("What do you say? Will you fight for us?"), SAY_SAY, 3000}})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   402
	table.insert(dialog01, {func = AnimWait, args = {hero.gear, 500}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   403
	table.insert(dialog01, {func = ShowMission, args = {missionName, loc("Ready for Battle?"), loc("Walk left if you want to join Captain Lime or right if you want to decline his offer."), 1, 7000}})
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   404
	table.insert(dialog01, {func = AnimSwitchHog, args = {hero.gear}})
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   405
	-- DIALOG 02 - Hero selects to fight
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   406
	AddSkipFunction(dialog02, Skipanim, {dialog02})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   407
	table.insert(dialog02, {func = AnimWait, args = {green1.gear, 3000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   408
	table.insert(dialog02, {func = AnimSay, args = {green1.gear, loc("You choose well, Hog Solo!"), SAY_SAY, 3000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   409
	table.insert(dialog02, {func = AnimSay, args = {green1.gear, loc("I have only 3 hogs available and they are all cadets."), SAY_SAY, 4000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   410
	table.insert(dialog02, {func = AnimSay, args = {green1.gear, loc("As you are more experienced, I want you to lead them to battle."), SAY_SAY, 4000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   411
	table.insert(dialog02, {func = AnimSay, args = {green1.gear, loc("Of course, I will observe the battle and intervene if necessary."), SAY_SAY, 5000}})
9740
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   412
	table.insert(dialog02, {func = AnimWait, args = {hero.gear, 4500}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   413
	table.insert(dialog02, {func = AnimSay, args = {hero.gear, loc("No problem, Captain!"), SAY_SAY, 2000}})
9740
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   414
	table.insert(dialog02, {func = AnimSay, args = {hero.gear, loc("The enemies aren't many anyway, it is going to be easy!"), SAY_SAY, 1}})
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   415
	table.insert(dialog02, {func = AnimWait, args = {green1.gear, 9000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   416
	table.insert(dialog02, {func = AnimSay, args = {green1.gear, loc("Don't be foolish, son, there will be more."), SAY_SAY, 2000}})
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   417
	table.insert(dialog02, {func = AnimSay, args = {green1.gear, loc("Try to be smart and eliminate them quickly. This way you might scare off the rest!"), SAY_SAY, 5000}})
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   418
	table.insert(dialog02, {func = AnimWait, args = {hero.gear, 5000}})
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   419
	table.insert(dialog02, {func = startBattle, args = {hero.gear}})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   420
	-- DIALOG 03 - Hero selects to flee
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   421
	AddSkipFunction(dialog03, Skipanim, {dialog03})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   422
	table.insert(dialog03, {func = AnimWait, args = {green1.gear, 3000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   423
	table.insert(dialog03, {func = AnimSay, args = {green1.gear, loc("Too bad! Then you should really leave!"), SAY_SAY, 3000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   424
	table.insert(dialog03, {func = AnimSay, args = {green1.gear, loc("Things are going to get messy around here."), SAY_SAY, 3000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   425
	table.insert(dialog03, {func = AnimSay, args = {green1.gear, loc("Also, you should know that the only place where you can fly is the left-most part of this area."), SAY_SAY, 5000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   426
	table.insert(dialog03, {func = AnimSay, args = {green1.gear, loc("All the other places are protected by our flight-inhibiting weapons."), SAY_SAY, 4000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   427
	table.insert(dialog03, {func = AnimSay, args = {green1.gear, loc("Now go and don't waste more of my time, you coward!"), SAY_SAY, 4000}})
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   428
	table.insert(dialog03, {func = AnimWait, args = {hero.gear, 5000}})
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   429
	table.insert(dialog03, {func = startBattle, args = {hero.gear}})
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   430
end
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   431
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   432
------------- OTHER FUNCTIONS ---------------
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   433
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   434
function startBattle()
9740
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   435
	-- Hog Solo weapons
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   436
	AddAmmo(hero.gear, amRope, 2)
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   437
	AddAmmo(hero.gear, amBazooka, 3)
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   438
	AddAmmo(hero.gear, amParachute, 1)
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   439
	AddAmmo(hero.gear, amGrenade, 6)
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   440
	AddAmmo(hero.gear, amDEagle, 4)
d159ddae0358 fixed user gain control of npc, rope cheat and overlapping bubbles in fruit01
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9643
diff changeset
   441
	AddAmmo(hero.gear, amSkip, 100)
9523
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   442
	RestoreHog(green1.bot)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   443
	DeleteGear(green1.human)
dd6c61b81c78 changes regarding the difficulty and AI demo brake error
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9520
diff changeset
   444
	green1.gear = green1.bot
9643
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   445
	startBattleCalled = true
cddb5de11af9 fixed bug that didn't set TurnTimeLeft in first round if dialog not skipped
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9642
diff changeset
   446
	TurnTimeLeft = 0
9488
2e2bb48566ae dialogs, events for hero death and side choice
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9486
diff changeset
   447
end
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   448
9518
549ca737206c custom stats in case of lose
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9516
diff changeset
   449
function gameLost()
549ca737206c custom stats in case of lose
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9516
diff changeset
   450
	if chooseToBattle then
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   451
		SendStat(siGameResult, loc("The Green Bananas lost, try again!"))
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   452
		SendStat(siCustomAchievement, loc("You have to eliminate all the visible enemies."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   453
		SendStat(siCustomAchievement, loc("5 additional enemies will be spawned during the game."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   454
		SendStat(siCustomAchievement, loc("You are in control of all the active ally units."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   455
		SendStat(siCustomAchievement, loc("The ally units share their ammo."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   456
		SendStat(siCustomAchievement, loc("Try to keep as many allies alive as possible."))
9518
549ca737206c custom stats in case of lose
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9516
diff changeset
   457
	else
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   458
		SendStat(siGameResult, loc("Hog Solo couldn't escape, try again!"))
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   459
		SendStat(siCustomAchievement, loc("You have to get to the left-most land and remove any enemy hog from there."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   460
		SendStat(siCustomAchievement, loc("You will play every 3 turns."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   461
		SendStat(siCustomAchievement, loc("Green hogs won't intentionally hurt you."))
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   462
	end
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   463
	SendStat(siPlayerKills,'1',teamC.name)
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   464
	SendStat(siPlayerKills,'0',teamA.name)
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   465
	SendStat(siPlayerKills,'0',teamB.name)
9496
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   466
	EndGame()
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   467
end
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9494
diff changeset
   468
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   469
function getNextWave()
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   470
	if TotalRounds == 4 then
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   471
		RestoreHog(yellowArmy[3].gear)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   472
		AnimCaption(hero.gear, loc("Next wave in 3 turns"), 5000)
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   473
		if not chooseToBattle and not GetHealth(yellow1.gear) then
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   474
			SetGearPosition(yellowArmy[3].gear, yellow1.x, yellow1.y)
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   475
		end
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   476
	elseif TotalRounds == 7 then
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   477
		RestoreHog(yellowArmy[4].gear)
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   478
		RestoreHog(yellowArmy[5].gear)
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   479
		AnimCaption(hero.gear, loc("Last wave in 3 turns"), 5000)
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   480
		if not chooseToBattle and not GetHealth(yellow1.gear) and not GetHealth(yellowArmy[3].gear) then
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   481
			SetGearPosition(yellowArmy[4].gear, yellow1.x, yellow1.y)
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   482
		end
9494
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   483
	elseif TotalRounds == 10 then
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   484
		RestoreHog(yellowArmy[6].gear)
e515962d7af4 hide hogs and spawn them per waves
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9492
diff changeset
   485
		RestoreHog(yellowArmy[7].gear)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9740
diff changeset
   486
		if not chooseToBattle and not GetHealth(yellow1.gear) and not GetHealth(yellowArmy[3].gear)
9510
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   487
				and not GetHealth(yellowArmy[4].gear) then
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   488
			SetGearPosition(yellowArmy[6].gear, yellow1.x, yellow1.y)
e7481fac10c4 change regarding the difficulty in escape
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9508
diff changeset
   489
		end
9492
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   490
	end
1cbd49706334 added newly created hogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9490
diff changeset
   491
end
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   492
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   493
function saveVariables()
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   494
	saveCompletedStatus(2)
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   495
	SaveCampaignVar("UnlockedMissions", "3")
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   496
	SaveCampaignVar("Mission1", "3")
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   497
	SaveCampaignVar("Mission2", "8")
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   498
	SaveCampaignVar("Mission3", "1")
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   499
end