攻略
Combo
考据
好物分享
卡图故事
支缓
盘点整理
Duel Links
--武神帝-カグツチ function c1855932.initial_effect(c) c:SetUniqueOnField(1,0,1855932) --xyz summon aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_BEASTWARRIOR),4,2) c:EnableReviveLimit() -- local e1=Effect.CreateEffect(c) e1:SetDescription(aux.Stringid(1855932,0)) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e1:SetCategory(CATEGORY_DECKDES) e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCondition(c1855932.discon) e1:SetTarget(c1855932.distg) e1:SetOperation(c1855932.disop) c:RegisterEffect(e1) --destroy replace local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetRange(LOCATION_MZONE) e2:SetTarget(c1855932.reptg) e2:SetValue(c1855932.repval) c:RegisterEffect(e2) end function c1855932.discon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ) end function c1855932.distg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,5) end function c1855932.disop(e,tp,eg,ep,ev,re,r,rp) Duel.DiscardDeck(tp,5,REASON_EFFECT) local c=e:GetHandler() if c:IsFaceup() and c:IsRelateToEffect(e) then local ct=Duel.GetOperatedGroup():FilterCount(Card.IsSetCard,nil,0x88) if ct>0 then local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetValue(ct*100) e1:SetReset(RESET_EVENT+0x1ff0000) c:RegisterEffect(e1) end end end function c1855932.repfilter(c,tp) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:IsSetCard(0x88) and c:IsRace(RACE_BEASTWARRIOR) end function c1855932.reptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return eg:IsExists(c1855932.repfilter,1,nil,tp) end if e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_EFFECT) and Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_EFFECT) local g=eg:Filter(c1855932.repfilter,nil,tp) if g:GetCount()==1 then e:SetLabelObject(g:GetFirst()) else Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESREPLACE) local cg=g:Select(tp,1,1,nil) e:SetLabelObject(cg:GetFirst()) end return true else return false end end function c1855932.repval(e,c) return c==e:GetLabelObject() end