Commit 5473c68b authored by Nemo Ma's avatar Nemo Ma

fix

parent 5b0da437
......@@ -228,6 +228,27 @@
25000010 0
25000022 0
25000023 0
114620013 0
9950618 0
9950619 0
9950620 0
9950621 0
9950622 0
9950623 0
9950748 0
9950749 0
9950456 0
9951107 0
9950689 0
9951296 0
9950937 0
9951204 0
9951074 0
9950670 0
9950657 0
9950648 0
9950688 0
9950626 0
#limit
9910011 1
9910052 1
......@@ -457,6 +478,9 @@
114620011 1
114620012 1
114620014 1
9950624 1
9950681 1
9950425 1
#semi limit
9950045 2
9980110 2
......
No preview for this file type
......@@ -23,6 +23,7 @@ function c114431144.initial_effect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_GRAVE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1,114431144)
e3:SetTarget(c114431144.hsptg)
e3:SetOperation(c114431144.hspop)
......@@ -75,12 +76,15 @@ function c114431144.mtop(e,tp,eg,ep,ev,re,r,rp)
Duel.Overlay(c,g)
end
end
function c114431144.mtfilter2(c,sc)
return c:IsFaceup() and c:IsSetCard(0x71) and c:IsType(TYPE_MONSTER) and c:IsCanBeXyzMaterial(sc)
end
function c114431144.hsptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and c114431144.mtfilter(chkc,c) end
if chk==0 then return Duel.IsExistingTarget(c114431144.mtfilter,tp,LOCATION_MZONE,0,1,nil,c) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
if chkc then return chkc:IsOnField() and c114431144.mtfilter2(chkc,c) end
if chk==0 then return Duel.IsExistingTarget(c114431144.mtfilter2,tp,LOCATION_MZONE,0,1,nil,c) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
local g=Duel.SelectTarget(tp,c114431144.mtfilter,tp,LOCATION_MZONE,0,1,1,nil,c)
local g=Duel.SelectTarget(tp,c114431144.mtfilter2,tp,LOCATION_MZONE,0,1,1,nil,c)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function c114431144.hspop(e,tp,eg,ep,ev,re,r,rp)
......
......@@ -48,7 +48,7 @@ function cm.costfilter(c)
end
function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsAbleToGraveAsCost() and Duel.IsExistingMatchingCard(cm.dcostfilter,tp,LOCATION_DECK,0,1,nil) end
if chk==0 then return c:IsAbleToGraveAsCost() and Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local tg=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_DECK,0,1,1,nil)
tg:AddCard(c)
......
......@@ -92,17 +92,10 @@ function c116511113.xyzop1(e,tp,eg,ep,ev,re,r,rp)
sg:Merge(tc:GetOverlayGroup())
end
Duel.SendtoGrave(sg,REASON_RULE)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_EXTRA)
e1:SetValue(SUMMON_TYPE_XYZ)
c:RegisterEffect(e1)
c:SetMaterial(mg)
Duel.Overlay(c,mg)
Duel.XyzSummon(tp,c,nil)
e1:Reset()
Duel.SpecialSummon(c,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
c:CompleteProcedure()
end
end
function c116511113.xyzcon2(e,tp,eg,ep,ev,re,r,rp)
......@@ -126,17 +119,10 @@ function c116511113.xyzop2(e,tp,eg,ep,ev,re,r,rp)
sg:Merge(tc:GetOverlayGroup())
end
Duel.SendtoGrave(sg,REASON_RULE)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_EXTRA)
e1:SetValue(SUMMON_TYPE_XYZ)
c:RegisterEffect(e1)
c:SetMaterial(mg)
Duel.Overlay(c,mg)
Duel.XyzSummon(tp,c,nil)
e1:Reset()
Duel.SpecialSummon(c,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
c:CompleteProcedure()
end
end
function c116511113.imcon(e)
......
......@@ -65,17 +65,10 @@ function c118353144.spop(e,tp,eg,ep,ev,re,r,rp)
sg:Merge(tc:GetOverlayGroup())
end
Duel.SendtoGrave(sg,REASON_RULE)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_EXTRA)
e1:SetValue(SUMMON_TYPE_XYZ)
c:RegisterEffect(e1)
c:SetMaterial(mg)
Duel.Overlay(c,mg)
Duel.XyzSummon(tp,c,nil)
e1:Reset()
Duel.SpecialSummon(c,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
c:CompleteProcedure()
end
end
function c118353144.tgcostfilter(c)
......
......@@ -47,8 +47,8 @@ function cm.conop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
local tc=g:FilterSelect(tp,cm.confilter,1,1,nil,e,tp):GetFirst()
if tc:IsType(TYPE_SPELL+TYPE_TRAP) then
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
Duel.ShuffleHand(tp)
else
rssf.SpecialSummon(tc)
......
......@@ -67,7 +67,7 @@ function c33400010.afilter(c)
return c:IsSetCard(0x3340) and c:IsType(TYPE_QUICKPLAY)
end
function c33400010.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end
function c33400010.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
......@@ -9,14 +9,9 @@ function c46250022.initial_effect(c)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCost(c46250022.discost)
e1:SetTarget(aux.RitualUltimateTarget(aux.TRUE))
e1:SetOperation(aux.RitualUltimateOperation(aux.TRUE))
e1:SetTarget(c46250022.rtg)
e1:SetOperation(c46250022.rop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetDescription(aux.Stringid(46250022,1))
e2:SetTarget(c46250022.rtg)
e2:SetOperation(c46250022.rop)
c:RegisterEffect(e2)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(46250022,2))
e4:SetType(EFFECT_TYPE_IGNITION)
......@@ -59,46 +54,40 @@ function c46250022.initial_effect(c)
e7:SetOperation(c46250022.thop)
c:RegisterEffect(e7)
end
c46250022.fit_monster={46250022}
function c46250022.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeckAsCost(tp,1) end
Duel.DiscardDeck(tp,1,REASON_COST)
end
function c46250022.filter(c,e,tp,mg)
if bit.band(c:GetOriginalType(),0x81)~=0x81 or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
local mg1=mg:Clone()
mg1:RemoveCard(c)
return mg1:CheckWithSumGreater(Card.GetRitualLevel,c:GetLevel(),c)
end
function c46250022.rtg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft<0 or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
local mg=Duel.GetRitualMaterial(tp):Filter(Card.IsCanBeRitualMaterial,nil,c)
if ft>0 then
return mg:CheckWithSumGreater(Card.GetRitualLevel,c:GetOriginalLevel(),c)
else
return mg:IsExists(aux.RPGFilterF,1,nil,tp,mg,c)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end
local mg1=Duel.GetRitualMaterial(tp)
return Duel.IsExistingMatchingCard(c46250022.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,nil,e,tp,mg1)
end
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_PZONE)
end
function c46250022.rop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler()
if not e:GetHandler():IsRelateToEffect(e) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local mg=Duel.GetRitualMaterial(tp):Filter(Card.IsCanBeRitualMaterial,tc,tc)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
local mat=nil
if ft>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
mat=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetOriginalLevel(),tc)
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
mat=mg:FilterSelect(tp,aux.RPGFilterF,1,1,nil,tp,mg,tc)
Duel.SetSelectedCard(mat)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=Duel.SelectMatchingCard(tp,c46250022.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,1,nil,e,tp,mg)
local tc=tg:GetFirst()
if tc then
mg:RemoveCard(tc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local mat2=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetOriginalLevel(),tc)
mat:Merge(mat2)
end
local mat=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
tc:SetMaterial(mat)
Duel.ReleaseRitualMaterial(mat)
Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
tc:CompleteProcedure()
end
end
function c46250022.lvtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......@@ -123,14 +112,14 @@ function c46250022.lvop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterEffect(e2,tp)
end
function c46250022.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=eg:Filter(Card.IsAbleToRemove,nil)
if chk==0 then return g and Duel.CheckReleaseGroup(tp,aux.TRUE,1,nil) end
local g=eg:Filter(Card.IsAbleToRemove,e:GetHandler())
if chk==0 then return g and g:GetCount()>0 and Duel.CheckReleaseGroup(tp,aux.TRUE,1,g) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
end
function c46250022.tgop(e,tp,eg,ep,ev,re,r,rp)
local g=eg:Filter(Card.IsAbleToRemove,nil)
if not g then return end
local tg=Duel.SelectReleaseGroup(tp,aux.TRUE,1,1,nil)
local g=eg:Filter(Card.IsAbleToRemove,e:GetHandler())
if not g or g:GetCount()==0 then return end
local tg=Duel.SelectReleaseGroup(tp,aux.TRUE,1,1,g)
Duel.Release(tg,REASON_EFFECT)
Duel.Remove(g,POS_FACEDOWN,REASON_EFFECT)
end
......
......@@ -98,7 +98,7 @@ end
function c46260000.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=Duel.SelectMatchingCard(tp,IsReleasable,tp,LOCATION_MZONE,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,IsReleasable,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.Release(g,REASON_COST)
end
function c46260000.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
......
......@@ -39,31 +39,36 @@ function c46260001.initial_effect(c)
e4:SetOperation(c46260001.drop)
c:RegisterEffect(e4)
end
c46260001.fit_monster={46260000}
function c46260001.filter(c,e,tp,mg)
if bit.band(c:GetOriginalType(),0x81)~=0x81 or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
local mg1=mg:Clone()
mg1:RemoveCard(c)
return mg1:CheckWithSumGreater(Card.GetRitualLevel,c:GetLevel(),c)
mg:RemoveCard(c)
local lv=c:GetOriginalLevel()
aux.GCheckAdditional=aux.RitualCheckAdditional(c,lv,"Greater")
local res=mg:CheckSubGroup(aux.RitualCheck,1,lv,tp,c,lv,"Greater")
aux.GCheckAdditional=nil
return res
end
function c46260001.rtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end
local mg1=Duel.GetRitualMaterial(tp)
return Duel.IsExistingMatchingCard(c46260001.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,nil,e,tp,mg1)
local mg=Duel.GetRitualMaterial(tp)
return Duel.IsExistingMatchingCard(c46260001.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,nil,e,tp,mg)
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_PZONE)
end
function c46260001.rop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local mg=Duel.GetRitualMaterial(tp):Filter(Card.IsCanBeRitualMaterial,tc,tc)
if not e:GetHandler():IsRelateToEffect(e) then return end
local mg=Duel.GetRitualMaterial(tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=Duel.SelectMatchingCard(tp,c46260001.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,1,nil,e,tp,mg)
local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c46260001.filter),tp,LOCATION_HAND+LOCATION_PZONE,0,1,1,nil,e,tp,mg)
local tc=tg:GetFirst()
if tc then
mg=mg:Filter(Card.IsCanBeRitualMaterial,tc,tc)
mg:RemoveCard(tc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local mat=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
local lv=tc:GetOriginalLevel()
aux.GCheckAdditional=aux.RitualCheckAdditional(tc,lv,"Greater")
local mat=mg:SelectSubGroup(tp,aux.RitualCheck,false,1,lv,tp,tc,lv,"Greater")
aux.GCheckAdditional=nil
tc:SetMaterial(mat)
Duel.ReleaseRitualMaterial(mat)
Duel.BreakEffect()
......
......@@ -35,7 +35,6 @@ function c46260002.initial_effect(c)
e4:SetOperation(c46260002.negop)
c:RegisterEffect(e4)
end
c46260002.fit_monster={46260003}
function c46260002.spfilter(c,e,tp,mc)
return bit.band(c:GetOriginalType(),0x81)==0x81 and (not c.mat_filter or c.mat_filter(mc,tp)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) and mc:IsCanBeRitualMaterial(c)
end
......@@ -119,7 +118,12 @@ function c46260002.rop(e,tp,eg,ep,ev,re,r,rp)
for tc in aux.Next(tg) do
tc:SetMaterial(mat)
end
Duel.SendtoGrave(mat,REASON_RELEASE+REASON_EFFECT+REASON_RITUAL)
local mc=mat:GetFirst()
if not mc:IsLocation(LOCATION_EXTRA) then
Duel.ReleaseRitualMaterial(mat)
else
Duel.SendtoGrave(mat,REASON_EFFECT+REASON_MATERIAL+REASON_RITUAL+REASON_RELEASE)
end
Duel.BreakEffect()
for tc in aux.Next(tg) do
Duel.SpecialSummonStep(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
......
......@@ -39,31 +39,36 @@ function c46260003.initial_effect(c)
e4:SetOperation(c46260003.drop)
c:RegisterEffect(e4)
end
c46260003.fit_monster={46260002}
function c46260003.filter(c,e,tp,mg)
if bit.band(c:GetOriginalType(),0x81)~=0x81 or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
local mg1=mg:Clone()
mg1:RemoveCard(c)
return mg1:CheckWithSumGreater(Card.GetRitualLevel,c:GetLevel(),c)
mg:RemoveCard(c)
local lv=c:GetOriginalLevel()
aux.GCheckAdditional=aux.RitualCheckAdditional(c,lv,"Greater")
local res=mg:CheckSubGroup(aux.RitualCheck,1,lv,tp,c,lv,"Greater")
aux.GCheckAdditional=nil
return res
end
function c46260003.rtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end
local mg1=Duel.GetRitualMaterial(tp)
return Duel.IsExistingMatchingCard(c46260003.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,nil,e,tp,mg1)
local mg=Duel.GetRitualMaterial(tp)
return Duel.IsExistingMatchingCard(c46260003.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,nil,e,tp,mg)
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_PZONE)
end
function c46260003.rop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local mg=Duel.GetRitualMaterial(tp):Filter(Card.IsCanBeRitualMaterial,tc,tc)
if not e:GetHandler():IsRelateToEffect(e) then return end
local mg=Duel.GetRitualMaterial(tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=Duel.SelectMatchingCard(tp,c46260003.filter,tp,LOCATION_HAND+LOCATION_PZONE,0,1,1,nil,e,tp,mg)
local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c46260003.filter),tp,LOCATION_HAND+LOCATION_PZONE,0,1,1,nil,e,tp,mg)
local tc=tg:GetFirst()
if tc then
mg=mg:Filter(Card.IsCanBeRitualMaterial,tc,tc)
mg:RemoveCard(tc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local mat=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
local lv=tc:GetOriginalLevel()
aux.GCheckAdditional=aux.RitualCheckAdditional(tc,lv,"Greater")
local mat=mg:SelectSubGroup(tp,aux.RitualCheck,false,1,lv,tp,tc,lv,"Greater")
aux.GCheckAdditional=nil
tc:SetMaterial(mat)
Duel.ReleaseRitualMaterial(mat)
Duel.BreakEffect()
......
......@@ -48,8 +48,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local tc=Duel.SelectMatchingCard(tp,cm.sumfilter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
local s1=tc:IsSummonable(true,nil)
local s2=tc:IsMSetable(true,nil)
local s1=tc and tc:IsSummonable(true,nil)
local s2=tc and tc:IsMSetable(true,nil)
if (s1 and s2 and Duel.SelectPosition(tp,tc,POS_FACEUP_ATTACK+POS_FACEDOWN_DEFENSE)==POS_FACEUP_ATTACK) or not s2 then
Duel.Summon(tp,tc,true,nil)
else
......
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