scripts\archievements.script для ОП-2.1 патч 8к2

-- Достижения
local medicals = {
"suvorotka",
"vodka",
"antirad",
"medkit",
"medkit_army",
"medkit_scientic",
"energy_drink",
"bandage",
"antizombie",
}

local wpns = {
["wpn_akms_m1"]=true,
["wpn_kord_m1"]=true,
["wpn_fn2000_sniper"]=true,
["wpn_stutzer_m1"]=true,
["wpn_m500_custom"]=true,
["wpn_hk417_792"]=true,
["wpn_akms_m2"]=true,
["wpn_aug_a2"]=true,
["wpn_fn2000_paratrooper"]=true,
["wpn_gauss2b"]=true,
["wpn_groza_sn"]=true,
["wpn_oicw"]=true,
["wpn_sks_cust"]=true,
["wpn_val_voron"]=true,
["wpn_ks23"]=true,
["wpn_sayga12k"]=true,
["wpn_ak74u_svd"]=true,
["wpn_awp_m1"]=true,
["wpn_sg550_sr"]=true,
["wpn_vihlop_m1"]=true,
["wpn_zastava_m77"]=true,
["wpn_20w_vintorez"]=true,
["wpn_ak74_m3"]=true,
["wpn_ak74_m1"]=true,
["wpn_ak104t"]=true,
["wpn_aks74_m1"]=true,
["wpn_m4"]=true,
["wpn_hostel"]=true,
["wpn_m4_m1"]=true,
["wpn_ognemet"]=true,
["wpn_svd_m1"]=true,
["wpn_svd_m2"]=true,
["wpn_svd_m3"]=true,
["wpn_b94_sil"]=true,
["wpn_protecta_col"]=true,
["wpn_vintorez_m1"]=true,
["wpn_walther_wa2000"]=true,
["wpn_spas12_m1"]=true,
["wpn_groza_m1"]=true,
["wpn_dark_gauss"]=true,
["wpn_benelli_m3_short"]=true,
["wpn_awm_f"]=true,
["wpn_trg42"]=true,
["wpn_rpk47_sk1"]=true,
["wpn_vepr12_m1"]=true,
["wpn_sayga_un"]=true,
["wpn_scar_snip"]=true,
["wpn_vihlop_camo"]=true,
["wpn_rg6_m2"]=true
}

function get_wpns()
	return wpns
end

