------- GENERAL Functions --------
local HI = has_alife_info
local GI = give_info
local DI = disable_info
function NI(str)
	return not (has_alife_info(str))
end

local spawn_squad = dialogs_brotherhood.spawn_squad

function give_task(name)
	task_manager.get_task_manager():give_task(name)
end

--- money conditions and effects


function transfer_money_to_actor_4000(first_speaker, second_speaker)
	dialogs.relocate_money_to_actor(first_speaker, second_speaker, 4000)
end

--- time conditions and effects


function set_time_after_22h() 
	local hrs = level.get_time_hours()
	local zeit = (22 - hrs)
	if hrs > 0 and hrs < 22 then
		level.change_game_time(0,zeit,0)
	end
end

function is_it_night_22_3_yes()
	local hrs = level.get_time_hours()
	if (hrs >= 22) or (hrs < 3) then
	return true
	end
	return false
end
function is_it_night_22_3_no()
	local hrs = level.get_time_hours()
	if (hrs >= 22) or (hrs < 3) then
	return false
	end
	return true
end

-------Stories from the Zone --------


function give_task_father_charon_quest_1()
	dialogs_brotherhood_ac.give_task('give_task_father_charon_quest_1')
end

function spawn_ac_blue_winter_init()
	if (NI("ac_blue_winter_init")) then
		local pos_1 = vector():set( -13.764570236206,0.84513801336288,201.52365112305 ) 
		if not (get_story_se_object("ac_blue_winter_squad")) then
			local se_squad = spawn_squad("ac_blue_winter_squad", pos_1, 85657, 2985)
		end
		if (get_story_se_object("ac_blue_winter_squad")) then            
				GI("ac_blue_winter_init")
			end
	end
end
function spawn_ac_balthazar_init()
	if (NI("ac_balthazar_init")) then
		local pos_1 = vector():set( -14.980568885803,0.84502762556076,204.65113830566 ) 
		if not (get_story_se_object("ac_balthazar_squad")) then
			local se_squad = spawn_squad("ac_balthazar_squad", pos_1, 84928, 2985)
		end
		if (get_story_se_object("ac_balthazar_squad")) then            
				GI("ac_balthazar_init")
			end
	end
end

function give_task_blue_winter_quest_1()
	dialogs_brotherhood_ac.give_task('give_task_blue_winter_quest_1')
end

function set_ac_blue_winter_and_balthazar_as_companion_1(a,b)
	local squad = get_story_squad("ac_blue_winter_squad")
	local squad_2 = get_story_squad("ac_balthazar_squad")
	axr_companions.add_special_squad(squad)
	axr_companions.add_special_squad(squad_2)
end

function ac_spawn_pri_a25_guards()
	local smart = SIMBOARD.smarts_by_names["pri_a25_smart_terrain"] 
	local squad_1 = SIMBOARD:create_squad(smart,"pri_ac_a25_guard_1")
end

function dismiss_ac_blue_winter_and_balthazar_as_companion_1(a,b)
	local squad = get_story_squad("ac_blue_winter_squad")
	local squad_2 = get_story_squad("ac_balthazar_squad")
	axr_companions.dismiss_special_squad(squad)
	axr_companions.dismiss_special_squad(squad_2)
end




function give_task_blue_winter_quest_3()
	dialogs_brotherhood_ac.give_task('give_task_blue_winter_quest_3')
end

function ac_task_3_blue_winter_relocation()
	local squad = get_story_se_object("ac_blue_winter_squad")
	local pos = vector():set( -131.57495117188,-0.50764739513397,-199.29406738281 )
	if (pos and squad) then
		TeleportSquad(squad,pos,67093,4888)
	GI("relocated_ac_task_3_blue_winter")
	GI("ac_task_3_active")
	end

end

function ac_task_3_balthazar_relocation()
	local squad = get_story_se_object("ac_balthazar_squad")
	local pos = vector():set( -138.35227966309,-0.25803527235985,-211.60403442383 )
	if (pos and squad) then
		TeleportSquad(squad,pos,61814,4888)
	GI("relocated_ac_task_3_balthazar")
	GI("ac_task_3_active")
	end

end

function ac_task_3_melchior_relocation()
	local squad = get_story_se_object("ac_melchior_squad")
	local pos = vector():set( -139.3289642334,-0.42204529047012,-204.6999206543 )
	if (pos and squad) then
		TeleportSquad(squad,pos,61274,4888)
	GI("relocated_ac_task_3_melchior")
	GI("ac_task_3_active")
	end

end

function ac_task_3_caspar_relocation()
	local squad = get_story_se_object("ac_caspar_squad")
	local pos = vector():set( -135.96295166016,-0.37012958526611,-198.35459899902 )
	if (pos and squad) then
		TeleportSquad(squad,pos,63912,4888)
	GI("relocated_ac_task_3_caspar")
	GI("ac_task_3_active")
	end

end