329 lines
15 KiB
Lua
329 lines
15 KiB
Lua
Ammo_handler = Instantiatable_class:inherit({
|
|
name = "Ammo_handler",
|
|
construct = function(def)
|
|
if def.instance then
|
|
assert(def.gun, "no gun")
|
|
def.handler = def.gun.handler
|
|
def.inventory = def.handler.inventory
|
|
local meta = def.gun.meta
|
|
local gun = def.gun
|
|
def.ammo = {}
|
|
if gun.properties.ammo then
|
|
local spawn_with = meta:get_int("guns4d_spawn_with_ammo")
|
|
if (meta:get_string("guns4d_loaded_bullets") == "") and ((spawn_with > 0) or (Guns4d.config.interpret_initial_wear_as_ammo))then
|
|
local bullets = (spawn_with > 0 and spawn_with) or (1-(def.gun.itemstack:get_wear()/65535))
|
|
if gun.properties.ammo.magazine_only then
|
|
local magname = gun.properties.ammo.accepted_magazines[1]
|
|
bullets = math.floor(Guns4d.ammo.registered_magazines[magname].capacity*bullets)
|
|
def.ammo.loaded_mag = magname
|
|
def.ammo.loaded_bullets = {
|
|
[Guns4d.ammo.registered_magazines[magname].accepted_bullets[1]] = bullets
|
|
}
|
|
else
|
|
def.ammo.loaded_mag = "empty"
|
|
def.ammo.loaded_bullets = gun.properties.accepted_bullets[1]
|
|
end
|
|
def.ammo.total_bullets = bullets
|
|
gun.itemstack:set_wear(0)
|
|
meta:set_int("guns4d_spawn_with_ammo", 0)
|
|
def:update_meta()
|
|
else
|
|
if meta:get_string("guns4d_loaded_bullets") == "" then
|
|
def.ammo.loaded_mag = gun.properties.ammo.initial_mag or "empty"
|
|
def.ammo.next_bullet = "empty"
|
|
def.ammo.total_bullets = 0
|
|
def.ammo.loaded_bullets = {}
|
|
def:update_meta()
|
|
else
|
|
def.ammo.loaded_mag = meta:get_string("guns4d_loaded_mag")
|
|
def.ammo.loaded_bullets = minetest.deserialize(meta:get_string("guns4d_loaded_bullets"))
|
|
def.ammo.total_bullets = meta:get_int("guns4d_total_bullets") --TODO: REMOVE TOTAL_BULLETS AS A META
|
|
def.ammo.next_bullet = meta:get_string("guns4d_next_bullet")
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
})
|
|
--spend the round, return false if impossible.
|
|
--updates all properties based on the ammo table, bullets string can be passed directly to avoid duplication (when needed)
|
|
function Ammo_handler:update_meta(bullets)
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
local meta = self.gun.meta
|
|
meta:set_string("guns4d_loaded_mag", self.ammo.loaded_mag)
|
|
meta:set_string("guns4d_loaded_bullets", bullets or minetest.serialize(self.ammo.loaded_bullets))
|
|
meta:set_int("guns4d_total_bullets", self.ammo.total_bullets)
|
|
meta:set_string("guns4d_next_bullet", self.ammo.next_bullet)
|
|
self.ammo.magazine_psuedo_empty = false
|
|
if self.gun.ammo_handler then --if it's a first occourance it cannot work.
|
|
self.gun:update_image_and_text_meta(meta)
|
|
end
|
|
self.handler.player:set_wielded_item(self.gun.itemstack)
|
|
end
|
|
function Ammo_handler:get_magazine_bone_info()
|
|
local gun = self.gun
|
|
local handler = self.gun.handler
|
|
local node = mtul.b3d_nodes.get_node_by_name(gun.b3d_model, gun.properties.visuals.magazine, true)
|
|
--get trans of first frame
|
|
if not node then
|
|
minetest.log("error", "improperly set gun magazine bone name, could not properly calculate magazine transformation.")
|
|
return self.gun.pos, vector.new(), vector.new()
|
|
end
|
|
local pos1 = vector.new(mtul.b3d_nodes.get_node_global_position(nil, node, true, math.floor(gun.animation_data.current_frame)))
|
|
local pos2 = vector.new(mtul.b3d_nodes.get_node_global_position(nil, node, true, gun.animation_data.current_frame))
|
|
local vel = (pos2-pos1)*((gun.animation_data.current_frame-math.floor(gun.animation_data.current_frame))/gun.animation_data.fps)+self.gun.player:get_velocity()
|
|
local pos = self.gun:get_pos(pos2/10)+self.gun.handler:get_pos()
|
|
--[[so I tried to get the rotation before, and it actually turns out that was... insanely difficult? Why? I don't know, the rotation behavior was beyond unexpected, I tried implementing it with quats and
|
|
matrices and neither worked. I'm done, I've spent countless hours on this, and its fuckin stupid to spend a SECOND more on this pointless shit. It wouldnt even look that much better!]]
|
|
return pos, vel
|
|
end
|
|
--use a round, called when the gun is shot. Returns a bool indicating success.
|
|
function Ammo_handler:spend_round()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
local bullet_spent = self.ammo.next_bullet
|
|
local meta = self.gun.meta
|
|
--subtract the bullet
|
|
if (self.ammo.total_bullets > 0) and (bullet_spent ~= "empty") then
|
|
--only actually subtract the round if infinite_ammo is false.
|
|
if not self.handler.infinite_ammo then
|
|
self.ammo.loaded_bullets[bullet_spent] = self.ammo.loaded_bullets[bullet_spent]-1
|
|
if self.ammo.loaded_bullets[bullet_spent] == 0 then self.ammo.loaded_bullets[bullet_spent] = nil end
|
|
self.ammo.total_bullets = self.ammo.total_bullets - 1
|
|
if (self.ammo.total_bullets == 0) and (self.gun.properties.charging.bolt_charge_mode == "catch") then
|
|
self.gun.bolt_charged = true
|
|
end
|
|
end
|
|
--set the new current bullet
|
|
if next(self.ammo.loaded_bullets) then
|
|
self.ammo.next_bullet = Guns4d.math.weighted_randoms(self.ammo.loaded_bullets)
|
|
meta:set_string("guns4d_next_bullet", self.ammo.next_bullet)
|
|
else
|
|
self.ammo.next_bullet = "empty"
|
|
meta:set_string("guns4d_next_bullet", "empty")
|
|
if self.gun.properties.charging.bolt_charge_mode == "catch" then
|
|
self.gun.bolt_charged = true
|
|
end
|
|
end
|
|
|
|
self:update_meta()
|
|
return bullet_spent
|
|
end
|
|
end
|
|
function Ammo_handler:chamber_round()
|
|
self.ammo.next_bullet = Guns4d.math.weighted_randoms(self.ammo.loaded_bullets) or "empty"
|
|
end
|
|
local function tally_ammo_from_meta(meta)
|
|
local string = meta:get_string("guns4d_loaded_bullets")
|
|
if string=="" then return 0 end
|
|
local count = 0
|
|
for i, v in pairs(minetest.deserialize(string)) do
|
|
count=count+v
|
|
end
|
|
return count
|
|
end
|
|
local function tally_ammo(ammo)
|
|
local total = 0
|
|
for i, v in pairs(ammo) do
|
|
total = total + v
|
|
end
|
|
return total
|
|
end
|
|
function Ammo_handler:load_magazine()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
local inv = self.inventory
|
|
local magstack_index
|
|
local highest_ammo = -1
|
|
local gun = self.gun
|
|
local gun_accepts = gun.accepted_magazines
|
|
if self.ammo.loaded_mag ~= "empty" or self.ammo.total_bullets > 0 then
|
|
--it's undefined, make assumptions.
|
|
self:unload_all()
|
|
end
|
|
for i, v in pairs(inv:get_list("main")) do
|
|
if gun_accepts[v:get_name()] then
|
|
local mag_meta = v:get_meta()
|
|
--intiialize data if it doesn't exist so it doesnt kill itself
|
|
if mag_meta:get_string("guns4d_loaded_bullets") == "" then
|
|
Guns4d.ammo.initialize_mag_data(v)
|
|
inv:set_stack("main", i, v)
|
|
end
|
|
local ammo = tally_ammo_from_meta(mag_meta)
|
|
if ammo > highest_ammo then
|
|
highest_ammo = ammo
|
|
local has_unaccepted = false
|
|
for bullet, _ in pairs(minetest.deserialize(mag_meta:get_string("guns4d_loaded_bullets"))) do
|
|
if not gun.accepted_bullets[bullet] then
|
|
has_unaccepted = true
|
|
break
|
|
end
|
|
end
|
|
if not has_unaccepted then magstack_index = i end
|
|
end
|
|
end
|
|
end
|
|
if magstack_index then
|
|
local magstack = inv:get_stack("main", magstack_index)
|
|
local magstack_meta = magstack:get_meta()
|
|
--get the ammo stuff
|
|
|
|
local bullet_string = magstack_meta:get_string("guns4d_loaded_bullets")
|
|
local ammo = self.ammo
|
|
ammo.loaded_mag = magstack:get_name()
|
|
ammo.loaded_bullets = minetest.deserialize(bullet_string)
|
|
ammo.total_bullets = tally_ammo(ammo.loaded_bullets)
|
|
if self.gun.bolt_charged or (self.gun.properties.charging.bolt_charge_mode == "none") then
|
|
ammo.next_bullet = Guns4d.math.weighted_randoms(ammo.loaded_bullets) or "empty"
|
|
self.gun.bolt_charged = false
|
|
else
|
|
ammo.next_bullet = "empty"
|
|
end
|
|
self:update_meta()
|
|
inv:set_stack("main", magstack_index, "")
|
|
return
|
|
end
|
|
end
|
|
function Ammo_handler:load_single_cartridge()
|
|
local inv = self.inventory
|
|
local gun = self.gun
|
|
local ammo = self.ammo
|
|
local bullet
|
|
if self.ammo.total_bullets >= gun.properties.ammo.capacity then return false end
|
|
for i, v in pairs(inv:get_list("main")) do
|
|
if gun.accepted_bullets[v:get_name()] then
|
|
self:update_meta()
|
|
bullet = v:get_name()
|
|
v:take_item(1)
|
|
inv:set_stack("main", i, v)
|
|
break
|
|
end
|
|
end
|
|
if bullet then
|
|
ammo.loaded_bullets[bullet] = (ammo.loaded_bullets[bullet] or 0)+1
|
|
ammo.total_bullets = ammo.total_bullets+1
|
|
if self.gun.bolt_charged or (self.gun.properties.charging.bolt_charge_mode == "none") then
|
|
ammo.next_bullet = Guns4d.math.weighted_randoms(ammo.loaded_bullets) or "empty"
|
|
self.gun.bolt_charged = false
|
|
else
|
|
ammo.next_bullet = "empty"
|
|
end
|
|
self:update_meta()
|
|
return true
|
|
end
|
|
return false
|
|
end
|
|
function Ammo_handler:inventory_has_ammo(only_cartridges)
|
|
local inv = self.inventory
|
|
local gun = self.gun
|
|
for i, v in pairs(inv:get_list("main")) do
|
|
if (not only_cartridges) and gun.accepted_magazines[v:get_name()] and (tally_ammo_from_meta(v:get_meta())>0) then
|
|
return true
|
|
end
|
|
if ((only_cartridges or not gun.properties.ammo.magazine_only) and gun.accepted_bullets[v:get_name()]) then
|
|
return true
|
|
end
|
|
end
|
|
return false
|
|
end
|
|
function Ammo_handler:can_load_magazine()
|
|
local inv = self.inventory
|
|
local gun = self.gun
|
|
local gun_accepts = gun.accepted_magazines
|
|
for i, v in pairs(inv:get_list("main")) do
|
|
if gun_accepts[v:get_name()] then
|
|
return true
|
|
end
|
|
end
|
|
return false
|
|
end
|
|
--state will automatically set reset on update_meta()
|
|
function Ammo_handler:set_unloading(bool)
|
|
self.ammo.magazine_psuedo_empty = bool
|
|
self.gun:update_image_and_text_meta()
|
|
self.gun.player:set_wielded_item(self.gun.itemstack)
|
|
end
|
|
function Ammo_handler:unload_magazine(to_ground)
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
if self.ammo.loaded_mag ~= "empty" then
|
|
local inv = self.handler.inventory
|
|
local magstack = ItemStack(self.ammo.loaded_mag)
|
|
local magmeta = magstack:get_meta()
|
|
local gunmeta = self.gun.meta
|
|
--set the mag's meta before updating ours and adding the item.
|
|
magmeta:set_string("guns4d_loaded_bullets", gunmeta:get_string("guns4d_loaded_bullets"))
|
|
--magmeta:set_string("guns4d_total_bullets", gunmeta:get_string("guns4d_total_bullets"))
|
|
if not Guns4d.ammo.registered_magazines[magstack:get_name()] then minetest.log("error", "player `"..self.gun.player:get_player_name().."` ejected an unregistered magazine: `"..magstack:get_name().." `from a gun") else
|
|
magstack = Guns4d.ammo.update_mag(nil, magstack, magmeta)
|
|
end
|
|
--throw it on the ground if to_ground is true
|
|
local remaining
|
|
if to_ground then
|
|
remaining = magstack
|
|
else
|
|
remaining = inv:add_item("main", magstack)
|
|
end
|
|
--eject leftover or full stack
|
|
if remaining:get_count() > 0 then
|
|
local pos, vel = self:get_magazine_bone_info()
|
|
local object = minetest.add_item(pos, remaining)
|
|
object:set_velocity(vel)
|
|
vector.new(-1,-1,1)
|
|
--look I'm not going to pretend I understand how fucking broken minetest's coordinate systems are, and I'm so fucking done with this shit, so this is good enough
|
|
object:set_rotation(vector.multiply(vector.dir_to_rotation(self.gun:get_dir()), vector.new(-1,1,0))+vector.new(0,math.pi,0))
|
|
--object:set_rotation(rot)
|
|
--object:add_velocity(vector.rotate({x=.6,y=-.3,z=.4}, {x=0,y=-self.handler.look_rotation.y*math.pi/180,z=0}))
|
|
end
|
|
self.ammo.loaded_mag = "empty"
|
|
self.ammo.next_bullet = "empty"
|
|
self.ammo.total_bullets = 0
|
|
self.ammo.loaded_bullets = {}
|
|
self:update_meta()
|
|
end
|
|
end
|
|
--this is used for unloading flat, or unloading as a "clip" aka a feed only magazine, you'd use this for something like an m1 garand. God that ping.
|
|
function Ammo_handler:unload_all(to_ground)
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
local inv = self.handler.inventory
|
|
for i, v in pairs(self.ammo.loaded_bullets) do
|
|
local leftover
|
|
--if to_ground is true throw it to the ground
|
|
if to_ground then
|
|
leftover = ItemStack("main", i.." "..tostring(v))
|
|
else
|
|
leftover = inv:add_item("main", i.." "..tostring(v))
|
|
end
|
|
if leftover:get_count() > 0 then --I don't know itemstacks well enough to know if I need this (for leftover stack of add_item)
|
|
local object = minetest.add_item(self.gun.pos, leftover)
|
|
end
|
|
end
|
|
if self.ammo.loaded_mag ~= "empty" then
|
|
local stack
|
|
if to_ground or Guns4d.ammo.registered_magazines[self.ammo.loaded_mag].hot_eject then
|
|
stack = ItemStack(self.ammo.loaded_mag)
|
|
else
|
|
stack = inv:add_item("main", self.ammo.loaded_mag)
|
|
end
|
|
if stack:get_count() > 0 then
|
|
local object = minetest.add_item(self.gun.pos, stack)
|
|
end
|
|
end
|
|
self.ammo.loaded_mag = "empty"
|
|
self.ammo.next_bullet = "empty"
|
|
self.ammo.total_bullets = 0
|
|
self.ammo.loaded_bullets = {}
|
|
self:update_meta()
|
|
end
|
|
function Ammo_handler:load_magless()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
end
|
|
function Ammo_handler:unload_magless()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
end
|
|
function Ammo_handler:load_fractional()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
end
|
|
function Ammo_handler:unload_fractional()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
end
|
|
function Ammo_handler:unload_chamber()
|
|
assert(self.instance, "attempt to call object method on a class")
|
|
end |