function acv_glaz()			send_archievement("acv_glaz")			end
function acv_prorok()		send_archievement("acv_prorok")		end
function acv_sunlight()		send_archievement("acv_sunlight")		end
function acv_avianosec()	send_archievement("acv_avianosec")	end
function acv_american()		send_archievement("acv_american")	end
function acv_annigilator()	send_archievement("acv_annigilator")	end
function acv_antisniper()		send_archievement("acv_antisniper")	end
function acv_aptekar()		send_archievement("acv_aptekar")		end
function acv_archeolog()	send_archievement("acv_archeolog")	end
function acv_afgan()			send_archievement("acv_afgan")		end
function acv_bronenosec()	send_archievement("acv_bronenosec")	end
function acv_vlastelin_kolez() send_archievement("acv_vlastelin_kolez") end
function acv_voenruk()		send_archievement("acv_voenruk")		end
function acv_volshednik()	send_archievement("acv_volshednik")	end
function acv_vigigatel()		send_archievement("acv_vigigatel")	end
function acv_glavkom()		send_archievement("acv_glavkom")	end
function acv_gluhar()		send_archievement("acv_gluhar")		end
function acv_gudvin()		send_archievement("acv_gudvin")		end
function acv_bond()			send_archievement("acv_bond")		end
function acv_dergach()		send_archievement("acv_dergach")		end
function acv_jigit()			send_archievement("acv_jigit")			end
function acv_zavhoz()		send_archievement("acv_zavhoz")		end
function acv_zoolog()		send_archievement("acv_zoolog")		end
function acv_cowboy()		send_archievement("acv_cowboy")		end
function acv_commandos()	send_archievement("acv_commandos") end
function acv_korotishka()	send_archievement("acv_korotishka")	end
function acv_costumer()		send_archievement("acv_costumer")	end
function acv_laborant()		send_archievement("acv_laborant")		end
function acv_luchnik()		send_archievement("acv_luchnik")		end
function acv_meloman()		send_archievement("acv_meloman")	end
function acv_volonter()		send_archievement("acv_volonter")		end
function acv_modeller()		send_archievement("acv_modeller")	end
function acv_misucman()	send_archievement("acv_misucman")	end
function acv_nevidimka()	send_archievement("acv_nevidimka")	end
function acv_patriot()		send_archievement("acv_patriot")		end
function acv_peredelkin()	send_archievement("acv_peredelkin")	end
function acv_povstanec()	send_archievement("acv_povstanec")	end
function acv_podkidish()	send_archievement("acv_podkidish")	end
function acv_podrivnik()		send_archievement("acv_podrivnik")	end
function acv_soldafon()		send_archievement("acv_soldafon")	end
function acv_smelchak()		send_archievement("acv_smelchak")	end
function acv_monosniper()	send_archievement("acv_monosniper") end
function acv_ussrsniper()	send_archievement("acv_ussrsniper")	end
function acv_stalevar()		send_archievement("acv_stalevar")		end
function acv_specialist()		send_archievement("acv_specialist")	end
function acv_trangira()		send_archievement("acv_trangira")		end
function acv_ufolog()		send_archievement("acv_ufolog")		end
function acv_fantomas()		send_archievement("acv_fantomas")	end
function acv_hvastun()		send_archievement("acv_hvastun")		end
function acv_hichnik()		send_archievement("acv_hichnik")		end
function acv_chistula()		send_archievement("acv_chistula")		end
function acv_shekunchik()	send_archievement("acv_shekunchik")	end
function acv_estet()			send_archievement("acv_estet")		end
function acv_avstriez()		send_archievement("acv_avstriez")		end
function acv_likvidator()		send_archievement("acv_likvidator")	end
function acv_baraholez()        send_archievement("acv_baraholez")     end
function acv_bodyguard()      send_archievement("acv_bodyguard")   end
function acv_anticollector()    send_archievement("acv_anticollector") end
function acv_doublet()        	send_archievement("acv_doublet")   	end
function acv_newgame()	send_archievement("acv_newgame")	end
function acv_halavshic()		send_archievement("acv_halavshic")	end
function acv_homak()		send_archievement("acv_homak")		end
function acv_lekar()			send_archievement("acv_lekar")		end
function acv_lekar2()		send_archievement("acv_lekar2")		end
function acv_tereza()		send_archievement("acv_tereza")		end
function acv_vandal()		send_archievement("acv_vandal")		end
function acv_giv()			send_archievement("acv_giv")			end
function acv_found_myself()	send_archievement("acv_found_myself") end
function acv_mtv()			send_archievement("acv_mtv") 			end
function acv_sol()			send_archievement("acv_sol")			end
function acv_kart()			send_archievement("acv_kart")			end
function acv_kro()			send_archievement("acv_kro")			end
function acv_ele()			send_archievement("acv_ele")			end
function acv_gromov()		send_archievement("acv_gromov")		end
function acv_stay1()			send_archievement("acv_stay1")		end
function acv_stay2()			send_archievement("acv_stay2")		end
function acv_rank1()			send_archievement("acv_rank1")		end
function acv_rank2()			send_archievement("acv_rank2")		end
function acv_rank3()			send_archievement("acv_rank3") 		end
function acv_farm()			acv_count_event("acv_farm", 30, "acv_farm") end
function acv_coll()			send_archievement("acv_coll")			end
function acv_profi()			send_archievement("acv_profi")			end
function acv_volna()			send_archievement("acv_volna")		end
function acv_shax()			send_archievement("acv_shax")		end

function acv_sos()
	if has_info("acv_sos") then return end

	if has_info("squad_is_alive") and has_info("psih_is_alive") then
		give_info("acv_sos")
		send_archievement("acv_sos")
	end
end

