share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/cosmos.lua
author Wuzzy <almikes@aol.com>
Thu, 28 Sep 2017 07:45:28 +0200
changeset 12573 a778c1bb032e
parent 12571 903a30fb49e6
child 12575 0c5ce463949b
permissions -rw-r--r--
ASA: Explain team abbreviations + update changelog
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     1
------------------- ABOUT ----------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     2
--
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     3
-- This map works as a menu for the hero hog to
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     4
-- navigate through planets. It portrays the hogs
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     5
-- planet and above the planets that he'll later
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     6
-- visit.
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     7
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     8
HedgewarsScriptLoad("/Scripts/Locale.lua")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
     9
HedgewarsScriptLoad("/Scripts/Animate.lua")
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
    10
HedgewarsScriptLoad("/Missions/Campaign/A_Space_Adventure/global_functions.lua")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    11
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    12
----------------- VARIABLES --------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    13
-- globals
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
    14
local missionName = loc("Spacetrip")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    15
local timeForGuard1ToTurn = 1000 * 5 -- 5 sec
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    16
local timeForGuard1ToTurnLeft = timeForGuard1ToTurn
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    17
local saucerAcquired = false
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
    18
local status
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
    19
local getReadyForRumble = false -- guards wake up
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
    20
local ropeDestroyed = false -- for detecting if player roped to the moon
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
    21
local ropedToMoon = 0
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    22
local checkPointReached = 1 -- 1 is start of the game
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
    23
local objectives = loc("Go to the moon by using the flying saucer and complete the main mission").."|"..
9638
9db28f0a3f8a dialog changes
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9637
diff changeset
    24
loc("Come back to this mission and visit the other planets to collect the crates").."|"..
9db28f0a3f8a dialog changes
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9637
diff changeset
    25
loc("Visit the Death Planet after completing all the other planets' main missions").."|"..
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
    26
loc("Come back to this mission after collecting all the device parts")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    27
-- dialogs
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    28
local dialog01 = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    29
local dialog02 = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    30
local dialog03 = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    31
local dialog04 = {}
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
    32
local dialog05 = {}
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
    33
local dialog06 = {}
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
    34
local dialog07 = {}
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
    35
local dialog08 = {}
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
    36
local dialog09 = {}
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    37
-- mission objectives
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    38
local goals = {
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
    39
	[dialog01] = {missionName, loc("Getting ready"), loc("Go and collect the crate").."|"..loc("Try not to get spotted by the guards!"), 1, 4500},
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
    40
	[dialog02] = {missionName, loc("The adventure begins!"), loc("Use the saucer and fly to the moon").."|"..loc("Travel carefully as your fuel is limited"), 1, 4500},
9638
9db28f0a3f8a dialog changes
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9637
diff changeset
    41
	[dialog03] = {missionName, loc("An unexpected event!"), loc("Use the saucer and fly away").."|"..loc("Beware, any damage taken will stay until you complete the moon's main mission"), 1, 7000},
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
    42
	[dialog07] = {missionName, loc("Searching the stars!"), loc("Use the saucer and fly away").."|"..loc("Visit the planets of Ice, Desert and Fruit before you proceed to the Death Planet"), 1, 6000},
9638
9db28f0a3f8a dialog changes
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9637
diff changeset
    43
	[dialog08] = {missionName, loc("Saving Hogera"), loc("Fly to the meteorite and detonate the explosives"), 1, 7000}
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    44
}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    45
-- crates
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    46
local saucerX = 3270
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    47
local saucerY = 1500
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    48
-- hogs
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    49
local hero = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    50
local director = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    51
local doctor = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    52
local guard1 = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    53
local guard2 = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    54
-- teams
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    55
local teamA = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    56
local teamB = {}
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    57
local teamC = {}
12518
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
    58
-- to check if flying saucer is active
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
    59
local saucerGear = nil
12524
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
    60
-- if player abandoned any incomplete planet mission
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
    61
local abandonedPlanetMission = false
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    62
-- hedgehogs values
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    63
hero.name = loc("Hog Solo")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    64
hero.x = 1450
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    65
hero.y = 1550
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    66
director.name = loc("H")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    67
director.x = 1350
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    68
director.y = 1550
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
    69
doctor.name = loc("Dr. Cornelius")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    70
doctor.x = 1300
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    71
doctor.y = 1550
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    72
guard1.name = loc("Bob")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    73
guard1.x = 3350
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    74
guard1.y = 1800
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    75
guard1.turn = false
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    76
guard1.keepTurning = true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    77
guard2.name = loc("Sam")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    78
guard2.x = 3400
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    79
guard2.y = 1800
12573
a778c1bb032e ASA: Explain team abbreviations + update changelog
Wuzzy <almikes@aol.com>
parents: 12571
diff changeset
    80
-- Planetary Association of the Hedgehogs
9831
afa4e3e04cc5 typos correction
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9802
diff changeset
    81
teamA.name = loc("PAotH")
12571
903a30fb49e6 Fix team colors of most teams in A Space Adventure to denote correct ally status
Wuzzy <almikes@aol.com>
parents: 12567
diff changeset
    82
teamA.color = 0x38D61C -- green
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    83
teamB.name = loc("Guards")
12571
903a30fb49e6 Fix team colors of most teams in A Space Adventure to denote correct ally status
Wuzzy <almikes@aol.com>
parents: 12567
diff changeset
    84
teamB.color = 0x0072FF -- blue
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    85
teamC.name = loc("Hog Solo")
12571
903a30fb49e6 Fix team colors of most teams in A Space Adventure to denote correct ally status
Wuzzy <almikes@aol.com>
parents: 12567
diff changeset
    86
teamC.color = 0x38D61C -- green
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    87
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    88
-------------- LuaAPI EVENT HANDLERS ------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    89
function onGameInit()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    90
	Seed = 35
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    91
	GameFlags = gfSolidLand + gfDisableWind
