Spell que muda Outfit!

local tempo = 15 --tempo em segundos

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1, -10, -1, -20, 5, 5, 1.4, 2.1)

function onCastSpell(cid, var)
local target = getCreatureTarget(cid)
local homem = {lookType = 152, lookHead = 0, lookBody = 0, lookLegs = 0, lookFeet = 0, lookTypeEx = 0, lookAddons = 3} --outfit que muda caso seja homem
local mulher = {lookType = 156, lookHead = 0, lookBody = 0, lookLegs = 0, lookFeet = 0, lookTypeEx = 0, lookAddons = 3} --outfit que muda caso seja mulher

if isPlayer(target) then
local sex = getPlayerSex(target)
if sex == 0 then --sexo == 0 significa que o personagem é mulher
doSetCreatureOutfit(target, mulher, tempo*1000)
else 
doSetCreatureOutfit(target, homem, tempo*1000)
end
end
return doCombat(cid, combat, var)
end

Mudei algo na tag para não bugar ao soltar a skill sem target:

<instant name="ChangeOutfit" words="nome_da_magia" lvl="12" mana="20" prem="1" range="3" needtarget="1" blockwalls="1" exhaustion="1000" needlearn="0" event="script" value="attack/nome_do_script.lua">
<vocation id="1"/>
<vocation id="2"/>
<vocation id="5"/>
<vocation id="6"/>
</instant>