Circle level spell not depending on level?

scope Fire initializer Init

globals
private constant integer SPELL = 'A002'
private constant string EFFECT = "Abilities\\Spells\\Orc\\WarStomp\\WarStompCaster.mdl"   
endglobals

private function DISTANCE takes integer level returns integer
return level * 200
endfunction

private struct data
location CasterLoc
unit caster
real distance
real angle
real x
real y
timer t
timer r
integer times


static method create takes nothing returns data
local data d = data.allocate()
set d.t = NewTimer()
set d.caster = GetTriggerUnit()
set d.x = GetUnitX(d.caster)
set d.y = GetUnitY(d.caster)
set d.distance = DISTANCE(GetUnitAbilityLevel(d.caster,SPELL))
set d.times = 0
set d.r = NewTimer()
return d
endmethod

method onDestroy takes nothing returns nothing
call ReleaseTimer(.t)
endmethod

endstruct

private function Conditions takes nothing returns boolean
return GetSpellAbilityId() == SPELL
endfunction

private function Loop takes nothing returns nothing
    local data d = data(GetTimerData(GetExpiredTimer()))
    local integer i = 0
    local integer effects = 12
    local real angle
        loop
            exitwhen i >= effects
            set angle = 2 * bj_PI * i / effects
            call AddSpecialEffect(EFFECT, d.x + d.distance * Cos(angle), d.y + d.distance * Sin(angle))
            set i = i + 1
        endloop
        set d.times = d.times + 1
        
        if d.times <= 5 then //This will see if we are in the shrinking or expanding part. The first 5 times we will lower the distance.
            set d.distance = d.distance - 50 //Shrinking circle by lowering the distance (= radius of circle).
        else //We are in the case that d.times > 5. We will expand the circle again.
            set d.distance = d.distance + 50 //expanding circle by increasing the distance (= radius of circle).
            if d.times > 10 then //The 10th time the skill circle it will end. (So as it is now, we have 5 times shrinking and 5 times expanding.)
                call d.destroy()
            endif
        endif
endfunction

private function Actions takes nothing returns nothing
    local data d = data.create()
    call SetTimerData(d.t,integer (d))
    call TimerStart(d.t,0.5,true,function Loop)
endfunction

//===========================================================================
private function Init takes nothing returns nothing
    local trigger t= CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ( t, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition(t,Condition(function Conditions))
    call TriggerAddAction( t, function Actions )
endfunction

endscope

call AddSpecialEffect(EFFECT, d.x + d.distance * Cos(angle), d.y + d.distance * Sin(angle))

// added function INTERVAL based on what i thought you wanted
function INTERVAL takes integer level returns real
    return level + 2 // levels go as follows: 3/4/5... as i thought you meant
endfunction

// this is your DISTANCE function
function DISTANCE takes integer level returns real
    return level * 300.0 // before you had it as 200.0 * level, which would not give you values like 300/600 etc.
endfunction

static method create takes nothing returns data
local data d = data.allocate()
local integer spellLevel = GetUnitAbilityLevel(GetTriggerUnit(), SPELL) // added this for efficiency

set d.t = NewTimer()
set d.r = NewTimer() notice // i moved this here
set d.caster = GetTriggerUnit()
set d.x = GetUnitX(d.caster)
set d.y = GetUnitY(d.caster)

// everything that i use here that you don't have i will highlight in red, and should be added to your
// struct declaration.
set d.distance = DISTANCE(spellLevel)
set d.intervals = INTERVAL(spellLevel)
set d.contract = true
set d.distancePer = d.distance / d.intervals
set d.interval = 0

return d
endmethod

private function Loop takes nothing returns nothing
    local data d = data(GetTimerData(GetExpiredTimer()))
    local integer i = 0
    local integer effects = 12
    local real angle
        loop
            exitwhen i >= effects
            set angle = 2 * bj_PI * i / effects
            call AddSpecialEffect(EFFECT, d.x + d.distance * Cos(angle), d.y + d.distance * Sin(angle))
            set i = i + 1
        endloop

        set d.times = d.times + 1 // i changed this and moved it to the bottom of the code so that the index is easier to work with.
        
        // i removed your comments so you could read my version easier.
        if d.contract then 
            set d.distance = d.distance - d.distancePer
        else 
            set d.distance = d.distance + d.distancePer
        endif

        // it is much easier to work with the "index" which i label as d.interval if you start it off at
        // 0, rather than 1, which is what your previous code would have been doing
        if (d.contract) then
            set d.interval = d.interval + 1
            if d.interval == d.intervals then
                set d.contract = false
            endif
        else
            set d.interval = d.interval - 1
            if d.interval < 0 then
                call d.destroy()
            endif
        endif
endfunction

call AddSpecialEffect(DestroySpecialEffect(EFFECT, d.x + d.distance * Cos(angle), d.y + d.distance * Sin(angle)))

set d.distancePer = d.distance / d.intervals

set d.times = d.times + 1

if d.contract then 

if d.contract == true or == false // I am not sure which one then

if (d.contract) then

set d.distancePer = d.distance / d.intervals