--Mark of the Void function c11000110.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) c:RegisterEffect(e1) --Counter local e2=Effect.CreateEffect(c) e2:SetDescription(aux.Stringid(11000110,0)) e2:SetCategory(CATEGORY_COUNTER) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e2:SetRange(LOCATION_SZONE) e2:SetCode(EVENT_PHASE+PHASE_STANDBY) e2:SetCountLimit(1) e2:SetCondition(c11000110.ctcnd) e2:SetTarget(c11000110.cttg) e2:SetOperation(c11000110.ctop) c:RegisterEffect(e2) --Reduce ATK local e3=Effect.CreateEffect(c) e3:SetDescription(aux.Stringid(11000110,1)) e3:SetCategory(CATEGORY_ATKCHANGE) e3:SetType(EFFECT_TYPE_IGNITION) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetRange(LOCATION_SZONE) e3:SetCountLimit(1,11000110) e3:SetCondition(c11000110.cond) e3:SetCost(c11000110.cost) e3:SetTarget(c11000110.atktg) e3:SetOperation(c11000110.atkop) e3:SetLabel(1) c:RegisterEffect(e3) --Destroy+Draw local e4=Effect.CreateEffect(c) e4:SetDescription(aux.Stringid(11000110,2)) e4:SetCategory(CATEGORY_DESTROY) e4:SetType(EFFECT_TYPE_IGNITION) e4:SetProperty(EFFECT_FLAG_CARD_TARGET) e4:SetRange(LOCATION_SZONE) e4:SetCountLimit(1,11000110) e4:SetCondition(c11000110.cond) e4:SetCost(c11000110.cost) e4:SetTarget(c11000110.destg) e4:SetOperation(c11000110.desop) e4:SetLabel(2) c:RegisterEffect(e4) --Add S/T local e5=Effect.CreateEffect(c) e5:SetDescription(aux.Stringid(11000110,3)) e5:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e5:SetType(EFFECT_TYPE_IGNITION) e5:SetProperty(EFFECT_FLAG_CARD_TARGET) e5:SetRange(LOCATION_SZONE) e5:SetCountLimit(1,11000110) e5:SetCondition(c11000110.cond) e5:SetCost(c11000110.cost) e5:SetTarget(c11000110.thtg) e5:SetOperation(c11000110.thop) e5:SetLabel(3) c:RegisterEffect(e5) --Banish local e6=Effect.CreateEffect(c) e6:SetDescription(aux.Stringid(11000110,4)) e6:SetCategory(CATEGORY_REMOVE) e6:SetType(EFFECT_TYPE_IGNITION) e6:SetProperty(EFFECT_FLAG_CARD_TARGET) e6:SetRange(LOCATION_SZONE) e6:SetCountLimit(1,11000110) e6:SetCondition(c11000110.cond) e6:SetCost(c11000110.cost) e6:SetTarget(c11000110.rmtg) e6:SetOperation(c11000110.rmop) e6:SetLabel(4) c:RegisterEffect(e6) end function c11000110.ctcnd(e,tp,eg,ep,ev,re,r,rp) return Duel.GetTurnPlayer()==tp end function c11000110.cttg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end end function c11000110.ctop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil) local tc=g:GetFirst() while tc do tc:AddCounter(0x11F5,1) tc=g:GetNext() end end function c11000110.condfilter(c) return c:IsFaceup() and c:IsSetCard(0x1F4) end function c11000110.cond(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return Duel.IsExistingMatchingCard(c11000110.condfilter,tp,LOCATION_MZONE,0,1,nil) end function c11000110.cost(e,tp,eg,ep,ev,re,r,rp,chk) local ct=e:GetLabel() if chk==0 then return Duel.IsCanRemoveCounter(tp,0,1,0x11F5,ct,REASON_COST) end Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.RemoveCounter(tp,0,1,0x11F5,ct,REASON_COST) end function c11000110.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil) end function c11000110.atkop(e,tp,eg,ep,ev,re,r,rp) if not e:GetHandler():IsRelateToEffect(e) then return end local c=e:GetHandler() local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) and tc:IsFaceup() then local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END) e1:SetValue(-300) tc:RegisterEffect(e1) end end function c11000110.destg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) end function c11000110.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil) if g:GetCount()>0 then Duel.HintSelection(g) if Duel.Destroy(g,REASON_EFFECT) then Duel.Draw(tp,1,REASON_EFFECT) end end end function c11000110.thfilter(c) return c:IsSetCard(0x1F4) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() end function c11000110.thtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(c11000110.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE) end function c11000110.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) local g=Duel.SelectMatchingCard(tp,c11000110.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) end end function c11000110.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsAbleToRemove() end if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) end function c11000110.rmop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.Remove(tc,POS_FACEUP,REASON_EFFECT) end end