XGM Forum - Отлов урона

Багнутый вариант. Первый удар триггер пропускает (не сработало, нет плавающих текстов) чего-то, и остается 3 хп, второй удар уже сам вражеский герой не делает (мой герой стоит рядом с ним, а он застыл с атакой), а спустя некоторое время приходит в себя и убивает моего героя (а над ними кучу плавающих текстов испаряется вверх).

» код

Код:

globals
trigger DamageUnit
real damaDe //просто для проверки
endglobals

function TReturnD takes nothing returns nothing
    local real damage = damaDe 
    local real k = 1.00 -(0.15 + (0.05*GetUnitAbilityLevel(GetTriggerUnit(),'A001'))) //коэффициент полученного урона
    local texttag tag = CreateTextTag()
    call SetUnitInvulnerable( GetTriggerUnit(), false )
    //показывают настоящий урон красным цветом - для проверки
    call SetTextTagPermanent(tag, false)
    call SetTextTagColor(tag, PercentTo255(100.00), PercentTo255(0.00), PercentTo255(0.00), PercentTo255(100.0))
    call SetTextTagLifespan(tag, 2.00)
    call SetTextTagFadepoint(tag, 0.00)
    call SetTextTagVelocity(tag, 0.00, 0.027)
    call SetTextTagText(tag, I2S(R2I(damage)), TextTagSize2Height(10.00))
    call SetTextTagPosUnit(tag, GetEventDamageSource(), 0.00)
    call UnitDamageTarget( GetEventDamageSource(), GetTriggerUnit(),(damage*k), true, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_NORMAL, WEAPON_TYPE_WHOKNOWS)
    set tag = CreateTextTag()
    //показывают отраженный урон красным цветом
    call SetTextTagPermanent(tag, false)
    call SetTextTagColor(tag, PercentTo255(0.00), PercentTo255(100.00), PercentTo255(0.00), PercentTo255(100.0))
    call SetTextTagLifespan(tag, 2.00)
    call SetTextTagFadepoint(tag, 0.00)
    call SetTextTagVelocity(tag, 0.00, 0.027)
    call SetTextTagText(tag, I2S(R2I(damage*k)), TextTagSize2Height(10.00))
    call SetTextTagPosUnit(tag, GetTriggerUnit(), 0.00)
    //прибавляем к текущему здоровью юнита
    //set damage = GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE) + damage*(1.0-k)
    //call SetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE, RMaxBJ(0.00,damage))
    set tag = null
endfunction
    
function T_ReturnDamage_C takes nothing returns boolean
    call SetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE, (GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE)+1))
    set damaDe = GetEventDamage() 
    if(GetEventDamage()>=GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE))then
        call SetUnitInvulnerable( GetTriggerUnit(), true )
        call ExecuteFunc( "TReturnD" )
    endif
    return false
    //return(IsPlayerEnemy(GetOwningPlayer(GetTriggerUnit()), GetOwningPlayer(GetEventDamageSource())))and(GetEventDamage()<GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE))and(GetEventDamage()!=0)
endfunction

function T_ReturnDamage_A takes nothing returns nothing
    local real damage = GetEventDamage()  
    local real k = 1.00 -(0.15 + (0.05*GetUnitAbilityLevel(GetTriggerUnit(),'A001'))) //коэффициент полученного урона
    local texttag tag = CreateTextTag()
    //показывают настоящий урон красным цветом - для проверки
    call SetTextTagPermanent(tag, false)
    call SetTextTagColor(tag, PercentTo255(100.00), PercentTo255(0.00), PercentTo255(0.00), PercentTo255(100.0))
    call SetTextTagLifespan(tag, 2.00)
    call SetTextTagFadepoint(tag, 0.00)
    call SetTextTagVelocity(tag, 0.00, 0.027)
    call SetTextTagText(tag, I2S(R2I(damage)), TextTagSize2Height(10.00))
    call SetTextTagPosUnit(tag, GetEventDamageSource(), 0.00)

    set tag = CreateTextTag()
    //показывают отраженный урон красным цветом
    call SetTextTagPermanent(tag, false)
    call SetTextTagColor(tag, PercentTo255(0.00), PercentTo255(100.00), PercentTo255(0.00), PercentTo255(100.0))
    call SetTextTagLifespan(tag, 2.00)
    call SetTextTagFadepoint(tag, 0.00)
    call SetTextTagVelocity(tag, 0.00, 0.027)
    call SetTextTagText(tag, I2S(R2I(damage*k)), TextTagSize2Height(10.00))
    call SetTextTagPosUnit(tag, GetTriggerUnit(), 0.00)
    //прибавляем к текущему здоровью юнита
    set damage = GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE) + damage*(1.0-k)
    call SetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE, RMaxBJ(0.00,damage))
    set tag = null
