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

fix

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