12560
2f7274e5e090 Update ChangeLog for ASA, increase spacetrip turn time to 20s
Wuzzy <almikes@aol.com>
parents: 12559
diff changeset
    92
	TurnTime = 20000
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    93
	CaseFreq = 0
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    94
	MinesNum = 0
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    95
	Explosives = 0
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    96
	Delay = 5
12468
d652c6f5d5f1 Disable Sudden Death for a couple of ASA missions
Wuzzy <almikes@aol.com>
parents: 12223
diff changeset
    97
	-- Disable Sudden Death
d652c6f5d5f1 Disable Sudden Death for a couple of ASA missions
Wuzzy <almikes@aol.com>
parents: 12223
diff changeset
    98
	WaterRise = 0
d652c6f5d5f1 Disable Sudden Death for a couple of ASA missions
Wuzzy <almikes@aol.com>
parents: 12223
diff changeset
    99
	HealthDecrease = 0
9635
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   100
	-- completed main missions
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   101
	status = getCompletedStatus()
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   102
	if status.death01 then
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   103
		Map = "cosmos2_map"
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   104
	else
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   105
		Map = "cosmos_map" -- custom map included in file
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   106
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   107
	Theme = "Nature"
9831
afa4e3e04cc5 typos correction
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9802
diff changeset
   108
	-- I had originally hero in PAotH team and changed it, may reconsider though
afa4e3e04cc5 typos correction
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9802
diff changeset
   109
	-- PAotH
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11965
diff changeset
   110
	AddTeam(teamC.name, teamC.color, "Bone", "Island", "HillBilly", "hedgewars")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   111
	hero.gear = AddHog(hero.name, 0, 100, "war_desertgrenadier1")
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   112
	AnimSetGearPosition(hero.gear, hero.x, hero.y)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   113
	HogTurnLeft(hero.gear, true)
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11965
diff changeset
   114
	AddTeam(teamA.name, teamA.color, "Bone", "Island", "HillBilly", "cm_galaxy")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   115
	director.gear = AddHog(director.name, 0, 100, "hair_yellow")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   116
	AnimSetGearPosition(director.gear, director.x, director.y)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   117
	doctor.gear = AddHog(doctor.name, 0, 100, "Glasses")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   118
	AnimSetGearPosition(doctor.gear, doctor.x, doctor.y)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   119
	-- Guards
12049
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11965
diff changeset
   120
	AddTeam(teamB.name, teamB.color, "Bone", "Island", "HillBilly", "cm_swordshield2")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   121
	guard1.gear = AddHog(guard1.name, 1, 100, "policecap")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   122
	AnimSetGearPosition(guard1.gear, guard1.x, guard1.y)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   123
	guard2.gear = AddHog(guard2.name, 1, 100, "policecap")
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   124
	AnimSetGearPosition(guard2.gear, guard2.x, guard2.y)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   125
	-- get the check point
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   126
	if tonumber(GetCampaignVar("CosmosCheckPoint")) then
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   127
		checkPointReached = tonumber(GetCampaignVar("CosmosCheckPoint"))
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   128
	end
12559
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   129
	if checkPointReached == 4 then
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   130
		-- Disable walking as long we're stuck on the moon
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   131
		GameFlags = bor(GameFlags, gfArtillery)
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   132
	end
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
   133
	-- Whether to start with an animation
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
   134
	local startSequence
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   135
	-- do checkpoint stuff needed before game starts
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   136
	if checkPointReached == 1 then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   137
		-- Start of the game
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
   138
		startSequence = true
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   139
	elseif checkPointReached == 2 then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   140
		-- Hero on the column, just took space ship unnoticed
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
   141
		startSequence = true
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   142
		AnimSetGearPosition(hero.gear, saucerX, saucerY)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   143
	elseif checkPointReached == 3 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   144
		-- Hero near column, without space ship unnoticed
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
   145
		startSequence = true
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   146
	elseif checkPointReached == 4 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   147
		-- Hero visited moon for fuels
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
   148
		startSequence = true
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   149
		AnimSetGearPosition(hero.gear, 1110, 850)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   150
	elseif checkPointReached == 5 then
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
   151
		startSequence = false
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   152
		-- Hero has visited a planet, he has plenty of fuels and can change planet
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   153
		if GetCampaignVar("Planet") == "moon" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   154
			AnimSetGearPosition(hero.gear, 1110, 850)
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   155
		elseif GetCampaignVar("Planet") == "desertPlanet" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   156
			AnimSetGearPosition(hero.gear, 3670, 270)
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   157
		elseif GetCampaignVar("Planet") == "fruitPlanet" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   158
			AnimSetGearPosition(hero.gear, 2400, 375)
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   159
		elseif GetCampaignVar("Planet") == "icePlanet" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   160
			AnimSetGearPosition(hero.gear, 1440, 260)
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   161
		elseif GetCampaignVar("Planet") == "deathPlanet" then
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   162
			AnimSetGearPosition(hero.gear, 620, 530)
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   163
		elseif GetCampaignVar("Planet") == "meteorite" then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   164
			AnimSetGearPosition(hero.gear, 3080, 850)
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   165
		end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   166
	end
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
   167
	AnimInit(startSequence)
12524
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   168
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   169
	-- Reset checkpoint of other missions when entering this mission.
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   170
	-- The player has left the planet, so we count that “abandoning” any incomplete missions.
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   171
	-- This also allows the player (indirectly) to reset the checkpointed missions.
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   172
	abandonedPlanetMission = resetCheckpoint()
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   173
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   174
	AnimationSetup()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   175
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   176
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   177
function onGameStart()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   178
	-- wait for the first turn to start
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   179
	AnimWait(hero.gear, 3000)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   180
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   181
	FollowGear(hero.gear)
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   182
	ShowMission(loc("Spacetrip"), loc("Getting ready"), loc("Help Hog Solo to find all the parts of the anti-gravity device.")..
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   183
	"|"..loc("Travel to all the neighbor planets and collect all the pieces"), -amSkip, 0)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   184
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   185
	-- do checkpoint stuff needed after game starts
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   186
	if checkPointReached == 1 then
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   187
		AddAnim(dialog01)