function acv_snp()
	if has_info("acv_snp") then return end

	if  has_info("upiter_sdelka_have") and
		has_info("fli_chaes_have") and
		has_info("borov_bottle_done") and
		has_info("viking_proverka_have")
	then
		give_info("acv_snp")
		send_archievement("acv_snp")
	end
end

function acv_docs()
	if not has_info("acv_docs_fail") then
		give_info("acv_docs")
		send_archievement("acv_docs")
	end
end

function acv_aem()
	if not has_info("acv_aem") then
		give_info("acv_aem")
		send_archievement("acv_aem")
	end
end

function acv_cognized_zone()
	if has_info("acv_cognized_zone") then return end

	for i=1,65 do
		if not has_info("arhara_obman"..tostring(i)) then return end
	end

	give_info("acv_cognized_zone")
	send_archievement("acv_cognized_zone")
end

function acv_sishik()
	if has_info("acv_sishik") then return end

	if has_info("acv_sishik1") and has_info("acv_sishik2") and has_info("acv_sishik3") and has_info("acv_sishik4") then
		give_info("acv_sishik")
		send_archievement("acv_sishik")
	end
end

function acv_task()


	if has_info("info_chess_dictofon_done") and has_info("snp_video_arhiv_done") then
		give_info("acv_task")
		send_archievement("acv_task")
		timer("run5", 3, "archievements.acv_stalker()")
	end
end

function acv_real()


	give_info("acv_real")
	send_archievement("acv_real")
end

function acv_nocheat()




	give_info("acv_nocheat")
	send_archievement("acv_nocheat")
end

function acv_vzn()


	if     not has_info("acv_vzn1") then
		give_info("acv_vzn1")
		send_archievement("acv_vzn1")
	elseif not has_info("acv_vzn2") then
		give_info("acv_vzn2")



	end
end

function acv_life()

		if has_info("acv_umer") then
			give_info("acv_resur")
			send_archievement("acv_resur")
		else
			give_info("acv_alive")
			send_archievement("acv_alive")
		end

end

function acv_money()


	if not has_info("acv_money1") and has_money(5000000) then
		give_info("acv_money1")
		send_archievement("acv_money1")
	end
	if not has_info("acv_money2") and has_money(15000000) then
		give_info("acv_money2")
		send_archievement("acv_money2")
	end




end

function has_cheated_jump()





end

function has_cheated_money()





end

function has_cheated_item()





end

function has_cheated_zone()





end

function acv_angel()
	if all_ecologs_alive() then
		got("af_hl",1)
		give_info("acv_angel")
		send_archievement("acv_angel")
	end
end
function all_ecologs_alive()
	local ecologs = {
		"bar_ecolog_professor",
		"bar_ecolog_crush_1",
		"bar_ecolog_crush_2",
		"bar_ecolog_crush_3",
		"bar_ecolog_crush_4",
	}
	local se_obj, obj

	for _, name in ipairs(ecologs) do
		se_obj = server_object(name)
		if not se_obj then return false end

		obj = level_object(se_obj.id)
		if not obj or not obj:alive() then return false end
	end

	return true
end

function acv_kill()
	local value = get_value("acv_kill", 0)+1
	set_value("acv_kill", value)

	if not has_info("acv_kill") and value >= 3000 then
		give_info("acv_kill")
		send_archievement("acv_kill")
	end
	if not has_info("acv_kill2") and value >= 6000 then
		give_info("acv_kill2")
		send_archievement("acv_kill2")
	end
	acv_unstoppable()
end

function acv_kill_phantom()
	local value = get_value("acv_kill_phantom", 0)+1
	set_value("acv_kill_phantom", value)

	if not has_info("acv_kill_phantom") and value >= 100 then
		give_info("acv_kill_phantom")
		send_archievement("acv_kill_phantom")
                del_value("acv_kill_phantom")
	end
end

function acv_psydog_phantom()
	local value = get_value("acv_psydog_phantom", 0)+1
	set_value("acv_psydog_phantom", value)

	if not has_info("acv_psydog_phantom") and value >= 100 then
		give_info("acv_psydog_phantom")
		send_archievement("acv_psydog_phantom")
		del_value("acv_psydog_phantom")
	end
