攻略
Combo
考据
好物分享
卡图故事
支缓
盘点整理
Duel Links
--天帝アイテール function c96570609.initial_effect(c) --summon with 1 tribute local e1=Effect.CreateEffect(c) e1:SetDescription(aux.Stringid(96570609,0)) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_SUMMON_PROC) e1:SetCondition(c96570609.otcon) e1:SetOperation(c96570609.otop) e1:SetValue(SUMMON_TYPE_ADVANCE) c:RegisterEffect(e1) local e2=e1:Clone() e2:SetCode(EFFECT_SET_PROC) c:RegisterEffect(e2) --spsummon local e3=Effect.CreateEffect(c) e3:SetDescription(aux.Stringid(96570609,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_SUMMON_SUCCESS) e3:SetProperty(EFFECT_FLAG_DELAY) e3:SetCondition(c96570609.spcon) e3:SetTarget(c96570609.sptg) e3:SetOperation(c96570609.spop) c:RegisterEffect(e3) --summon local e4=Effect.CreateEffect(c) e4:SetDescription(aux.Stringid(96570609,2)) e4:SetCategory(CATEGORY_SUMMON) e4:SetType(EFFECT_TYPE_QUICK_O) e4:SetRange(LOCATION_HAND) e4:SetCode(EVENT_FREE_CHAIN) e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END) e4:SetCondition(c96570609.sumcon) e4:SetCost(c96570609.sumcost) e4:SetTarget(c96570609.sumtg) e4:SetOperation(c96570609.sumop) c:RegisterEffect(e4) end function c96570609.otfilter(c) return c:IsSummonType(SUMMON_TYPE_ADVANCE) end function c96570609.otcon(e,c,minc) if c==nil then return true end local mg=Duel.GetMatchingGroup(c96570609.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil) return c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg) end function c96570609.otop(e,tp,eg,ep,ev,re,r,rp,c) local mg=Duel.GetMatchingGroup(c96570609.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil) local sg=Duel.SelectTribute(tp,c,1,1,mg) c:SetMaterial(sg) Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL) end function c96570609.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE) end function c96570609.tgfilter(c) return c:IsSetCard(0xbe) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGrave() end function c96570609.spfilter(c,e,tp) return c:IsAttackAbove(2400) and c:IsDefense(1000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end function c96570609.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local g=Duel.GetMatchingGroup(c96570609.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,nil) return g:GetClassCount(Card.GetCode)>1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c96570609.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,2,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end function c96570609.spop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(c96570609.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,nil) if g:GetClassCount(Card.GetCode)<2 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) local tg1=g:Select(tp,1,1,nil) g:Remove(Card.IsCode,nil,tg1:GetFirst():GetCode()) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) local tg2=g:Select(tp,1,1,nil) tg1:Merge(tg2) if Duel.SendtoGrave(tg1,REASON_EFFECT)~=0 and tg1:IsExists(Card.IsLocation,2,nil,LOCATION_GRAVE) then Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) local g=Duel.SelectMatchingCard(tp,c96570609.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local tc=g:GetFirst() if tc then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) local fid=e:GetHandler():GetFieldID() tc:RegisterFlagEffect(96570609,RESET_EVENT+RESETS_STANDARD,0,1,fid) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e1:SetLabel(fid) e1:SetLabelObject(tc) e1:SetCondition(c96570609.thcon) e1:SetOperation(c96570609.thop) Duel.RegisterEffect(e1,tp) end end end function c96570609.thcon(e,tp,eg,ep,ev,re,r,rp) local tc=e:GetLabelObject() if tc:GetFlagEffectLabel(96570609)~=e:GetLabel() then e:Reset() return false else return true end end function c96570609.thop(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoHand(e:GetLabelObject(),nil,REASON_EFFECT) end function c96570609.sumcon(e,tp,eg,ep,ev,re,r,rp) local ph=Duel.GetCurrentPhase() return Duel.GetTurnPlayer()~=tp and (ph==PHASE_MAIN1 or ph==PHASE_MAIN2) end function c96570609.cfilter(c) return c:IsSetCard(0xbe) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToRemoveAsCost() end function c96570609.sumcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.IsExistingMatchingCard(c96570609.cfilter,tp,LOCATION_GRAVE,0,1,nil) and c:GetFlagEffect(96570609)==0 end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local g=Duel.SelectMatchingCard(tp,c96570609.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Remove(g,POS_FACEUP,REASON_COST) c:RegisterFlagEffect(96570609,RESET_CHAIN,0,1) end function c96570609.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsSummonable(true,nil,1) or c:IsMSetable(true,nil,1) end Duel.SetOperationInfo(0,CATEGORY_SUMMON,c,1,0,0) end function c96570609.sumop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end local pos=0 if c:IsSummonable(true,nil,1) then pos=pos+POS_FACEUP_ATTACK end if c:IsMSetable(true,nil,1) then pos=pos+POS_FACEDOWN_DEFENSE end if pos==0 then return end if Duel.SelectPosition(tp,c,pos)==POS_FACEUP_ATTACK then Duel.Summon(tp,c,true,nil,1) else Duel.MSet(tp,c,true,nil,1) end end