share/hedgewars/Data/Missions/Campaign/A_Space_Adventure/cosmos.lua
author Wuzzy <almikes@aol.com>
Wed, 27 Sep 2017 20:44:09 +0200
changeset 12566 250a10a48388
parent 12565 2f7274e5e090
child 12567 68dd14766445
permissions -rw-r--r--
ASA, Spacetrip: Drop weapons on player when landing on moon by rope
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
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
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: 12543
diff changeset
    20
local ropeDestroyed = false -- for detecting if player roped to the moon
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
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 = {}
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
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 = {}
12523
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
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: 12522
diff changeset
    59
local saucerGear = nil
12529
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
    60
-- if player abandoned any incomplete planet mission
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
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
11697
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
9831
afa4e3e04cc5 typos correction
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9802
diff changeset
    80
teamA.name = loc("PAotH")
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    81
teamA.color = tonumber("FF0000",16) -- red
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    82
teamB.name = loc("Guards")
12520
2df340544f25 Fix hard-to-read blue team color in ASA campaign
Wuzzy <almikes@aol.com>
parents: 12519
diff changeset
    83
teamB.color = tonumber("0072FF",16) -- blue
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    84
teamC.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
    85
teamC.color = tonumber("38D61C",16) -- green
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    86
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    87
-------------- LuaAPI EVENT HANDLERS ------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    88
function onGameInit()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    89
	Seed = 35
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    90
	GameFlags = gfSolidLand + gfDisableWind
12565
2f7274e5e090 Update ChangeLog for ASA, increase spacetrip turn time to 20s
Wuzzy <almikes@aol.com>
parents: 12564
diff changeset
    91
	TurnTime = 20000
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    92
	CaseFreq = 0
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    93
	MinesNum = 0
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    94
	Explosives = 0
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
    95
	Delay = 5
12473
d652c6f5d5f1 Disable Sudden Death for a couple of ASA missions
Wuzzy <almikes@aol.com>
parents: 12228
diff changeset
    96
	-- Disable Sudden Death
d652c6f5d5f1 Disable Sudden Death for a couple of ASA missions
Wuzzy <almikes@aol.com>
parents: 12228
diff changeset
    97
	WaterRise = 0
d652c6f5d5f1 Disable Sudden Death for a couple of ASA missions
Wuzzy <almikes@aol.com>
parents: 12228
diff changeset
    98
	HealthDecrease = 0
9635
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
    99
	-- completed main missions
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   100
	status = getCompletedStatus()
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   101
	if status.death01 then
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   102
		Map = "cosmos2_map"
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   103
	else
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   104
		Map = "cosmos_map" -- custom map included in file
ea454f8a1593 changes in cosmos map
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9619
diff changeset
   105
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   106
	Theme = "Nature"
9831
afa4e3e04cc5 typos correction
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9802
diff changeset
   107
	-- 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
   108
	-- PAotH
12054
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11970
diff changeset
   109
	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
   110
	hero.gear = AddHog(hero.name, 0, 100, "war_desertgrenadier1")
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   111
	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
   112
	HogTurnLeft(hero.gear, true)
12054
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11970
diff changeset
   113
	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
   114
	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
   115
	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
   116
	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
   117
	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
   118
	-- Guards
12054
030464f34d47 Tweak flags used in all missions to fit more to the theme
Wuzzy <almikes@aol.com>
parents: 11970
diff changeset
   119
	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
   120
	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
   121
	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
   122
	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
   123
	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
   124
	-- 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
   125
	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
   126
		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
   127
	end
12564
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   128
	if checkPointReached == 4 then
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   129
		-- 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: 12563
diff changeset
   130
		GameFlags = bor(GameFlags, gfArtillery)
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   131
	end
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   132
	-- 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: 12054
