Changed file names

This commit is contained in:
Pao
2023-03-04 00:36:58 +01:00
parent cf0c93fb4b
commit e1a018640b
27 changed files with 0 additions and 0 deletions

View File

@@ -0,0 +1,250 @@
------------------------------------------
-------------- THE ONLY CURE -------------
------------------------------------------
------------- UPDATE EVENTS --------------
require "TOC_Init"
local function CheckIfPlayerIsInfected(player, limbsData)
local bodyDamage = player:getBodyDamage()
-- Check for amputable limbs
for _, v in ipairs(TOC_Common.GetAcceptableBodyPartTypes()) do
local partName = TOC_Common.GetPartNameFromBodyPartType(v)
local partData = limbsData[partName]
local bodyPart = bodyDamage:getBodyPart(v)
if bodyPart:bitten() and partData ~= nil then
if partData.isCut == false then
partData.isInfected = true
end
end
end
-- Check for everything else
for _, v in pairs(TOC_Common.GetOtherBodyPartTypes()) do
if bodyDamage:getBodyPart(v):bitten() then
limbsData.isOtherBodypartInfected = true -- Even one is enough, stop cycling if we find it
break
end
end
end
local function ManagePhantomPain(player, TOCModData)
local limbsData = TOCModData.limbs
local limbParameters = TOC.limbParameters
local body_damage = player:getBodyDamage()
for _, partName in pairs(TOC_Common.GetPartNames()) do
if limbsData[partName].isCut and limbsData[partName].isAmputationShown and ZombRand(1, 100) < 10 then
local body_part = body_damage:getBodyPart(TOC_Common.GetBodyPartFromPartName(partName))
local added_pain
if limbsData[partName].isCauterized then added_pain = 60 else added_pain = 30 end
body_part:setAdditionalPain(ZombRand(1, added_pain))
for _, depended_v in pairs(limbParameters[partName].dependsOn) do
if limbsData[depended_v].isCauterized then added_pain = 60 else added_pain = 30 end
body_part:setAdditionalPain(ZombRand(1, added_pain))
end
end
end
end
local function SetHealthStatusForBodyPart(partData, partName, player)
-- In case the player gets bit in a cut area, we have to heal him...
local bodyDamage = player:getBodyDamage()
local bodyPart = bodyDamage:getBodyPart(TOC_Common.GetBodyPartFromPartName(partName))
if not bodyPart then
print("TOC ERROR: Can't update health of " .. partName)
return false
end
-- Check bandages
local isBandaged = false
local bandageLife = 0
local bandageType = ""
-- TODO Bandages should have some disadvantage when not operated... Like getting drenched or something
if bodyPart:bandaged() then
isBandaged = true -- this is useless
bandageLife = bodyPart:getBandageLife()
bandageType = bodyPart:getBandageType()
end
-- Check for stitching
local isStitched = false -- TODO Implement this
if partData[partName].isCut then
--print("TOC: Check update for " .. part_name)
-- if the player gets attacked and damaged in a cut area we have to reset it here since it doesn't make any sense
-- this is using map 1:1, so it doesn't affect the wound caused by the amputation
-- TODO if the players gets damaged in a cut part and it has a prosthesis, damage the prosthesis
bodyPart:setBleeding(false)
bodyPart:setDeepWounded(false)
bodyPart:setBleedingTime(0)
bodyPart:setDeepWoundTime(0)
bodyPart:SetBitten(false)
bodyPart:setScratched(false, false) -- ffs it always fucks me
bodyPart:setCut(false)
bodyPart:SetInfected(false)
bodyPart:setBiteTime(0)
partData[partName].isInfected = false
-- Set max health for body part
if partData[partName].isCicatrized and bodyPart:getHealth() > 80 then
bodyPart:SetHealth(80)
elseif bodyPart:getHealth() > 40 then
bodyPart:SetHealth(40)
end
-- Cicatrization check
if not partData[partName].isCicatrized then
if partData[partName].cicatrizationTime < 0 then
partData[partName].isCicatrized = true
local playerInv = player:getInventory()
local amputatedClothingItemName = TOC_Common.FindAmputationOrProsthesisName(partName, player, "Amputation")
local amputatedClothingItem = playerInv:FindAndReturn(amputatedClothingItemName)
player:removeWornItem(amputatedClothingItem)
TOC_Visuals.SetTextureForAmputation(amputatedClothingItem, player, true)
player:setWornItem(amputatedClothingItem:getBodyLocation(), amputatedClothingItem)
if (not player:HasTrait("Brave")) and ZombRand(1, 11) > 5 then
player:getTraits():add("Brave")
end
if (not player:HasTrait("Insensitive")) and ZombRand(1, 11) > 5 then
player:getTraits():add("Insensitive")
end
end
end
end
end
local function UpdatePlayerHealth(player, partData)
local bodyDamage = player:getBodyDamage()
if player:HasTrait("Insensitive") then bodyDamage:setPainReduction(49) end
for _, partName in pairs(TOC_Common.GetPartNames()) do
if partData[partName].isCut then
SetHealthStatusForBodyPart(partData, partName, player)
end
end
end
-------------------------------------------
-- MAIN UPDATE FUNCTIONS
TOC.UpdateOnTick = function()
local player = getPlayer()
if player == nil then
return
end
local TOCModData = player:getModData().TOC
if TOCModData ~= nil then
CheckIfPlayerIsInfected(player, TOCModData.limbs)
UpdatePlayerHealth(player, TOCModData.limbs)
end
end
TOC.UpdateEveryTenMinutes = function()
local player = getPlayer()
if player == nil then
return
end
local partData = player:getModData().TOC.limbs
--Experience for prosthesis user
for _, side in pairs(TOC.sideNames) do
if partData[side .. "_Hand"].isProsthesisEquipped or partData[side .. "_LowerArm"].isProsthesisEquipped then
player:getXp():AddXP(Perks[side .. "_Hand"], 4)
end
end
-- Updates the cicatrization time
for _, partName in pairs(TOC_Common.GetPartNames()) do
if partData[partName].isCut and not partData[partName].isCicatrized then
--Wound cleanliness contributes to cicatrization
-- TODO we reset this stuff every time we restart the game for compat reason, this is an issue
local amputatedLimbItem = TOC_Common.GetAmputationItemInInventory(player, partName)
local itemDirtyness = amputatedLimbItem:getDirtyness()/100
local itemBloodyness = amputatedLimbItem:getBloodLevel()/100
local modifier = SandboxVars.TOC.CicatrizationSpeedMultiplier - itemBloodyness - itemDirtyness
--print("TOC: Type " .. amputated_limb_item:getFullType())
--print("TOC: Dirtyness " .. item_dirtyness)
--print("TOC: Bloodyness " .. item_bloodyness)
partData[partName].cicatrizationTime = partData[partName].cicatrizationTime - modifier
end
end
end
TOC.UpdateEveryOneMinute = function()
local player = getPlayer()
-- To prevent errors during loading
if player == nil then
return
end
local TOCModData = player:getModData().TOC
if TOCModData ~= nil then
ManagePhantomPain(player, TOCModData)
end
-- Updates TOC data in a global way, basically player:transmitModData but it works
-- Sends only Limbs since the other stuff is mostly static
if TOCModData ~= nil then
-- FIXME Send little packets instead of the whole thing?
-- TODO we shouldn't run this if we're in SP I guess?
sendClientCommand(player, 'TOC', 'ChangePlayerState', { TOCModData.limbs } )
end
end