Mateus also inspired me a bit, so I modified the script a bit.
local function createDamageCondition(min, max, interval, effect)
local condition = createConditionObject(effect)
condition:setParameter(CONDITION_PARAM_DELAYED, interval)
addDamageCondition(condition, min, max, -100)...