diff changeset
   133
	local startSequence
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   134
	-- 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
   135
	if checkPointReached == 1 then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   136
		-- Start of the game
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   137
		startSequence = true
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   138
	elseif checkPointReached == 2 then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   139
		-- Hero on the column, just took space ship unnoticed
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   140
		startSequence = true
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   141
		AnimSetGearPosition(hero.gear, saucerX, saucerY)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   142
	elseif checkPointReached == 3 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   143
		-- Hero near column, without space ship unnoticed
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   144
		startSequence = true
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   145
	elseif checkPointReached == 4 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   146
		-- Hero visited moon for fuels
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   147
		startSequence = true
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   148
		AnimSetGearPosition(hero.gear, 1110, 850)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   149
	elseif checkPointReached == 5 then
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   150
		startSequence = false
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   151
		-- 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
   152
		if GetCampaignVar("Planet") == "moon" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   153
			AnimSetGearPosition(hero.gear, 1110, 850)
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   154
		elseif GetCampaignVar("Planet") == "desertPlanet" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   155
			AnimSetGearPosition(hero.gear, 3670, 270)
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   156
		elseif GetCampaignVar("Planet") == "fruitPlanet" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   157
			AnimSetGearPosition(hero.gear, 2400, 375)
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   158
		elseif GetCampaignVar("Planet") == "icePlanet" then
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   159
			AnimSetGearPosition(hero.gear, 1440, 260)
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   160
		elseif GetCampaignVar("Planet") == "deathPlanet" then
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   161
			AnimSetGearPosition(hero.gear, 620, 530)
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   162
		elseif GetCampaignVar("Planet") == "meteorite" then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   163
			AnimSetGearPosition(hero.gear, 3080, 850)
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   164
		end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   165
	end
12093
1da37e2ba6fd Fix A Space Adventure Missions allowing player to walk before 1st animation and screw things up
Wuzzy <almikes@aol.com>
parents: 12054
diff changeset
   166
	AnimInit(startSequence)
12529
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   167
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   168
	-- Reset checkpoint of other missions when entering this mission.
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   169
	-- 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: 12528
diff changeset
   170
	-- 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: 12528
diff changeset
   171
	abandonedPlanetMission = resetCheckpoint()
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   172
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   173
	AnimationSetup()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   174
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   175
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   176
function onGameStart()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   177
	-- 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
   178
	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
   179
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   180
	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
   181
	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
   182
	"|"..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
   183
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   184
	-- do checkpoint stuff needed after game starts
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   185
	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
   186
		AddAnim(dialog01)
9618
c937b532f8ec give player only one rope
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9617
diff changeset
   187
		AddAmmo(hero.gear, amRope, 1)
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   188
		AddAmmo(guard1.gear, amDEagle, 100)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   189
		AddAmmo(guard2.gear, amDEagle, 100)
12518
d90db45a0c4f Fix crate types in A Space Adventure and some user missions
Wuzzy <almikes@aol.com>
parents: 12473
diff changeset
   190
		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
   191
		-- EVENT HANDLERS
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   192
		AddEvent(onHeroBeforeTreePosition, {hero.gear}, heroBeforeTreePosition, {hero.gear}, 0)
12563
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   193
		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
   194
		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
   195
	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
   196
		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
   197
		AddAnim(dialog02)
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   198
	elseif checkPointReached == 3 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   199
		-- Hero near column, without space ship unnoticed
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   200
	elseif checkPointReached == 4 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   201
		-- Hero visited moon for fuels
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   202
		AddAnim(dialog05)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   203
	elseif checkPointReached == 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   204
		-- Hero has visited a planet, he has plenty of fuels and can change planet
