forked from Mirrors/openclonk
186 lines
4.6 KiB
C
186 lines
4.6 KiB
C
/**
|
|
Treasure Hunt
|
|
Find the treasure and swap it for a barrel of oil
|
|
|
|
@authors Sven2
|
|
*/
|
|
|
|
static g_is_initialized; // set after first player join
|
|
static g_max_player_num; // max number of players that were ever joined
|
|
|
|
// Set in Objects.c
|
|
//static npc_dagobert, npc_tarzan, g_golden_shovel, g_flagpole, g_golden_idol, g_last_stone_door;
|
|
static g_got_gem_task, g_got_oil, g_goal, g_treasure_collected;
|
|
static npc_pyrit;
|
|
|
|
func DoInit(int first_player)
|
|
{
|
|
var relaunch_rule = GetRelaunchRule();
|
|
relaunch_rule->SetInventoryTransfer(true);
|
|
relaunch_rule->SetFreeCrew(true);
|
|
relaunch_rule->SetRespawnDelay(1);
|
|
relaunch_rule->SetBaseRespawn(true);
|
|
relaunch_rule->SetDefaultRelaunchCount(nil);
|
|
relaunch_rule->SetAllowPlayerRestart(true);
|
|
relaunch_rule->SetLastClonkRespawn(true);
|
|
relaunch_rule->SetInitialRelaunch(false);
|
|
ClearFreeRect(530,1135, 50,2);
|
|
if (g_last_stone_door) g_last_stone_door->DoDamage(170 - g_last_stone_door->GetDamage());
|
|
if (g_golden_idol)
|
|
{
|
|
g_golden_idol->SetLightRange(150,15);
|
|
g_golden_idol->SetLightColor(0xffc000);
|
|
}
|
|
if (g_golden_shovel)
|
|
{
|
|
g_golden_shovel->SetLightRange(25,15);
|
|
g_golden_shovel->SetLightColor(0xffc000);
|
|
}
|
|
npc_dagobert->SetAlternativeSkin("Beggar");
|
|
// Start Intro.
|
|
StartSequence("Intro", 0, g_flagpole);
|
|
return true;
|
|
}
|
|
|
|
func InitializePlayer(int plr)
|
|
{
|
|
// Players only
|
|
if (GetPlayerType(plr)!=C4PT_User) return;
|
|
// Scenario init
|
|
if (!g_is_initialized) g_is_initialized = DoInit(plr);
|
|
// Harsh zoom range
|
|
for (var flag in [PLRZOOM_LimitMax, PLRZOOM_Direct])
|
|
SetPlayerZoomByViewRange(plr,400,250,flag);
|
|
SetPlayerViewLock(plr, true);
|
|
// Create per-player-counted tools
|
|
if (g_max_player_num < GetPlayerCount(C4PT_User))
|
|
{
|
|
++g_max_player_num;
|
|
for (var obj in FindObjects(Find_ID(Chest)))
|
|
if (obj.tool_spawn)
|
|
obj->CreateContents(obj.tool_spawn);
|
|
}
|
|
// Initial join
|
|
JoinPlayer(plr);
|
|
GetCrew(plr)->CreateContents(Shovel);
|
|
return true;
|
|
}
|
|
|
|
func JoinPlayer(int plr)
|
|
{
|
|
// Place in village
|
|
var crew;
|
|
for(var index = 0; crew = GetCrew(plr, index); ++index)
|
|
{
|
|
var x = 190 + Random(20);
|
|
var y = 1175;
|
|
crew->SetPosition(x , y);
|
|
crew->SetDir(DIR_Right);
|
|
crew->DoEnergy(1000);
|
|
}
|
|
return true;
|
|
}
|
|
|
|
|
|
/* Enemy encounter messages */
|
|
|
|
func EncounterCastle(object enemy, object player)
|
|
{
|
|
Dialogue->MessageBoxAll("$MsgEncounterCastle$", enemy, true);
|
|
return true;
|
|
}
|
|
|
|
func EncounterFinal(object enemy, object player)
|
|
{
|
|
Dialogue->MessageBoxAll("$MsgEncounterFinal$", enemy, true);
|
|
return true;
|
|
}
|
|
|
|
|
|
/* Events */
|
|
|
|
func OnTreasureCollected(object treasure)
|
|
{
|
|
g_treasure_collected = true;
|
|
Dialogue->MessageBoxAll("$MsgTreasureCollected$", treasure->Contained(), true);
|
|
// Dagobert has something new to say now
|
|
if (npc_dagobert)
|
|
{
|
|
var dlg = Dialogue->FindByTarget(npc_dagobert);
|
|
if (dlg) dlg->AddAttention();
|
|
}
|
|
return true;
|
|
}
|
|
|
|
func OnPlaneLoaded(object plane, object oil)
|
|
{
|
|
if (!plane || !oil) return false; // disappeared in that one frame?
|
|
oil->Enter(plane);
|
|
g_goal->OnOilDelivered();
|
|
return StartSequence("Outro", 0, plane);
|
|
}
|
|
|
|
static g_num_goldbars;
|
|
static const MAX_GOLD_BARS = 20;
|
|
|
|
func OnGoldBarCollected(object collector)
|
|
{
|
|
++g_num_goldbars;
|
|
var sAchievement = "";
|
|
if (g_num_goldbars==MAX_GOLD_BARS/4)
|
|
{
|
|
sAchievement = "|$Achieve5$";
|
|
GainScenarioAchievement("Bars", 1);
|
|
}
|
|
else if (g_num_goldbars==MAX_GOLD_BARS/2)
|
|
{
|
|
sAchievement = "|$Achieve10$";
|
|
GainScenarioAchievement("Bars", 2);
|
|
}
|
|
else if (g_num_goldbars==MAX_GOLD_BARS)
|
|
{
|
|
sAchievement = "|$Achieve20$";
|
|
GainScenarioAchievement("Bars", 3);
|
|
}
|
|
UpdateLeagueScores();
|
|
Dialogue->MessageBoxAll(Format("$MsgGoldBarCollected$%s", g_num_goldbars, MAX_GOLD_BARS, sAchievement), collector, true);
|
|
return true;
|
|
}
|
|
|
|
public func OnGoalsFulfilled()
|
|
{
|
|
SetNextScenario("Missions.ocf/DarkCastle.ocs");
|
|
GainScenarioAchievement("Done");
|
|
GainScenarioAccess("S2Treasure");
|
|
UpdateLeagueScores();
|
|
// Return true to force goal rule to not call GameOver() yet, as it will be done by outro sequence
|
|
return true;
|
|
}
|
|
|
|
func OnGameOver()
|
|
{
|
|
// In case gems are collected after game end.
|
|
UpdateLeagueScores();
|
|
return true;
|
|
}
|
|
|
|
func UpdateLeagueScores()
|
|
{
|
|
// +50 for finishing and +5 for every gold bar
|
|
var goal_finished = (g_goal && g_goal->IsFulfilled());
|
|
return SetLeagueProgressScore(g_num_goldbars, g_num_goldbars * 5 + goal_finished * 50);
|
|
}
|
|
|
|
func OnInvincibleDamage(object damaged_target)
|
|
{
|
|
// Closest Clonk remarks that the door is invincible
|
|
if (damaged_target && damaged_target->GetID() == StoneDoor)
|
|
{
|
|
var observer = damaged_target->FindObject(Find_ID(Clonk), Find_OCF(OCF_Alive), damaged_target->Sort_Distance());
|
|
if (observer)
|
|
{
|
|
Dialogue->MessageBoxAll("$MsgStoneDoorNoDamage$", observer, true);
|
|
}
|
|
}
|
|
return true;
|
|
} |