end

function acv_mons()
	local value = get_value("acv_mons", 0)+1
	set_value("acv_mons", value)

	if not has_info("acv_mons") and value >= 6000 then
		give_info("acv_mons")
		send_archievement("acv_mons")
	end
	if not has_info("acv_mons2") and value >= 10000 then
		give_info("acv_mons2")
		send_archievement("acv_mons2")
	end
	acv_unstoppable()
end

function acv_unstoppable()
	if not has_info("acv_unstoppable") and get_value("acv_kill", 0)+get_value("acv_mons", 0) >= 20000 then
		give_info("acv_unstoppable")
		send_archievement("acv_unstoppable")
	end
end

function acv_stalker()
	if  has_info("acv_sishik") and
		has_info("acv_angel") and
		has_info("acv_vandal") and
		has_info("acv_sos") and
		has_info("acv_docs") and
		has_info("acv_cognized_zone") and
		has_info("acv_lekar") and
		has_info("acv_tereza") and
		has_info("acv_farm") and
		has_info("acv_rank2") and
		has_info("acv_emb") and
		has_info("acv_hell") and
		has_info("acv_snp") and
		has_info("acv_ct") and
		has_info("acv_kill") and
		has_info("acv_mons") and
		has_info("acv_zoms") and
		has_info("acv_task") and
		has_info("acv_vzn1") and
		has_info("acv_alive") and
		has_info("acv_rem") and
		has_info("acv_paparacci") and
		has_info("acv_wpn") and
		has_info("fli_done") and
		has_info("taynik_nayti_oz_10_done") and
		has_info("volna_day4_done") and
		not has_info("acv_has_cheated") and
		not has_info("acv_halavshic3") and
		not has_info("acv_bridge") and
		not has_info("acv_docs_fail") and
		not has_info("acv_money3") and
		not has_info("acv_alk") and
		not has_info("acv_slp") and
		not has_info("acv_xam") and
		not has_info("acv_task_fail") and
		not has_info("acv_vzn3") and
		not has_info("acv_umer")
	then
		give_info("acv_stalker")
		send_archievement("acv_stalker")
	end
end

-- единая функция обработки и выдачи подсчитываемого достижения
function acv_count_event(acv, count, name, qty)
	if has_info(acv) then return end

	if not qty then
		qty = 1
	end

	local value = get_value(acv, 0)+qty
	if value >= count then
		del_value(acv)
		give_info(acv)
		send_archievement(name)
		return
	end

	set_value(acv, value)
end

-- единая функция обработки и выдачи 2-х последовательно подсчитываемых достижений
function acv_count_2event(acv, count, name, acv2, count2, name2, qty)
	if has_info(acv) and has_info(acv2) then return end

	if not qty then
		qty = 1
	end

	local value = get_value(acv, 0)+qty

	if not has_info(acv) and value >= count then
		give_info(acv)
		send_archievement(name)
	end

	if value >= count2 then
		del_value(acv)
		give_info(acv2)
		send_archievement(name2)
		return
	end

	set_value(acv, value)
end

-- единая функция обработки и выдачи 3-х последовательно подсчитываемых достижений
function acv_count_3event(acv, count, name, acv2, count2, name2, acv3, count3, name3, qty)
	if has_info(acv) and has_info(acv2) and has_info(acv3) then return end

	if not qty then
		qty = 1
	end

	local value = get_value(acv, 0)+qty

	if not has_info(acv) and value >= count then
		give_info(acv)
		send_archievement(name)
	end

	if not has_info(acv2) and value >= count2 then
		give_info(acv2)
		send_archievement(name2)
	end

	if value >= count3 then
		del_value(acv)
		give_info(acv3)
		send_archievement(name3)
		return
	end

	set_value(acv, value)
end

-- счетчик смертей гг
function on_actor_death(who)
	if has_info("peshera_go") then return end	-- сон в Пещере не считаем

	set_death_count("death", get_death_count("death")+1)

	if who and amk_anoms.is_anomaly(who:clsid()) then
		set_death_count("anoms", get_death_count("anoms")+1)
	end