12228
f30eab4b9b05 Give infinite flying saucers in Space Adventure main menu
Wuzzy <almikes@aol.com>
parents: 12093
diff changeset
   205
		AddAmmo(hero.gear, amJetpack, 100)
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   206
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   207
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   208
	AddEvent(onHeroDeath, {hero.gear}, heroDeath, {hero.gear}, 0)
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   209
	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
   210
	-- always check for landings
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   211
	if GetCampaignVar("Planet") ~= "moon" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   212
		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
   213
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   214
	if GetCampaignVar("Planet") ~= "desertPlanet" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   215
		AddEvent(onDesertPlanetLanding, {hero.gear}, desertPlanetLanding, {hero.gear}, 0)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   216
	end
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   217
	if GetCampaignVar("Planet") ~= "fruitPlanet" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   218
		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
   219
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   220
	if GetCampaignVar("Planet") ~= "icePlanet" then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   221
		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
   222
	end
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   223
	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
   224
		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
   225
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   226
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   227
	if status.death01 and not status.final then
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   228
		AddAnim(dialog08)
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   229
		if GetCampaignVar("Planet") ~= "meteorite" then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   230
			AddEvent(onMeteoriteLanding, {hero.gear}, meteoriteLanding, {hero.gear}, 0)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   231
		end
9636
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   232
	end
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   233
9584
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   234
	SendHealthStatsOff()
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   235
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   236
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   237
function onGameTick()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   238
	-- 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
   239
	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
   240
		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
   241
		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
   242
		timeForGuard1ToTurnLeft = timeForGuard1ToTurn
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   243
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   244
	timeForGuard1ToTurnLeft = timeForGuard1ToTurnLeft - 1
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   245
	AnimUnWait()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   246
	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
   247
		return
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   248
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   249
	ExecuteAfterAnimations()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   250
	CheckEvents()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   251
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   252
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   253
function onGameTick20()
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   254
	setFoundDeviceVisual()
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   255
end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   256
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   257
function onPrecise()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   258
	if GameTime > 3000 then
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   259
		SetAnimSkip(true)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   260
	end
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
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   263
function onAmmoStoreInit()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   264
	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
   265
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   266
12529
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   267
local abandonCheck = false
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   268
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   269
function onNewTurn()
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   270
	if ropedToMoon == 1 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   271
		SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   272
		sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   273
		return
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   274
	end
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   275
	if saucerAcquired then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   276
		-- 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: 12543
diff changeset
   277
		-- 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: 12543
diff changeset
   278
		-- used.
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   279
		ropeDestroyed = true
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   280
	end
12529
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   281
	if not abandonCheck and checkPointReached == 5 then
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   282
		if abandonedPlanetMission then
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   283
			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: 12528
diff changeset
   284
		end
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   285
		abandonCheck = false
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   286
	end
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   287
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   288
	if CurrentHedgehog == hero.gear then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   289
		-- 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: 12543
diff changeset
   290
		if getReadyForRumble then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   291
			EndTurn(true)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   292
			getReadyForRumble = false
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   293
		else
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   294
			if guard1.keepTurning then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   295
				TurnTimeLeft = -1
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   296
			end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   297
		end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   298
	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: 12543
diff changeset
   299
		EndTurn(true)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   300
	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: 12543
