Added New Mods and Profiles Folders

This is a complete rebuild of the modpack, with all new mods and updates for 1.5.3 of Anomaly.

mods/PDA Hacking/gamedata/scripts/modxml_pdahacking_unfail.script

@@ -0,0 +1,69 @@
+function on_game_start()
+    RegisterScriptCallback("on_specific_character_dialog_list", function(character_id, dialog_list)
+        if dialog_list:has("dm_encrypted_pda") then 
+			dialog_list:add("pdahack_unfail")
+		end
+    end)
+end
+
+function pdahacking_unfail_text_1()
+	return strformat(game.translate_string("st_pdahacking_unfail_text_1"), z_pda_hacking.settings.tech_unfail_cost)
+end
+
+function pdahacking_unfail_text_2()
+	return strformat(game.translate_string("st_pdahacking_unfail_text_2"), get_total_unbrick_cost(), #get_bricked_pdas())
+end
+
+function get_bricked_pdas()
+	local encrypted_pdas = {}
+	
+	local function search(temp, obj)
+		if item_device.device_npc_pda[obj:section()] then
+			local info = se_load_var(obj:id(), obj:name(), "info")
+			if info and (info.attempted_hack == true) and (info.state == "encrypted") then
+				encrypted_pdas[#encrypted_pdas + 1] = obj:id()
+			end
+		end
+	end
+	db.actor:iterate_inventory(search, nil)
+
+	return encrypted_pdas
+end
+
+function have_bricked_pda(first_speaker, second_speaker)
+	local encrypted_pdas = get_bricked_pdas()
+	if (#encrypted_pdas > 0) then
+		return true
+	end
+	return false
+end
+
+function get_total_unbrick_cost()
+	local encrypted_pdas = get_bricked_pdas()
+	local num = #encrypted_pdas
+	return z_pda_hacking.settings.tech_unfail_cost * num
+end
+
+function have_bricked_pda_money(first_speaker, second_speaker)
+	local encrypted_pdas = get_bricked_pdas()
+	local num = #encrypted_pdas
+	return mlr_utils.have_money(get_total_unbrick_cost())
+end
+
+function take_bricked_pda_money(first_speaker, second_speaker)
+	local encrypted_pdas = get_bricked_pdas()
+	local num = #encrypted_pdas
+	dialogs.relocate_money_from_actor(first_speaker, second_speaker, get_total_unbrick_cost()) 
+end
+
+function unlock_bricked_pda(first_speaker, second_speaker)
+	local encrypted_pdas = get_bricked_pdas()
+	for i=1,#encrypted_pdas do
+		local id = encrypted_pdas[i]
+		local info = se_load_var(id, nil, "info")
+		if info then
+			info.attempted_hack = nil
+			se_save_var( id, nil, "info", info )
+		end
+	end
+end

mods/PDA Hacking/gamedata/scripts/modxml_pdahacking_unlockcost.script

@@ -0,0 +1,47 @@
+function on_xml_read()
+	RegisterScriptCallback("on_xml_read", function(xml_file_name, xml_obj)
+		if xml_file_name:find( [[\dialogs.xml]] ) then
+			local query_res = xml_obj:query("dialog[id=dm_encrypted_pda] > phrase_list > phrase[id=1] > text")
+			if not (type(query_res) == "table" and size_table(query_res) == 1) then return end
+
+			local elem = query_res[1]
+			local phrase_elem = elem.parent
+			xml_obj:removeElement(elem)
+			xml_obj:insertFromXMLString([[<script_text>modxml_pdahacking_unlockcost.dialog_pda_unlock</script_text>]], phrase_elem, #phrase_elem.kids)
+		end
+	end)
+end
+
+function on_game_start()
+	if modxml_beo_mechanic_decrypt_dialog then return end
+
+	_have_encrypted_pda_money = ui_pda_npc_tab.have_encrypted_pda_money
+	function ui_pda_npc_tab.have_encrypted_pda_money(first_speaker, second_speaker)
+		if z_pda_hacking.settings.enable_tech_unlock_cost then
+			local encrypted_pdas = ui_pda_npc_tab.get_encrypted_pdas()
+			local num = #encrypted_pdas
+			return mlr_utils.have_money(z_pda_hacking.settings.tech_unlock_cost * num)
+		else
+			_have_encrypted_pda_money(first_speaker, second_speaker)
+		end
+	end
+
+	_take_encrypted_pda_money = ui_pda_npc_tab.take_encrypted_pda_money
+	function ui_pda_npc_tab.take_encrypted_pda_money(first_speaker, second_speaker)
+		if z_pda_hacking.settings.enable_tech_unlock_cost then
+			local encrypted_pdas = ui_pda_npc_tab.get_encrypted_pdas()
+			local num = #encrypted_pdas
+			dialogs.relocate_money_from_actor(first_speaker, second_speaker, num * z_pda_hacking.settings.tech_unlock_cost)
+		else
+			_take_encrypted_pda_money(first_speaker, second_speaker)
+		end
+	end
+end
+
+function dialog_pda_unlock()
+	if z_pda_hacking.settings.enable_tech_unlock_cost and not modxml_beo_mechanic_decrypt_dialog then 
+		return strformat(game.translate_string("st_pdahacking_unlock_cost"), z_pda_hacking.settings.tech_unlock_cost)
+	else
+		return "st_encrypted_pda_text_1"
+	end
+end

mods/PDA Hacking/gamedata/scripts/pda_hacking_mcm.script

@@ -0,0 +1,25 @@
+
+-- PDA Hacking
+-- Generated with AnomalyModCreator
+
+op = { id= "pda_hacking",sh=true ,gr={
+		{ id= "title", type= "slide", link= "ui_options_slider_player", text="ui_mcm_pda_hacking_title", size= {512,50}, spacing= 20 },
+		{id = "script_power_min", type = "track", val = 2, min=1, max=100, step=1, def = 25},
+		{id = "script_power_max", type = "track", val = 2, min=25, max=200, step=1, def = 100},
+		{id = "hack_device_drop_mult", type = "track", val = 2, min=0, max=10, step=0.1, def = 1},
+		{id = "extract_reward_mult", type = "track", val = 2, min=0, max=5, step=0.1, def = 1},
+		{id = "locked_chance_mult", type = "track", val = 2, min=1, max=10, step=0.1, def = 1},
+		{id = "stash_chance_mult", type = "track", val = 2, min=0.1, max=10, step=0.1, def = 1},
+		{id = "soundfx_volume", type = "track", val = 2, min=0, max=1, step=0.1, def = 1},
+		{id = "enable_tech_unlock_cost", type = "check", val = 1, def = true},
+		{id = "tech_unlock_cost", type = "track", val = 2, min=600, max=5000, step=100, def = 1500},
+		{id = "tech_unfail_cost", type = "track", val = 2, min=100, max=2000, step=100, def = 500},
+		{id = "use_high_res_font", type = "check", val = 1, def = true},
+
+	}
+}
+
+function on_mcm_load()
+	return op
+end
+