end
function acv_death()
	if not has_info("acv_death") and get_death_count("death") >= 500 then
		give_info("acv_death")
		send_archievement("acv_death")
	end

	if not has_info("acv_anoms") and get_death_count("anoms") >= 20 then
		give_info("acv_anoms")
		send_archievement("acv_anoms")
	end
end

--хранение данных в user.ltx - как определенный пользователем параметр
function get_death_count(what)
	local value=console:get_user_param_value("death_counter")
	if not value then
		return 0
	end
	local kv_pairs=safe_utils.splitString(",",value)
	for p_key,p_value in pairs(kv_pairs) do
		if (string.find(p_value,what.."=")) then
			local w_value=tonumber((string.gsub(p_value,what.."=","")))--скобки не лишние!!! убираем лишний результат от gsub
			if w_value then
				return w_value
			end
		end
	end
	return 0
end

function set_death_count(what, value)
	local param_value=console:get_user_param_value("death_counter")
	if not param_value then
		console:set_user_param_value("death_counter",what.."="..tostring(value))
		return
	end
	if param_value=="" then --если параметр пустой, но новую игру не начинали
		param_value="game=0,death=0,anoms=0"
	end
	local kv_pairs=safe_utils.splitString(",",param_value)
	for p_key,p_value in pairs(kv_pairs) do
		if (string.find(p_value,what.."=")) then
			kv_pairs[p_key]=what.."="..tostring(value)
		end
	end
	console:set_user_param_value("death_counter",table.strjoin(kv_pairs,","))
end

function on_new_game()
	console:set_user_param_value("death_counter","game=0,death=0,anoms=0")
end

function save_gametime()
	if alife() then
		set_death_count("game", tonumber(get_death_count("game"))+math.floor(time_global()/60000+0.5))
	end
end

-- универсальный механизм проверки, что обработан каждый объект из списка
function has_all(tbl, info, section)
	for i, s in ipairs(tbl) do
		if s == section and not has_info(info..i) then
			give_info(info..i)
			return has_all_info(tbl, info)
		end
	end
	return false
end
function has_all_info(tbl, info)
	for i=1, #tbl do
		if not has_info(info..i) then
			return false
		end
	end
	return true
end

-- взятие тайника без уникальных предметов
function check_treasure(box)
	local section = box:section()
	if     section == "m_inventory_box13" then
		give_info("acv_sishik1")
		acv_sishik()
	elseif section == "x_inventory_box3" then
		give_info("acv_sishik2")
		acv_sishik()
	elseif section == "y_inventory_box1" then
		give_info("acv_sishik3")
		acv_sishik()
	elseif section == "z_inventory_box15" then
		give_info("acv_sishik4")
		acv_sishik()
	end
end

-- подъем предмета
function on_item_take(obj)
	local section = obj:section()
	if     section == "mutant_wolf_cocoon" then
		if not has_info("acv_emb") then
			give_info("acv_emb")
			send_archievement("acv_emb")
		end
	end

	if not has_info("acv_wpn") and wpns[section] then --and has_all(wpns, "acv_wpn", section) then
		local acv_wpn_data=keyvals("achievement"):get("acv_wpn", {})
		acv_wpn_data[section]=true
		local complete=true
		for check_section,_ in pairs(wpns) do
			if not acv_wpn_data[check_section] then
				complete=false
				break
			end
		end
		if complete then
			keyvals("achievement"):remove("acv_wpn")
			give_info("acv_wpn")
			send_archievement("acv_wpn")
		end
	end

	if has_info("mm_opt") then
		has_cheated_item()
	end
end

