Skip to content

Commit

Permalink
The Dream Courts Quest - part 2
Browse files Browse the repository at this point in the history 
I stopped at "The Seven Keys".
  • Loading branch information
@htc16
htc16 committed Nov 1, 2024
1 parent 9b8d3bd commit 6b2370d
Show file tree
Hide file tree
Showing 37 changed files with 656 additions and 378 deletions.
11 changes: 6 additions & 5 deletions data-otservbr-global/lib/core/storages.lua
View file
Original file line number Diff line number Diff line change
Expand Up @@ -2740,6 +2740,7 @@ Storage = {
Cellar = 23132,
Temple = 23133,
Tomb = 23134,
IdolCount = 2313555,
},
BurriedCatedral = {
FishingRod = 23145,
Expand All @@ -2755,7 +2756,7 @@ Storage = {
TheSevenKeys = {
Questline = 23170,
RoseBush = 23171,
Mushroom = 23172,
MushRoom = 23172,
Book = 23173,
OrcSkull = 23174,
Recipe = 23175,
Expand All @@ -2773,20 +2774,20 @@ Storage = {
BossCount = 23191,
MaxxeniusTimer = 23192,
AlptramunTimer = 23193,
PlaguerootTimer = 23194,
PlagueRootTimer = 23194,
IzcandarTimer = 23195,
MalofurTimer = 23196,
NightmareTimer = 23197,
LastBossCurse = 23198,
},
BurriedCatedral = {
BurriedCatedralGlobal = {
FacelessTiles = 531900,
FacelessTimer = 531901,
},
DreamScar = {
DreamScarGlobal = {
MaxxeniusTimer = 531902,
AlptramunTimer = 531903,
PlaguerootTimer = 531904,
PlagueRootTimer = 531904,
IzcandarTimer = 531905,
MalofurTimer = 531906,
AlptramunSummonsKilled = 531907,
Expand Down
14 changes: 0 additions & 14 deletions data-otservbr-global/monster/quests/the_dream_courts/bosses/faceless_bane.lua
View file
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,6 @@ monster.manaCost = 0
monster.events = {
"dreamCourtsDeath",
"facelessThink",
"facelessHealth",
}

monster.changeTarget = {
Expand Down Expand Up @@ -151,19 +150,6 @@ monster.immunities = {
{ type = "bleed", condition = false },
}

mType.onThink = function(monster, interval) end

mType.onAppear = function(monster, creature)
if monster:getType():isRewardBoss() then
-- reset global storage state to default / ensure sqm's reset for the next team
Game.setStorageValue(Storage.Quest.U12_00.TheDreamCourts.FacelessBane.Deaths, -1)
Game.setStorageValue(Storage.Quest.U12_00.TheDreamCourts.FacelessBane.StepsOn, -1)
Game.setStorageValue(Storage.Quest.U12_00.TheDreamCourts.FacelessBane.ResetSteps, 1)
monster:registerEvent("facelessBaneImmunity")
monster:setReward(true)
end
end

mType.onDisappear = function(monster, creature) end

mType.onMove = function(monster, creature, fromPosition, toPosition) end
Expand Down
214 changes: 176 additions & 38 deletions data-otservbr-global/npc/andrew_lyze.lua
View file
Original file line number Diff line number Diff line change
Expand Up @@ -64,6 +64,52 @@ npcType.onCloseChannel = function(npc, creature)
npcHandler:onCloseChannel(npc, creature)
end

local brokenCompass = 25746
local chargeableCompass = 29291
local chargedCompass = 29294
local goldenAxe = 29286
local CompassValue = 10000

local buildCompass = {
[1] = {id = 29346, qnt = 15},
[2] = {id = 29345, qnt = 50},
[3] = {id = 29347, qnt = 5},
[4] = {id = 25746, qnt = 1},
}

local chargeCompass = {
[1] = {id = 29287, qnt = 5},
[2] = {id = 29288, qnt = 3},
[3] = {id = 29289, qnt = 1},
[4] = {id = 29348, qnt = 1},
[5] = {id = 29291, qnt = 1},
}

local function removeBait(player)
local player = Player(player)

if player and player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.HasBait) == 1 then
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.HasBait, - 1)
end
end

local function greetCallback(npc, creature)
local player = Player(creature)
local playerId = player:getId()

if player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) < 1 then
npcHandler:setMessage(MESSAGE_GREET, "Hello, I am the warden of this {monument}. The {sarcophagus} in front of you was established to prevent people from going {down} there. But I doubt that this step is sufficient.")
elseif player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) == 1 then
npcHandler:setMessage(MESSAGE_GREET, "Well, let's see if your mission was successful. Just bring me all needed {materials}.")
elseif player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) == 2 then
npcHandler:setMessage(MESSAGE_GREET, "If you dug up all three crystals of sufficient quantity and obtained the poison gland, the charging of your compass can start! For the very first time it will be charged by the violet crystal. Ready to {unleash} the power of the crystals?")
else
npcHandler:setMessage(MESSAGE_GREET, "Greetings.")
end

return true
end

local function creatureSayCallback(npc, creature, type, message)
local player = Player(creature)
local playerId = player:getId()
Expand All @@ -72,62 +118,154 @@ local function creatureSayCallback(npc, creature, type, message)
return false
end

if MsgContains(message, "monument") then
if MsgContains(message, "monument") and player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) < 1 then
npcHandler:say({
"Well, a while ago powerful magic devices were used all around Tibia. These are chargeable compasses. There was but one problem: they offered the possibility to make people rich in a quite easy way. ...",
"Therefore, these instruments were very coveted. People tried to get their hands on them at all costs. And so it happened what everybody feared - bloody battles forged ahead. ...",
"To put an end to these cruel escalations, eventually all of the devices were collected and destroyed. The remains were buried {deep} in the earth.",
}, npc, creature, 10)
npcHandler:setTopic(playerId, 0)
elseif MsgContains(message, "deep") then
"To put an end to these cruel escalations, eventually all of the devices were collected and destroyed. The remains were buried {deep} in the earth."
}, npc, creature)
npcHandler:setTopic(playerId, 2)
elseif MsgContains(message, "deep") and npcHandler:getTopic(playerId) == 2 then
npcHandler:say("As far as I know it is a place of helish heat with bloodthirsty monsters of all kinds.", npc, creature)
npcHandler:setTopic(playerId, 0)
elseif MsgContains(message, "sarcophagus") then
npcHandler:setTopic(playerId, 1)
elseif MsgContains(message, "sarcophagus") and npcHandler:getTopic(playerId) == 1 then
npcHandler:say("This sarcophagus seals the entrance to the caves down there. Only here you can get all the {materials} you need for a working compass of this kind. So no entrance here - no further magic compasses in Tibia. In theory.", npc, creature)
npcHandler:setTopic(playerId, 4)
elseif MsgContains(message, "down") and npcHandler:getTopic(playerId) == 10 then
npcHandler:say("On first glance, this cave does not look very spectacular, but the things you find in there, are. You have to know that this is the only place where you can find the respective materials to build the compass.", npc, creature)
npcHandler:setTopic(playerId, 0)
elseif MsgContains(message, "materials") then
if player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.AndrewDoor) ~= 1 then
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.AndrewDoor, 1)
if npcHandler:getTopic(playerId) == 4 then
npcHandler:say({
"Only in the cave down there you will find the materials you need to repair the {compass}. Now you know why the entrance is sealed. There's the seal, but I have a deal for you: ...",
"I can repair the compass for you if you deliver what I need. Besides the broken compass you have to bring me the following materials: 50 blue glas plates, 15 green glas plates and 5 violet glas plates. ...",
"They all can be found in this closed cave in front of you. I should have destroyed this seal key but things have changed. The entrance is opened now, go down and do what has to be done."
}, npc, creature)
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline, 1)
npcHandler:setTopic(playerId, 0)
elseif player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) == 1 then
npcHandler:say("May I repair your compass if possible?", npc, creature)
npcHandler:setTopic(playerId, 11)
end
elseif MsgContains(message, "yes") then
if npcHandler:getTopic(playerId) == 11 then
local haveItens = false