endfunction

function Trig_DAMAGE_C takes nothing returns boolean
    return((GetLearnedSkill()=='A001')and(GetUnitAbilityLevel(GetLearningUnit(),'A00  1')==1))
endfunction

function Trig_DAMAGE_A takes nothing returns nothing
    //вешаем событие, что он получил урон
    call TriggerRegisterUnitEvent( DamageUnit, GetLearningUnit(), EVENT_UNIT_DAMAGED )
    call UnitAddAbility(GetLearningUnit(), 'A000')
    //даю склад (Abun), специально чтобы лишить его атаки (дабы никого не убил), для проверки отражения урона
    call UnitAddAbility(GetLearningUnit(), 'Abun')
endfunction

//===========================================================================
function InitTrig_ReturnDamageAbility takes nothing returns nothing
    //1
    set gg_trg_ReturnDamageAbility = CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ( gg_trg_ReturnDamageAbility, EVENT_PLAYER_HERO_SKILL )
    call TriggerAddCondition( gg_trg_ReturnDamageAbility, Condition( function Trig_DAMAGE_C ) )
    call TriggerAddAction( gg_trg_ReturnDamageAbility, function Trig_DAMAGE_A )
    //2
    set DamageUnit = CreateTrigger()
    call TriggerAddCondition( DamageUnit, Condition( function T_ReturnDamage_C ) )
    //call TriggerAddAction( DamageUnit, function T_ReturnDamage_A )
endfunction