local object_sections={
	["sweetness"]=function(obj)
		acv_count_event("acv_mars", 20, "acv_mars")
	end,
	["suvorotka"]=function(obj)
		acv_count_event("acv_nar", 20, "acv_nar")
	end,
	["conserva"]=function(obj)
		acv_count_event("acv_kons", 40, "acv_kons")
	end,
	["kolbasa"]=function(obj)
		acv_count_event("acv_klb", 40, "acv_klb")
	end,
	["bread"]=function(obj)
		acv_count_event("acv_bul", 40, "acv_bul")
	end
}
-- использование предмета
function on_use_item(obj)
	local section = obj:section()
	if not has_info("acv_tera") and has_all(medicals, "acv_tera", section) then
		give_info("acv_tera")
		send_archievement("acv_tera")
	end

	if not has_info("acv_gurman") and (section == "vorona_egg" or section == "mozg" or section == "bezoar" or section == "mushroom") then
		give_info("acv_gurman")
		send_archievement("acv_gurman")
	end

	local arch_use=object_sections[section]
	if arch_use then
		arch_use(obj)
	end
end

-- получение поршня
function on_info(info_id)
	if not has_info("acv_rem") and
		has_info("dolgovazyi_toolkit_done") and
		has_info("dolgovazyi_voen2_done") and
		has_info("vasily_toolkit_done") and
		has_info("dimak_toolkit_done") and
		has_info("atp_propusk_shurup_done") and
		has_info("petr_sidor_vzyt_done") and
		has_info("sidor_amulet_vzyt_done") and
		has_info("sak_repair_box_done")
	then
		give_info("acv_rem")
		send_archievement("acv_rem")
	end

	if not has_info("acv_paparacci") and not has_info("foto_ohota_fail") and
		has_info("odnonogiy_foto_done") and
		has_info("izomorf_dialog_have") and
		has_info("izomorf_dialog_done") and
		has_info("foto_ohota_done") and
		has_info("foto_anomaly_done") and
		has_info("silent_hunt_done") and
		has_info("kontrik_electro_done") and
		has_info("ohota_wolf_done") and
		has_info("volna_foto_done") and
		has_info("bar_dolg_petrenko_electra_flash_done") and
		has_info("fotograf_detector_done") and
		has_info("saharov_obrazec_done") and
		has_info("foto_strelok_done")
	then
		give_info("acv_paparacci")
		send_archievement("acv_paparacci")
	end

	if not has_info("acv_etolog") and not has_info("foto_ohota_fail") and
		has_info("izomorf_dialog_have") and
		has_info("izomorf_dialog_done") and
		has_info("foto_ohota_done") and
		has_info("silent_hunt_done") and
		has_info("kontrik_electro_done") and
		has_info("ohota_wolf_done") and
		has_info("saharov_obrazec_done") and
		has_info("bar_dolg_petrenko_electra_flash_done")
	then
		give_info("acv_etolog")
		send_archievement("acv_etolog")
	end

	if not has_info("acv_kulinar") and
		has_info("bar_bar_hunter_quest_finish") and
		has_info("svoboda_lukash_done") and
		has_info("bar_rescue_research_reward") and
		has_info("detection_sensor_done") and
		has_info("info_amk_recipt_giant_small_brother") and
		has_info("info_amk_recipt_soul_drops") and
		has_info("kostya_journal_done") and
		has_info("ohota_tushkan_done") and
		has_info("docent_art_start") and
		has_info("info_amk_recipt_tears_electra") and
		has_info("yan_kill_brain_done") and
		has_info("info_amk_recipt_tears_chimaera") and
		has_info("info_amk_recipt_grandmother_glassbeards") and
		has_info("info_amk_recipt_pra_grandmother_glassbeards") and
		has_info("sidor_ugon_baggi") and
		has_info("info_artmod_probabka_burera") and
		has_info("info_amk_recipt_dikoobraz") and
		has_info("info_amk_recipt_electra_dikoobraz") and
		has_info("val_sos_give_info") and
		has_info("info_amk_recipt_stone_dikoobraz") and
		has_info("info_amk_recipt_shkura") and
		has_info("bar_svoboda_rg6_done") and
		has_info("escape_blockpost_case_done") and
		has_info("info_amk_recipt_simbion") and
		has_info("info_amk_recipt_dummy_fire") and
		has_info("kalinin_voen1_done") and
		has_info("taynik_gila_done") and
		has_info("vasily_toolkit_done")
	then
		give_info("acv_kulinar")
		send_archievement("acv_kulinar")
	end

	if not has_info("acv_trans") and
		has_info("mil_volk_resiver_done") and
		has_info("plov_kulinar_done") and
		has_info("val_pula_boar_leg_done") and
		has_info("hand_otdan") and
		has_info("esc_tolik_five_teil_done") and
		has_info("gar_dram_novice_mp5_m1_done") and
		has_info("gar_dolg_flesh_eye_done") and
		has_info("mil_Svoboda_trader_outfit_done") and
		has_info("bar_ivancov_rg6_done") and
		has_info("info_artmod_dummy_dummy_mosquito_bald") and
		has_info("esc_petruha_toz_done") and
		has_info("gar_hellcar_outfit_done") and
		has_info("gar_dolg_krovosos_jaw_done") and
		has_info("val_pula_ammo_done") and
		has_info("sak_repair_box_done") and
		has_info("yan_scientist_books_done") and
		has_info("esc_shustryi_medusa_done") and
		has_info("info_artmod_drops_mincer") and
		has_info("info_artmod_rusty_kristall_mincer") and
		has_info("mil_Svoboda_trader_ammo_done") and
		has_info("info_artmod_ameba_slug_mincer") and
		has_info("sak_find_seif_done") and
		has_info("esc_bridge_vodka_done") and
		has_info("info_artmod_rusty_thorn_buzz") and
		has_info("info_artmod_fireball_buzz") and
		has_info("info_artmod_cristall_buzz") and
		has_info("yan_kruglov_decoder_done") and
		has_info("yan_kruglov_art_done") and
		has_info("info_artmod_electra_flash_zharka") and
		has_info("agr_krot_PDA_done") and
		has_info("bar_dolg_petrenko_gaussgan_done") and
		has_info("mil_Svoboda_trader_plan_done") and
		has_info("bar_dolg_petrenko_electra_flash_done") and
		has_info("sak_reward_outfit_done") and
		has_info("esc_fox_medkit_done") and
		has_info("val_prisoner_give_info") and
		has_info("info_artmod_ameba_mica_galant") and
		has_info("val_escort_PDA_done") and
		has_info("sak_gold_fish_done") and
		has_info("krysyk_pomer_give_pda") and
		has_info("bandit_krisyk_done") and
		has_info("bar_dolg_petrenko_exo_done") and
		has_info("life_heart_final") and
		has_info("info_artmod_gusenica") and
		has_info("shax_plennik_nayti_done")
	then
		give_info("acv_trans")
		send_archievement("acv_trans")
	end
