Code: Select all
local trigger t=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(t,EVENT_PLAYER_UNIT_SPELL_EFFECT)
call TriggerAddCondition(t,Condition(function Vp))
call TriggerAddAction(t,function VP)
endfunction
function qw takes nothing returns nothing
local trigger t=GetTriggeringTrigger()
local unit Fc=Ik(i1(t),"Hero")
local unit qW=Ik(i1(Fc),"Replicate")
call DestroyEffect(AddSpecialEffect("Objects\\Spawnmodels\\Naga\\NagaDeath\\NagaDeath.mdl",GetUnitX(qW),GetUnitY(qW)))
call RemoveUnit(qW)
call UnitRemoveAbility(Fc,'A0GC')
call SetPlayerAbilityAvailable(GetOwningPlayer(Fc),'A0G8',true)
call i4(i1(t))
call KQ(t)
endfunction
function qx takes nothing returns boolean
if GetSpellAbilityId()=='A0GC'then
return true
endif
return false
endfunction
function qX takes nothing returns nothing
local unit Fc=GetTriggerUnit()
local string FJ=i1(Fc)
local unit qW=Ik(FJ,"Replicate")
local real x=GetUnitX(qW)
local real y=GetUnitY(qW)
call DestroyEffect(AddSpecialEffect("Objects\\Spawnmodels\\Naga\\NagaDeath\\NagaDeath.mdl",GetUnitX(Fc),GetUnitY(Fc)))
call KillUnit(qW)
if not Js(Fc,x,y)then
call SetUnitX(Fc,x)
call SetUnitY(Fc,y)
call PanCameraToTimedForPlayer(GetOwningPlayer(Fc),x,y,0)
call IssueImmediateOrderById(Fc,851972)
else
call kA(GetOwningPlayer(Fc),"Unable to Morph Replicate")
endif
endfunction
function qy takes nothing returns boolean
return GetUnitAbilityLevel(GetSummonedUnit(),'B030')>0
endfunction
function qY takes nothing returns nothing
local unit Fc=GetSummoningUnit()
local string FJ=i1(Fc)
local unit FN=Ik(FJ,"ReplicateTarget")
local unit qW=GetSummonedUnit()
local trigger t
call SetPlayerAbilityAvailable(GetOwningPlayer(Fc),'A0G8',true)
call UnitAddAbility(Fc,'A0GC')
call SetUnitColor(qW,GetPlayerColor(GetOwningPlayer(FN)))
call i5(FJ,"Replicate",qW)
set t=CreateTrigger()
call TriggerRegisterUnitEvent(t,Fc,EVENT_UNIT_DEATH)
call TriggerRegisterUnitEvent(t,qW,EVENT_UNIT_DEATH)
call TriggerAddAction(t,function qw)
call i5(i1(t),"Hero",Fc)
endfunction
function VU takes nothing returns boolean
return GetSpellAbilityId()=='A0G8'
endfunction
function Vv takes nothing returns nothing
local unit Fc=GetTriggerUnit()
local unit FN=GetSpellTargetUnit()
call i5(i1(Fc),"ReplicateTarget",FN)
endfunction
function Mp takes nothing returns nothing