攻略
Combo
考据
好物分享
卡图故事
支缓
盘点整理
Duel Links
--パワー・ツール・ドラゴン function c2403771.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1) c:EnableReviveLimit() --special summon local e1=Effect.CreateEffect(c) e1:SetDescription(aux.Stringid(2403771,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetCountLimit(1) e1:SetRange(LOCATION_MZONE) e1:SetTarget(c2403771.thtg) e1:SetOperation(c2403771.thop) c:RegisterEffect(e1) --Destroy replace local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e2:SetRange(LOCATION_MZONE) e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetTarget(c2403771.desreptg) e2:SetOperation(c2403771.desrepop) c:RegisterEffect(e2) end function c2403771.thfilter(c) return c:IsType(TYPE_EQUIP) and c:IsAbleToHand() end function c2403771.thtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(c2403771.thfilter,tp,LOCATION_DECK,0,3,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK) end function c2403771.thop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(c2403771.thfilter,tp,LOCATION_DECK,0,nil) if g:GetCount()>=3 then Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) local sg=g:Select(tp,3,3,nil) Duel.ConfirmCards(1-tp,sg) Duel.ShuffleDeck(tp) local tg=sg:RandomSelect(1-tp,1) Duel.SendtoHand(tg,nil,REASON_EFFECT) end end function c2403771.repfilter(c) return c:IsType(TYPE_SPELL) and c:IsLocation(LOCATION_SZONE) and not c:IsStatus(STATUS_DESTROY_CONFIRMED) end function c2403771.desreptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then local g=c:GetEquipGroup() return not c:IsReason(REASON_REPLACE) and g:IsExists(c2403771.repfilter,1,nil) end if Duel.SelectEffectYesNo(tp,c,96) then local g=c:GetEquipGroup() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) local sg=g:FilterSelect(tp,c2403771.repfilter,1,1,nil) Duel.SetTargetCard(sg) return true else return false end end function c2403771.desrepop(e,tp,eg,ep,ev,re,r,rp) local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS) Duel.SendtoGrave(tg,REASON_EFFECT+REASON_REPLACE) end