-- Достижение по ЦЗ - Новая Игра+
	if not has_info("acv_newgame") and
		has_info("acv_avianosec") and
		has_info("acv_american") and
		has_info("acv_annigilator") and
		has_info("acv_antisniper") and
		has_info("acv_aptekar") and
		has_info("acv_archeolog") and
		has_info("acv_afgan") and
		has_info("acv_bronenosec") and
		has_info("acv_voenruk") and
		has_info("acv_volshednik") and
		has_info("acv_vigigatel") and
		has_info("acv_glavkom") and
		has_info("acv_gluhar") and
		has_info("acv_gudvin") and
		has_info("acv_bond") and
		has_info("acv_dergach") and
		has_info("acv_jigit") and
		has_info("acv_zavhoz") and
		has_info("acv_zoolog") and
		has_info("acv_cowboy") and
		has_info("acv_commandos") and
		has_info("acv_korotishka") and
		has_info("acv_costumer") and
		has_info("acv_laborant") and
		has_info("acv_luchnik") and
		has_info("acv_meloman") and
		has_info("acv_volonter") and
		has_info("acv_modeller") and
		has_info("acv_misucman") and
		has_info("acv_nevidimka") and
		has_info("acv_patriot") and
		has_info("acv_peredelkin") and
		has_info("acv_povstanec") and
		has_info("acv_podkidish") and
		has_info("acv_podrivnik") and
		has_info("acv_soldafon") and
		has_info("acv_smelchak") and
		has_info("acv_monosniper") and
		has_info("acv_ussrsniper") and
		has_info("acv_stalevar") and
		has_info("acv_specialist") and
		has_info("acv_trangira") and
		has_info("acv_ufolog") and
		has_info("acv_fantomas") and
		has_info("acv_hvastun") and
		has_info("acv_hichnik") and
		has_info("acv_chistula") and
		has_info("acv_shekunchik") and
		has_info("acv_estet") and
		has_info("acv_avstriez") and
		has_info("acv_likvidator") and
		has_info("acv_vlastelin_kolez") and
		has_info("acv_baraholez") and
		has_info("acv_bodyguard") and
		has_info("acv_anticollector") and
		has_info("acv_doublet")
	then
		give_info("acv_newgame")
		send_archievement("acv_newgame")
	end
