289 lines
10 KiB
Lua
289 lines
10 KiB
Lua
|
|
function TryToToResetEverythingOtherPlayer(_, patient, surgeon)
|
|
sendClientCommand(surgeon, "TOC", "AskToResetEverything", {patient:getOnlineID()})
|
|
end
|
|
|
|
|
|
|
|
|
|
function TryTocAction(_, part_name, action, surgeon, patient)
|
|
-- TODO add checks so that we don't show these menus if a player has already beeen operated or amputated
|
|
-- TODO at this point surgeon doesnt do anything. We'll fix this later
|
|
|
|
-- Check if SinglePlayer
|
|
if not isServer() and not isClient() then
|
|
|
|
if action == "Cut" then
|
|
TocCutLocal(_, surgeon, surgeon, part_name)
|
|
elseif action == "Operate" then
|
|
TocOperateLocal(_, surgeon, surgeon, part_name, false)
|
|
elseif action == "Equip" then
|
|
-- TODO finish this
|
|
local item
|
|
TocEquipProsthesisLocal(_, surgeon, surgeon, part_name)
|
|
elseif action == "Unequip" then
|
|
-- TODO finish this
|
|
local item
|
|
TocUnequipProsthesisLocal(_, surgeon, part_name)
|
|
end
|
|
else
|
|
|
|
local ui = GetConfirmUIMP()
|
|
if not ui then
|
|
CreateTocConfirmUIMP()
|
|
ui = GetConfirmUIMP()
|
|
end
|
|
|
|
|
|
if patient == nil then
|
|
patient = surgeon
|
|
end
|
|
|
|
if action == "Cut" then
|
|
AskCanCutLimb(patient, part_name)
|
|
elseif action == "Operate" then
|
|
AskCanOperateLimb(patient, part_name)
|
|
elseif action == "Equip" then
|
|
local surgeon_inventory = surgeon:getInventory()
|
|
local prosthesis_to_equip = surgeon_inventory:getItemFromType('TOC.MetalHand') or
|
|
surgeon_inventory:getItemFromType('TOC.MetalHook') or
|
|
surgeon_inventory:getItemFromType('TOC.WoodenHook')
|
|
if prosthesis_to_equip then
|
|
ISTimedActionQueue.add(ISInstallProsthesis:new(patient, prosthesis_to_equip, patient:getBodyDamage():getBodyPart(TocGetBodyPartTypeFromBodyPart(part_name))))
|
|
else
|
|
surgeon:Say("I need a prosthesis")
|
|
end
|
|
|
|
|
|
|
|
--AskCanEquipProsthesis(patient, part_name, item)
|
|
|
|
elseif action == "Unequip" then
|
|
--AskCanUnequipProsthesis(patient, part_name)
|
|
local equipped_prosthesis = FindTocItemWorn(part_name, patient)
|
|
ISTimedActionQueue.add(ISUninstallProsthesis:new(patient, equipped_prosthesis, patient:getBodyDamage():getBodyPart(TocGetBodyPartTypeFromBodyPart(part_name))))
|
|
end
|
|
ui.actionAct = action
|
|
ui.partNameAct = part_name
|
|
ui.patient = patient
|
|
|
|
--TODO just a workaround for now
|
|
if action ~= "Equip" and action ~= "Unequip" then
|
|
SendCommandToConfirmUIMP("Wait server")
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
|
|
-- function TryTocActionOnAnotherPlayer(_, part_name, action, surgeon, patient)
|
|
|
|
|
|
-- if action == "Cut" then
|
|
-- AskCanCutLimb(patient, part_name)
|
|
|
|
-- elseif action == "Operate" then
|
|
-- AskCanOperateLimb(patient, part_name)
|
|
|
|
-- end
|
|
|
|
-- end
|
|
|
|
-- local function CheckIfCanBeOperated(modData)
|
|
-- if modData.TOC.RightHand.is_cut and not modData.TOC.RightHand.is_operated
|
|
-- or modData.TOC.RightForearm.is_cut and not modData.TOC.RightForearm.is_operated
|
|
-- or modData.TOC.RightArm.is_cut and not modData.TOC.RightArm.is_operated
|
|
-- or modData.TOC.LeftHand.is_cut and not modData.TOC.LeftHand.is_operated
|
|
-- or modData.TOC.LeftForearm.is_cut and not modData.TOC.LeftForearm.is_operated
|
|
-- or modData.TOC.LeftArm.is_cut and not modData.TOC.LeftArm.is_operated then
|
|
-- return true
|
|
-- else
|
|
-- return false
|
|
-- end
|
|
|
|
-- end
|
|
|
|
local function CloseAllMenus(player_index)
|
|
local contextMenu = getPlayerContextMenu(player_index)
|
|
if contextMenu:isVisible() then
|
|
|
|
contextMenu:closeAll()
|
|
|
|
end
|
|
end
|
|
|
|
----------------------------------------------------------------------------------------------------------
|
|
|
|
TocContextMenus = {}
|
|
|
|
|
|
TocContextMenus.CreateMenus = function(player, context, worldObjects, test)
|
|
local clicked_players_table = {}
|
|
local clicked_player = nil
|
|
|
|
local local_player = getSpecificPlayer(player)
|
|
--local players = getOnlinePlayers()
|
|
|
|
for k,v in ipairs(worldObjects) do
|
|
-- help detecting a player by checking nearby squares
|
|
for x=v:getSquare():getX()-1,v:getSquare():getX()+1 do
|
|
for y=v:getSquare():getY()-1,v:getSquare():getY()+1 do
|
|
local sq = getCell():getGridSquare(x,y,v:getSquare():getZ())
|
|
if sq then
|
|
for i=0,sq:getMovingObjects():size()-1 do
|
|
local o = sq:getMovingObjects():get(i)
|
|
if instanceof(o, "IsoPlayer") then
|
|
clicked_player = o
|
|
|
|
if clicked_players_table[clicked_player:getUsername()] == nil then
|
|
|
|
-- FIXME this is to prevent context menu spamming. Find a better way
|
|
clicked_players_table[clicked_player:getUsername()] = true
|
|
|
|
local root_option = context:addOption("The Only Cure on " .. clicked_player:getUsername())
|
|
local root_menu = context:getNew(context)
|
|
|
|
local cut_menu = TocContextMenus.CreateNewMenu("Cut", context, root_menu)
|
|
local operate_menu = TocContextMenus.CreateNewMenu("Operate", context, root_menu)
|
|
local cheat_menu = TocContextMenus.CreateCheatMenu(context, root_menu, local_player, clicked_player)
|
|
context:addSubMenu(root_option, root_menu)
|
|
|
|
TocContextMenus.FillCutAndOperateMenus(local_player, clicked_player, worldObjects, cut_menu, operate_menu)
|
|
--TocContextMenus.FillCheatMenu(context, cheat_menu)
|
|
|
|
break
|
|
end
|
|
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
TocContextMenus.CreateOperateWithOvenMenu = function(player, context, worldObjects, test)
|
|
local player_obj = getSpecificPlayer(player)
|
|
--local clickedPlayer
|
|
|
|
|
|
-- TODO Add a way to move the player towards the oven
|
|
|
|
|
|
local toc_data = player_obj:getModData().TOC
|
|
|
|
local is_main_menu_already_created = false
|
|
|
|
|
|
--local props = v:getSprite() and v:getSprite():getProperties() or nil
|
|
|
|
for k_stove, v_stove in pairs(worldObjects) do
|
|
if instanceof(v_stove, "IsoStove") and (player_obj:HasTrait("Brave") or player_obj:getPerkLevel(Perks.Strength) >= 6) then
|
|
|
|
-- Check temperature
|
|
if v_stove:getCurrentTemperature() > 250 then
|
|
|
|
for k_bodypart, v_bodypart in ipairs(GetBodyParts()) do
|
|
if toc_data[v_bodypart].is_cut and toc_data[v_bodypart].is_amputation_shown and not toc_data[v_bodypart].is_operated then
|
|
local subMenu = context:getNew(context);
|
|
|
|
if is_main_menu_already_created == false then
|
|
local rootMenu = context:addOption(getText('UI_ContextMenu_OperateOven'), worldObjects, nil);
|
|
context:addSubMenu(rootMenu, subMenu)
|
|
is_main_menu_already_created = true
|
|
end
|
|
subMenu:addOption(getText('UI_ContextMenu_' .. v_bodypart), worldObjects, TocOperateLocal, getSpecificPlayer(player), getSpecificPlayer(player), v_bodypart, true)
|
|
end
|
|
end
|
|
end
|
|
|
|
break -- stop searching for stoves
|
|
|
|
end
|
|
|
|
end
|
|
end
|
|
|
|
|
|
TocContextMenus.DoCut = function(_, patient, surgeon, part_name)
|
|
|
|
if GetSawInInventory(surgeon) then
|
|
ISTimedActionQueue.add(ISCutLimb:new(patient, surgeon, part_name));
|
|
else
|
|
surgeon:Say("I don't have a saw on me")
|
|
end
|
|
end
|
|
|
|
|
|
|
|
TocContextMenus.CreateNewMenu = function(name, context, root_menu)
|
|
|
|
local new_option = root_menu:addOption(name)
|
|
local new_menu = context:getNew(context)
|
|
context:addSubMenu(new_option, new_menu)
|
|
|
|
return new_menu
|
|
end
|
|
|
|
|
|
|
|
TocContextMenus.FillCutAndOperateMenus = function(local_player, clicked_player, world_objects, cut_menu, operate_menu)
|
|
|
|
local local_toc_data = local_player:getModData().TOC
|
|
|
|
for _, v in ipairs(GetBodyParts()) do
|
|
|
|
|
|
if local_player == clicked_player then -- Local player
|
|
if CheckIfCanBeCut(v) and not CheckIfProsthesisAlreadyInstalled(local_toc_data, v) then
|
|
cut_menu:addOption(getText('UI_ContextMenu_' .. v), _, TryTocAction, v, "Cut", local_player, local_player)
|
|
|
|
--cut_menu:addOption(getText('UI_ContextMenu_' .. v), _, TocCutLocal, local_player, local_player, v)
|
|
elseif CheckIfCanBeOperated(v) then
|
|
operate_menu:addOption(getText('UI_ContextMenu_' .. v), _, TryTocAction, v, "Operate", local_player, local_player)
|
|
end
|
|
|
|
else -- Another player
|
|
-- TODO add way to prevent cutting already cut parts
|
|
cut_menu:addOption(getText('UI_ContextMenu_' .. v), world_objects, TryTocAction, v, "Cut", local_player, clicked_player)
|
|
operate_menu:addOption(getText('UI_ContextMenu_' .. v), world_objects, TryTocAction, v, "Operate", local_player, clicked_player)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
TocContextMenus.CreateCheatMenu = function(context, root_menu, local_player, clicked_player)
|
|
if local_player:getAccessLevel() == "Admin" then
|
|
|
|
local cheat_menu = TocContextMenus.CreateNewMenu("Cheat", context, root_menu)
|
|
|
|
if clicked_player == local_player then
|
|
cheat_menu:addOption("Reset TOC for me", _, ResetEverything)
|
|
|
|
else
|
|
cheat_menu:addOption("Reset TOC for " .. clicked_player:getUsername(), _, TryToToResetEverythingOtherPlayer, clicked_player, local_player)
|
|
|
|
end
|
|
|
|
return cheat_menu
|
|
end
|
|
end
|
|
|
|
|
|
TocContextMenus.FillCheatMenus = function(context, cheat_menu)
|
|
|
|
if cheat_menu then
|
|
local cheat_cut_and_fix_menu = TocContextMenus.CreateNewMenu("Cut and Fix", context, cheat_menu)
|
|
|
|
end
|
|
end
|
|
|
|
|
|
Events.OnFillWorldObjectContextMenu.Add(TocContextMenus.CreateOperateWithOvenMenu) -- this is probably too much
|
|
Events.OnFillWorldObjectContextMenu.Add(TocContextMenus.CreateMenus) |