Commit 6cf971fe authored by POLYMER's avatar POLYMER

fix

parent e0585d40
No preview for this file type
This diff is collapsed.
--影哨衍生物
function c29005361.initial_effect(c)
end
--方舟骑士团-逻各斯
function c29092320.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,nil,6,2)
c:EnableReviveLimit()
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(29092320,0))
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,29092320)
e1:SetCondition(c29092320.thcon)
e1:SetTarget(c29092320.thtg)
e1:SetOperation(c29092320.thop)
c:RegisterEffect(e1)
--殁亡
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_REMOVE)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,29092321)
e2:SetCost(c29092320.tgco)
e2:SetTarget(c29092320.tgtg)
e2:SetOperation(c29092320.tgop)
c:RegisterEffect(e2)
--remove
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e3:SetCode(EFFECT_TO_GRAVE_REDIRECT)
e3:SetRange(LOCATION_MZONE)
e3:SetTarget(c29092320.rmtarget)
e3:SetTargetRange(LOCATION_ONFIELD,LOCATION_ONFIELD)
e3:SetValue(LOCATION_REMOVED)
c:RegisterEffect(e3)
end
--xyz summon
function c29092320.mfilter(c,xyzc)
local b1=c:IsSetCard(0x87af)
local b2=c:IsXyzLevel(xyzc,5)
local b3=c:IsXyzLevel(xyzc,6)
return b1 and (b2 or b3)
end
--e1
function c29092320.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function c29092320.thfilter(c)
return c:IsSetCard(0x87af) and c:IsAbleToHand() and c:IsType(TYPE_SPELL)
end
function c29092320.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c29092320.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c29092320.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c29092320.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
--e2
function c29092320.tgco(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function c29092320.tgfilter(c,atk)
return c:IsFaceup() and c:IsAttackBelow(atk) and c:IsAbleToRemove()
end
function c29092320.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c29092320.tgfilter,tp,0,LOCATION_MZONE,1,c,c:GetAttack()) end
local g=Duel.GetMatchingGroup(c29092320.tgfilter,tp,0,LOCATION_MZONE,c,c:GetAttack())
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,g:GetCount(),0,0)
end
function c29092320.tgop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) or c:IsFacedown() then return end
local g=Duel.GetMatchingGroup(c29092320.tgfilter,tp,0,LOCATION_MZONE,c,c:GetAttack())
if #g>0 then
Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
end
end
--e3
function c29092320.rmtarget(e,c)
return c:IsType(TYPE_MONSTER) and c:GetOwner()~=e:GetHandlerPlayer()
end
\ No newline at end of file
......@@ -81,9 +81,10 @@ end
function c9911607.spop(e,tp,eg,ep,ev,re,r,rp)
local count=2
while count>0 do
Duel.AdjustAll()
if Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c9911607.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) and
(count==2 or Duel.SelectYesNo(tp,aux.Stringid(9911607,0))) then
and Duel.IsExistingMatchingCard(c9911607.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp)
and (count==2 or Duel.SelectYesNo(tp,aux.Stringid(9911607,0))) then
if count<2 then Duel.BreakEffect() end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c9911607.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment