[lua] BonusMod

		-- MP 7 [79-91]
		FourCC('ZxC0'), -- +1
		FourCC('ZxC1'), -- +2
		FourCC('ZxC2'), -- +4
		FourCC('ZxC3'), -- +8
		FourCC('ZxC4'), -- +16
		FourCC('ZxC5'), -- +32
		FourCC('ZxC6'), -- +64
		FourCC('ZxC7'), -- +128
		FourCC('ZxC8'), -- +256
		FourCC('ZxC9'), -- +512
		FourCC('ZxCa'), -- +1024
		FourCC('ZxCb'), -- +2048
		FourCC('ZxCc'), -- -4096

	-- regen MP 7 [79-91]
	FourCC('ZxD0'), -- +1
	FourCC('ZxD1'), -- +2
	FourCC('ZxD2'), -- +4
	FourCC('ZxD3'), -- +8
	FourCC('ZxD4'), -- +16
	FourCC('ZxD5'), -- +32
	FourCC('ZxD6'), -- +64
	FourCC('ZxD7'), -- +128
	FourCC('ZxD8'), -- +256
	FourCC('ZxD9'), -- +512
	FourCC('ZxDa'), -- +1024
	FourCC('ZxDb'), -- +2048
	FourCC('ZxDc'), -- -4096

--[[ нативки рефорджета

--защита (работает норм).
native BlzGetUnitArmor takes unit whichUnit returns real --считывает базовый+бонус
native BlzSetUnitArmor takes unit whichUnit, real armorAmount returns nothing

native BlzGetUnitBaseDamage takes unit whichUnit, integer weaponIndex returns integer
native BlzGetUnitDiceNumber takes unit whichUnit, integer weaponIndex returns integer
native BlzGetUnitDiceSides takes unit whichUnit, integer weaponIndex returns integer
native BlzSetUnitBaseDamage takes unit whichUnit, integer baseDamage, integer weaponIndex returns nothing
native BlzSetUnitDiceNumber takes unit whichUnit, integer diceNumber, integer weaponIndex returns nothing
native BlzSetUnitDiceSides takes unit whichUnit, integer diceSides, integer weaponIndex returns nothing

native BlzGetUnitAttackCooldown takes unit whichUnit, integer weaponIndex returns real
native BlzSetUnitAttackCooldown takes unit whichUnit, real cooldown, integer weaponIndex returns nothing

native BlzGetUnitMaxHP takes unit whichUnit returns integer
native BlzSetUnitMaxHP takes unit whichUnit, integer hp returns nothing

native BlzGetUnitMaxMana takes unit whichUnit returns integer
native BlzSetUnitMaxMana takes unit whichUnit, integer mana returns nothing

native BlzUnitHideAbility takes unit whichUnit, integer abilId, boolean flag returns nothing

native BlzGetUnitAbilityManaCost takes unit whichUnit, integer abilId, integer level returns integer
native BlzSetUnitAbilityManaCost takes unit whichUnit, integer abilId, integer level, integer manaCost returns nothing

native BlzGetUnitAbilityCooldown takes unit whichUnit, integer abilId, integer level returns real
native BlzGetUnitAbilityCooldownRemaining takes unit whichUnit, integer abilId returns real
native BlzSetUnitAbilityCooldown takes unit whichUnit, integer abilId, integer level, real cooldown returns nothing

native BlzUnitHideAbility takes unit whichUnit, integer abilId, boolean flag returns nothing
native BlzUnitDisableAbility takes unit whichUnit, integer abilId, boolean flag, boolean hideUI returns nothing


BlzGetUnitRealField(GetTriggerUnit(), UNIT_RF_CAST_BACK_SWING)
BlzGetUnitRealField(GetTriggerUnit(), UNIT_RF_CAST_POINT)

]]