diff changeset
   301
		EndTurn(true)
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   302
	end
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   303
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   304
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   305
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   306
-------------- EVENTS ------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   307
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   308
function onHeroBeforeTreePosition(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   309
	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
   310
		return true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   311
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   312
	return false
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   313
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   314
12523
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
diff changeset
   315
function onGearAdd(gear)
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
diff changeset
   316
	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: 12522
diff changeset
   317
		saucerGear = gear
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
diff changeset
   318
	end
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
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: 12522
diff changeset
   320
12522
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   321
function onGearDelete(gear)
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   322
	if GetGearType(gear) == gtCase and band(GetGearMessage(gear), gmDestroy) ~= 0 then
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   323
		saucerAcquired = true
12523
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
diff changeset
   324
	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: 12522
diff changeset
   325
		saucerGear = nil
12522
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   326
	end
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   327
end
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   328
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   329
function onHeroOutOfGuardSight(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   330
	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
   331
		return true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   332
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   333
	return false
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   334
end
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   335
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   336
function onMoonLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   337
	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
   338
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   339
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   340
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   341
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   342
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   343
function onFruitPlanetLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   344
	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
   345
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   346
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   347
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   348
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   349
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   350
function onDesertPlanetLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   351
	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
   352
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   353
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   354
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   355
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   356
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   357
function onIcePlanetLanding(gear)
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   358
	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
   359
		return true
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   360
	end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   361
	return false
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   362
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   363
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   364
function onDeathPlanetLanding(gear)
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   365
	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
   366
		return true
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   367
	end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   368
	return false
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   369
end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   370
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   371
function onMeteoriteLanding(gear)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   372
	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
   373
		return true
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   374
	end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   375
	return false
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   376
end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   377
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   378
function onNoFuelAtLand(gear)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   379
	if checkPointReached > 1 and GetHealth(hero.gear) and GetY(gear) > 1400 and
12523
94bba599efd3 ASA, Spacetrip: Fix mission fail if touching ground in flying saucer but still got fuel
Wuzzy <almikes@aol.com>
parents: 12522
diff changeset
   380
			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
   381
		return true
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   382
	end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   383
	return false
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   384
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   385
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   386
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
   387
	if not GetHealth(hero.gear) then
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   388
		return true
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   389
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   390
	return false
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   391
end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   392
9639
6b2ae2eaf1b2 remove unnecessary comments
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9638
diff changeset
   393
-------------- ACTIONS ------------------
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   394
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   395
function heroBeforeTreePosition(gear)
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   396
	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: 12565
diff changeset
   397
		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: 12565
diff changeset
   398
		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: 12565
diff changeset
   399
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   400
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   401
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   402
function prepareDialog02(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   403
	if StoppedGear(gear) and guard1.keepTurning and checkPointReached < 2 then
12563
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   404
		SetGearMessage(gear, 0)
12522
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   405
		EndTurn(true)
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   406
		-- save check point
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   407
		SaveCampaignVar("CosmosCheckPoint", "2")
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   408
		checkPointReached = 2
193b5882429d ASA, Spacetrip mission: Fix poor detection of crate collection
Wuzzy <almikes@aol.com>
parents: 12521
diff changeset
   409
		AddAnim(dialog02)
12563
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   410
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   411
		RemoveEventFunc(onHeroAcquiredSaucer)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   412
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   413
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   414
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   415
function heroAcquiredSaucer(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   416
	-- check if he was spotted by the guard
12563
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   417
	if guard1.turn and guard1.keepTurning and GetX(gear) > saucerX-150 then
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   418
		guard1.keepTurning = false
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   419
		SetGearVelocity(gear, 0, 0)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   420
		AddAnim(dialog03)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   421
	end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   422
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   423
	prepareDialog02(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   424
end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   425
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   426
function onHeroAcquiredSaucer(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   427
	return saucerAcquired
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   428
end
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   429
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   430
function heroOutOfGuardSight(gear)
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   431
	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
   432
	guard1.keepTurning = true
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   433
	AddAnim(dialog04)
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   434
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   435
	if onHeroAcquiredSaucer(gear) then
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   436
		prepareDialog02(gear)
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   437
	end
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   438
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   439
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   440
function moonLanding(gear)
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   441
	if checkPointReached == 1 and not ropeDestroyed then
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   442
		-- Player climbed the moon with rope.
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   443
		-- 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: 12565
diff changeset
   444
		ropedToMoon = 1
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   445
		SetGearVelocity(gear, 0, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   446
		SetGearMessage(gear, 0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   447
		SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   448
		AddAnim(dialog09)
9589
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   449
	else
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   450
		if checkPointReached ~= 5 then
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   451
			SaveCampaignVar("CosmosCheckPoint", "4")
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   452
			SaveCampaignVar("HeroHealth",GetHealth(hero.gear))
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   453
		end
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   454
		AnimCaption(hero.gear,loc("Welcome to the moon!"))
9640
a6a903a6c2b3 some changes regarding hp save in cosmos and moon
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   455
		SaveCampaignVar("HeroHealth", GetHealth(hero.gear))
9589
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   456
		SaveCampaignVar("Planet", "moon")
9611
ef374528a9fb moon side mission map and most of the logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9605
diff changeset
   457
		SaveCampaignVar("UnlockedMissions", "3")
9589
20facc736354 cosmos corrections
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9587
diff changeset
   458
		SaveCampaignVar("Mission1", "2")
9611
ef374528a9fb moon side mission map and most of the logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9605
diff changeset
   459
		SaveCampaignVar("Mission2", "13")
ef374528a9fb moon side mission map and most of the logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9605
diff changeset
   460
		SaveCampaignVar("Mission3", "1")
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   461
		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
   462
	end
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   463
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   464
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   465
function punishHeroForRopingToMoon(gear)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   466
	-- 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: 12565
diff changeset
   467
	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: 12565
diff changeset
   468
	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: 12565
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: 12565
diff changeset
   470
	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: 12565
diff changeset
   471
	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: 12565
diff changeset
   472
	FollowGear(hero.gear)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   473
	SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   474
end
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   475
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   476
function fruitPlanetLanding(gear)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   477
	if checkPointReached < 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   478
		AddAnim(dialog06)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   479
	else
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   480
		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
   481
		SaveCampaignVar("Planet", "fruitPlanet")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   482
		if status.fruit02 then
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   483
			SaveCampaignVar("UnlockedMissions", "4")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   484
			SaveCampaignVar("Mission1", "3")
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   485
			SaveCampaignVar("Mission2", "8")
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   486
			SaveCampaignVar("Mission3", "10")
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   487
			SaveCampaignVar("Mission4", "1")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   488
		else
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   489
			SaveCampaignVar("UnlockedMissions", "3")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   490
			SaveCampaignVar("Mission1", "3")
9590
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   491
			SaveCampaignVar("Mission2", "10")
347e799f01de fruit side mission map and some logic
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9589
diff changeset
   492
			SaveCampaignVar("Mission3", "1")
9587
d6ddcafb1c56 fixed bug not displaying fuit02 after selecting fruitPlanet from cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9586
diff changeset
   493
		end
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   494
		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
   495
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   496
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   497
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   498
function desertPlanetLanding(gear)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   499
	if checkPointReached < 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   500
		AddAnim(dialog06)
9758
3b8058b251b8 some more campaign string tweaks
sheepluva
parents: 9642
diff changeset
   501
	else
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   502
		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
   503
		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
   504
		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
   505
		SaveCampaignVar("Mission1", "4")
9467
483a73697535 desert sidwquest map and basic script
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9457
diff changeset
   506
		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
   507
		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
   508
		SaveCampaignVar("Mission4", "1")
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   509
		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
   510
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   511
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   512
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   513
function icePlanetLanding(gear)
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   514
	if checkPointReached < 5 then
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   515
		AddAnim(dialog06)
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   516
	else
9574
da3d39667881 strings checked, all ok except ice02 that will be probably changed
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9572
diff changeset
   517
		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
   518
		SaveCampaignVar("Planet", "icePlanet")
9457
934f4d8370f1 finally most of the mission mechanics seems ok
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9455
diff changeset
   519
		SaveCampaignVar("UnlockedMissions", "3")
9342
51b5fffe3892 changes about displaying the ice planet mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9328
diff changeset
   520
		SaveCampaignVar("Mission1", "5")
9455
4bf3fac0e49d added iceplanet sidequest map and stub lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9404
diff changeset
   521
		SaveCampaignVar("Mission2", "6")
4bf3fac0e49d added iceplanet sidequest map and stub lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9404
diff changeset
   522
		SaveCampaignVar("Mission3", "1")
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   523
		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
   524
	end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   525
end
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   526
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   527
function deathPlanetLanding(gear)
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   528
	if checkPointReached < 5 then
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   529
		AddAnim(dialog06)
9580
49db7a78c2bd fix typo in cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9578
diff changeset
   530
	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
   531
		AddAnim(dialog07)
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   532
	else
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   533
		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
   534
		SaveCampaignVar("Planet", "deathPlanet")
9601
6af4ca27421a added death planet side mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9590
diff changeset
   535
		SaveCampaignVar("UnlockedMissions", "3")
9572
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   536
		SaveCampaignVar("Mission1", "9")
9601
6af4ca27421a added death planet side mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9590
diff changeset
   537
		SaveCampaignVar("Mission2", "11")
6af4ca27421a added death planet side mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9590
diff changeset
   538
		SaveCampaignVar("Mission3", "1")
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   539
		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
   540
	end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   541
end
278cff2a965f added death planet in cosmos without the order restriction yet
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9484
diff changeset
   542
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   543
function meteoriteLanding(gear)
9640
a6a903a6c2b3 some changes regarding hp save in cosmos and moon
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9639
diff changeset
   544
	-- 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
   545
	if checkPointReached < 5 then
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   546
		AddAnim(dialog06)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   547
	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
   548
		AddAnim(dialog07)
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   549
	else
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   550
		AnimCaption(hero.gear,loc("Welcome to the meteorite!"))
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   551
		SaveCampaignVar("Planet", "meteorite")
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   552
		SaveCampaignVar("UnlockedMissions", "2")
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   553
		SaveCampaignVar("Mission1", "14")
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   554
		SaveCampaignVar("Mission2", "1")
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   555
		sendStats(loc("Hog Solo arrived at the meteorite!"))
9637
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   556
	end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   557
end
b23f9b7d49fa added event for meteorite mission
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9636
diff changeset
   558
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   559
function noFuelAtLand(gear)
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   560
	AddAnim(dialog06)
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   561
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   562
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   563
function heroDeath(gear)
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   564
	if ropedToMoon == 1 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   565
		sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   566
	elseif ropedToMoon == 0 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   567
		sendStatsOnRetry()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   568
	end
9328
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   569
end
811574013fed more events in cosmos about GameEnd
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9326
diff changeset
   570
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   571
function setFoundDeviceVisual()
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   572
	--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
   573
	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
   574
		vgear = AddVisualGear(1116, 848, vgtBeeTrace, 0, false)
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   575
		if status.moon02 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   576
			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: 11697
diff changeset
   577
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   578
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   579
	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
   580
		vgear = AddVisualGear(1512, 120, vgtBeeTrace, 0, false)
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   581
		if status.ice02 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   582
			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: 11697
diff changeset
   583
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   584
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   585
	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
   586
		vgear = AddVisualGear(4015, 316, vgtBeeTrace, 0, false)
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   587
		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: 11697
diff changeset
   588
			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: 11697
diff changeset
   589
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   590
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   591
	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
   592
		vgear = AddVisualGear(2390, 384, vgtBeeTrace, 0, false)
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   593
		if status.fruit03 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   594
			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: 11697
diff changeset
   595
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   596
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   597
	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
   598
		vgear = AddVisualGear(444, 400, vgtBeeTrace, 0, false)
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   599
		if status.death02 then
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   600
			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: 11697
diff changeset
   601
		end
9802
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   602
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   603
	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
   604
		vgear = AddVisualGear(3070, 810, vgtBeeTrace, 0, false)
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   605
		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
   606
	end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   607
end
00216d609140 desert01 fixed destructible terrain marks and cosmos marks for completed main missions
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9758
diff changeset
   608
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   609
-------------- ANIMATIONS ------------------
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   610
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   611
function Skipanim(anim)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   612
	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
   613
		ShowMission(unpack(goals[anim]))
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   614
	end
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   615
	if anim == dialog09 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   616
		SetInputMask(0)
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   617
		-- Quick punishment for the impatient
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   618
		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: 12565
diff changeset
   619
		sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   620
	elseif anim == dialog05 or anim == dialog06 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   621
		sendStatsOnStuckOnMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   622
	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
   623
		AnimSwitchHog(hero.gear)
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   624
	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
   625
		startCombat()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   626
	end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   627
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   628
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   629
function AnimationSetup()
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   630
	-- DIALOG 01 - Start
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   631
	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
   632
	table.insert(dialog01, {func = AnimWait, args = {doctor.gear, 3000}})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   633
	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
   634
	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
   635
	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
   636
	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
   637
	table.insert(dialog01, {func = AnimSay, args = {director.gear, loc("Be careful, the future of Hogera is in your hands!"), SAY_SAY, 7200}})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   638
	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
   639
	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
   640
	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
   641
	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
   642
	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
   643
	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
   644
	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
   645
	table.insert(dialog01, {func = AnimSwitchHog, args = {hero.gear}})
12562
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12561
diff changeset
   646
	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
   647
	-- 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
   648
	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
   649
	table.insert(dialog02, {func = AnimWait, args = {hero.gear, 500}})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   650
	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
   651
	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
   652
	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
   653
	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}})
12562
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12561
diff changeset
   654
	table.insert(dialog02, {func = AnimGearWait, args = {hero.gear, 500}})
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12561
diff changeset
   655
	table.insert(dialog02, {func = ShowMission, args = goals[dialog02]})
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12561
diff changeset
   656
	-- 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
   657
	AddSkipFunction(dialog03, Skipanim, {dialog03})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   658
	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
   659
	table.insert(dialog03, {func = AnimSay, args = {guard2.gear, loc("I'll get him!"), SAY_SAY, 4000}})
12563
0116cfdf9074 ASA, Spacetrip: Fix not properly recognizing crate collection
Wuzzy <almikes@aol.com>
parents: 12562
diff changeset
   660
	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
   661
	table.insert(dialog03, {func = startCombat, args = {guard1.gear}})
12562
b745e322a366 ASA: Update mission texts properly after watching dialog
Wuzzy <almikes@aol.com>
parents: 12561
diff changeset
   662
	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
   663
	-- 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
   664
	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
   665
	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
   666
	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
   667
	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
   668
	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
   669
	-- 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
   670
	AddSkipFunction(dialog05, Skipanim, {dialog05})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   671
	table.insert(dialog05, {func = AnimSay, args = {hero.gear, loc("I guess I can't go far without fuel!"), SAY_THINK, 6000}})
12529
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   672
	if abandonedPlanetMission then
a5ddc6b4abbd ASA: Inform the player about a checkpoint reset
Wuzzy <almikes@aol.com>
parents: 12528
diff changeset
   673
		-- 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: 12528
diff changeset
   674
		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: 12528
diff changeset
   675
	end
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   676
	table.insert(dialog05, {func = AnimSay, args = {hero.gear, loc("Got to go back."), SAY_THINK, 2000}})
12564
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   677
	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
   678
	-- 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
   679
	AddSkipFunction(dialog06, Skipanim, {dialog06})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   680
	table.insert(dialog06, {func = AnimSay, args = {hero.gear, loc("Hm ... Now I ran out of fuel."), SAY_THINK, 3000}})
12524
206cb38d030f ASA, Spacetrip: Improve messages when running out of fuel
Wuzzy <almikes@aol.com>
parents: 12523
diff changeset
   681
	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
   682
	table.insert(dialog06, {func = sendStatsOnRetry, args = {hero.gear}})
9578
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   683
	-- 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
   684
	AddSkipFunction(dialog07, Skipanim, {dialog07})
16139270448f save main missions' status
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9574
diff changeset
   685
	table.insert(dialog07, {func = AnimCaption, args = {hero.gear, loc("This planet seems dangerous!"),  5000}})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   686
	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
   687
	-- DIALOG 08 - Hero wins death01
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   688
	AddSkipFunction(dialog08, Skipanim, {dialog08})
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   689
	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
   690
	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
   691
	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
   692
	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
   693
	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
   694
	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
   695
	table.insert(dialog08, {func = AnimWait, args = {doctor.gear, 3000}})
e1921235fc78 cosmos, after death01 dialogs
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9635
diff changeset
   696
	table.insert(dialog08, {func = AnimSwitchHog, args = {hero.gear}})
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   697
	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: 12565
diff changeset
   698
	-- 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: 12565
diff changeset
   699
	AddSkipFunction(dialog09, Skipanim, {dialog09})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   700
	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: 12565
diff changeset
   701
	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: 12565
diff changeset
   702
	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: 12565
diff changeset
   703
	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
   704
end
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   705
9266
199c1f066aad added landing event handlers for cosmos.lua
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9258
diff changeset
   706
------------------- 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
   707
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   708
function startCombat()
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   709
	-- Use this so guard2 gains control
12519
d89dabfd07ce Use EndTurn to replace TurnTimeLeft=0 in ASA campaign (fixes #225)
Wuzzy <almikes@aol.com>
parents: 12518
diff changeset
   710
	EndTurn(true)
12561
846fa8bb856e ASA: Spacetrip: Fix guards ignoring stealing completely, fix various other game logic fails
Wuzzy <almikes@aol.com>
parents: 12543
diff changeset
   711
	getReadyForRumble = true
9258
5c760ed50b3d first commit, added cosmos(menu) map and lua script with some functionality
Periklis Ntanasis <pntanasis@gmail.com>
parents:
diff changeset
   712
end
9584
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   713
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   714
function sendStats(planetMsg)
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   715
	SendStat(siGameResult, planetMsg)
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   716
	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
   717
	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
   718
	SendStat(siCustomAchievement, loc("Planets with completed main missions will be marked with a flower."))
11969
f3c1679694d3 Draw 2 flowers for fully completed (w/ side missions) planets in space campaign
Wuzzy <almikes@aol.com>
parents: 11697
diff changeset
   719
	SendStat(siCustomAchievement, loc("Planets with all missions completed will be marked with two flowers."))
11970
72be38f6d0c0 Complete space campaign's spacetrip mission if all main+side missions are completed
Wuzzy <almikes@aol.com>
parents: 11969
diff changeset
   720
	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: 11969
diff changeset
   721
		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: 11969
diff changeset
   722
	end
12543
952afc3d2df2 Show correct kill counts in all ASA missions (fixes #147)
Wuzzy <almikes@aol.com>
parents: 12529
diff changeset
   723
	sendSimpleTeamRankings({teamC.name})
9584
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   724
	EndGame()
a7bf5464dfb6 add stats to cosmos
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9580
diff changeset
   725
end
9586
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   726
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   727
function sendStatsOnRetry()
9642
8a691e0f117a use consts for TStatInfo enum
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9640
diff changeset
   728
	SendStat(siGameResult, loc("You have to travel again"))
11697
68eddcdc9f26 Typo fixes for A Space Adventure campaign
Wuzzy <almikes@aol.com>
parents: 9831
diff changeset
   729
	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
   730
	SendStat(siCustomAchievement, loc("You have to be careful and must not die!"))
12543
952afc3d2df2 Show correct kill counts in all ASA missions (fixes #147)
Wuzzy <almikes@aol.com>
parents: 12529
diff changeset
   731
	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
   732
	EndGame()
0b2494d87d99 stats in case player hasn't/can't reach a new destination
Periklis Ntanasis <pntanasis@gmail.com>
parents: 9585
diff changeset
   733
end
12564
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   734
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   735
function sendStatsOnStuckOnMoon()
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   736
	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: 12563
diff changeset
   737
	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: 12563
diff changeset
   738
	sendSimpleTeamRankings({teamC.name})
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   739
	EndGame()
199971225506 ASA, Spacetrip: Better behaviour when entering mission while stuck on woon w/o fuel
Wuzzy <almikes@aol.com>
parents: 12563
diff changeset
   740
end
12566
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   741
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   742
function sendStatsOnRopedToMoon()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   743
	if ropedToMoon ~= 2 then
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   744
		ropedToMoon = 2
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   745
		SendStat(siGameResult, loc("This is the wrong way!"))
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   746
		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: 12565
diff changeset
   747
		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: 12565
diff changeset
   748
		sendSimpleTeamRankings({teamC.name})
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   749
		EndGame()
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   750
	end
250a10a48388 ASA, Spacetrip: Drop weapons on player when landing on moon by rope
Wuzzy <almikes@aol.com>
parents: 12565
diff changeset
   751
end