232 lines
7.4 KiB
Lua
232 lines
7.4 KiB
Lua
--run Files
|
|
local modpath = minetest.get_modpath("specialties")
|
|
dofile(modpath.."/config.lua")
|
|
dofile(modpath.."/tables.lua")
|
|
dofile(modpath.."/externalmodify.lua")
|
|
dofile(modpath.."/nodes.lua")
|
|
dofile(modpath.."/items.lua")
|
|
dofile(modpath.."/xp.lua")
|
|
|
|
local iplus = minetest.get_modpath("inventory_plus")
|
|
|
|
--variable used for time keeping for updating xp
|
|
local time = 0
|
|
|
|
local get_specialInfo = function(name, specialty)
|
|
local formspec = "size[8,8]"..
|
|
"button[2,0;2,0.5;miner;Miner]"..
|
|
"button[2,.75;2,0.5;lumberjack;Lumberjack]"..
|
|
"button[2,1.5;2,0.5;digger;Digger]"..
|
|
"button[2,2.25;2,0.5;farmer;Farmer]"..
|
|
"button[2,3;2,0.5;builder;Builder]"..
|
|
"list[current_player;main;0,4;8,4;]"
|
|
if iplus then
|
|
formspec = formspec.."button[0,0;2,0.5;main;Back]"
|
|
else
|
|
formspec = formspec.."button_exit[0,0;0.75,0.5;close;X]"
|
|
end
|
|
if specialty ~= "" then
|
|
formspec = formspec.."label[4,0;XP: "..specialties.players[name].skills[specialty].."]"..specialties.skills[specialty].menu
|
|
end
|
|
return formspec
|
|
end
|
|
|
|
minetest.register_on_leaveplayer(function(player)--Called if on a server, if single player than it isn't called
|
|
specialties.writeXP(player:get_player_name())
|
|
end)
|
|
|
|
--Initial XP Extraction
|
|
--optimizes the amount of calls to files
|
|
minetest.register_chatcommand("spec", {
|
|
description = "Show Specialties menu",
|
|
func = function(name, param)
|
|
minetest.show_formspec(name, "specialties:spec", get_specialInfo(name, ""))
|
|
end,
|
|
})
|
|
minetest.register_on_joinplayer(function(player)
|
|
player:get_inventory():set_size("pick", 1)
|
|
player:get_inventory():set_size("axe", 1)
|
|
player:get_inventory():set_size("shovel", 1)
|
|
player:get_inventory():set_size("hoe", 1)
|
|
player:get_inventory():set_size("transferslotleft", 1)
|
|
player:get_inventory():set_size("transferslotright", 1)
|
|
player:get_inventory():set_size("transfergrid", 9)
|
|
if iplus then
|
|
inventory_plus.register_button(player,"specialties","Specialties")
|
|
end
|
|
name = player:get_player_name()
|
|
specialties.players[name] = {}
|
|
specialties.players[name].skills = {}
|
|
specialties.players[name].skills = specialties.readXP(name)
|
|
specialties.players[name].hud = {}
|
|
minetest.after(0.5, function()
|
|
local Yoffset = 0.02
|
|
local y = 0
|
|
for skill,num in pairs(specialties.players[name].skills) do
|
|
specialties.players[name].hud[skill] = player:hud_add({
|
|
hud_elem_type = "text",
|
|
position = {x=0, y=0.85+y},
|
|
offset = {x=100, y=0},
|
|
alignment = {x=1, y=0},
|
|
number = 0xFFFFFF ,
|
|
text = tostring(num),
|
|
})
|
|
player:hud_add({
|
|
hud_elem_type = "text",
|
|
position = {x=0, y=0.85+y},
|
|
offset = {x=10, y=0},
|
|
alignment = {x=1, y=0},
|
|
scale = {x=100, y=50},
|
|
number = 0xFFFFFF ,
|
|
text = skill,
|
|
})
|
|
y = y+Yoffset
|
|
end
|
|
end)
|
|
end)
|
|
local function show_formspec(name, specialty)
|
|
minetest.show_formspec(name, "specialties:spec", get_specialInfo(name, specialty))
|
|
end
|
|
|
|
--Skill Events
|
|
local function healTool(player, list, specialty, cost)
|
|
local tool = player:get_inventory():get_list(list)[1]
|
|
if tool:get_name():find(":"..list) == nil then return end
|
|
local name = player:get_player_name()
|
|
if tool:get_wear() ~= 0 and specialties.healAmount[tool:get_name()] ~= nil then
|
|
if specialties.changeXP(name, specialty, -cost) then
|
|
tool:add_wear(-specialties.healAmount[tool:get_name()])
|
|
player:get_inventory():set_stack(list, 1, tool)
|
|
end
|
|
end
|
|
show_formspec(name, specialty)
|
|
end
|
|
local function upgradeTool(player, list, specialty, cost)
|
|
local tool = player:get_inventory():get_list(list)[1]
|
|
if tool:get_name():find(":"..list) == nil then return end
|
|
if specialties.upgradeTree[tool:get_name()] ~= nil then
|
|
if specialties.changeXP(player:get_player_name(), specialty, -cost) then
|
|
player:get_inventory():set_stack(list, 1, specialties.upgradeTree[tool:get_name()])
|
|
end
|
|
end
|
|
show_formspec(player:get_player_name(), specialty)
|
|
end
|
|
local function addSpecial2Tool(player, skill, list, specialty, cost)
|
|
local tool = player:get_inventory():get_list(list)[1]
|
|
local toolname = tool:get_name()
|
|
if toolname:find(":"..list) == nil then return end
|
|
if toolname:find("_"..skill) ~= nil then return end
|
|
local name = player:get_player_name()
|
|
if specialties.changeXP(name, specialty, -cost) then
|
|
local def = tool:get_definition()
|
|
local colonpos = toolname:find(":")
|
|
local modname = toolname:sub(0,colonpos-1)
|
|
if(modname ~= "specialties") then toolname = "specialties"..toolname:sub(colonpos) end
|
|
local name = toolname.."_"..skill
|
|
player:get_inventory():set_stack(list, 1, name)
|
|
end
|
|
show_formspec(name, specialty)
|
|
end
|
|
|
|
--GUI Events
|
|
minetest.register_on_player_receive_fields(function(player, formname, fields)
|
|
local name = player:get_player_name()
|
|
|
|
--Inventory Plus support
|
|
if fields.specialties then
|
|
show_formspec(name, "")
|
|
return
|
|
end
|
|
|
|
--MINER
|
|
if fields.miner then
|
|
show_formspec(name, "miner")
|
|
return
|
|
end
|
|
if fields.healpick then healTool(player, "pick", "miner", 100) end
|
|
if fields.upgradepick then upgradeTool(player, "pick", "miner", 200) end
|
|
if fields.superheatpick then addSpecial2Tool(player, "superheat", "pick", "miner", 500) end
|
|
|
|
--LUMBERJACK
|
|
if fields.lumberjack then
|
|
show_formspec(name, "lumberjack")
|
|
return
|
|
end
|
|
if fields.healaxe then healTool(player, "axe", "lumberjack", 100) end
|
|
if fields.upgradeaxe then upgradeTool(player, "axe", "lumberjack", 200) end
|
|
if fields.superheataxe then addSpecial2Tool(player, "superheat", "axe", "lumberjack", 500) end
|
|
if fields.felleraxe then addSpecial2Tool(player, "feller", "axe", "lumberjack", 750) end
|
|
|
|
--DIGGER
|
|
if fields.digger then
|
|
show_formspec(name, "digger")
|
|
return
|
|
end
|
|
if fields.healshovel then healTool(player, "shovel", "digger", 100) end
|
|
if fields.upgradeshovel then upgradeTool(player, "shovel", "digger", 200) end
|
|
if fields.superheatshovel then addSpecial2Tool(player, "superheat", "shovel", "digger", 500) end
|
|
|
|
--FARMER
|
|
if fields.farmer then
|
|
show_formspec(name, "farmer")
|
|
return
|
|
end
|
|
if fields.healhoe then healTool(player, "hoe", "farmer", 100) end
|
|
if fields.upgradehoe then upgradeTool(player, "hoe", "farmer", 200) end
|
|
if fields.greenthumb then addSpecial2Tool(player, "greenthumb", "hoe", "farmer", 500) end
|
|
|
|
--BUILDER
|
|
if fields.builder then
|
|
show_formspec(name, "builder")
|
|
return
|
|
end
|
|
end)
|
|
|
|
|
|
|
|
--XP Events
|
|
minetest.register_on_dignode(function(pos, oldnode, digger)
|
|
if digger == nil then
|
|
return
|
|
end
|
|
if digger:get_wielded_item():is_empty() then
|
|
return
|
|
end
|
|
local tool = digger:get_wielded_item():get_name()
|
|
local name = digger:get_player_name()
|
|
if tool:find("pick") ~= nil then
|
|
specialties.changeXP(name, "miner", 1)
|
|
end
|
|
if tool:find("axe") ~= nil then
|
|
specialties.changeXP(name, "lumberjack", 1)
|
|
if tool:find("feller") ~= nil and minetest.get_item_group(oldnode.name, "tree") ~= 0 then
|
|
local y = 1
|
|
local abovepos = {x=pos.x,y=pos.y+y,z=pos.z}
|
|
while minetest.get_node(abovepos).name == oldnode.name do
|
|
minetest.dig_node(abovepos)
|
|
y = y+1
|
|
abovepos = {x=pos.x,y=pos.y+y,z=pos.z}
|
|
end
|
|
specialties.changeXP(name, "lumberjack", y-1)
|
|
end
|
|
end
|
|
if tool:find("shovel") ~= nil then
|
|
specialties.changeXP(name, "digger", 1)
|
|
end
|
|
if oldnode.name:find("farming") ~= nil then
|
|
specialties.changeXP(name, "farmer", 5)
|
|
end
|
|
end)
|
|
minetest.register_on_placenode(function(pos, newnode, placer, oldnode)
|
|
specialties.changeXP(placer:get_player_name(), "builder", 1)
|
|
end)
|
|
minetest.register_globalstep(function(dtime)
|
|
if time+dtime < 10 then
|
|
time = time+dtime
|
|
else
|
|
time = 0
|
|
for player in pairs(specialties.players)do
|
|
specialties.writeXP(player)
|
|
end
|
|
end
|
|
end) |