function Trig_IceStar_Conditions takes nothing returns boolean
return GetSpellAbilityId()=='A01Z'
endfunction

function move_A01Z takes nothing returns nothing
local timer t=GetExpiredTimer()
local integer id=GetHandleId(t)
local unit caster=LoadUnitHandle(udg_H,id,0)
local unit dummy=LoadUnitHandle(udg_H,id,1)
local real x=GetUnitX(dummy)
local real y=GetUnitY(dummy)
local real angle=LoadReal(udg_H,id,2)
local real distance=LoadReal(udg_H,id,3)
local real damage=LoadReal(udg_H,id,4)
local group g=LoadGroupHandle(udg_H,id,5)
local group gg
local unit f
    if distance<=10. then
        call PauseTimer(t)
        call DestroyTimer(t)
        call FlushChildHashtable(udg_H,id)
        call RemoveUnit(dummy)
        call GroupClear(g)
        call DestroyGroup(g)
    else
        call SetUnitX(dummy,x+20.*Cos(angle))
        call SetUnitY(dummy,y+20.*Sin(angle))
        call SaveReal(udg_H,id,3,distance-20.)
        set gg=CreateGroup()
        call GroupEnumUnitsInRange(gg,x,y,100.,null)
        loop
            set f=FirstOfGroup(g)
            exitwhen f==null
            if not IsUnitInGroup(f,g) and not IsPlayerEnemy(GetOwningPlayer(caster),GetOwningPlayer(f)) and GetWidgetLife(f)>=0.405 and not IsUnitType(f,UNIT_TYPE_STRUCTURE) and not IsUnitType(f,UNIT_TYPE_MAGIC_IMMUNE) then
                call UnitDamageTarget(caster,f,damage,true,false,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_NORMAL,null)
                call GroupRemoveUnit(gg,f)
                call GroupAddUnit(g,f)
            else
                call GroupRemoveUnit(gg,f)
                call GroupAddUnit(g,f)
            endif
        endloop
        call DestroyGroup(gg)
        call SaveGroupHandle(udg_H,id,5,g)
    endif
set t=null
set caster=null
set dummy=null
set g=null
set gg=null
set f=null
endfunction

function Trig_IceStar_Actions takes nothing returns nothing
local unit caster=GetTriggerUnit()
local real x=GetUnitX(caster)
local real y=GetUnitY(caster)
local real xt=GetSpellTargetX()
local real yt=GetSpellTargetY()
local real angle=Atan2(yt-y,xt-x)
local unit dummy=CreateUnit(GetOwningPlayer(caster),'n00C',x,y,angle*bj_RADTODEG)
local real distance=SquareRoot((xt-x)*(xt-x)+(yt-y)*(yt-y))
local timer t=CreateTimer()
local integer id=GetHandleId(t)
    call SetUnitX(dummy,x+20.*Cos(angle))
    call SetUnitY(dummy,y+20.*Sin(angle))
    call SaveUnitHandle(udg_H,id,0,caster)
    call SaveUnitHandle(udg_H,id,1,dummy)
    call SaveReal(udg_H,id,2,angle)
    call SaveReal(udg_H,id,3,distance)
    call SaveReal(udg_H,id,4,GetUnitAbilityLevel(caster,'A01Z')*150)
    call SaveGroupHandle(udg_H,id,5,CreateGroup())
    call TimerStart(t,0.03,true,function move_A01Z)
set caster=null
set dummy=null
set t=null
endfunction

function InitTrig_IceStar takes nothing returns nothing
local integer index=0
set gg_trg_IceStar=CreateTrigger()
    loop
        exitwhen index>11
        call TriggerRegisterPlayerUnitEvent(gg_trg_IceStar,Player(index),EVENT_PLAYER_UNIT_SPELL_EFFECT,null)
        set index=index+1
    endloop
    call TriggerAddCondition(gg_trg_IceStar,Condition(function Trig_IceStar_Conditions))
    call TriggerAddAction(gg_trg_IceStar,function Trig_IceStar_Actions)
endfunction

set f=FirstOfGroup(g)

and not IsPlayerEnemy(GetOwningPlayer(caster),GetOwningPlayer(f))