mirror of
https://github.com/1dot13/gamedir.git
synced 2026-07-22 13:40:25 +02:00
Flugente
05ed963535
git-svn-id: https://ja2svn.mooo.com/source/ja2_v1.13_data@2594 4f8fa57e-7814-0410-bad4-adc449f26b7c
315 lines
13 KiB
Lua
315 lines
13 KiB
Lua
--[[
|
|
http://legion.itzg.pl/mzgb/pmwiki/pmwiki.php?n=JaggedAlliance2UBV1.Jav113lua
|
|
Remember! Not to use function EndQuest(QuestID, x, y) and StartQuest(QuestID, x, y) in the file "Quests.lua".
|
|
]]
|
|
|
|
|
|
nQuests =
|
|
{
|
|
-- Quests ID -- BinaryData\QUESTS.EDT Record
|
|
QUEST_DELIVER_LETTER = 0, -- Start quest 0, End quest 1
|
|
QUEST_FOOD_ROUTE = 1, -- Start quest 2, End quest 3
|
|
QUEST_KILL_TERRORISTS = 2, -- Start quest 4, End quest 5
|
|
QUEST_KINGPIN_IDOL = 3, -- Start quest 6, End quest 7
|
|
QUEST_KINGPIN_MONEY = 4, -- Start quest 8, End quest 9
|
|
QUEST_RUNAWAY_JOEY = 5, -- Start quest 10, End quest 11
|
|
QUEST_RESCUE_MARIA = 6, -- Start quest 12, End quest 13
|
|
QUEST_CHITZENA_IDOL = 7, -- Start quest 14, End quest 15
|
|
QUEST_HELD_IN_ALMA = 8, -- Start quest 16, End quest 17
|
|
QUEST_INTERROGATION = 9, -- Start quest 18, End quest 19
|
|
QUEST_ARMY_FARM = 10, -- Start quest 20, End quest 21
|
|
QUEST_FIND_SCIENTIST = 11, -- Start quest 22, End quest 23
|
|
QUEST_DELIVER_VIDEO_CAMERA = 12, -- Start quest 24, End quest 25
|
|
QUEST_BLOODCATS = 13, -- Start quest 26, End quest 27
|
|
QUEST_FIND_HERMIT = 14, -- Start quest 28, End quest 29
|
|
QUEST_CREATURES = 15, -- Start quest 30, End quest 31
|
|
QUEST_CHOPPER_PILOT = 16, -- Start quest 32, End quest 33
|
|
QUEST_ESCORT_SKYRIDER = 17, -- Start quest 34, End quest 35
|
|
QUEST_FREE_DYNAMO = 18, -- Start quest 36, End quest 37
|
|
QUEST_ESCORT_TOURISTS = 19, -- Start quest 38, End quest 39
|
|
QUEST_FREE_CHILDREN = 20, -- Start quest 40, End quest 41
|
|
QUEST_LEATHER_SHOP_DREAM = 21, -- Start quest 42, End quest 43
|
|
QUEST_ESCORT_SHANK = 22, -- Start quest 44, End quest 45
|
|
QUEST_23 = 23, -- Start quest 46, End quest 47
|
|
QUEST_24 = 24, -- Start quest 48, End quest 49
|
|
QUEST_KILL_DEIDRANNA = 25, -- Start quest 50, End quest 51
|
|
QUEST_KINGPIN_ANGEL_MARIA = 26,
|
|
QUEST_HELD_IN_TIXA = 27,
|
|
-- max Quests 254
|
|
}
|
|
|
|
qStatus = {
|
|
QUESTNOTSTARTED = 0,
|
|
QUESTINPROGRESS = 1,
|
|
QUESTDONE = 2,
|
|
QUESTCANNOTSTART = 255,
|
|
}
|
|
|
|
Profiles =
|
|
{
|
|
DYNAMO = 66,
|
|
CARMEN = 78,
|
|
KINGPIN = 86,
|
|
MARIA = 88,
|
|
ANGEL = 89,
|
|
MADAME = 107,
|
|
}
|
|
|
|
nHistory = {
|
|
HISTORY_QUEST_STARTED = 15,
|
|
HISTORY_QUEST_FINISHED = 16,
|
|
}
|
|
|
|
Facts = {
|
|
|
|
FACT_MARIA_ESCAPE_NOTICED = 119,
|
|
FACT_ESTONI_REFUELLING_POSSIBLE = 277,
|
|
FACT_KINGPIN_DEAD = 308,
|
|
FACT_KINGPIN_IS_ENEMY = 359,
|
|
FACT_BOUNTYHUNTER_SECTOR_1 = 380,
|
|
FACT_BOUNTYHUNTER_SECTOR_2 = 381,
|
|
FACT_BOUNTYHUNTER_KILLED_1 = 382,
|
|
FACT_BOUNTYHUNTER_KILLED_2 = 383,
|
|
}
|
|
|
|
nEvents = {
|
|
EVENT_KINGPIN_BOUNTY_INITIAL = 85,
|
|
EVENT_KINGPIN_BOUNTY_END_KILLEDTHEM = 86,
|
|
EVENT_KINGPIN_BOUNTY_END_TIME_PASSED = 87,
|
|
}
|
|
|
|
local NO_PROFILE = 200
|
|
|
|
function InternalStartQuest( ubQuest, sSectorX, sSectorY, fUpdateHistory )
|
|
|
|
if ( CheckQuest(ubQuest) == qStatus.QUESTNOTSTARTED ) then
|
|
|
|
SetQuest( ubQuest, qStatus.QUESTINPROGRESS )
|
|
|
|
if ( fUpdateHistory == true) then
|
|
if ( is_networked == 0 ) then
|
|
SetHistoryFact( nHistory.HISTORY_QUEST_STARTED, ubQuest, GetWorldTotalMin(), sSectorX, sSectorY )
|
|
end
|
|
end
|
|
else
|
|
SetQuest( ubQuest, qStatus.QUESTINPROGRESS )
|
|
end
|
|
|
|
end
|
|
|
|
function InternalEndQuest( ubQuest, sSectorX, sSectorY, fUpdateHistory )
|
|
|
|
if ( not ( CheckQuest(ubQuest) == qStatus.QUESTDONE ) and fUpdateHistory == true ) then
|
|
|
|
if ( ubQuest == nQuests.QUEST_FOOD_ROUTE ) then
|
|
-- food quest is handled differently (completing when spoken to father Walker)
|
|
elseif ( ubQuest == nQuests.QUEST_DELIVER_LETTER ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 3, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_LEATHER_SHOP_DREAM ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 3, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_ESCORT_SKYRIDER ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_CHOPPER_PILOT ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_FREE_CHILDREN ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_RESCUE_MARIA ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_FIND_SCIENTIST ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_DELIVER_VIDEO_CAMERA ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_FIND_HERMIT ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_FREE_DYNAMO ) then
|
|
|
|
-- don't give Dynamo reward for himself
|
|
if ( CheckMercIsDead ( Profiles.DYNAMO ) == false ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, Profiles.DYNAMO )
|
|
end
|
|
|
|
elseif ( ubQuest == nQuests.QUEST_KINGPIN_IDOL ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_CHITZENA_IDOL ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_HELD_IN_ALMA ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_HELD_IN_TIXA ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_RUNAWAY_JOEY ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_ESCORT_TOURISTS ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_ARMY_FARM ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 6, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_KINGPIN_MONEY ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 6, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_BLOODCATS ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 7, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_INTERROGATION ) then
|
|
-- we get here only if wiped out enemies after interrogation
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 8, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_CREATURES ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 8, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_KILL_TERRORISTS ) then
|
|
|
|
-- only reduced experiences if we chosen Slay over Carmen
|
|
if ( CheckMercIsDead ( Profiles.CARMEN ) == true ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
else
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 9, NO_PROFILE )
|
|
end
|
|
|
|
elseif ( ubQuest == nQuests.QUEST_KILL_DEIDRANNA ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 25, NO_PROFILE )
|
|
elseif ( ubQuest == nQuests.QUEST_ESCORT_SHANK ) then
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 5, NO_PROFILE )
|
|
else
|
|
GiveQuestRewardPoint( sSectorX, sSectorY, 4, NO_PROFILE )
|
|
end
|
|
|
|
|
|
end
|
|
|
|
if ( CheckQuest(ubQuest) == qStatus.QUESTINPROGRESS ) then
|
|
|
|
SetQuest( ubQuest, qStatus.QUESTDONE )
|
|
|
|
if ( fUpdateHistory == true ) then
|
|
ResetHistoryFact( ubQuest, sSectorX, sSectorY )
|
|
end
|
|
else
|
|
SetQuest( ubQuest, qStatus.QUESTDONE )
|
|
end
|
|
|
|
if ( ubQuest == nQuests.QUEST_RESCUE_MARIA ) then
|
|
|
|
-- cheap hack to try to prevent Madame Layla from thinking that you are
|
|
-- still in the brothel with Maria...
|
|
SetNPCData1(Profiles.MADAME, 0)
|
|
SetNPCData2(Profiles.MADAME, 0)
|
|
|
|
-- if the escape was not noticed, initiate 'bounty hunter' quest. Set a timer, at some point in the future, if we aren't hostile to him etc.,
|
|
if ( (CheckFact( Facts.FACT_MARIA_ESCAPE_NOTICED, 0 ) == false) and (CheckFact( Facts.FACT_KINGPIN_DEAD, 0 ) == false) and
|
|
(CheckFact( Facts.FACT_KINGPIN_IS_ENEMY, 0 ) == false) and (CheckMercIsDead ( Profiles.KINGPIN ) == false) ) then
|
|
|
|
-- set email from kingpin to arrive on 9:00 the next day
|
|
-- also set up the end of the quest 7 days later
|
|
AddFutureDayStrategicEvent(nEvents.EVENT_KINGPIN_BOUNTY_INITIAL, 540, 0, 1)
|
|
AddFutureDayStrategicEvent(nEvents.EVENT_KINGPIN_BOUNTY_END_TIME_PASSED, 540, 0, 8)
|
|
|
|
-- the silva siblings are placed in one of several sectors and hide there for a week
|
|
-- possible sectors: a11, b5, b6, b8, b12, b14, c3, d7
|
|
-- two groups of bounty hunters are hunting them and will be placed in those sectors (but not in the sector the DaSilvas are in)
|
|
-- if the player kills off all bounty hunters, the Silvas can escape after one week
|
|
|
|
-- select location randomly
|
|
local sector_silva = math.random(1, 8)
|
|
local sector_hunter1 = math.random(1, 8)
|
|
local sector_hunter2 = math.random(1, 8)
|
|
|
|
-- we have to make sure no sector is picked twice
|
|
while (sector_silva == sector_hunter1) do
|
|
sector_hunter1 = math.random(1, 8)
|
|
end
|
|
|
|
while (sector_silva == sector_hunter2 or sector_hunter1 == sector_hunter2) do
|
|
sector_hunter2 = math.random(1, 8)
|
|
end
|
|
|
|
if sector_silva == 1 then
|
|
-- A11
|
|
AddNPCtoSector (Profiles.MARIA,11,1,0)
|
|
AddNPCtoSector (Profiles.ANGEL,11,1,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 11245)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 10765)
|
|
elseif sector_silva == 2 then
|
|
-- B5
|
|
AddNPCtoSector (Profiles.MARIA,5,2,0)
|
|
AddNPCtoSector (Profiles.ANGEL,5,2,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 9050)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 8088)
|
|
elseif sector_silva == 3 then
|
|
-- B6
|
|
AddNPCtoSector (Profiles.MARIA,6,2,0)
|
|
AddNPCtoSector (Profiles.ANGEL,6,2,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 15585)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 15906)
|
|
elseif sector_silva == 4 then
|
|
-- B8
|
|
AddNPCtoSector (Profiles.MARIA,8,2,0)
|
|
AddNPCtoSector (Profiles.ANGEL,8,2,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 7092)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 7089)
|
|
elseif sector_silva == 5 then
|
|
-- B12
|
|
AddNPCtoSector (Profiles.MARIA,12,2,0)
|
|
AddNPCtoSector (Profiles.ANGEL,12,2,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 4870)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 4557)
|
|
elseif sector_silva == 6 then
|
|
-- B14
|
|
AddNPCtoSector (Profiles.MARIA,14,2,0)
|
|
AddNPCtoSector (Profiles.ANGEL,14,2,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 16685)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 16045)
|
|
elseif sector_silva == 7 then
|
|
-- C3
|
|
AddNPCtoSector (Profiles.MARIA,3,3,0)
|
|
AddNPCtoSector (Profiles.ANGEL,3,3,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 12345)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 12338)
|
|
elseif sector_silva == 8 then
|
|
-- D7
|
|
AddNPCtoSector (Profiles.MARIA,7,4,0)
|
|
AddNPCtoSector (Profiles.ANGEL,7,4,0)
|
|
SetProfileStrategicInsertionData(Profiles.MARIA, 19133)
|
|
SetProfileStrategicInsertionData(Profiles.ANGEL, 19766)
|
|
end
|
|
|
|
if sector_hunter1 == 1 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(11, 1) )
|
|
elseif sector_hunter1 == 2 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(5, 2) )
|
|
elseif sector_hunter1 == 3 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(6, 2) )
|
|
elseif sector_hunter1 == 4 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(8, 2) )
|
|
elseif sector_hunter1 == 5 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(12, 2) )
|
|
elseif sector_hunter1 == 6 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(14, 2) )
|
|
elseif sector_hunter1 == 7 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(3, 3) )
|
|
elseif sector_hunter1 == 8 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_1, SECTOR(7, 4) )
|
|
end
|
|
|
|
if sector_hunter2 == 1 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(11, 1) )
|
|
elseif sector_hunter2 == 2 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(5, 2) )
|
|
elseif sector_hunter2 == 3 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(6, 2) )
|
|
elseif sector_hunter2 == 4 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(8, 2) )
|
|
elseif sector_hunter2 == 5 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(12, 2) )
|
|
elseif sector_hunter2 == 6 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(14, 2) )
|
|
elseif sector_hunter2 == 7 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(3, 3) )
|
|
elseif sector_hunter2 == 8 then
|
|
SetFact(Facts.FACT_BOUNTYHUNTER_SECTOR_2, SECTOR(7, 4) )
|
|
end
|
|
end
|
|
end
|
|
|
|
if ( ubQuest == nQuests.QUEST_KINGPIN_ANGEL_MARIA ) then
|
|
-- once this quest is over, make sure Maria and Angel are gone
|
|
SetCharacterSectorX(Profiles.MARIA, 0)
|
|
SetCharacterSectorY(Profiles.MARIA, 0)
|
|
SetCharacterSectorX(Profiles.ANGEL, 0)
|
|
SetCharacterSectorY(Profiles.ANGEL, 0)
|
|
end
|
|
end |