c999999991.lua (YGOPRO-Great Moth)

--Great Moth
--COPYRIGHT by Yami An
function c999999991.initial_effect(c)
    c:EnableReviveLimit()
    --Special summon 1
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SPSUMMON_PROC)
    e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e1:SetRange(LOCATION_HAND+LOCATION_DECK)
    e1:SetCondition(c999999991.spcon1)
    e1:SetOperation(c999999991.spop1)
    c:RegisterEffect(e1)
    --Special summon 2
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_SPSUMMON_PROC)
    e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e2:SetRange(LOCATION_HAND+LOCATION_DECK)
    e2:SetCondition(c999999991.spcon2)
    e2:SetOperation(c999999991.spop2)
    c:RegisterEffect(e2)
    --Close 500 ATK
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_FIELD)
    e3:SetCode(EFFECT_SET_ATTACK_FINAL)
    e3:SetRange(LOCATION_MZONE)
    e3:SetTargetRange(0,LOCATION_MZONE)
    e3:SetProperty(EFFECT_FLAG_REPEAT)
    e3:SetTarget(c999999991.feartg)
    e3:SetValue(c999999991.fearatkval)
    c:RegisterEffect(e3)
end
function c999999991.eqfilter1(c)
    return c:IsCode(40240595) and c:GetTurnCounter()>=4
end
function c999999991.rfilter1(c)
    return c:IsCode(58192742) and c:GetEquipGroup():IsExists(c999999991.eqfilter1,1,nil)
end
function c999999991.spcon1(e,c)
    if c==nil then return true end
    return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>-1 and Duel.CheckReleaseGroup(c:GetControler(),c999999991.rfilter1,1,nil)
end
function c999999991.spop1(e,tp,eg,ep,ev,re,r,rp,c)
    local g=Duel.SelectReleaseGroup(c:GetControler(),c999999991.rfilter1,1,1,nil)
    Duel.Release(g,REASON_COST)
end
function c999999991.eqfilter2(c)
    return c:IsCode(40240595) and c:GetTurnCounter()>=3
end
function c999999991.rfilter2(c)
    return c:IsCode(87756343) and c:GetEquipGroup():IsExists(c999999991.eqfilter2,1,nil)
end
function c999999991.spcon2(e,c)
    if c==nil then return true end
    return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>-1 and Duel.CheckReleaseGroup(c:GetControler(),c999999991.rfilter2,1,nil)
end
function c999999991.spop2(e,tp,eg,ep,ev,re,r,rp,c)
    local g=Duel.SelectReleaseGroup(c:GetControler(),c999999991.rfilter2,1,1,nil)
    Duel.Release(g,REASON_COST)
end
function c999999991.feartg(e,c)
    return c~=e:GetHandler()
end
function c999999991.fearatkval(e,c)
    return c:GetAttack()-500
end