--Hidden Vortexes Aquabizarre --scripted by Rawstone local s,id=GetID() function s.initial_effect(c) --Activate local e5=Effect.CreateEffect(c) e5:SetType(EFFECT_TYPE_ACTIVATE) e5:SetCode(EVENT_FREE_CHAIN) c:RegisterEffect(e5) --to decktop local e1=Effect.CreateEffect(c) e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_TODECK) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_GRAVE) e1:SetCountLimit(1,id) e1:SetTarget(s.dttg) e1:SetOperation(s.dtop) c:RegisterEffect(e1) --multiple effs local e2=Effect.CreateEffect(c) e2:SetDescription(aux.Stringid(id,1)) e2:SetCategory(CATEGORY_DESTROY) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetRange(LOCATION_SZONE) e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetCondition(s.con) e2:SetTarget(s.atktg) e2:SetOperation(s.atkop1) c:RegisterEffect(e2) --banish local e3=Effect.CreateEffect(c) e3:SetDescription(aux.Stringid(id,2)) e3:SetCategory(CATEGORY_REMOVE) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_ATTACK_ANNOUNCE) e3:SetRange(LOCATION_SZONE) e3:SetCondition(s.con) e3:SetTarget(s.atktg2) e3:SetOperation(s.atkop2) c:RegisterEffect(e3) --atk gain local e4=Effect.CreateEffect(c) e4:SetDescription(aux.Stringid(id,3)) e4:SetCategory(CATEGORY_ATKCHANGE) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_ATTACK_ANNOUNCE) e4:SetRange(LOCATION_SZONE) e4:SetValue(500) e4:SetCondition(s.con) e4:SetTarget(s.atktg3) e4:SetOperation(s.atkop3) c:RegisterEffect(e4) end function s.texfilter(c) return c:IsLocation(LOCATION_GRAVE) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToRemoveAsCost() end function s.dttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) local c=e:GetHandler() if chk==0 then return Duel.IsExistingMatchingCard(s.texfilter,tp,LOCATION_GRAVE,0,1,nil) and c:IsAbleToDeck() end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local g=Duel.SelectMatchingCard(tp,s.texfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.SetOperationInfo(0,CATEGORY_TODECK,c,1,0,0) end function s.dtop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SendtoDeck(c,nil,0,REASON_EFFECT) end end function s.con(e,tp,eg,ep,ev,re,r,rp) local ac=Duel.GetAttacker() return ac:IsFaceup() and ac:IsControler(tp) and ac:IsSetCard(0xb23) end function s.filter1(c) return c:IsType(TYPE_SPELL+TYPE_TRAP) end function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.IsExistingMatchingCard(s.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) and c:GetFlagEffect(720058)==0 end c:RegisterFlagEffect(720058,RESET_CHAIN,0,1) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,0,0) end function s.atkop1(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT) local tc=Duel.SelectMatchingCard(tp,s.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler()) if tc:GetCount()>0 then Duel.Destroy(tc,REASON_EFFECT) end end function s.atktg2(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,nil) and c:GetFlagEffect(720058)==0 end c:RegisterFlagEffect(720058,RESET_CHAIN,0,1) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_GRAVE) end function s.atkop2(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT) local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,1,nil) if g:GetCount()>0 then Duel.Remove(g,POS_FACEUP,REASON_EFFECT) end end function s.atktg3(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local ac=Duel.GetAttacker() if chk==0 then return c:GetFlagEffect(720058)==0 end c:RegisterFlagEffect(720058,RESET_CHAIN,0,1) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) end function s.atkop3(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end local tc=Duel.GetAttacker() local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE) e1:SetValue(500) tc:RegisterEffect(e1) end