for _, k in pairs(buildCompass) do
if player:getItemCount(k.id) >= k.qnt then
haveItens = true
else
haveItens = false
end
end

if haveItens then
for _, k in pairs(buildCompass) do
if player:getItemCount(k.id) >= k.qnt then
player:removeItem(k.id, k.qnt)
end
end

npcHandler:say({
"Alright, I put the glasses into the right pattern and can repair the compass. ...",
"There we are! The next step is the charging of the compass. For this you have to dig three different crystals down there: 5 blue, 3 green and one violet crystal. Are you ready to do that?"
}, npc, creature)
player:addItem(chargeableCompass, 1)
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline, 2)
npcHandler:setTopic(playerId, 12)
else
npcHandler:say("You don't have the needed itens yet.", npc, creature)
npcHandler:setTopic(playerId, 0)
end
elseif npcHandler:getTopic(playerId) == 12 and player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.GotAxe) < 1 then
npcHandler:say({
"Nice! To do so, take this golden axe and mine the prominent crystals in the cave. Besides, I need a poison gland of quite rare spiders, they are called lucifuga araneae. ...",
"These are quite shy, but I have a {bait} for you to lure them. But take care not to face too many of them at once. And hurry, the effect won't last forever!"
}, npc, creature)
player:addItem(goldenAxe, 1)
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.GotAxe, 1)
npcHandler:setTopic(playerId, 0)
elseif npcHandler:getTopic(playerId) == 51 then
if (player:getMoney() + player:getBankBalance()) >= CompassValue then
npcHandler:say("Here's your broken compass!", npc, creature)
player:removeMoneyBank(CompassValue)
player:addItem(brokenCompass, 1)
npcHandler:setTopic(playerId, 10)
else
npcHandler:say("You don't have enough money.", npc, creature)
npcHandler:setTopic(playerId, 0)
end
end
elseif MsgContains(message, "unleash") then
if player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) == 2 then
local haveItens = false

