Добавлен , не публикуется
do
  local a = InitGlobals -- записываем InitGlobals в переменную
  function InitGlobals() -- заменяем оригинальную InitGlobals своей
       a() -- вызываем оригинальную InitGlobals из переменной
       InitMyTrigger()
  end
end
do
function InitMyTrigger()
function Adrenalindamaging()
local u1 = BlzGetEventDamageTarget() -- получил
local u2 = GetEventDamageSource() -- нанес
local mana = UNIT_STATE_MANA
local maxmana = UNIT_STATE_MAX_MANA
if GetUnitTypeId(u1) == 'Hpal' and GetUnitAbilityLevel(u1,'A000') > 0 then
SetUnitState(u1,mana,GetUnitState(u1,maxmana)+GetUnitState(u1,maxmana)*RMaxBJ(0,5)*0.01)
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaged")
end
if GetUnitTypeId(u2) == 'Hpal' and GetUnitAbilityLevel(u2,'A000') > 0 then
SetUnitState(u2,mana,GetUnitState(u2,mana)-GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01)
BlzSetEventDamage(GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01+BlzGetEventDamage())
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaging")
end
end
function adrenalinremovemana()
local u = GetEnumUnit()
local mana = UNIT_STATE_MANA
local maxmana = UNIT_STATE_MAX_MANA
SetUnitState(u,mana,GetUnitState(u,maxmana)-GetUnitState(u,maxmana)*RMaxBJ(0,2)*0.01)
local t1 = CreateTrigger()
local cot2 = Adrenalindamaging
local evenk = EVENT_UNIT_DAMAGING
TriggerRegisterUnitEvent(t1,u,evenk)
TriggerAddAction(t1,cot2)
end
function Condition(unittypeadrenalin)
return GetUnitTypeId(GetFilterUnit()) == 'Hpal' and GetUnitAbilityLevel(GetFilterUnit(),'A000') > 0
end
function AdrenalinSeconds()
local r = Rect(-544.0, -864.0, -320.0, -640.0)
local filterr = unittypeadrenalin
local cot1 = adrenalinremovemana
local g = CreateGroup()
GroupEnumUnitsInRect(g, r, filterr)
ForGroup(g,cot1)
end
local t = CreateTrigger()
local cot = AdrenalinSeconds
TriggerRegisterTimerEvent(t,1.00,true)
TriggerAddAction(t, cot)
end
end
когда убираю ифы в DAMAGING все работает, сижу уже час

Ельнур, не поделиш учебник где ты так учил кодить (Пора завести страницу пример кода)
Администраторам, Ребят добавь страницу или раздел для того чтобы могли поделить кусок кода и что он делает. Думаю лудям будет изучать как писать код с примера jass и lua для war3
`
ОЖИДАНИЕ РЕКЛАМЫ...
7
pro100master:
помилуй ельнура но карать варном
пчм они не работают ведь все правильно а если их убрать то дебаг высветится но получится кривой скилл который по два раза будет действовать
22
Ельнур, не поделиш учебник где ты так учил кодить (Пора завести страницу пример кода)
Администраторам, Ребят добавь страницу или раздел для того чтобы могли поделить кусок кода и что он делает. Думаю лудям будет изучать как писать код с примера jass и lua для war3
Принятый ответ
7
pro100master:
помилуй ельнура но карать варном
ифы не работают а без ифов дебаг высвечивает

кратко чтобы поняли
DisplayTimedTextToPlayer(Player(0),0,0,10,"NoIf")
if GetUnitTypeId(u1) == 'Hpal' and GetUnitAbilityLevel(u1,'A000') > 0 then
SetUnitState(u1,mana,GetUnitState(u1,maxmana)+GetUnitState(u1,maxmana)*RMaxBJ(0,5)*0.01)
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaged")
end
if GetUnitTypeId(u2) == 'Hpal' and GetUnitAbilityLevel(u2,'A000') > 0 then
SetUnitState(u2,mana,GetUnitState(u2,mana)-GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01)
BlzSetEventDamage(GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01+BlzGetEventDamage())
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaging")
end
высвечивает ноиф а остальное нет

крч вывод ифы и булеаны нигде не работают а без них все прекрасно рабоатет
9
Ельнур:
pro100master:
помилуй ельнура но карать варном
ифы не работают а без ифов дебаг высвечивает

кратко чтобы поняли
DisplayTimedTextToPlayer(Player(0),0,0,10,"NoIf")
if GetUnitTypeId(u1) == 'Hpal' and GetUnitAbilityLevel(u1,'A000') > 0 then
SetUnitState(u1,mana,GetUnitState(u1,maxmana)+GetUnitState(u1,maxmana)*RMaxBJ(0,5)*0.01)
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaged")
end
if GetUnitTypeId(u2) == 'Hpal' and GetUnitAbilityLevel(u2,'A000') > 0 then
SetUnitState(u2,mana,GetUnitState(u2,mana)-GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01)
BlzSetEventDamage(GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01+BlzGetEventDamage())
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaging")
end
высвечивает ноиф а остальное нет

крч вывод ифы и булеаны нигде не работают а без них все прекрасно рабоатет
Как if'ы могут не работать?
7
noyl:
Ельнур:
pro100master:
помилуй ельнура но карать варном
ифы не работают а без ифов дебаг высвечивает

кратко чтобы поняли
DisplayTimedTextToPlayer(Player(0),0,0,10,"NoIf")
if GetUnitTypeId(u1) == 'Hpal' and GetUnitAbilityLevel(u1,'A000') > 0 then
SetUnitState(u1,mana,GetUnitState(u1,maxmana)+GetUnitState(u1,maxmana)*RMaxBJ(0,5)*0.01)
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaged")
end
if GetUnitTypeId(u2) == 'Hpal' and GetUnitAbilityLevel(u2,'A000') > 0 then
SetUnitState(u2,mana,GetUnitState(u2,mana)-GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01)
BlzSetEventDamage(GetUnitState(u2,mana)*RMaxBJ(0,5)*0.01+BlzGetEventDamage())
DisplayTimedTextToPlayer(Player(0),0,0,10,"Damaging")
end
высвечивает ноиф а остальное нет

крч вывод ифы и булеаны нигде не работают а без них все прекрасно рабоатет
Как if'ы могут не работать?
если бы работал дебаг высветился бы
1 пункт от ivanbakavan: 10.3 (ответ на вопрос есть в статьях) сделал два одинаковых вопроса подряд https://xgm.guru/p/wc3/245070
Чтобы оставить комментарий, пожалуйста, войдите на сайт.