9618
c937b532f8ec give player only one rope
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9617
diff changeset
   188
		AddAmmo(hero.gear, amRope, 1)
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   189
		AddAmmo(guard1.gear, amDEagle, 100)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   190
		AddAmmo(guard2.gear, amDEagle, 100)
12513
d90db45a0c4f Fix crate types in A Space Adventure and some user missions
Wuzzy <almikes@aol.com>
parents: 12468
diff changeset
   191
		SpawnUtilityCrate(saucerX, saucerY, amJetpack)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   192
		-- EVENT HANDLERS
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   193
		AddEvent(onHeroBeforeTreePosition, {hero.gear}, heroBeforeTreePosition, {hero.gear}, 0)
12558
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12557
diff changeset
   194
		AddEvent(onHeroAcquiredSaucer, {hero.gear}, heroAcquiredSaucer, {hero.gear}, 1)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   195
		AddEvent(onHeroOutOfGuardSight, {hero.gear}, heroOutOfGuardSight, {hero.gear}, 0)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   196
	elseif checkPointReached == 2 then
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   197
		AddAmmo(hero.gear, amJetpack, 1)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   198
		AddAnim(dialog02)
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   199
	elseif checkPointReached == 3 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   200
		-- Hero near column, without space ship unnoticed
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   201
	elseif checkPointReached == 4 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   202
		-- Hero visited moon for fuels
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   203
		AddAnim(dialog05)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   204
	elseif checkPointReached == 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   205
		-- Hero has visited a planet, he has plenty of fuels and can change planet
12223
f30eab4b9b05 Give infinite flying saucers in Space Adventure main menu
Wuzzy <almikes@aol.com>
parents: 12088
diff changeset
   206
		AddAmmo(hero.gear, amJetpack, 100)
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   207
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   208
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   209
	AddEvent(onHeroDeath, {hero.gear}, heroDeath, {hero.gear}, 0)
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   210
	AddEvent(onNoFuelAtLand, {hero.gear}, noFuelAtLand, {hero.gear}, 0)
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   211
	-- always check for landings
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   212
	if GetCampaignVar("Planet") ~= "moon" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   213
		AddEvent(onMoonLanding, {hero.gear}, moonLanding, {hero.gear}, 0)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   214
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   215
	if GetCampaignVar("Planet") ~= "desertPlanet" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   216
		AddEvent(onDesertPlanetLanding, {hero.gear}, desertPlanetLanding, {hero.gear}, 0)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   217
	end
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   218
	if GetCampaignVar("Planet") ~= "fruitPlanet" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   219
		AddEvent(onFruitPlanetLanding, {hero.gear}, fruitPlanetLanding, {hero.gear}, 0)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   220
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   221
	if GetCampaignVar("Planet") ~= "icePlanet" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   222
		AddEvent(onIcePlanetLanding, {hero.gear}, icePlanetLanding, {hero.gear}, 0)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   223
	end
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   224
	if GetCampaignVar("Planet") ~= "deathPlanet" then
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   225
		AddEvent(onDeathPlanetLanding, {hero.gear}, deathPlanetLanding, {hero.gear}, 0)
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   226
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   227
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   228
	if status.death01 and not status.final then
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   229
		AddAnim(dialog08)
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   230
		if GetCampaignVar("Planet") ~= "meteorite" then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   231
			AddEvent(onMeteoriteLanding, {hero.gear}, meteoriteLanding, {hero.gear}, 0)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   232
		end
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   233
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   234
9584
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   235
	SendHealthStatsOff()
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   236
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   237
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   238
function onGameTick()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   239
	-- maybe alert this to avoid timeForGuard1ToTurnLeft overflow
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   240
	if timeForGuard1ToTurnLeft == 0 and guard1.keepTurning then
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   241
		guard1.turn = not guard1.turn
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   242
		HogTurnLeft(guard1.gear, guard1.turn)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   243
		timeForGuard1ToTurnLeft = timeForGuard1ToTurn
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   244
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   245
	timeForGuard1ToTurnLeft = timeForGuard1ToTurnLeft - 1
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   246
	AnimUnWait()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   247
	if ShowAnimation() == false then
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   248
		return
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   249
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   250
	ExecuteAfterAnimations()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   251
	CheckEvents()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   252
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   253
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   254
function onGameTick20()
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   255
	setFoundDeviceVisual()
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   256
end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   257
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   258
function onPrecise()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   259
	if GameTime > 3000 then
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   260
		SetAnimSkip(true)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   261
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   262
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   263
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   264
function onAmmoStoreInit()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   265
	SetAmmo(amJetpack, 0, 0, 0, 1)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   266
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   267
12524
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   268
local abandonCheck = false
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   269
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   270
function onNewTurn()
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   271
	if ropedToMoon == 1 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   272
		SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   273
		sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   274
		return
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   275
	end
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   276
	if saucerAcquired then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   277
		-- The only way for the player to have a saucer at turn start is by having used the rope
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   278
		-- before; there's no other way to get it. We can therefore conclude the rope has been
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   279
		-- used.
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   280
		ropeDestroyed = true
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   281
	end
