Header

    globals
        //@export
        BuffType D1000_Spider_Poison
        //@export
        EventTypeList D1000_Spider_Apply
    endglobals
    
    function D1000_Spider_Damage takes Buff b returns nothing
        local Unit caster = b.getCaster()
        call caster.doSpellDamage(b.getBuffedUnit(),b.userReal,caster.calcSpellCritNoBonus()) 
    endfunction
    
    function hit takes Tower tower returns nothing
        local Unit target = Event.getTarget()
        local Buff b = target.getBuffOfType(D1000_Spider_Poison)
        local integer level = tower.getLevel()
        local real addDam = tower.userInt+tower.userReal*level
        local real maxDam = tower.userInt2 + tower.userReal2 * level + addDam * (R2I(level / 5))
        if b <= 0 then
            set b = D1000_Spider_Poison.apply(tower, target, level)
            set b.userReal = addDam
            set b.userReal2 = maxDam
            set b.userReal3 = tower.getProp_SpellDmgDealt()
        else
            if b.userReal2 >= maxDam then
                set maxDam = b.userReal2
            endif
            
            if b.userReal+addDam >= maxDam then
                set addDam = maxDam
            else
                set addDam = b.userReal+addDam
            endif
            
            if b.userReal3 < tower.getProp_SpellDmgDealt() then
                call b.removeBuff()
                set b = D1000_Spider_Poison.apply(tower, target, level)
                set b.userReal3 = tower.getProp_SpellDmgDealt()
            else
                call b.setRemainingDuration(tower.userInt3 + tower.userReal3 * level)
            endif
            set b.userReal = addDam
            set b.userReal2 = maxDam
        endif
    endfunction
    
    //Do not remove or rename this function!
    //Put your initialization tasks here, this function will be called on map init
    private function init takes nothing returns nothing
        set D1000_Spider_Poison = BuffType.create(5,0.05,false)
        call D1000_Spider_Poison.setBuffIcon('@@0@@')
        call D1000_Spider_Poison.addPeriodicEvent(EventHandler.D1000_Spider_Damage,1) 
        set D1000_Spider_Apply = EventTypeList.create()
        call D1000_Spider_Apply.addEventOnDamage(hit, 1, 0)
    endfunction

On Tower Creation

function onCreate takes Tower tower returns nothing
    call tower.addEventList(D1000_Spider_Apply)
    set tower.userInt = 30
    set tower.userReal = 1.5
    set tower.userInt2 = 150
    set tower.userReal2 = 7.5
    set tower.userInt3 = 5
    set tower.userReal3 = 0.05
endfunction