Commit 61c978a9 authored by Nemo Ma's avatar Nemo Ma

fix

parent 641240b7
......@@ -64,7 +64,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end
Duel.RegisterEffect(e2,tp)
end
......
......@@ -73,7 +73,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end
Duel.RegisterEffect(e2,tp)
end
......
......@@ -97,7 +97,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end
Duel.RegisterEffect(e2,tp)
end
......
......@@ -59,7 +59,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end
Duel.RegisterEffect(e2,tp)
end
......
......@@ -60,7 +60,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end
Duel.RegisterEffect(e2,tp)
end
......
......@@ -85,7 +85,7 @@ function c29056009.checkfilter(c)
return c:IsFaceup() and c:IsCode(29065500)
end
function c29056009.xthfilter(c)
return aux.IsCodeListed(c,29065500) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
return (c:IsCode(29065500) or aux.IsCodeListed(c,29065500)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
end
function c29056009.xthfilter1(c)
return (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
......
......@@ -41,7 +41,7 @@ function c29071651.checkfilter(c)
return c:IsFaceup() and c:IsCode(29065500)
end
function c29071651.spfilter(c,e,tp)
return (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and (c:IsLocation(LOCATION_HAND) or (aux.IsCodeListed(c,29065500) and c:IsLocation(LOCATION_DECK) and Duel.IsExistingMatchingCard(c29071651.checkfilter,tp,LOCATION_ONFIELD,0,1,nil)))
return ((c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLocation(LOCATION_HAND)) or ((c:IsCode(29065500) or aux.IsCodeListed(c,29065500)) and c:IsLocation(LOCATION_DECK) and Duel.IsExistingMatchingCard(c29071651.checkfilter,tp,LOCATION_ONFIELD,0,1,nil))
end
function c29071651.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
......@@ -82,6 +82,7 @@ function cm.cfilter(c,seq2)
end
cm[0]=0
function cm.disop(e,tp,eg,ep,ev,re,r,rp)
if rp~=tp then return end
local loc,seq,id=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE,CHAININFO_CHAIN_ID)
seq=aux.MZoneSequence(seq)
if id~=cm[0] and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_MZONE and not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_SZONE,0,1,nil,seq) then
......
......@@ -36,15 +36,17 @@ function c79029500.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end
function c79029500.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_DECK,0,1,nil) end
local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,LOCATION_DECK,0,1,1,nil)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_DECK)
end
function c79029500.thop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget()
Duel.SendtoHand(tc,tp,REASON_EFFECT)
local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_DECK,0,nil)
if g:GetCount()>0 then
local tc=g:Select(tp,1,1,nil):GetFirst()
Duel.SendtoHand(tc,tp,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
end
function c79029500.efilter(e,te)
......
......@@ -23,6 +23,7 @@ function c98920003.initial_effect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,98920003)
e3:SetTarget(c98920003.sptg)
e3:SetCondition(c98920003.spcon)
......
......@@ -4,6 +4,7 @@ function c98920007.initial_effect(c)
e1:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,98920007+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c98920007.target)
e1:SetOperation(c98920007.activate)
c:RegisterEffect(e1)
......@@ -32,31 +33,30 @@ end
function c98920007.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
end
function c98920007.filter(c,e,tp)
return c:IsSetCard(0x71) and c:IsType(TYPE_MONSTER) and Duel.GetMatchingGroupCount(c98920007.filter2,tp,LOCATION_GRAVE,0,nil)>=c:GetLevel()
end
function c98920007.filter2(c)
return c:IsAbleToDeck()
function c98920007.filter(c)
return c:IsSetCard(0x71) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and
Duel.GetMatchingGroupCount(Card.IsAbleToDeck,tp,LOCATION_GRAVE,0,nil)>=c:GetLevel()
end
function c98920007.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:GetFlagEffect(98920007)==0 and Duel.IsExistingMatchingCard(c98920007.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
if chk==0 then return Duel.IsExistingMatchingCard(c98920007.filter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
c:RegisterFlagEffect(98920007,RESET_CHAIN,0,1)
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,2,tp,LOCATION_GRAVE)
end
function c98920007.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c98920007.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then
local c=g:GetFirst()
local n=c:GetLevel()
local g=Duel.GetMatchingGroup(c98920007.filter,tp,LOCATION_DECK,0,nil)
if #g>0 then
local maxn=g:GetMaxGroup(Card.GetLevel):GetFirst():GetLevel()
local minn=g:GetMinGroup(Card.GetLevel):GetFirst():GetLevel()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local tg=Duel.SelectMatchingCard(tp,c98920007.filter2,tp,LOCATION_GRAVE,0,n,n,nil)
if tg:GetCount()>0 then
if Duel.SendtoDeck(tg,nil,nil,REASON_EFFECT)==n and Duel.SendtoHand(g,nil,REASON_EFFECT) and
Duel.ConfirmCards(1-tp,g) then
c:CompleteProcedure()
local tg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_GRAVE,0,minn,maxn,nil)
if tg:GetCount()>0 and Duel.SendtoDeck(tg,nil,nil,REASON_EFFECT) then
local ct=tg:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_HAND+LOCATION_EXTRA)
if g:IsExists(Card.IsLevel,1,nil,ct) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
g=g:FilterSelect(tp,Card.IsLevel,1,1,nil,ct)
if #g>0 and Duel.SendtoHand(g,nil,2,REASON_EFFECT) then
Duel.ConfirmCards(1-tp,g)
end
end
end
end
......
......@@ -5,7 +5,7 @@ function c98920042.initial_effect(c)
c:EnableReviveLimit()
--to deck
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TODECK)
e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW+CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE)
......@@ -57,7 +57,17 @@ function c98920042.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local sg=g:SelectSubGroup(tp,aux.TRUE,false,1,#g)
aux.GCheckAdditional=nil
Duel.SetTargetCard(sg)
Duel.SetOperationInfo(0,CATEGORY_TODECK,sg,#sg,0,0)
local ct=sg:GetCount()
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
if ct>1 then
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
if ct>3 then
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
if ct>5 then
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
end
function c98920042.tdop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
......
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