12524
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   282
	if not abandonCheck and checkPointReached == 5 then
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   283
		if abandonedPlanetMission then
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   284
			HogSay(hero.gear, loc("I just forgot all checkpoints of incomplete missions."), SAY_THINK)
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   285
		end
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   286
		abandonCheck = false
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   287
	end
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   288
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   289
	if CurrentHedgehog == hero.gear then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   290
		-- Hero just got spotted by guards
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   291
		if getReadyForRumble then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   292
			EndTurn(true)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   293
			getReadyForRumble = false
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   294
		else
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   295
			if guard1.keepTurning then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   296
				TurnTimeLeft = -1
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   297
			end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   298
		end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   299
	elseif CurrentHedgehog == director.gear or CurrentHedgehog == doctor.gear then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   300
		EndTurn(true)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   301
	elseif (CurrentHedgehog == guard1.gear or CurrentHedgehog == guard2.gear) and guard1.keepTurning then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   302
		EndTurn(true)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   303
	end
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   304
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   305
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   306
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   307
-------------- EVENTS ------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   308
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   309
function onHeroBeforeTreePosition(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   310
	if GetHealth(hero.gear) and GetX(gear) > 2350 then
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   311
		return true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   312
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   313
	return false
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   314
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   315
12518
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   316
function onGearAdd(gear)
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   317
	if GetGearType(gear) == gtJetpack then
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   318
		saucerGear = gear
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   319
	end
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   320
end
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   321
12517
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   322
function onGearDelete(gear)
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   323
	if GetGearType(gear) == gtCase and band(GetGearMessage(gear), gmDestroy) ~= 0 then
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   324
		saucerAcquired = true
12518
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   325
	elseif GetGearType(gear) == gtJetpack then
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   326
		saucerGear = nil
12517
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   327
	end
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   328
end
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   329
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   330
function onHeroOutOfGuardSight(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   331
	if GetHealth(hero.gear) and GetX(gear) < 3100 and GetY(gear) > saucerY-25 and StoppedGear(gear) and not guard1.keepTurning then
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   332
		return true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   333
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   334
	return false
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   335
end
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   336
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   337
function onMoonLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   338
	if GetHealth(hero.gear) and GetX(gear) > 1010 and GetX(gear) < 1220  and GetY(gear) < 1300 and GetY(gear) > 750 and StoppedGear(gear) then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   339
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   340
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   341
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   342
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   343
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   344
function onFruitPlanetLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   345
	if GetHealth(hero.gear) and GetX(gear) > 2240 and GetX(gear) < 2540  and GetY(gear) < 1100 and StoppedGear(gear) then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   346
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   347
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   348
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   349
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   350
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   351
function onDesertPlanetLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   352
	if GetHealth(hero.gear) and GetX(gear) > 3568 and GetX(gear) < 4052  and GetY(gear) < 500 and StoppedGear(gear) then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   353
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   354
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   355
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   356
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   357
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   358
function onIcePlanetLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   359
	if GetHealth(hero.gear) and GetX(gear) > 1330 and GetX(gear) < 1650  and GetY(gear) < 500 and StoppedGear(gear) then
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   360
		return true
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   361
	end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   362
	return false
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   363
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   364
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   365
function onDeathPlanetLanding(gear)
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   366
	if GetHealth(hero.gear) and GetX(gear) > 280 and GetX(gear) < 700  and GetY(gear) < 720 and StoppedGear(gear) then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   367
		return true
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   368
	end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   369
	return false
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   370
end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   371
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   372
function onMeteoriteLanding(gear)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   373
	if GetHealth(hero.gear) and GetX(gear) > 2990 and GetX(gear) < 3395  and GetY(gear) < 940 and StoppedGear(gear) then
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   374
		return true
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   375
	end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   376
	return false
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   377
end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   378
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   379
function onNoFuelAtLand(gear)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   380
	if checkPointReached > 1 and GetHealth(hero.gear) and GetY(gear) > 1400 and
12518
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12517
diff changeset
   381
			GetAmmoCount(gear, amJetpack) == 0 and saucerGear == nil and StoppedGear(gear) then
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   382
		return true
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   383
	end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   384
	return false
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   385
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   386
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   387
function onHeroDeath(gear)
9617
662956a081a0 fixed bug that didn't endgame when make wrong landing with no fuels
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9611
diff changeset
   388
	if not GetHealth(hero.gear) then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   389
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   390
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   391
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   392
end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   393
9639
6b2ae2eaf1b2 remove unnecessary comments
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9638
diff changeset
   394
-------------- ACTIONS ------------------
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   395
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   396
function heroBeforeTreePosition(gear)
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   397
	if band(GetState(gear), gstHHDriven) ~= 0 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   398
		AnimSay(gear,loc("Now I have to climb these trees"), SAY_SAY, 4000)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   399
		AnimCaption(hero.gear, loc("Use the rope to get to the crate"),  4000)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   400
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   401
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   402
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   403
function prepareDialog02(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   404
	if StoppedGear(gear) and guard1.keepTurning and checkPointReached < 2 then
12558
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12557
diff changeset
   405
		SetGearMessage(gear, 0)
12517
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   406
		EndTurn(true)
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   407
		-- save check point
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   408
		SaveCampaignVar("CosmosCheckPoint", "2")
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   409
		checkPointReached = 2
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12516
diff changeset
   410
		AddAnim(dialog02)
12558
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12557
diff changeset
   411
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12557
diff changeset
   412
		RemoveEventFunc(onHeroAcquiredSaucer)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   413
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   414
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   415
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   416
function heroAcquiredSaucer(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   417
	-- check if he was spotted by the guard
12558
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12557
diff changeset
   418
	if guard1.turn and guard1.keepTurning and GetX(gear) > saucerX-150 then
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   419
		guard1.keepTurning = false
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   420
		SetGearVelocity(gear, 0, 0)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   421
		AddAnim(dialog03)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   422
	end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   423
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   424
	prepareDialog02(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   425
end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   426
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   427
function onHeroAcquiredSaucer(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   428
	return saucerAcquired
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   429
end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   430
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   431
function heroOutOfGuardSight(gear)
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   432
	SetGearMessage(hero.gear, 0)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   433
	guard1.keepTurning = true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   434
	AddAnim(dialog04)
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   435
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   436
	if onHeroAcquiredSaucer(gear) then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   437
		prepareDialog02(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   438
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   439
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   440
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   441
function moonLanding(gear)
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   442
	if checkPointReached == 1 and not ropeDestroyed then
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   443
		-- Player climbed the moon with rope.
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   444
		-- THIS IS A CRIMINAL OFFENSE AND WILL BE PUNISHED!
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   445
		ropedToMoon = 1
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   446
		SetGearVelocity(gear, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   447
		SetGearMessage(gear, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   448
		SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   449
		AddAnim(dialog09)
9589
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   450
	else
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   451
		if checkPointReached ~= 5 then
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   452
			SaveCampaignVar("CosmosCheckPoint", "4")
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   453
			SaveCampaignVar("HeroHealth",GetHealth(hero.gear))
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   454
		end
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   455
		AnimCaption(hero.gear,loc("Welcome to the moon!"))
12562
68dd14766445 ASA, Spacetrip: Reset turn time on successful Moon landing
Wuzzy <almikes@aol.com>
parents: 12561
diff changeset
   456
		TurnTimeLeft = -1
9640
a6a903a6c2b3 some changes regarding hp save in cosmos and moon
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   457
		SaveCampaignVar("HeroHealth", GetHealth(hero.gear))
9589
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   458
		SaveCampaignVar("Planet", "moon")
9611
ef374528a9fb moon side mission map and most of the logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9605
diff changeset
   459
		SaveCampaignVar("UnlockedMissions", "3")
9589
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   460
		SaveCampaignVar("Mission1", "2")
9611
ef374528a9fb moon side mission map and most of the logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9605
diff changeset
   461
		SaveCampaignVar("Mission2", "13")
ef374528a9fb moon side mission map and most of the logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9605
diff changeset
   462
		SaveCampaignVar("Mission3", "1")
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   463
		sendStats(loc("Hog Solo arrived at the moon!"))
9326
689f591aa226 added saved hero health between missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9310
diff changeset
   464
	end
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   465
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   466
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   467
function punishHeroForRopingToMoon(gear)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   468
	-- Initiate the secret PAotH anti-rope defense system (5 bazookas dropped from sky)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   469
	AddGear(GetX(gear), 100, gtShell, 0, 0, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   470
	AddGear(GetX(gear), 0, gtShell, 0, 0, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   471
	AddGear(GetX(gear), -100, gtShell, 0, 0, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   472
	AddGear(GetX(gear), -200, gtShell, 0, 0, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   473
	AddGear(GetX(gear), -300, gtShell, 0, 0, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   474
	FollowGear(hero.gear)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   475
	SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   476
end
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   477
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   478
function fruitPlanetLanding(gear)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   479
	if checkPointReached < 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   480
		AddAnim(dialog06)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   481
	else
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   482
		AnimCaption(hero.gear,loc("Welcome to the Fruit Planet!"))
9484
a63307092bc6 fruit planet main mission first commit
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9467
diff changeset
   483
		SaveCampaignVar("Planet", "fruitPlanet")
12567
459543ef9b1b ASA: Fix 2 important fruit planet mission unlocking bugs
Wuzzy <almikes@aol.com>
parents: 12566
diff changeset
   484
		if status.fruit01 then
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   485
			SaveCampaignVar("UnlockedMissions", "4")
12567
459543ef9b1b ASA: Fix 2 important fruit planet mission unlocking bugs
Wuzzy <almikes@aol.com>
parents: 12566
diff changeset
   486
			SaveCampaignVar("Mission1", "8")
459543ef9b1b ASA: Fix 2 important fruit planet mission unlocking bugs
Wuzzy <almikes@aol.com>
parents: 12566
diff changeset
   487
			SaveCampaignVar("Mission2", "3")
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   488
			SaveCampaignVar("Mission3", "10")
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   489
			SaveCampaignVar("Mission4", "1")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   490
		else
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   491
			SaveCampaignVar("UnlockedMissions", "3")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   492
			SaveCampaignVar("Mission1", "3")
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   493
			SaveCampaignVar("Mission2", "10")
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   494
			SaveCampaignVar("Mission3", "1")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   495
		end
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   496
		sendStats(loc("Hog Solo arrived at the Fruit Planet!"))
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   497
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   498
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   499
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   500
function desertPlanetLanding(gear)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   501
	if checkPointReached < 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   502
		AddAnim(dialog06)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   503
	else
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   504
		AnimCaption(hero.gear,loc("Welcome to the Desert Planet!"))
9404
4ae9b399fa73 desert planet main mission addition - hwp will be added when fully finished
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9342
diff changeset
   505
		SaveCampaignVar("Planet", "desertPlanet")
9605
66cd14e5bdad part of desert03 side mission - map not finished yet, will be commited later
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9601
diff changeset
   506
		SaveCampaignVar("UnlockedMissions", "4")
9404
4ae9b399fa73 desert planet main mission addition - hwp will be added when fully finished
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9342
diff changeset
   507
		SaveCampaignVar("Mission1", "4")
9467
483a73697535 desert sidwquest map and basic script
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9457
diff changeset
   508
		SaveCampaignVar("Mission2", "7")
9605
66cd14e5bdad part of desert03 side mission - map not finished yet, will be commited later
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9601
diff changeset
   509
		SaveCampaignVar("Mission3", "12")
66cd14e5bdad part of desert03 side mission - map not finished yet, will be commited later
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9601
diff changeset
   510
		SaveCampaignVar("Mission4", "1")
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   511
		sendStats(loc("Hog Solo arrived at the Desert Planet!"))
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   512
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   513
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   514
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   515
function icePlanetLanding(gear)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   516
	if checkPointReached < 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   517
		AddAnim(dialog06)
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   518
	else
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   519
		AnimCaption(hero.gear,loc("Welcome to the Planet of Ice!"))
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   520
		SaveCampaignVar("Planet", "icePlanet")
9457
934f4d8370f1 finally most of the mission mechanics seems ok
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9455
diff changeset
   521
		SaveCampaignVar("UnlockedMissions", "3")
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   522
		SaveCampaignVar("Mission1", "5")
9455
4bf3fac0e49d added iceplanet sidequest map and stub lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9404
diff changeset
   523
		SaveCampaignVar("Mission2", "6")
4bf3fac0e49d added iceplanet sidequest map and stub lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9404
diff changeset
   524
		SaveCampaignVar("Mission3", "1")
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   525
		sendStats(loc("Hog Solo arrived at the Ice Planet!"))
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   526
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   527
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   528
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   529
function deathPlanetLanding(gear)
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   530
	if checkPointReached < 5 then
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   531
		AddAnim(dialog06)
9580
49db7a78c2bd fix typo in cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9578
diff changeset
   532
	elseif not (status.fruit02 and status.ice01 and status.desert01) then
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   533
		AddAnim(dialog07)
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   534
	else
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   535
		AnimCaption(hero.gear,loc("Welcome to the Death Planet!"))
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   536
		SaveCampaignVar("Planet", "deathPlanet")
9601
6af4ca27421a added death planet side mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9590
diff changeset
   537
		SaveCampaignVar("UnlockedMissions", "3")
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   538
		SaveCampaignVar("Mission1", "9")
9601
6af4ca27421a added death planet side mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9590
diff changeset
   539
		SaveCampaignVar("Mission2", "11")
6af4ca27421a added death planet side mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9590
diff changeset
   540
		SaveCampaignVar("Mission3", "1")
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   541
		sendStats(loc("Hog Solo arrived at the Planet of Death!"))
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   542
	end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   543
end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   544
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   545
function meteoriteLanding(gear)
9640
a6a903a6c2b3 some changes regarding hp save in cosmos and moon
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   546
	-- first two conditionals are not possible but I'll leave it there...
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   547
	if checkPointReached < 5 then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   548
		AddAnim(dialog06)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   549
	elseif not (status.fruit02 and status.ice01 and status.desert01) then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   550
		AddAnim(dialog07)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   551
	else
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   552
		AnimCaption(hero.gear,loc("Welcome to the meteorite!"))
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   553
		SaveCampaignVar("Planet", "meteorite")
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   554
		SaveCampaignVar("UnlockedMissions", "2")
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   555
		SaveCampaignVar("Mission1", "14")
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   556
		SaveCampaignVar("Mission2", "1")
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   557
		sendStats(loc("Hog Solo arrived at the meteorite!"))
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   558
	end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   559
end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   560
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   561
function noFuelAtLand(gear)
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   562
	AddAnim(dialog06)
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   563
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   564
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   565
function heroDeath(gear)
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   566
	if ropedToMoon == 1 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   567
		sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   568
	elseif ropedToMoon == 0 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   569
		sendStatsOnRetry()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   570
	end
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   571
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   572
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   573
function setFoundDeviceVisual()
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   574
	--WriteLnToConsole("status: "..status.fruit01.." - "..status.fruit02)
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   575
	if status.moon01 then
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   576
		vgear = AddVisualGear(1116, 848, vgtBeeTrace, 0, false)
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   577
		if status.moon02 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   578
			vgear = AddVisualGear(1116, 828, vgtBeeTrace, 0, false)
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   579
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   580
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   581
	if status.ice01 then
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   582
		vgear = AddVisualGear(1512, 120, vgtBeeTrace, 0, false)
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   583
		if status.ice02 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   584
			vgear = AddVisualGear(1512, 100, vgtBeeTrace, 0, false)
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   585
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   586
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   587
	if status.desert01 then
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   588
		vgear = AddVisualGear(4015, 316, vgtBeeTrace, 0, false)
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   589
		if status.desert02 and status.desert03 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   590
			vgear = AddVisualGear(4015, 296, vgtBeeTrace, 0, false)
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   591
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   592
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   593
	if status.fruit01 and status.fruit02 then
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   594
		vgear = AddVisualGear(2390, 384, vgtBeeTrace, 0, false)
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   595
		if status.fruit03 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   596
			vgear = AddVisualGear(2390, 364, vgtBeeTrace, 0, false)
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   597
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   598
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   599
	if status.death01 then
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   600
		vgear = AddVisualGear(444, 400, vgtBeeTrace, 0, false)
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   601
		if status.death02 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   602
			vgear = AddVisualGear(444, 380, vgtBeeTrace, 0, false)
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   603
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   604
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   605
	if status.final then
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   606
		vgear = AddVisualGear(3070, 810, vgtBeeTrace, 0, false)
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   607
		vgear = AddVisualGear(3070, 790, vgtBeeTrace, 0, false)
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   608
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   609
end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   610
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   611
-------------- ANIMATIONS ------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   612
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   613
function Skipanim(anim)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   614
	if goals[anim] ~= nil then
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   615
		ShowMission(unpack(goals[anim]))
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   616
	end
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   617
	if anim == dialog09 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   618
		SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   619
		-- Quick punishment for the impatient
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   620
		AddGear(GetX(hero.gear)-1, GetY(hero.gear)+1, gtDynamite, 0, 0, 0, 1)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   621
		sendStatsOnRopedToMoon()
12566
172157a47986 ASA, Spacetrip: Fix stats screen messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   622
	elseif anim == dialog05 then
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   623
		sendStatsOnStuckOnMoon()
12566
172157a47986 ASA, Spacetrip: Fix stats screen messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   624
	elseif anim == dialog06 then
172157a47986 ASA, Spacetrip: Fix stats screen messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   625
		sendStatsOnRetry()
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   626
	elseif CurrentHedgehog ~= hero.gear and anim ~= dialog03 then
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   627
		AnimSwitchHog(hero.gear)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   628
	elseif anim == dialog03 then
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   629
		startCombat()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   630
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   631
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   632
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   633
function AnimationSetup()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   634
	-- DIALOG 01 - Start
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   635
	AddSkipFunction(dialog01, Skipanim, {dialog01})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   636
	table.insert(dialog01, {func = AnimWait, args = {doctor.gear, 3000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   637
	table.insert(dialog01, {func = AnimCaption, args = {hero.gear, loc("Near Secret Base 17 of PAotH in the rural Hogland ..."),  4000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   638
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("So Hog Solo, here we are ..."), SAY_SAY, 2000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   639
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("Behind these trees on the east side there is Secret Base 17."), SAY_SAY, 4000}})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   640
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("You have to continue alone from now on."), SAY_SAY, 3000}})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   641
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("Be careful, the future of Hogera is in your hands!"), SAY_SAY, 7200}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   642
	table.insert(dialog01, {func = AnimSay, args = {doctor.gear, loc("We'll use our communicators to contact you."), SAY_SAY, 2600}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   643
	table.insert(dialog01, {func = AnimSay, args = {doctor.gear, loc("In am also entrusting you with some rope."), SAY_SAY, 5000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   644
	table.insert(dialog01, {func = AnimSay, args = {doctor.gear, loc("You may find it handy."), SAY_SAY, 2300}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   645
	table.insert(dialog01, {func = AnimSay, args = {hero.gear, loc("Thank you, Dr. Cornelius."), SAY_SAY, 1600}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   646
	table.insert(dialog01, {func = AnimSay, args = {hero.gear, loc("I'll make good use of it."), SAY_SAY, 4500}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   647
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("It would be wiser to steal the space ship while the PAotH guards are taking a brake!"), SAY_SAY, 7000}})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   648
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("Remember! Many will seek the anti-gravity device! Now go, hurry up!"), SAY_SAY, 4000}})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   649
	table.insert(dialog01, {func = AnimSwitchHog, args = {hero.gear}})
12557
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12556
diff changeset
   650
	table.insert(dialog01, {func = ShowMission, args = goals[dialog01]})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   651
	-- DIALOG 02 - Hero got the saucer
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   652
	AddSkipFunction(dialog02, Skipanim, {dialog02})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   653
	table.insert(dialog02, {func = AnimWait, args = {hero.gear, 500}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   654
	table.insert(dialog02, {func = AnimCaption, args = {hero.gear, loc("Checkpoint reached!"),  4000}})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   655
	table.insert(dialog02, {func = AnimSay, args = {hero.gear, loc("Got the saucer!"), SAY_SHOUT, 2000}})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   656
	table.insert(dialog02, {func = AnimSay, args = {director.gear, loc("Nice!"), SAY_SHOUT, 1000}})
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   657
	table.insert(dialog02, {func = AnimSay, args = {director.gear, loc("Now use it and go to the moon PAotH station to get more fuel!"), SAY_SHOUT, 5000}})
12557
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12556
diff changeset
   658
	table.insert(dialog02, {func = AnimGearWait, args = {hero.gear, 500}})
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12556
diff changeset
   659
	table.insert(dialog02, {func = ShowMission, args = goals[dialog02]})
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12556
diff changeset
   660
	-- DIALOG 03 - Hero got spotted by guard
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   661
	AddSkipFunction(dialog03, Skipanim, {dialog03})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   662
	table.insert(dialog03, {func = AnimSay, args = {guard1.gear, string.format(loc("Hey, %s! Look, someone is stealing the saucer!"), guard2.name), SAY_SHOUT, 4000}})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   663
	table.insert(dialog03, {func = AnimSay, args = {guard2.gear, loc("I'll get him!"), SAY_SAY, 4000}})
12558
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12557
diff changeset
   664
	table.insert(dialog03, {func = AnimCaption, args = {guard1.gear, loc("Prepare to flee!"), 1000}})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   665
	table.insert(dialog03, {func = startCombat, args = {guard1.gear}})
12557
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12556
diff changeset
   666
	table.insert(dialog03, {func = ShowMission, args = goals[dialog03]})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   667
	-- DIALOG 04 - Hero out of sight
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   668
	AddSkipFunction(dialog04, Skipanim, {dialog04})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   669
	table.insert(dialog04, {func = AnimCaption, args = {guard1.gear, loc("You are out of danger, time to go to the moon!"),  4000}})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   670
	table.insert(dialog04, {func = AnimSay, args = {guard1.gear, loc("I guess we lost him!"), SAY_SAY, 3000}})
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   671
	table.insert(dialog04, {func = AnimSay, args = {guard2.gear, loc("We should better report this and continue our watch!"), SAY_SAY, 5000}})
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   672
	table.insert(dialog04, {func = AnimSwitchHog, args = {hero.gear}})
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   673
	-- DIALOG 05 - Hero returned from moon without fuels
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   674
	AddSkipFunction(dialog05, Skipanim, {dialog05})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   675
	table.insert(dialog05, {func = AnimSay, args = {hero.gear, loc("I guess I can't go far without fuel!"), SAY_THINK, 6000}})
12524
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   676
	if abandonedPlanetMission then
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   677
		-- Hog solo is mad he has to play the moon main mission from start. Very sarcastic tone. ;-)
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   678
		table.insert(dialog05, {func = AnimSay, args = {hero.gear, loc("And I just forgot the checkpoint of my main mission. Great, just great!"), SAY_THINK, 7000}})
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   679
	end
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   680
	table.insert(dialog05, {func = AnimSay, args = {hero.gear, loc("Got to go back."), SAY_THINK, 2000}})
12559
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   681
	table.insert(dialog05, {func = sendStatsOnStuckOnMoon, args = {hero.gear}})
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   682
	-- DIALOG 06 - Landing on wrong planet or on earth if not enough fuels
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   683
	AddSkipFunction(dialog06, Skipanim, {dialog06})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   684
	table.insert(dialog06, {func = AnimSay, args = {hero.gear, loc("Hm ... Now I ran out of fuel."), SAY_THINK, 3000}})
12519
206cb38d030f ASA, Spacetrip: Improve messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12518
diff changeset
   685
	table.insert(dialog06, {func = AnimCaption, args = {hero.gear, loc("You have to try again!"), 0}})
9586
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   686
	table.insert(dialog06, {func = sendStatsOnRetry, args = {hero.gear}})
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   687
	-- DIALOG 07 - Hero lands on Death Planet but isn't allowed yet to play this map
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   688
	AddSkipFunction(dialog07, Skipanim, {dialog07})
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   689
	table.insert(dialog07, {func = AnimCaption, args = {hero.gear, loc("This planet seems dangerous!"),  5000}})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   690
	table.insert(dialog07, {func = AnimSay, args = {hero.gear, loc("I am not ready for this planet yet. I should visit it when I have found all the other device parts."), SAY_THINK, 4000}})
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   691
	-- DIALOG 08 - Hero wins death01
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   692
	AddSkipFunction(dialog08, Skipanim, {dialog08})
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   693
	table.insert(dialog08, {func = AnimCaption, args = {hero.gear, loc("Under the meteorites shadow ..."),  4000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   694
	table.insert(dialog08, {func = AnimSay, args = {doctor.gear, loc("You did great, Hog Solo! However, we aren't out of danger yet!"), SAY_SHOUT, 4500}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   695
	table.insert(dialog08, {func = AnimSay, args = {doctor.gear, loc("The meteorite has come too close and the anti-gravity device isn't powerful enough to stop it now."), SAY_SHOUT, 5000}})
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   696
	table.insert(dialog08, {func = AnimSay, args = {doctor.gear, loc("We need it to get split into at least two parts."), SAY_SHOUT, 3000}})
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   697
	table.insert(dialog08, {func = AnimSay, args = {doctor.gear, loc("PAotH has sent explosives but unfortunately the trigger mechanism seems to be faulty!"), SAY_SHOUT, 5000}})
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   698
	table.insert(dialog08, {func = AnimSay, args = {doctor.gear, loc("We need you to go there and detonate them yourself! Good luck!"), SAY_SHOUT, 500}})
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   699
	table.insert(dialog08, {func = AnimWait, args = {doctor.gear, 3000}})
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   700
	table.insert(dialog08, {func = AnimSwitchHog, args = {hero.gear}})
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   701
	table.insert(dialog08, {func = ShowMission, args = goals[dialog08]})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   702
	-- DIALOG 09 - Hero roped to the moon (how naughty!)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   703
	AddSkipFunction(dialog09, Skipanim, {dialog09})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   704
	table.insert(dialog09, {func = AnimSay, args = {doctor.gear, loc("One does not simply rope to the moon!"), SAY_SHOUT, 4500}})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   705
	table.insert(dialog09, {func = punishHeroForRopingToMoon, args = {hero.gear}})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   706
	table.insert(dialog09, {func = AnimWait, args = {hero.gear, 5000}})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   707
	table.insert(dialog09, {func = sendStatsOnRopedToMoon, args = {hero.gear}})
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   708
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   709
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   710
------------------- custom "animation" functions --------------------------
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   711
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   712
function startCombat()
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   713
	-- Use this so guard2 gains control
12514
d89dabfd07ce Use EndTurn to replace TurnTimeLeft=0 in ASA campaign (fixes #225)
Wuzzy <almikes@aol.com>
parents: 12513
diff changeset
   714
	EndTurn(true)
12556
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12538
diff changeset
   715
	getReadyForRumble = true
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   716
end
9584
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   717
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   718
function sendStats(planetMsg)
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   719
	SendStat(siGameResult, planetMsg)
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   720
	SendStat(siCustomAchievement, loc("Return to the mission menu by pressing the \"Go back\" button."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   721
	SendStat(siCustomAchievement, loc("You can choose another planet by replaying this mission."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   722
	SendStat(siCustomAchievement, loc("Planets with completed main missions will be marked with a flower."))
11964
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11692
diff changeset
   723
	SendStat(siCustomAchievement, loc("Planets with all missions completed will be marked with two flowers."))
11965
72be38f6d0c0 Complete space campaign's spacetrip mission if all main+side missions are completed
Wuzzy <almikes@aol.com>
parents: 11964
diff changeset
   724
	if GetCampaignVar("Won") == "true" and GetCampaignVar("Mission1Won") ~= "true" then
72be38f6d0c0 Complete space campaign's spacetrip mission if all main+side missions are completed
Wuzzy <almikes@aol.com>
parents: 11964
diff changeset
   725
		SendStat(siCustomAchievement, loc("Complete all main and side missions to complete the spacetrip mission."))
72be38f6d0c0 Complete space campaign's spacetrip mission if all main+side missions are completed
Wuzzy <almikes@aol.com>
parents: 11964
diff changeset
   726
	end
12538
952afc3d2df2 Show correct kill counts in all ASA missions (fixes #147)
Wuzzy <almikes@aol.com>
parents: 12524
diff changeset
   727
	sendSimpleTeamRankings({teamC.name})
9584
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   728
	EndGame()
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   729
end
9586
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   730
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   731
function sendStatsOnRetry()
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9640
diff changeset
   732
	SendStat(siGameResult, loc("You have to travel again"))
11692
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   733
	SendStat(siCustomAchievement, loc("Your first destination is the moon in order to get more fuel."))
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   734
	SendStat(siCustomAchievement, loc("You have to be careful and must not die!"))
12538
952afc3d2df2 Show correct kill counts in all ASA missions (fixes #147)
Wuzzy <almikes@aol.com>
parents: 12524
diff changeset
   735
	sendSimpleTeamRankings({teamC.name})
9586
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   736
	EndGame()
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   737
end
12559
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   738
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   739
function sendStatsOnStuckOnMoon()
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   740
	SendStat(siGameResult, loc("You have to go back to the moon!"))
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   741
	SendStat(siCustomAchievement, loc("You have to complete the main mission on moon in order to travel to other planets."))
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   742
	sendSimpleTeamRankings({teamC.name})
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   743
	EndGame()
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12558
diff changeset
   744
end
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   745
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   746
function sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   747
	if ropedToMoon ~= 2 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   748
		ropedToMoon = 2
12566
172157a47986 ASA, Spacetrip: Fix stats screen messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   749
		SendStat(siGameResult, loc("You have violated PAotH regulations!"))
172157a47986 ASA, Spacetrip: Fix stats screen messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   750
		SendStat(siCustomAchievement, loc("You have triggered the secret Do-Not-Rope-to-the-Moon Defense System!"))
12561
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   751
		SendStat(siCustomAchievement, loc("Collect the crate with the flying saucer!"))
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   752
		SendStat(siCustomAchievement, loc("Fly to the moon."))
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   753
		sendSimpleTeamRankings({teamC.name})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   754
		EndGame()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   755
	end
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12560
diff changeset
   756
end