scope ReturnDamage globals private real dmg private timer array T private unit array UNIT private unit array UNIT_SOURCE private real array DAMAGE private real array DMG private integer N = 0 endglobals define { // НАСТРОЙКИ // SPELL_ID = 'A001' // можно запихать сюда много } function DamageTaken_Timer takes nothing returns nothing local integer i = 1 //Когда срабатывает таймер, то перебираем все таймеры и //убираем неуязвимость всем сразу loop { exitwhen i > N call SetUnitInvulnerable(UNIT[i], false) //Выключаем триггер, чтобы не было косяков с бесконечными циклами call DisableTrigger(gg_trg_ReturnDamage) //Наносим урон, который не отразился call UnitDamageTarget(UNIT_SOURCE[i], UNIT[i], DAMAGE[i] - DMG[i], false, false, ATTACK_TYPE_CHAOS, DAMAGE_TYPE_UNIVERSAL, WEAPON_TYPE_WHOKNOWS) //наносим отраженный урон противнику call UnitDamageTarget(UNIT[i], UNIT_SOURCE[i], DMG[i], false, false, ATTACK_TYPE_CHAOS, DAMAGE_TYPE_UNIVERSAL, WEAPON_TYPE_WHOKNOWS) //Включаем call EnableTrigger(gg_trg_ReturnDamage) //Убираем таймер call DestroyTimer(T[i]) i++ } //Обнуляем кол-во таймеров set N = 0 endfunction function DamageTaken_Condition takes nothing returns boolean //Проверяем, если это противник и урон больше нуля if IsPlayerEnemy(GetOwningPlayer(GetTriggerUnit()),GetOwningPlayer(GetEventDamageSource())) and GetEventDamage() > 0. then //Сразу вбиваем в переменную отраженный урон, т.к. он нам по любому понадобится // лучше через глобалку, т.к. меньше нагрузка будет set dmg = GetEventDamage()*(0.15+(0.05*GetUnitAbilityLevel(GetTriggerUnit(), SPELL_ID))) // Самое интересное - если урон больше, чем у юнита ХП. if GetEventDamage() > GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE) then //Даем юниту неуязвимость! call SetUnitInvulnerable( GetTriggerUnit(), true ) // И тут запускается таймер и вешаются на него нужные переменные N++ set T[N] = CreateTimer() call TimerStart(T[N], .0, false, function DamageTaken_Timer) set UNIT[N] = GetTriggerUnit() set DAMAGE[N] = GetEventDamage() set UNIT_SOURCE[N] = GetEventDamageSource() set DMG[N] = dmg //Лечить юнита не надо return false else // Если не больше, то прсто лечим return true endif endif return false endfunction function DamageTaken_Action takes nothing returns nothing // Если у нас наносится обычный урон, то просто лечим юнита и наносим отвеный урон call SetUnitState(GetTriggerUnit() ,UNIT_STATE_LIFE, GetUnitState(GetTriggerUnit(), UNIT_STATE_LIFE) + dmg) //Выключаем триггер, чтобы не было косяков с бесконечными циклами call DisableTrigger(gg_trg_ReturnDamage) call UnitDamageTarget(GetTriggerUnit(), GetEventDamageSource(), dmg, false, false, ATTACK_TYPE_CHAOS, DAMAGE_TYPE_UNIVERSAL, WEAPON_TYPE_WHOKNOWS) call EnableTrigger(gg_trg_ReturnDamage) endfunction function Trig_ReturnDamage_Actions takes nothing returns nothing //Добавляем событие, если уровень прокаченной способности равен 1 call TriggerRegisterUnitEvent( gg_trg_ReturnDamage, GetTriggerUnit(), EVENT_UNIT_DAMAGED ) endfunction //=========================================================================== function Trig_ReturnDamage_Conditions takes nothing returns boolean return GetLearnedSkill() == SPELL_ID and GetUnitAbilityLevel(GetTriggerUnit(), SPELL_ID) == 1 endfunction function InitTrig_ReturnDamage takes nothing returns nothing // Создаем триггер для события прокачки set gg_trg_ReturnDamage = CreateTrigger( ) call TriggerRegisterAnyUnitEventBJ( gg_trg_ReturnDamage, EVENT_PLAYER_HERO_SKILL ) call TriggerAddCondition( gg_trg_ReturnDamage, Condition( function Trig_ReturnDamage_Conditions ) ) call TriggerAddAction( gg_trg_ReturnDamage, function Trig_ReturnDamage_Actions ) // Создаем триггер для события получения урона. Используем уже имеющуюся переменную set gg_trg_ReturnDamage = CreateTrigger( ) call TriggerAddCondition( gg_trg_ReturnDamage, Condition( function DamageTaken_Condition ) ) call TriggerAddAction( gg_trg_ReturnDamage, function DamageTaken_Action ) endfunction endscope

Ваши права в разделе

Вы не можете создавать темы

Вы не можете отвечать на сообщения

Вы не можете прикреплять файлы

Вы можете скачивать файлы

BB-коды Вкл.

Смайлики Вкл.

[IMG] код Вкл.

HTML код Выкл.

MpW offline Опыт: 49,815 Активность:	Я так думаю.
04.09.2012, 19:54	#3 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

DimanTOoBS offline Опыт: 5,791 Активность:	если в доте не решили эту проблему, не думаю что вы сможете её решить, не прибегая к воскрешению или созданию нового юнита...
04.09.2012, 21:53	#5 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Holocauster INRI offline Опыт: 4,249 Активность:	По идее третья пассивка жука все это делает. Может блокировать процент урона, и отражать его. Могу сделать пример.
04.09.2012, 22:49	#6 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

quq_CCCP Я белый и пушистый! offline Опыт: 93,279 Активность:	asesmo, все говорят про аунбарака из кампании, и мили карт, а не из доты.... И насчёт 9лет загнул, доте стока нету...
05.09.2012, 07:31	#9 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

bee vjass.optimizer offline Опыт: 16,615 Активность:	в условии попробуй похилить героя на 1 хп а потом уже на остальное. есть подозрения, что проверки типа GetWidgetLife() + n * 0.22 и тп они работают медленне,чем нанесенее урона SetWidgetLife(u,1.) попробуй так в условии
05.09.2012, 12:04	#11 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

bee vjass.optimizer offline Опыт: 16,615 Активность:	попробуй использовать вместо ExecuteFunc обычный вызов call
05.09.2012, 13:20	#13 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

MpW offline Опыт: 49,815 Активность:	16GB, спасибо заработало=)) Тему клоуз.
05.09.2012, 19:01	#17 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

16GB GhostOne User offline Опыт: 60,317 Активность:	ты хоть догадался зачем я даммика использовал? чтобы возврат урона не возвращал урон от возврата иначе будет зацикливание, пока урон 0 не будет
05.09.2012, 19:45	#18 +1/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Опции темы	Поиск в этой теме
Версия для печати	Поиск в этой теме: Расширенный поиск