text: local combat = {}
  
  for i = 0, 15 do
  	combat[i] = Combat()
  	combat[i]:setParameter(COMBAT_PARAM_EFFECT, CONST_ME_HITAREA)
  
  	local condition = Condition(CONDITION_ATTRIBUTES)
  	condition:setParameter(CONDITION_PARAM_TICKS, 10000)
  	condition:setParameter(CONDITION_PARAM_SKILL_SHIELDPERCENT, i)
  
  	arr = {
  	{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
  	{0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0},
  	{0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0},
  	{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0},
  	{0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0},
  	{0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0},
  	{0, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 0},
  	{0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0},
  	{0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0},
  	{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0},
  	{0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0},
  	{0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0},
  	{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
  	}
  
  	local area = createCombatArea(arr)
  	combat[i]:setArea(area)
  	combat[i]:addCondition(condition)
  end
  
  function onCastSpell(creature, var)
  	return combat[math.random(0, 15)]:execute(creature, var)
  end
  