end

local foods = {
	["kolbasa"] = true,
	["conserva"] = true,
	["bread"] = true,
	["sandwich"] = true,
	["sweetness"] = true
}
local params = {}

-- получение подсчитываемого предмета
function on_receive_count_item(obj)
	local section = obj:section()

	if (not foods[section] and
		section ~= "vodka" and
		section ~= "af_buliz" and
		not isMagazinedWeapon(obj))
		or
		(has_info("acv_food") and
		has_info("acv_vodka") and
		has_info("acv_buliz") and
		has_info("acv_weapon"))
	then return end

	params.food = 0
	params.vodka = 0
	params.buliz = 0
	params.wpn = 0

	db.actor:iterate_inventory_simple(function(item)
		params.sect = item:section()
		if foods[params.sect] then
			params.food = params.food+1
		elseif params.sect == "vodka" then
			params.vodka = params.vodka+1
		elseif params.sect == "af_buliz" then
			params.buliz = params.buliz+1
		elseif isMagazinedWeapon(item) then
			params.wpn = params.wpn+1
		end
	end)

	if not has_info("acv_food") and params.food >= 200 then
		give_info("acv_food")
		send_archievement("acv_food")
	elseif not has_info("acv_vodka") and params.vodka >= 300 then
		give_info("acv_vodka")
		send_archievement("acv_vodka")
	elseif not has_info("acv_buliz") and params.buliz >= 40 then
		give_info("acv_buliz")
		send_archievement("acv_buliz")
	elseif not has_info("acv_weapon") and params.wpn >= 100 then
		give_info("acv_weapon")
		send_archievement("acv_weapon")
	end

	params = {}
end

function send_archievement(text)
	timer("send_archievement", 2.5, "archievements.send_archievement_chunk(\""..translate(text).."\")")
end
function send_archievement_chunk(text)
	local acv_text = "%c[255,255,255,0]"..translate("new_acv").."\\n%c[255,255,185,0]"..text
	db.actor:give_game_news(acv_text, "ui\\ui_iconsTotal", Frect():set(747,517,83,47), 0, 20000)
	voice([[device\pda\pda_objective]]):play(db.actor, 0, sound_object.s2d)

	local acv_hud = hud:AddCustomStatic("main_task", true)
	acv_hud:wnd():SetTextST(acv_text)
	acv_hud.m_endTime = time_global()/1000+10
	acv_count_event("acv_acv", 100, "acv_acv")
end

function send_umer_info(obj)
	local npc_name = get_npc_name(obj)

	amk.send_tip("%c[255,255,0,0]"..translate("dead_stalk")..npc_name.."%c[default]", translate("name_lokalnaya_set"), 0, 15, "questman_death", "questman_death")
	local acv_hud = hud:AddCustomStatic("main_task", true)
	acv_hud:wnd():SetTextST("%c[255,255,0,0]"..translate("stalk_died")..":\\n"..npc_name)
	acv_hud.m_endTime = time_global()/1000+10

	give_info("acv_umer")
end
function get_npc_name(obj)
	local tbl = netpacket:get(obj)
	return tbl.checked_characters
end

function mm_opt()
	if game_is_running() then
		give_info("mm_opt")
	end
	timer("mm_opt", 0.2)
end