group Dmg_G = CreateGroup()

define CreateUnit(p, id, x, y, f) 
    = {
        CreateUnitAndAddToDmgGroup(p, id, x, y, f)
    }

unit CreateUnitAndAddToDmgGroup (player p, int id, real x, real y, real f)
    {
        unit u = Create##Unit(p, id, x, y, f)
        GroupAddUnit(Dmg_G, u)
        return u
    }

private void Act_RegisterAdding ()
        {
            setdef CreateUnit(p, id, x, y, f) = {CreateUnitAndAddToDmgGroup(p, id, x, y, f)}
        }
        
private void I ()
        {
            timer t = CreateTimer()
            TimerStart(t, 0.1, FALSE, fc Act_RegisterAdding)
            t = null
        }

library CreateUnitFXX {
    #define CreateUnit = CreateUnitFX

    group Dmg_G = CreateGroup()
    private unit u

    unit CreateUnitFX (player p, int id, real x, real y, real f) {
        u = Create##Unit (p, id, x, y, f)
        GroupAddUnit (Dmg_G, u)
        return u
    }
}