for _, k in pairs(chargeCompass) do
if player:getItemCount(k.id) >= k.qnt then
haveItens = true
else
haveItens = false
end
end

if haveItens then
for _, k in pairs(chargeCompass) do
if player:getItemCount(k.id) >= k.qnt then
player:removeItem(k.id, k.qnt)
end
end

npcHandler:say({
"I put these crystals onto the top of compass. As you can see, the compass is now pulsating in a warm, violet colour. ...",
"Now this compass is ready for usage. It can transfer the bound energy to other inanimate objects to open certain gates or chests."
}, npc, creature)
player:addItem(chargedCompass, 1)
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline, 3)
npcHandler:setTopic(playerId, 0)
else
npcHandler:say("You don't have the needed itens yet.", npc, creature)
npcHandler:setTopic(playerId, 0)
end
end
elseif MsgContains(message, "bait") then
if player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.Questline) == 2 then
if player:getStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.HasBait) < 1 then
npcHandler:say("Done. Worry, the effect won't last forever!", npc, creature)
player:setStorageValue(Storage.Quest.U12_00.TheDreamCourts.UnsafeRelease.HasBait, 1)
addEvent(removeBait, 3*60*1000, player:getId())
npcHandler:setTopic(playerId, 0)
else
npcHandler:say("You're already with my bait!", npc, creature)
npcHandler:setTopic(playerId, 0)
end
else
npcHandler:say("You cannot do that yet.", npc, creature)
npcHandler:setTopic(playerId, 0)
end
npcHandler:say({
"Only in the cave down there you will find the materials you need to repair the compass. Now you know why the entrance is sealed. There's the seal, but I have a deal for you: ...",
"I can repair the compass for you if you deliver what I need. Besides the broken compass you have to bring me the following materials: 50 blue glas plates, 15 green glas plates and 5 violet glas plates. ...",
"They all can be found in this closed cave in front of you. I should have destroyed this seal key but things have changed. The entrance is opened now, go down and do what has to be done.",
}, npc, creature, 10)
npcHandler:setTopic(playerId, 2)
elseif MsgContains(message, "down") then
npcHandler:say("On first glance, this cave does not look very spectacular, but the things you find in there, are. You have to know that this is the only place where you can find the respective materials to build the {compass}.", npc, creature)
npcHandler:setTopic(playerId, 0)
elseif MsgContains(message, "compass") then
npcHandler:say("It was decided to collect all of the compasses, destroy them and throw them in the fiery {depths} of Tibia. I still have some of them here. I {sell} them for a low price if you want.", npc, creature)
npcHandler:setTopic(playerId, 0)
elseif MsgContains(message, "depths") then
npcHandler:say("As far as I know it is a place of helish heat with bloodthirsty monsters of all kinds.", npc, creature)
npcHandler:setTopic(playerId, 0)
npcHandler:say("It was decided to collect all of the compasses, destroy them and throw them in the fiery depths of Tibia. I still have some of them here. I {sell} them for a low price if you want.", npc, creature)
npcHandler:setTopic(playerId, 50)
elseif MsgContains(message, "sell") then
npcHandler:say("Would you like to buy a broken compass for 10.000 gold?", npc, creature)
npcHandler:setTopic(playerId, 1)
elseif MsgContains(message, "yes") and npcHandler:getTopic(playerId) == 1 then
local message = "You have bought a compass"
if not checkWeightAndBackpackRoom(player, 80, message) then
npcHandler:say("You not have room or capacity to take it.", npc, creature)
return true
end
if player:getMoney() + player:getBankBalance() >= 5000 then
player:removeMoneyBank(5000)
player:addItem(10302, 1)
if npcHandler:getTopic(playerId) == 50 then
npcHandler:say("Would you like to buy a broken compass for 10.000 gold?", npc, creature)
npcHandler:setTopic(playerId, 51)
end
elseif MsgContains(message, "no") then
npcHandler:say({"Don't waste my time."}, npc, creature)
npcHandler:setTopic(playerId, 0)
else
npcHandler:say("Sorry, I didn't understand.", npc, creature)
end

return true
end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:setMessage(MESSAGE_GREET, "Hello, I am the warden of this {monument}. The {sarcophagus} in front of you was established to prevent people from going {down} there. But I {doubt} that this step is sufficient.")

npcHandler:setMessage(MESSAGE_WALKAWAY, 'Well, bye then.')
npcHandler:setMessage(MESSAGE_FAREWELL, "Good bye.")

npcHandler:setCallback(CALLBACK_GREET, greetCallback)
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new(), npcConfig.name, true, true, true)

-- npcType registering the npcConfig table
Expand Down
Loading

0 comments on commit 6b2370d

Please sign in to comment.