do
	local InitGlobalsOrigin = InitGlobals
	function InitGlobals()
		InitGlobalsOrigin()

        function GetUnitDefenseType(unit)
            return BlzGetUnitIntegerField(unit, UNIT_IF_DEFENSE_TYPE)
        end
        function GetUnitAttackType(unit,index)
            return BlzGetUnitWeaponIntegerField(unit, UNIT_WEAPON_IF_ATTACK_ATTACK_TYPE, index)
        end
        function GetUnitAcquisitionRange(unit)
            return BlzGetUnitRealField(unit, UNIT_RF_ACQUISITION_RANGE)
        end
        function GetUnitSightRadius(unit)
            return BlzGetUnitRealField(unit, UNIT_RF_SIGHT_RADIUS)
        end
        
        
        function IsAttackUnitEnabled(unit,index)
            return BlzGetUnitWeaponBooleanField(unit, UNIT_WEAPON_BF_ATTACKS_ENABLED,index)
        end
        

        --общие параметры атрибутов: базовый+бонус (бонус можно исключить)
        function GetHeroAttributeStr(hero, includeBonuses)
            return GetHeroStr(hero, includeBonuses)
        end
        function GetHeroAttributeAgi(hero, includeBonuses)
            return GetHeroAgi(hero, includeBonuses)
        end
        function GetHeroAttributeInt(hero, includeBonuses)
            return GetHeroInt(hero, includeBonuses)
        end
        
        --базовые атрибуты героя
        function GetHeroStr_base(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_STRENGTH)
        end
        function GetHeroAgi_base(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_AGILITY)
        end
        function GetHeroInt_base(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_INTELLIGENCE)
        end
        --бонусные атрибуты героя
        function GetHeroStr_bonus(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_STRENGTH_WITH_BONUS)-GetHeroStr_base(hero)
        end
        function GetHeroAgi_bonus(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_AGILITY_WITH_BONUS)-GetHeroAgi_base(hero)
        end
        function GetHeroInt_bonus(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_INTELLIGENCE_WITH_BONUS)-GetHeroInt_base(hero)
        end
        
        --установить базовые (белые) атрибуты героя
        function SetHeroBaseStr(hero, value)
            SetHeroStr(hero, value, true)
        end
        function SetHeroBaseAgi(hero, value)
            SetHeroAgi(hero, value, true)
        end
        function SetHeroBaseInt(hero, value)
            SetHeroInt(hero, value, true)
        end
        --установить бонусные (зеленые) атрибуты героя
        function SetHeroBonusStr(hero, value)
            UnitClearBonus (hero, 1)
            UnitSetBonus (hero, 1, value)
        end
        function SetHeroBonusAgi(hero, value)
            UnitClearBonus (hero, 2)
            UnitSetBonus (hero, 2, value)
        end
        function SetHeroBonusInt(hero, value)
            UnitClearBonus (hero, 3)
            UnitSetBonus (hero, 3, value)
        end
        --добавить бонусные (зеленые) атрибуты героя
        function AddHeroBonusStr(hero, value)
            UnitAddBonus (target, 1, ammount)
        end
        function AddHeroBonusAgi(hero, value)
            UnitAddBonus (target, 2, ammount)
        end
        function AddHeroBonusInt(hero, value)
            UnitAddBonus (target, 3, ammount)
        end
        
        --основной атрибут героя (1-str, 3-agi, 2-int). влияет на атаку
        function GetHeroPrimaryAttribute(hero)
            return BlzGetUnitIntegerField(hero, UNIT_IF_PRIMARY_ATTRIBUTE)
        end
        function SetHeroPrimaryAttribute(hero, value) --установка не работает
            BlzSetUnitIntegerField( hero, UNIT_IF_PRIMARY_ATTRIBUTE, value)
        end
        

        function GetHeroStrPerLevel(hero) 
            return BlzGetUnitRealField(hero, UNIT_RF_STRENGTH_PER_LEVEL)
        end
        function GetHeroAgiPerLevel(hero) 
            return BlzGetUnitRealField(hero, UNIT_RF_AGILITY_PER_LEVEL)
        end
        function GetHeroIntPerLevel(hero) 
            return BlzGetUnitRealField(hero, UNIT_RF_INTELLIGENCE_PER_LEVEL)
        end

        --base regen hp/sec
        function GetUnitBaseRegenHP(unit)
            return BlzGetUnitRealField(unit, UNIT_RF_HIT_POINTS_REGENERATION_RATE)
        end
        function SetUnitBaseRegenHP(unit, value) 
            BlzSetUnitRealFieldBJ( unit, UNIT_RF_HIT_POINTS_REGENERATION_RATE, value )
        end
        --base regen mana/sec
        function GetUnitBaseRegenMana(unit)
            return BlzGetUnitRealField(unit, UNIT_RF_MANA_REGENERATION)
        end
        function SetUnitBaseRegenMana(unit, value)
            return BlzSetUnitRealField( unit, UNIT_RF_MANA_REGENERATION, value )
        end
        --bonus regen hp/sec
        function GetUnitBonusRegenHP(unit)
            return UnitGetBonus (unit, 6)
        end
        --bonus % увеличение mana regen от base regen
        function GetUnitBonusRegenMana(unit)
            return UnitGetBonus (unit, 7)
        end
        
        function SetUnitHP(unit,value)
            SetUnitState(unit, UNIT_STATE_LIFE, RMaxBJ(0,value))
        end
        function SetUnitMana(unit,value)
            SetUnitState(unit, UNIT_STATE_MANA, RMaxBJ(0,value))
        end
        
        function GetUnitBaseAttackSpeed(unit)
            if IsUnitType(unit, UNIT_TYPE_HERO) then
                return 1.00 + (GetHeroAttributeAgi(unit, false)/100)
            else
                return 1.00
            end
        end
        
        function GetUnitBonusAttackSpeed(unit)
            return UnitGetBonus (unit, 9)
        end
        
        function GetUnitAttackSpeed(unit, includeBonuses)
            if not includeBonuses then
                return GetUnitBaseAttackSpeed(unit) + GetUnitBonusAttackSpeed(unit)
            else
                return GetUnitBaseAttackSpeed(unit)
            end
        end
        
        function GetUnitBonusArmor(unit)
            return UnitGetBonus (unit, 5)
        end
        function GetUnitBaseArmor(unit)
            return BlzGetUnitArmor(unit)-GetUnitBonusArmor(unit)
        end
        
        
        
        

        TimerStart(CreateTimer(),0.5,true,function()
            print("основной атрибут: "..GetHeroPrimaryAttribute(HERO))
            
            --print("FFF str: "..GetHeroAttributeStr(HERO, true))
            --print("base str: "..GetHeroStr_base(HERO))
            --print("permament str: "..GetHeroStr_permament(HERO))
            --print("bonus str: "..GetHeroStr_bonus(HERO))
            
            --print("BaseRegenHP: "..GetUnitBaseRegenHP(HERO).." hp/sec")
            --print("BonusRegenHP: "..GetUnitBonusRegenHP(HERO).." hp/sec")
            --print("BaseRegenMana: "..GetUnitBaseRegenMana(HERO).." mana/sec")
            --print("BonusRegenMana: "..GetUnitBonusRegenMana(HERO)/100..." % от регена")
        end)
        
        local t = CreateTrigger()
        TriggerRegisterPlayerChatEvent( t, Player(0), "-change ", false )
        TriggerAddAction( t, function()
            local k = S2I(SubStringBJ(GetEventPlayerChatString(),9, StringLength(GetEventPlayerChatString())))
            
            print(k)
            --SetUnitBaseRegenHP(HERO, k)
            --SetUnitBaseRegenMana(HERO, k)
            
            --SetHeroBaseStr(HERO, GetHeroStr_base(HERO)+k, true)
            --SetHeroAgi_bonus(HERO, k)
            
            --SetHeroPrimaryAttribute(HERO, k)
            
            print("end")
        end)
        

        
        
