do
	local InitGlobalsOrigin = InitGlobals
	function InitGlobals()
		InitGlobalsOrigin()
		
		do
			local dummy  = CreateUnit(Player(PLAYER_NEUTRAL_PASSIVE), FourCC('dumy'), 0, 0, 0)
			local stunId = FourCC('stun')
			UnitAddAbility(dummy, stunId)
			local stunAbility = BlzGetUnitAbility(dummy, stunId)
			
			---@param target unit
			---@param durationNormal real
			---@param durationHero real
			function DummyCastStun(target, durationNormal, durationHero)
				SetUnitX(dummy, GetUnitX(target))
				SetUnitY(dummy, GetUnitY(target))
				BlzSetAbilityRealLevelField(stunAbility, ABILITY_RLF_DURATION_NORMAL, 0, durationNormal)
				BlzSetAbilityRealLevelField(stunAbility, ABILITY_RLF_DURATION_HERO, 0, durationHero)
				IssueTargetOrderById(dummy, 852095, target) -- thunderbolt
			end
		end
		
		do
			local dummys      = {}
			local rootAbility = {}
			local rootId      = FourCC('root')
			for i = 0, bj_MAX_PLAYER_SLOTS - 1 do
				dummys[i] = CreateUnit(Player(i), FourCC('dumy'), 0, 0, 0)
				UnitAddAbility(dummys[i], rootId)
				rootAbility[i] = BlzGetUnitAbility(dummys[i], rootId)
			end
			
			---@param player player
			---@param target unit
			---@param durationNormal real
			---@param durationHero real
			function DummyCastRoot(player, target, durationNormal, durationHero, damage)
				local id      = GetPlayerId(player)
				local dummy   = dummys[id]
				local ability = rootAbility[id]
				
				SetUnitX(dummy, GetUnitX(target))
				SetUnitY(dummy, GetUnitY(target))
				BlzSetAbilityRealLevelField(ability, ABILITY_RLF_DURATION_NORMAL, 0, durationNormal)
				BlzSetAbilityRealLevelField(ability, ABILITY_RLF_DURATION_HERO, 0, durationHero)
				BlzSetAbilityRealLevelField(ability, ABILITY_RLF_DAMAGE_PER_SECOND_EER1, 0, damage)
				UnitShareVision(target, player, true)
				IssueTargetOrderById(dummy, 852171, target) -- entanglingroots
				UnitShareVision(target, player, false)
			end
		end
		
		-- Spell
		local SpellGroup   = CreateGroup()
		local SpellTrigger = CreateTrigger()
		local SpellId      = FourCC('spel')
		for i = 0, bj_MAX_PLAYER_SLOTS - 1 do
			TriggerRegisterPlayerUnitEvent(SpellTrigger, Player(i), EVENT_PLAYER_UNIT_SPELL_EFFECT)
		end
		TriggerAddAction(SpellTrigger, function()
			if GetSpellAbilityId() ~= SpellId then return end
			local caster      = GetTriggerUnit()
			local casterOwner = GetOwningPlayer(caster)
			local x, y        = GetSpellTargetX(), GetSpellTargetY()
			
			local dummy       = CreateUnit(casterOwner, FourCC('dumy'), x, y, 0) -- создаём дамми
			UnitAddAbility(dummy, FourCC('ACfs')) -- даём юниту способность "Огненный столб"
			IssuePointOrderById(dummy, 852488, x, y) -- отдаём приказ flamestrike
			UnitApplyTimedLife(dummy, FourCC('BTLF'), 10) -- устанавливаем юниту время жизни
			
			local radius = BlzGetAbilityRealLevelField(GetSpellAbility(), ABILITY_RLF_AREA_OF_EFFECT, 0)
			GroupEnumUnitsInRange(SpellGroup, x, y, radius)
			for index = BlzGroupGetSize(SpellGroup) - 1, 0, -1 do
				local target = BlzGroupUnitAt(SpellGroup, index)
				if UnitAlive(target) and IsUnitEnemy(target, casterOwner) then
					DummyCastStun(target, 5, 3)
					DummyCastRoot(casterOwner, target, 5, 3, 10)
				end
			end
			GroupClear(SpellGroup)
		end)
	
	end
end