136 lines
4.1 KiB
Plaintext
136 lines
4.1 KiB
Plaintext
local HI = has_alife_info
|
|
local GI = give_info
|
|
local DI = disable_info
|
|
function NI(str)
|
|
return not (has_alife_info(str))
|
|
end
|
|
|
|
--[[----------------------------------------------------------------------------------------------------
|
|
Main
|
|
------------------------------------------------------------------------------------------------------]]
|
|
function duty_girl_init()
|
|
if (NI("duty_girl_init")) then
|
|
if not (get_story_se_object("squad_duty_girl")) then
|
|
local smart = SIMBOARD.smarts_by_names["bar_dolg_general"]
|
|
local squad = SIMBOARD:create_squad(smart,"squad_duty_girl")
|
|
--[[
|
|
if (squad) then
|
|
for k in squad:squad_members() do
|
|
local se = k.id and alife():object(k.id)
|
|
if (se) then
|
|
local sim = alife()
|
|
for i=1,65534 do
|
|
local wpn = sim:object(i)
|
|
if (wpn and wpn.parent_id and (wpn.parent_id == se.id) and string.find(wpn:name(),"wpn_"))then
|
|
safe_release_manager.release(wpn)
|
|
end
|
|
end
|
|
alife():create("wpn_groza",se.position,se.m_level_vertex_id,se.m_game_vertex_id,se.id)
|
|
end
|
|
end
|
|
end
|
|
--]]
|
|
end
|
|
if (get_story_se_object("squad_duty_girl")) then
|
|
GI("duty_girl_init")
|
|
end
|
|
end
|
|
end
|
|
|
|
function anna_no_hip_allowed()
|
|
local ann = get_story_se_object("stalker_duty_girl")
|
|
if (ann and alife():has_info(ann.id,"npcx_is_companion")) then
|
|
local hip = get_story_se_object("devushka")
|
|
if (hip and alife():has_info(hip.id,"npcx_is_companion")) then
|
|
local npc = db.storage[ann.id] and db.storage[ann.id].object or level.object_by_id(ann.id)
|
|
if (npc) then
|
|
dialogs_axr_companion.remove_companions_from_squad(db.actor,npc)
|
|
end
|
|
end
|
|
else
|
|
return true
|
|
end
|
|
end
|
|
|
|
function actor_on_first_update()
|
|
duty_girl_init()
|
|
CreateTimeEvent(AC_ID,"anna_no_hip_allowed",1000,anna_no_hip_allowed)
|
|
end
|
|
|
|
function npcs_friendly_to_community(npc_1,npc_2,com)
|
|
local com_1 = npc_1 and character_community(npc_1)
|
|
local com_2 = npc_2 and character_community(npc_2)
|
|
if (com_1 and com_2 and (not game_relations.is_factions_enemies(com_1,com)) and (not game_relations.is_factions_enemies(com_2,com))) then
|
|
return true
|
|
end
|
|
return false
|
|
end
|
|
|
|
function npc_on_before_hit(npc,shit,bone_id,flags)
|
|
if (npc and string.find(npc:name(),"stalker_duty_girl")) then
|
|
flags.ret_value = false
|
|
end
|
|
end
|
|
|
|
function on_enemy_eval(npc,ene,flags)
|
|
if (npc:has_info("npcx_is_companion") or ene:has_info("npcx_is_companion")) then
|
|
local com = character_community(db.actor)
|
|
if (com and npcs_friendly_to_community(npc,ene,com)) then
|
|
flags.override = true
|
|
flags.result = false
|
|
end
|
|
end
|
|
end
|
|
--[[
|
|
function npc_on_choose_weapon(npc,cur_wpn,flags)
|
|
if not (npc and unique_character_storage[npc:section()] and unique_character_storage[npc:section()].weapon) then
|
|
return
|
|
end
|
|
|
|
local wpn_section = unique_character_storage[npc:section()].weapon
|
|
|
|
if not (wpn_section and (wpn_section ~= "") and (wpn_section ~= "nil")) then
|
|
return
|
|
end
|
|
|
|
if (cur_wpn and (cur_wpn:section() == wpn_section)) then
|
|
return
|
|
end
|
|
|
|
local function itr(npc,itm)
|
|
if (itm and (itm:section() ~= wpn_section) and IsWeapon(itm)) then
|
|
local se = alife():object(itm:id())
|
|
if (se) then
|
|
safe_release_manager.release(se)
|
|
end
|
|
end
|
|
end
|
|
npc:iterate_inventory(itr,npc)
|
|
|
|
if (npc:object(wpn_section)) then
|
|
return
|
|
end
|
|
alife():create(wpn_section,npc:position(),npc:level_vertex_id(),npc:game_vertex_id(),npc:id())
|
|
end
|
|
--]]
|
|
|
|
--[[----------------------------------------------------------------------------------------------------
|
|
Registers
|
|
------------------------------------------------------------------------------------------------------]]
|
|
function on_game_start()
|
|
RegisterScriptCallback("actor_on_first_update",actor_on_first_update)
|
|
RegisterScriptCallback("npc_on_before_hit",npc_on_before_hit)
|
|
RegisterScriptCallback("on_enemy_eval",on_enemy_eval)
|
|
--RegisterScriptCallback("npc_on_choose_weapon",npc_on_choose_weapon)
|
|
end
|
|
|
|
--[[----------------------------------------------------------------------------------------------------
|
|
Debug
|
|
------------------------------------------------------------------------------------------------------]]
|
|
--[[
|
|
cmd = debug_cmd_list.command_get_list()
|
|
|
|
function cmd.chan()
|
|
duty_girl_init()
|
|
end
|
|
--]] |