
Code: Select all
function O95370 takes nothing returns boolean
if(not(GetSpellAbilityId()=='A000'))then
return false
endif
return true
endfunction
function O95321 takes nothing returns nothing
call PauseUnitBJ(false,GetEnumUnit())
call SetUnitTimeScalePercent(GetEnumUnit(),100.00)
endfunction
function O95467 takes nothing returns nothing
if(O94850())then
set udg_unit59=GetSpellAbilityUnit()
set bj_forLoopBIndex=1
set bj_forLoopBIndexEnd=3
loop
exitwhen bj_forLoopBIndex>bj_forLoopBIndexEnd
set udg_location02=PolarProjectionBJ(GetUnitLoc(GetSpellAbilityUnit()),GetRandomReal(1.00,500.00),GetRandomReal(1.00,360.00))
call AddSpecialEffectLocBJ(udg_location02,"Objects\\Spawnmodels\\Undead\\ImpaleTargetDust\\ImpaleTargetDust.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location02)
set bj_forLoopBIndex=bj_forLoopBIndex+1
endloop
set bj_forLoopBIndex=1
set bj_forLoopBIndexEnd=10
loop
exitwhen bj_forLoopBIndex>bj_forLoopBIndexEnd
set udg_location02=PolarProjectionBJ(GetUnitLoc(GetSpellAbilityUnit()),GetRandomReal(1.00,500.00),GetRandomReal(1.00,360.00))
call AddSpecialEffectLocBJ(udg_location02,"Abilities\\Spells\\Other\\Tornado\\TornadoElemental.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location02)
set bj_forLoopBIndex=bj_forLoopBIndex+1
endloop
set udg_location02=GetUnitLoc(GetSpellAbilityUnit())
set udg_group04=GetUnitsInRangeOfLocMatching(500.00,udg_location02,Condition(function O94755))
call TriggerSleepAction(0.20)
call DestroyGroup(udg_group04)
call RemoveLocation(udg_location02)
else
endif
if(O95370())then
set udg_unit59=GetSpellAbilityUnit()
set udg_location02=GetUnitLoc(udg_unit59)
set udg_group08=GetUnitsInRangeOfLocMatching(600.00,udg_location02,Condition(function O95184))
call RemoveLocation(udg_location02)
set bj_forLoopBIndex=1
set bj_forLoopBIndexEnd=10
loop
exitwhen bj_forLoopBIndex>bj_forLoopBIndexEnd
set udg_location02=PolarProjectionBJ(GetUnitLoc(GetSpellAbilityUnit()),GetRandomReal(1.00,600.00),GetRandomReal(1.00,360.00))
call AddSpecialEffectLocBJ(udg_location02,"Objects\\Spawnmodels\\Undead\\ImpaleTargetDust\\ImpaleTargetDust.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location02)
set bj_forLoopBIndex=bj_forLoopBIndex+1
endloop
call ForGroupBJ(udg_group08,function O95306)
call SetUnitLifeBJ(udg_unit59,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit59)+(70.00*I2R(GetUnitAbilityLevelSwapped('A000',udg_unit59)))))
call TriggerSleepAction((1.00*I2R(GetUnitAbilityLevelSwapped('A000',udg_unit59))))
call ForGroupBJ(udg_group08,function O95321)
set udg_group08=GetUnitsSelectedAll(Player(PLAYER_NEUTRAL_PASSIVE))
call DestroyGroup(udg_group04)
else
endif
endfunction