2016-09-11 13:15:13 +02:00

373 lines
11 KiB
Lua

-- story quests
quests = {}
quests.player_quests = {}
quests.file = minetest.get_worldpath() .. "/quests"
quests.callback = nil
function quests.load()
local input = io.open(quests.file, "r")
if input then
local str = input:read("*all")
if str then
if minetest.deserialize(str) then
quests.player_quests = minetest.deserialize(str)
end
else
print("[WARNING] quest file is empty")
end
io.close(input)
else
print("[ERROR] couldnt find quest file")
end
end
function quests.save()
if quests.player_quests then
local output = io.open(quests.file, "w")
local str = minetest.serialize(quests.player_quests)
output:write(str)
io.close(output)
end
end
function quests.show_text(text, player)
local parts = text:split("\n")
for i,txt in ipairs(parts) do
minetest.after(2.9*i, function (txt, player)
if not(minetest.get_player_by_name(player)) then return end
cmsg.push_message_player(minetest.get_player_by_name(player), txt)
end, txt, player)
end
end
function quests.add_quest(player, quest)
if not quests.player_quests[player] then
quests.player_quests[player] = {}
end
print("[quests] add quest")
table.insert(quests.player_quests[player], quest)
quests.save()
if #quest.goals > 0 then
quests.show_text(quest.text .. "\n" .. quest.goals[1].description, player)
else
quests.show_text(quest.text, player)
end
return #quests.player_quests[player]
end
function quests.finish_quest(player, quest)
if not(quest.done) then
cmsg.push_message_player(minetest.get_player_by_name(player), "[quest] You completed " .. quest.title)
end
xp.add_xp(minetest.get_player_by_name(player), quest.xp)
quest.done = true
if quests.callback then
quests.callback(minetest.get_player_by_name(player))
end
end
function quests.finish_goal(player, quest, goal)
if not(goal.done) then
for i = 1, #quest.goals do
if quest.goals[i].requires and quest.goals[i].requires.title == goal.title then
if quest.goals[i].description then
quests.show_text(quest.goals[i].description, player)
end
end
end
if goal.reward then
minetest.get_player_by_name(player):get_inventory():add_item("main", goal.reward)
cmsg.push_message_player(minetest.get_player_by_name(player), goal.ending or "[quest] You completed a goal and you got a reward!")
else
cmsg.push_message_player(minetest.get_player_by_name(player), goal.ending or "[quest] You completed a goal!")
end
if goal.xp then
xp.add_xp(minetest.get_player_by_name(player), goal.xp)
end
end
goal.done = true
if not quest.done then
local all_done = true
for i = 1, #quest.goals do
if not quest.goals[i].done then
all_done = false
break
end
end
if all_done then
quests.finish_quest(player, quest)
end
end
quests.save()
end
function quests.new(player, title, text)
local quest = {
title = title,
done = false,
goals = {},
xp = 0,
text = text or "",
}
return quest
end
function quests.add_dig_goal(quest, title, node, number, description, ending)
local goal = {
title = title,
type = "dig",
node = node,
max = number,
progress = 0,
done = false,
xp = 0,
description = description or "",
ending = ending or nil
}
table.insert(quest.goals, goal)
return goal
end
function quests.add_place_goal(quest, title, node, number, description, ending)
local goal = {
title = title,
type = "placenode",
node = node,
max = number,
progress = 0,
done = false,
xp = 0,
description = description or "",
ending = ending or nil
}
table.insert(quest.goals, goal)
return goal
end
function quests.add_craft_goal(quest, title, item, number, description, ending)
local goal = {
title = title,
type = "craft",
item = item,
node = item,
max = number,
progress = 0,
done = false,
xp = 0,
description = description or "",
ending = ending or nil
}
table.insert(quest.goals, goal)
return goal
end
function quests.process_node_count_goals(player, type, node, count)
count = count or 1
local player_quests = quests.player_quests[player]
if not(player_quests) or #player_quests == 0 then return end
table.foreach(player_quests, function(_, quest)
if not(quest.goals) or #quest.goals == 0 then return end
table.foreach(quest.goals, function(_, goal)
if (not goal.requires or goal.requires.done) and
goal.type == type then
for i=1,#goal.node do
if goal.node[i] == node then
goal.progress = goal.progress + count
if goal.progress >= goal.max then
goal.progress = goal.max
quests.finish_goal(player, quest, goal)
goal.done = true
end
quests.save()
end
end
end
end)
end)
end
quests.show_quests_form = "size[8,7.5;]" .. default.gui_colors ..
default.gui_bg .. "textlist[-0.1,-0.1;8,7.75;quests;%s]"
function quests.format_goal(player, quest, goal)
-- TODO: support formatting for more than just digging and placing
if goal.done then
return "#999999 \\[x\\] " .. (goal.title or "\\[NO TITLE\\]") .. " (" .. tostring(goal.progress) ..
"/" .. tostring(goal.max) .. ")"
else
return " \\[ \\] " .. (goal.title or "\\[NO TITLE\\]") .. " (" .. tostring(goal.progress) ..
"/" .. tostring(goal.max) .. ")"
end
end
function quests.get_formspec(name)
local player_quests = quests.player_quests[name]
if not player_quests or #player_quests == 0 then
local s = quests.show_quests_form
s = string.format(s, "You have not got any quests yet.")
return s
end
local s = quests.show_quests_form
local txt = ""
for _, quest in pairs(player_quests) do
if quest.done then
txt = txt .. "#999999 -> " .. (quest.title or "\\[NO TITLE\\]") .. " (Completed),"
else
txt = txt .. " -> " .. (quest.title or "\\[NO TITLE\\]") .. ","
for _, goal in pairs(quest.goals) do
if not goal.requires or goal.requires.done then
txt = txt .. quests.format_goal(name, quest, goal) .. ","
end
end
end
end
s = string.format(s, txt)
return s
end
minetest.register_chatcommand("quests", {
params = "",
description = "Shows your quests",
privs = {},
func = function(name, text)
minetest.show_formspec(name, "quests:show_quests", quests.get_formspec(name))
return true, ""
end,
})
minetest.register_on_dignode(function(pos, oldnode, digger)
if not digger or not digger:is_player() or
not quests.player_quests[digger:get_player_name()] then
return
end
quests.process_node_count_goals(digger:get_player_name(), "dig", oldnode.name)
end)
minetest.register_on_placenode(function(pos, newnode, placer, oldnode, itemstack, pointed_thing)
if not placer or not placer:is_player() or
not quests.player_quests[placer:get_player_name()] then
return
end
quests.process_node_count_goals(placer:get_player_name(), "placenode", newnode.name)
end)
minetest.register_on_craft(function(itemstack, player, old_craft_grid, craft_inv)
if not player or not player:is_player() or
not quests.player_quests[player:get_player_name()] then
return
end
quests.process_node_count_goals(player:get_player_name(), "craft", itemstack:get_name(),itemstack:get_count())
end)
minetest.register_on_newplayer(function(player)
if not player then
return
end
quests.player_quests[player:get_player_name()] = {}
local name = player:get_player_name()
--tutorial
do
local quest = quests.new(name, "Tutorial", "Hey you!\nI didnt see you before. Are you new here?\nOh, Ok.\nI will help you to find the city \"NAME HERE\".\nYou will be save there.\n But first you need some basic equipment!")
local q1 = quests.add_dig_goal(quest, "Harvest Dirt/Grass", {"default:dirt", "default:grass", "default:wet_grass"}, 10, "You need to harvest some Dirt to get stones!")
local q2 = quests.add_dig_goal(quest, "Harvest Grass", {"default:plant_grass", "default:plant_grass_2", "default:plant_grass_3", "default:plant_grass_4", "default:plant_grass_5", "default:liana", "default:grass", "default:wet_grass"}, 12, "Now you need to get some Grass to craft strings.")
local q3 = quests.add_dig_goal(quest, "Harvest Leaves", {"default:leaves_1", "default:leaves_2", "default:leaves_3" ,"default:leaves_4"}, 6, "Harvest some leaves to craft twigs.")
local q4 = quests.add_place_goal(quest, "Place Workbench", {"default:workbench"}, 1, "You should craft a workbench and place it in front of you!", "If you want to know how to craft things,\n just open the crafting guide I gave you.\nYou can find all craftable items there!")
local q5 = quests.add_craft_goal(quest, "Craft Stone Axe", {"default:axe_stone"}, 1, "Now you can craft a Stone Axe.")
local q6 = quests.add_dig_goal(quest, "Harvest Logs", {"default:log","default:log_1","default:log_2","default:log_3", "default:jungle_tree"}, 20, "You can use the Stone Axe to harvest logs.")
local q7 = quests.add_dig_goal(quest, "Mine Stone", {"default:stone"}, 20, "You can also mine Stone with your Stone Axe.")
local q8 = quests.add_craft_goal(quest, "Craft a Flint Pick", {"default:flint_pick"}, 1, "Craft a Flint Pick!", "You can use the flint pick to dig harder blocks.")
local q9 = quests.add_dig_goal(quest, "Mine Iron", {"default:stone_with_iron"}, 2, "Your Flint Pick is strong enough to mine Iron.", "Great! You should be on level 2 now.\nEvery time you level up you can upgrade on of your skills.\nTry out /skill warrior or /skill miner\n")
q3.reward = "default:wood 3"
q4.reward = "crafting_guide:book"
q2.requires = q1
q3.requires = q2
q4.requires = q3
q5.requires = q4
q6.requires = q5
q7.requires = q6
q8.requires = q7
q9.requires = q8
q5.xp = 10
q9.xp = 10
quest.xp = 10
quests.add_quest(name, quest)
end
do
local quest = quests.new(name, "Lets mine!", "")
local q1 = quests.add_dig_goal(quest, "Mine Stone", {"default:stone"}, 10, "")
local q2 = quests.add_dig_goal(quest, "Mine Coal", {"default:stone_with_coal"}, 10, "")
local q3 = quests.add_dig_goal(quest, "Mine Iron", {"default:stone_with_iron"}, 10, "")
local q4 = quests.add_dig_goal(quest, "Mine Copper", {"default:stone_with_copper"}, 10, "")
local q5 = quests.add_dig_goal(quest, "Mine Diamond", {"default:stone_with_diamond"}, 10, "")
q1.reward = "torch:torch 10"
q1.xp = 10
q2.reward = "farming:apple 30"
q2.xp = 15
q3.reward = "default:pick"
q3.xp = 30
q4.reward = "default:torch 99"
q4.xp = 40
q5.reward = "default:torch 99"
q5.xp = xp.get_xp(5, 1)
quest.xp = 0
quests.add_quest(name, quest)
end
end)
quests.load()
-- exploring
minetest.register_node("quests:map", {
description = "Map",
tiles = {"quests_map_top.png", "quests_map_top.png", "quests_map.png", "quests_map.png", "quests_map.png", "quests_map.png"},
groups = {quest = 1, cracky = 3},
on_punch = function(pos, node, player, pointed_thing)
xp.add_xp(player, math.random(3, 30))
minetest.remove_node(pos)
end,
})
minetest.register_node("quests:ray", {
description = "Ray",
tiles = {"quests_glowing_ray.png"},
groups = {cracky = 1, ray=1},
paramtype = "light",
paramtype2 = "facedir",
drawtype = "nodebox",
light_source = 7,
node_box = {
type = "fixed",
fixed = {
{-0.2, -0.5, -0.2, 0.2, 0.5, 0.2},
},
},
drop = "",
})