runes/glyphs.lua

404 lines
13 KiB
Lua

-- A stylus to inscribe glyphs
-- Part of a Rune Mod Redo
-- By Mg, 2016
-- License : WTFPL
--
runes.glyphs = {}
minetest.register_tool("runes:stylus", {
description = "Stylus",
inventory_image = "runes_stylus.png",
on_use = function(itemstack, user, pointed_thing)
if not user or pointed_thing.type ~= "node" then return end
local node = minetest.get_node_or_nil(pointed_thing.under)
if not node or not minetest.registered_nodes[node.name].walkable then
return
end
node = minetest.get_node_or_nil(pointed_thing.above)
if not node or node.name ~= "air" then
return
end
local main_inv = user:get_inventory():get_list("main")
local scroll = main_inv[user:get_wield_index()-1]
if not scroll then
minetest.chat_send_player(user:get_player_name(), "There is no scroll before the stylus in your inventory!")
return
elseif minetest.get_item_group(scroll:get_name(), "scroll") == 0 then
minetest.chat_send_player(user:get_player_name(), "The item before your stylus is not a scroll of knowledge!")
return
end
local name = scroll:get_name():gsub("runes:scroll_", "")
if not runes.scrolls[name] then return end
local glyph = runes.scrolls[name].glyph
if not glyph then return end
if mana.get(user:get_player_name()) < runes.glyphs[name].mana_cost then
minetest.chat_send_player(user:get_player_name(), "You need " .. runes.glyphs[name].mana_cost .. " of mana to inscribe that glyph")
return
end
-- Calculate param2 manually since MineTest doesn't even do it
local diff = vector.subtract(pointed_thing.under, pointed_thing.above)
minetest.add_node(pointed_thing.above, {name = glyph, param2 = minetest.dir_to_wallmounted(diff)})
minetest.get_meta(pointed_thing.above):set_string("master", user:get_player_name())
itemstack:add_wear(65535 / 30)
mana.subtract(user:get_player_name(), runes.glyphs[name].mana_cost)
return itemstack
end,
})
minetest.register_craft({
output = "runes:stylus",
recipe = {
{"", "default:obsidian_shard", "default:mithril_ingot"},
{"default:obsidian_shard", "default:nyancat_rainbow", "default:obsidian_shard"},
{"default:obsidian_shard", "default:obsidian_shard", ""},
},
})
minetest.register_craftitem("runes:recharge_wand", {
description = "Recharge wand",
inventory_image = "runes_recharge_wand.png",
on_use = function(itemstack, user, pointed_thing)
if not pointed_thing.type == "node" or not pointed_thing.under then
return
end
local node = minetest.get_node_or_nil(pointed_thing.under)
if not node or not minetest.registered_nodes[node.name]
or minetest.get_item_group(node.name, "glyph") == 0 then
return
end
local meta = minetest.get_meta(pointed_thing.under)
local charge = meta:get_int("charge")
local rname = node.name:sub(13)
local msg = "Rune already charged at maximum capacity"
if charge < runes.glyphs[rname].max_charge then
local pmana = mana.get(user:get_player_name())
-- Lower the index of pmana if it is higher than 20 (to simplify calculations)
if pmana > 20 then
pmana = 20
end
local delta = runes.glyphs[rname].max_charge - charge
if delta < pmana then
meta:set_int("charge", runes.glyphs[rname].max_charge)
mana.subtract(user:get_player_name(), delta)
msg = "Rune recharged at maximum capacity"
else
meta:set_int("charge", charge + pmana)
mana.subtract(user:get_player_name(), 20)
msg = "Rune recharged"
end
end
minetest.chat_send_player(user:get_player_name(), msg)
end,
})
minetest.register_craft({
output = "runes:recharge_wand",
recipe = {
{"", "", "default:diamond"},
{"", "default:mese_crystal_fragment", ""},
{"default:stick", "", ""},
},
})
minetest.register_craftitem("runes:info_wand", {
description = "Information wand",
inventory_image = "runes_info_wand.png",
on_use = function(itemstack, user, pointed_thing)
if not pointed_thing.type == "node" then
return
end
local node = minetest.get_node_or_nil(pointed_thing.under)
if not node or not minetest.registered_nodes[node.name]
or minetest.get_item_group(node.name, "glyph") == 0 then
return
end
local meta = minetest.get_meta(pointed_thing.under)
local metas = meta:to_table().fields
local owner = meta:get_string("master")
if owner == "" then
owner = "nobody"
end
local rname = node.name:sub(13)
local formspec = "size[7,7]" ..
"label[0,0; Rune informations :]" ..
"button_exit[3, 6.6; 1, 0.6; rune_info_exit; Exit]" ..
"textlist[0, 0.5; 6.8, 5.9; runes_info;" ..
"Rune : " .. rname .. "," ..
"Charge : " .. metas["charge"] .. "/" .. runes.glyphs[rname].max_charge .. "," ..
"Owner : " .. owner
local i = 4
for field, value in pairs(metas) do
if field ~= "master" and field ~= "charge" then
formspec = formspec .. "," .. field .. " (meta) : " .. value
i = i + 1
end
end
formspec = formspec .. ";]"
minetest.show_formspec(user:get_player_name(), "runes:glyph_info", formspec)
end,
})
minetest.register_craft({
output = "runes:info_wand",
recipe = {
{"", "", "default:grass"},
{"", "default:mithril_ingot", ""},
{"default:stick", "", ""},
},
})
function register_glyph(name, basics, tab)
--[[ Basics can contain :
- texture = "runes_glyph_unknown.png",
- description = "Mysterious Glyph",
- initial_charge = 0
- mana_cost = 0
--]]
runes.glyphs[name] = {}
runes.glyphs[name].mana_cost = basics.mana_cost or 0
runes.glyphs[name].max_charge = basics.maximum_charge or 100
local def = table.copy(tab)
def.groups.glyph = 1
def.description = basics.description or "Mysterious Glyph"
def.inventory_image = basics.texture or "runes_glyph_unknown.png"
def.tiles = {basics.texture or "default_stone.png"}
def.on_construct = function(pos)
minetest.get_meta(pos):set_int("charge", (basics.initial_charge or 0))
tab.on_construct(pos)
end
def.drawtype = "signlike"
def.paramtype = "light"
def.paramtype2 = "wallmounted"
def.selection_box = {
type = "wallmounted",
wall_top = {-0.5, 0.4, -0.5, 0.5, 0.5, 0.5},
wall_bottom = {-0.5, -0.5, -0.5, 0.5, -0.4, 0.5},
wall_side = {-0.5, -0.5, -0.5, -0.4, 0.5, 0.5},
}
def.walkable = false
minetest.register_node("runes:glyph_" .. name, def)
end
register_glyph("watchdog", {
description = "Watch Dog Glyph",
texture = "runes_glyph_watchdog.png",
initial_charge = 300,
maximum_charge = 300,
mana_cost = 10,
}, {
light_source = 8,
groups = {snappy = 1},
on_construct = function(pos)
minetest.get_node_timer(pos):start(0.2)
end,
on_timer = function(pos, elapsed)
local meta = minetest.get_meta(pos)
for _, ref in pairs(minetest.get_objects_inside_radius(pos, 3)) do
if ref and not ref:get_armor_groups().immortal then
if not ref:is_player() or ref.is_fake_player or not meta:get_string("master") or meta:get_string("master") == "" or ref:get_player_name() ~= meta:get_string("master") then
ref:set_hp(ref:get_hp() - 1)
meta:set_int("charge", (meta:get_int("charge") or 1) - 1)
local collisionbox = ref:get_properties().collisionbox
local refpos = ref:getpos()
refpos.y = refpos.y + (((collisionbox[4] or 0) - (collisionbox[3] or 0)) / 2)
local vel = vector.subtract(refpos, pos)
minetest.add_particlespawner({
amount = 30,
minpos = pos, maxpos = pos,
minvel = vel, maxvel = vector.multiply(vel, 3),
minacc = 0, maxacc = 0,--vector.multiply(vel, 3),
minexptime = 1, maxexptime = 1,
minsize = 2, maxsize = 5,
collisiondetection = false,
vertical = false,
texture = "runes_glyph_watchdog.png",
})
end
end
end
return true
end
}
)
register_glyph("manasucker", {
description = "Mana Sucker Glyph",
texture = "runes_glyph_manasucker.png",
initial_charge = 100,
maximum_charge = 100,
mana_cost = 20,
}, {
groups = {snappy = 1},
on_construct = function(pos)
minetest.get_node_timer(pos):start(3)
minetest.get_meta(pos):set_int("mana", 0)
end,
on_punch = function(pos, _, puncher)
local meta = minetest.get_meta(pos)
if meta:get_string("master") and puncher:is_player() and not puncher.is_fake_player and puncher:get_player_name() == meta:get_string("master") then
local k = meta:get_int("mana")
local name = puncher:get_player_name()
local o = mana.getmax(name) - mana.get(name)
local u = 0
if k > o then
u = k - mana.getmax(name)
mana.set(name, o)
else
mana.add(name, k)
end
meta:set_int("mana", u)
end
end,
on_timer = function(pos, elapsed)
local meta = minetest.get_meta(pos)
if meta:get_int("charge") <= 0 then
return true
end
local more_mana = 0
for _, ref in pairs(minetest.get_objects_inside_radius(pos, 5)) do
if ref and ref:is_player() and not ref.is_fake_player and (not meta:get_string("master") or meta:get_string("master") == "" or meta:get_string("master") ~= ref:get_player_name()) then
local burst = math.random(10, 40)
local manalevel = mana.get(ref:get_player_name())
if manalevel > 0 then
if manalevel < burst then
mana.set(ref:get_player_name(), 0)
more_mana = more_mana + manalevel
else
mana.subtract(ref:get_player_name(), burst)
more_mana = more_mana + burst
end
local collisionbox = ref:get_properties().collisionbox
local refpos = ref:getpos()
refpos.y = refpos.y + (((collisionbox[4] or 0) - (collisionbox[3] or 0)) / 2)
local vel = vector.subtract(pos, refpos)
minetest.add_particlespawner({
amount = 30,
minpos = refpos, maxpos = refpos,
minvel = vel, maxvel = vel,
minacc = 0, maxacc = 0,--vector.multiply(vel, 3),
minexptime = 1, maxexptime = 1,
minsize = 1, maxsize = 1,
collisiondetection = false,
vertical = false,
texture = "runes_glyph_manasucker.png",
})
meta:set_int("charge", meta:get_int("charge") - 1)
end
end
end
meta:set_int("mana", meta:get_int("mana") + more_mana)
return true
end
}
)
register_glyph("spontafire", {
description = "Spontaneous Fire Glyph",
texture = "runes_glyph_spontafire.png",
initial_charge = 0,
maximum_charge = 500,
mana_cost = 20,
}, {
groups = {snappy = 1},
on_construct = function(pos)
minetest.get_node_timer(pos):start(1)
end,
on_timer = function(pos, elapsed)
local meta = minetest.get_meta(pos)
local charge = meta:get_int("charge")
for _, ref in pairs(minetest.get_objects_inside_radius(pos, 10)) do
if ((not ref:is_player()) and ref:get_entity_name() ~= "gauges:hp_bar")
or (ref:get_player_name() ~= "" and ref:get_player_name() ~= meta:get_string("master")) then
local rpos = vector.round(ref:getpos())
rpos.y = rpos.y - 1
local node = minetest.get_node(rpos)
if node.name == "air" and (not minetest.is_protected(rpos, meta:get_string("master")))
and charge >= runes.glyphs["spontafire"].mana_cost then
minetest.add_node(rpos, {name = "fire:basic_flame"})
charge = charge - runes.glyphs["spontafire"].mana_cost
end
end
end
meta:set_int("charge", charge)
return true
end,
})
register_glyph("prankster", {
description = "Prankster Glyph",
texture = "runes_glyph_prankster.png",
initial_charge = 600,
maximum_charge = 1200,
mana_cost = 20,
},{
groups = {snappy = 1},
on_construct = function(pos)
minetest.get_node_timer(pos):start(5)
end,
on_timer = function(pos, elapsed)
local meta = minetest.get_meta(pos)
local charge = meta:get_int("charge")
for _, ref in pairs(minetest.get_objects_inside_radius(pos, 10)) do
if charge >= runes.glyphs["prankster"].mana_cost and ref:is_player() and ref:get_player_name() ~= meta:get_string("master") then
local thieff = math.random(1,32)
local inv = ref:get_inventory()
if inv then
local stolen = inv:get_stack("main", thieff)
inv:set_stack("main", thieff, nil)
if stolen:get_count() > 0 then
local pos = ref:getpos()
local obj = minetest.add_item({x = pos.x, y = pos.y + 2.5, z = pos.z}, stolen)
if obj then
obj:setvelocity({x = math.random(-5,5), y = math.random(3,5), z = math.random(-5,5)})
end
charge = charge - runes.glyphs["prankster"].mana_cost
minetest.chat_send_player(ref:get_player_name(), "The Prankster attacked you and stole " .. stolen:get_count() .. " "
.. (minetest.registered_items[stolen:get_name()].description or " of something")
)
else
minetest.chat_send_player(ref:get_player_name(), "The Prankster attacked you but failed at stealing from you..")
end
else
minetest.log("Inventory retrieval failed")
end
end
end
meta:set_int("charge", charge)
return true
end,
})