end
end

        --BAS - базовая скорость атаки, показывает кол-во ударов в сек
        --BlzGetUnitAttackCooldown - новая нативка рефорджа
		function GetUnitBaseAttackSpeed(unit, index)
            return 1/BlzGetUnitAttackCooldown(unit, index)
        end
        
        --IAS - показывает % процентное содержание AS
		--это надо переделать, тк бонус от ловкости не относится к базовой (точно не уверен)
        function GetUnitIncreaseBaseAttackSpeed(unit)
            if IsUnitType(unit, UNIT_TYPE_HERO) then
                return 1.00 + (GetHeroAttributeAgi(unit, false)*0.02) --0.02% бонуса AS за каждую единицу ловкости
            else
                return 1.00
            end
        end
        
        --bonus IAS - показывает процент AS от абилок
        --делим на 100 тк результат из BonusMod выдают в виде целых чисел
        function GetUnitIncreaseBonusAttackSpeed(unit)
            return UnitGetBonus (unit, 9) / 100 --это UnitGetBonus надо будет переделать
        end
        
        function GetUnitIncreaseAttackSpeed(unit, includeBonuses)
            if not includeBonuses then
                return GetUnitIncreaseBaseAttackSpeed(unit) + GetUnitIncreaseBonusAttackSpeed(unit)
            else
                return GetUnitIncreaseBaseAttackSpeed(unit)
            end
        end
        
        --AS выдает кол-во ударов в сек
        function GetUnitAttackSpeed(unit, index)
            return GetUnitBaseAttackSpeed(unit, index) * GetUnitIncreaseAttackSpeed(unit, false)
        end
        
        --время задержки для атаки
        function GetUnitAttackTime(unit, index)
            return GetUnitBaseAttackSpeed(unit, index) / GetUnitIncreaseAttackSpeed(unit, false)
        end

native BlzGetUnitArmor takes unit whichUnit returns real --считывает базовый+бонус
native BlzSetUnitArmor takes unit whichUnit, real armorAmount returns nothing

native BlzGetUnitBaseDamage takes unit whichUnit, integer weaponIndex returns integer
native BlzGetUnitDiceNumber takes unit whichUnit, integer weaponIndex returns integer
native BlzGetUnitDiceSides takes unit whichUnit, integer weaponIndex returns integer
native BlzSetUnitBaseDamage takes unit whichUnit, integer baseDamage, integer weaponIndex returns nothing
native BlzSetUnitDiceNumber takes unit whichUnit, integer diceNumber, integer weaponIndex returns nothing
native BlzSetUnitDiceSides takes unit whichUnit, integer diceSides, integer weaponIndex returns nothing