Commit e116d6a8 authored by Nemo Ma's avatar Nemo Ma

fix

parent 80468fc6
...@@ -428,6 +428,16 @@ ...@@ -428,6 +428,16 @@
30002065 0 30002065 0
30010000 0 30010000 0
30012000 0 30012000 0
#210725
12524006 0
22050190 0
22050360 0
70700013 0
79029521 0
79029525 0
12524005 1
12524007 1
70700015 1
#210718 #210718
33403503 0 33403503 0
33403508 0 33403508 0
......
No preview for this file type
...@@ -20,7 +20,7 @@ function c12524002.initial_effect(c) ...@@ -20,7 +20,7 @@ function c12524002.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function cm.filter(c) function cm.filter(c)
return c:IsSetCard(0x732) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() return (c:IsSetCard(0x730) or c:IsSetCard(0x732)) and c:IsAbleToHand()
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
......
...@@ -39,18 +39,7 @@ function cm.tgop(e,tp,eg,ep,ev,re,r,rp) ...@@ -39,18 +39,7 @@ function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,cm.tgfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,cm.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc and Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE) then if tc then Duel.SendtoGrave(tc,REASON_EFFECT) end
if c:GetColumnGroup():GetCount()>=2 and c:IsFaceup() and c:IsRelateToEffect(e) then
Duel.BreakEffect()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_ADD_TYPE)
e1:SetValue(TYPE_TUNER)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
end
end end
function cm.filter(c,e,tp) function cm.filter(c,e,tp)
return c:IsSetCard(0x732) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x732) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
...@@ -62,23 +51,10 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -62,23 +51,10 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,tp,0)
end end
function cm.spop(e,tp,eg,ep,ev,re,r,rp) function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then if tc:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(e:GetHandler()) Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(0)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_DEFENSE)
tc:RegisterEffect(e2)
Duel.SpecialSummonComplete()
Duel.BreakEffect()
Duel.Damage(tp,0,REASON_EFFECT)
end end
end end
...@@ -7,7 +7,7 @@ function c12524004.initial_effect(c) ...@@ -7,7 +7,7 @@ function c12524004.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,125240040) e1:SetCountLimit(1,12524004)
e1:SetTarget(c12524004.sptg) e1:SetTarget(c12524004.sptg)
e1:SetOperation(c12524004.spop) e1:SetOperation(c12524004.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -18,14 +18,13 @@ function c12524004.initial_effect(c) ...@@ -18,14 +18,13 @@ function c12524004.initial_effect(c)
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetDescription(aux.Stringid(12524004,1)) e6:SetDescription(aux.Stringid(12524004,1))
e6:SetCategory(CATEGORY_DRAW) e6:SetCategory(CATEGORY_DRAW)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e6:SetProperty(EFFECT_FLAG_DELAY) e6:SetProperty(EFFECT_FLAG_DELAY)
e6:SetCode(EVENT_TO_GRAVE) e6:SetCode(EVENT_TO_GRAVE)
e6:SetCountLimit(1,12524004) e6:SetCountLimit(1,12524004)
e6:SetTarget(c12524004.target) e6:SetTarget(c12524004.target)
e6:SetOperation(c12524004.operation) e6:SetOperation(c12524004.operation)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
function c12524004.spfilter(c,e,tp) function c12524004.spfilter(c,e,tp)
return c:IsSetCard(0x732) and not c:IsCode(12524004) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return c:IsSetCard(0x732) and not c:IsCode(12524004) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
...@@ -38,22 +37,18 @@ end ...@@ -38,22 +37,18 @@ end
function c12524004.spop(e,tp,eg,ep,ev,re,r,rp) function c12524004.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c12524004.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c12524004.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
end end
end end
function c12524004.cfilter(c)
return true
end
function c12524004.target(e,tp,eg,ep,ev,re,r,rp,chk) function c12524004.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c12524004.cfilter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1) Duel.SetTargetParam(1)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end end
function c12524004.operation(e,tp,eg,ep,ev,re,r,rp) function c12524004.operation(e,tp,eg,ep,ev,re,r,rp)
if not Duel.IsExistingMatchingCard(c12524004.cfilter,tp,LOCATION_MZONE,0,1,nil) then return end
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT) Duel.Draw(p,d,REASON_EFFECT)
end end
...@@ -29,7 +29,7 @@ function c12524007.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -29,7 +29,7 @@ function c12524007.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c12524007.activate(e,tp,eg,ep,ev,re,r,rp) function c12524007.activate(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
local g=Duel.GetMatchingGroup(c12524007.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,nil) local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c12524007.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
...@@ -41,13 +41,13 @@ end ...@@ -41,13 +41,13 @@ end
function c12524007.desfilter(c) function c12524007.desfilter(c)
return c:IsFaceup() return c:IsFaceup()
end end
function c12524007.thfilter(c) function c12524007.thfilter2(c)
return c:IsSetCard(0x732) and c:IsAbleToHand() return c:IsSetCard(0x732) and c:IsAbleToHand()
end end
function c12524007.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c12524007.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c12524007.desfilter(chkc) and chkc~=e:GetHandler() end if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c12524007.desfilter(chkc) and chkc~=e:GetHandler() end
if chk==0 then return Duel.IsExistingTarget(c12524007.desfilter,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) if chk==0 then return Duel.IsExistingTarget(c12524007.desfilter,tp,LOCATION_ONFIELD,0,1,e:GetHandler())
and Duel.IsExistingMatchingCard(c12524007.thfilter,tp,LOCATION_DECK,0,1,nil) end and Duel.IsExistingMatchingCard(c12524007.thfilter2,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,c12524007.desfilter,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler()) local g=Duel.SelectTarget(tp,c12524007.desfilter,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler())
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
...@@ -58,7 +58,7 @@ function c12524007.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -58,7 +58,7 @@ function c12524007.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c12524007.thfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c12524007.thfilter2,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
......
...@@ -37,11 +37,6 @@ function c12524008.initial_effect(c) ...@@ -37,11 +37,6 @@ function c12524008.initial_effect(c)
e6:SetTarget(c12524008.sptg) e6:SetTarget(c12524008.sptg)
e6:SetOperation(c12524008.spop) e6:SetOperation(c12524008.spop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--activate
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_ACTIVATE)
e8:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e8)
--excavate --excavate
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(12524008,0)) e7:SetDescription(aux.Stringid(12524008,0))
...@@ -53,8 +48,6 @@ function c12524008.initial_effect(c) ...@@ -53,8 +48,6 @@ function c12524008.initial_effect(c)
e7:SetTarget(c12524008.thtg) e7:SetTarget(c12524008.thtg)
e7:SetOperation(c12524008.thop) e7:SetOperation(c12524008.thop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
end end
function c12524008.spfilter(c,e,tp) function c12524008.spfilter(c,e,tp)
return c:IsSetCard(0x732) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x732) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
...@@ -67,7 +60,7 @@ end ...@@ -67,7 +60,7 @@ end
function c12524008.spop(e,tp,eg,ep,ev,re,r,rp) function c12524008.spop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c12524008.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c12524008.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
......
...@@ -4,7 +4,7 @@ local cm=_G["c"..m] ...@@ -4,7 +4,7 @@ local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
--Activate(effect) --Activate(effect)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DISABLE+CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_CHAINING) e1:SetCode(EVENT_CHAINING)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH) e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
...@@ -21,7 +21,7 @@ function cm.initial_effect(c) ...@@ -21,7 +21,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function cm.condition(e,tp,eg,ep,ev,re,r,rp) function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return rp~=tp and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(ev) return rp~=tp and Duel.IsChainDisablable(ev)
end end
function cm.filter(c) function cm.filter(c)
return c:IsSetCard(0x732) and c:IsDiscardable() return c:IsSetCard(0x732) and c:IsDiscardable()
...@@ -32,13 +32,13 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -32,13 +32,13 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end end
end end
function cm.activate(e,tp,eg,ep,ev,re,r,rp) function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then if Duel.NegateEffect(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT) Duel.Destroy(eg,REASON_EFFECT)
end end
end end
......
...@@ -3,12 +3,6 @@ function c12524010.initial_effect(c) ...@@ -3,12 +3,6 @@ function c12524010.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,c12524010.mfilter,1,1) aux.AddLinkProcedure(c,c12524010.mfilter,1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--mat check
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_MATERIAL_CHECK)
e1:SetValue(c12524010.valcheck)
c:RegisterEffect(e1)
--search --search
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
...@@ -19,77 +13,62 @@ function c12524010.initial_effect(c) ...@@ -19,77 +13,62 @@ function c12524010.initial_effect(c)
e2:SetCondition(c12524010.thcon) e2:SetCondition(c12524010.thcon)
e2:SetTarget(c12524010.thtg) e2:SetTarget(c12524010.thtg)
e2:SetOperation(c12524010.thop) e2:SetOperation(c12524010.thop)
e2:SetLabelObject(e1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c12524010.mfilter(c) function c12524010.mfilter(c)
return not c:IsCode(12524010) and c:IsSetCard(0x730,0x732) return not c:IsCode(12524010) and c:IsLinkSetCard(0x730,0x732)
end
function c12524010.valcheck(e,c)
local g=c:GetMaterial()
local op=0
local tc=g:GetFirst()
if tc:IsSetCard(0x730) then
bit.bor(op,TYPE_MONSTER)
end
if tc:IsSetCard(0x732) then
bit.bor(op,TYPE_SPELL)
end
e:SetLabel(op)
end end
function c12524010.thcon(e,tp,eg,ep,ev,re,r,rp) function c12524010.thcon(e,tp,eg,ep,ev,re,r,rp)
local mg=e:GetHandler():GetMaterial() local mg=e:GetHandler():GetMaterial()
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) and (mg:IsExists(Card.IsSetCard,1,nil,0x732) or mg:IsExists(Card.IsSetCard,1,nil,0x730)) return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) and (mg:IsExists(Card.IsSetCard,1,nil,0x732) or mg:IsExists(Card.IsSetCard,1,nil,0x730))
end end
function c12524010.thfilter1(c) function c12524010.thfilter(c,setname)
return c:IsSetCard(0x732) and c:IsAbleToHand() return c:IsSetCard(setname) and c:IsAbleToHand()
end
function c12524010.thfilter2(c)
return c:IsSetCard(0x730) and c:IsAbleToHand()
end end
function c12524010.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c12524010.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
local mg=e:GetHandler():GetMaterial() local mg=e:GetHandler():GetMaterial()
local b1=Duel.IsExistingMatchingCard(c12524010.thfilter1,tp,LOCATION_DECK,0,1,nil) and mg:IsExists(Card.IsSetCard,1,nil,0x730) local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_DECK,0,nil)
local b2=Duel.IsExistingMatchingCard(c12524010.thfilter2,tp,LOCATION_DECK,0,1,nil) and mg:IsExists(Card.IsSetCard,1,nil,0x732) local ct1=g:FilterCount(Card.IsSetCard,nil,0x732)
local ct2=g:FilterCount(Card.IsSetCard,nil,0x730)
local ct3=g:FilterCount(Card.IsSetCard,nil,0x730,0x732)
local b1=mg:IsExists(Card.IsSetCard,1,nil,0x730) and ct1>0
local b2=mg:IsExists(Card.IsSetCard,1,nil,0x732) and ct2>0
if chk==0 then return b1 or b2 end if chk==0 then return b1 or b2 end
if b1 then local op=0
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) if b1 and b2 then
if ct3>1 then
op=Duel.SelectOption(tp,aux.Stringid(12524010,0),aux.Stringid(12524010,1),aux.Stringid(12524010,2))
else
op=Duel.SelectOption(tp,aux.Stringid(12524010,0),aux.Stringid(12524010,1))
end
elseif b1 then
op=Duel.SelectOption(tp,aux.Stringid(12524010,0))
else
op=Duel.SelectOption(tp,aux.Stringid(12524010,1))+1
end end
if b2 then e:SetLabel(op)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) if op~=2 then
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
else
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
end end
end end
function c12524010.thop(e,tp,eg,ep,ev,re,r,rp) function c12524010.thop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local op=e:GetLabel()
local mg=e:GetHandler():GetMaterial() if op~=1 then
local b1=Duel.IsExistingMatchingCard(c12524010.thfilter1,tp,LOCATION_DECK,0,1,nil) and mg:IsExists(Card.IsSetCard,1,nil,0x730) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local b2=Duel.IsExistingMatchingCard(c12524010.thfilter2,tp,LOCATION_DECK,0,1,nil) and mg:IsExists(Card.IsSetCard,1,nil,0x732) local g=Duel.SelectMatchingCard(tp,c12524010.thfilter,tp,LOCATION_DECK,0,1,1,nil,0x732)
if b1 then if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.SendtoHand(g,nil,REASON_EFFECT)
local g=Duel.SelectMatchingCard(tp,c12524010.thfilter1,tp,LOCATION_DECK,0,1,1,nil) Duel.ConfirmCards(1-tp,g)
if g:GetCount()>0 then end
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
if b2 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c12524010.thfilter2,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
if op~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c12524010.thfilter,tp,LOCATION_DECK,0,1,1,nil,0x730)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end end
end end
...@@ -88,7 +88,7 @@ function cm.sttg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -88,7 +88,7 @@ function cm.sttg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function cm.stop(e,tp,eg,ep,ev,re,r,rp) function cm.stop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectMatchingCard(tp,cm.stfilter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,cm.stfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc and Duel.SSet(tp,tc)~=0 then if tc and Duel.SSet(tp,tc)~=0 then
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
......
...@@ -31,6 +31,6 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -31,6 +31,6 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local tg=g:Select(tp,2,2,nil) local tg=g:Select(tp,2,2,nil)
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
if tg:Filter(Card.IsLocation,nil,LOCATION_MZONE):FilterCount(Card.IsCode,nil,m)>0 then if tg:Filter(Card.IsLocation,nil,LOCATION_MZONE):FilterCount(Card.IsCode,nil,m)>0 then
Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,nil) Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
end end
end end
\ No newline at end of file
...@@ -14,7 +14,6 @@ function cm.initial_effect(c) ...@@ -14,7 +14,6 @@ function cm.initial_effect(c)
e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetCode(EVENT_CHAIN_SOLVING)
e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
e2:SetOperation(cm.changeop) e2:SetOperation(cm.changeop)
e2:SetCountLimit(1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function cm.tgfilter(c) function cm.tgfilter(c)
...@@ -32,7 +31,6 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,7 +31,6 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
end end
function cm.changeop(e,tp,eg,ep,ev,re,r,rp) function cm.changeop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFlagEffect(tp,m)>0 then return end if Duel.GetFlagEffect(tp,m)>0 then return end
Duel.RegisterFlagEffect(tp,m,RESET_EVENT+RESET_CHAIN,0,1)
local ex_1,tg_1=Duel.GetOperationInfo(ev,CATEGORY_DESTROY) local ex_1,tg_1=Duel.GetOperationInfo(ev,CATEGORY_DESTROY)
local s1=(ex_1 and tg_1~=nil and tg_1:IsExists(Card.IsType,1,nil,TYPE_MONSTER)) local s1=(ex_1 and tg_1~=nil and tg_1:IsExists(Card.IsType,1,nil,TYPE_MONSTER))
local ex_2,tg_2=Duel.GetOperationInfo(ev,CATEGORY_REMOVE) local ex_2,tg_2=Duel.GetOperationInfo(ev,CATEGORY_REMOVE)
...@@ -41,6 +39,7 @@ function cm.changeop(e,tp,eg,ep,ev,re,r,rp) ...@@ -41,6 +39,7 @@ function cm.changeop(e,tp,eg,ep,ev,re,r,rp)
local s3=(ex_3 and tg_3~=nil and tg_3:IsExists(Card.IsType,1,nil,TYPE_MONSTER)) local s3=(ex_3 and tg_3~=nil and tg_3:IsExists(Card.IsType,1,nil,TYPE_MONSTER))
if not (s1 or s2 or s3) then return false end if not (s1 or s2 or s3) then return false end
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return false end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return false end
Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
local op local op
if s1 then if s1 then
if s2 then if s2 then
......
...@@ -40,6 +40,7 @@ function c79029520.initial_effect(c) ...@@ -40,6 +40,7 @@ function c79029520.initial_effect(c)
e6:SetCountLimit(1) e6:SetCountLimit(1)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c79029520.xyz_number=62
function c79029520.atkval(e,c) function c79029520.atkval(e,c)
return c:GetOverlayCount()*500 return c:GetOverlayCount()*500
end end
......
...@@ -38,6 +38,7 @@ function c79029521.initial_effect(c) ...@@ -38,6 +38,7 @@ function c79029521.initial_effect(c)
e5:SetCode(EVENT_BECOME_TARGET) e5:SetCode(EVENT_BECOME_TARGET)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c79029521.xyz_number=69
function c79029521.effilter(c) function c79029521.effilter(c)
return c:IsType(TYPE_MONSTER) and c:IsFaceup() return c:IsType(TYPE_MONSTER) and c:IsFaceup()
end end
......
...@@ -33,6 +33,7 @@ function c79029525.initial_effect(c) ...@@ -33,6 +33,7 @@ function c79029525.initial_effect(c)
e3:SetOperation(c79029525.op) e3:SetOperation(c79029525.op)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c79029525.xyz_number=65
function c79029525.eqcon(e,tp,eg,ep,ev,re,r,rp) function c79029525.eqcon(e,tp,eg,ep,ev,re,r,rp)
local ec=e:GetLabelObject() local ec=e:GetLabelObject()
return ec==nil or ec:GetFlagEffect(79029525)==0 and e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ) return ec==nil or ec:GetFlagEffect(79029525)==0 and e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
......
...@@ -61,6 +61,7 @@ function c79029532.initial_effect(c) ...@@ -61,6 +61,7 @@ function c79029532.initial_effect(c)
e8:SetOperation(c79029532.atkop) e8:SetOperation(c79029532.atkop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
c79029532.xyz_number=96
function c79029532.target(e,c) function c79029532.target(e,c)
return c:IsLocation(LOCATION_MZONE) return c:IsLocation(LOCATION_MZONE)
end end
......
...@@ -25,6 +25,7 @@ function c79029534.initial_effect(c) ...@@ -25,6 +25,7 @@ function c79029534.initial_effect(c)
e2:SetOperation(c79029534.dcop) e2:SetOperation(c79029534.dcop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c79029534.xyz_number=39
function c79029534.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c79029534.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
......
...@@ -65,6 +65,7 @@ function c79029561.initial_effect(c) ...@@ -65,6 +65,7 @@ function c79029561.initial_effect(c)
Duel.RegisterEffect(ge1,0) Duel.RegisterEffect(ge1,0)
end end
end end
c79029561.xyz_number=92
function c79029561.checkop(e,tp,eg,ep,ev,re,r,rp) function c79029561.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst() local tc=eg:GetFirst()
while tc do while tc do
......
...@@ -402,6 +402,7 @@ ...@@ -402,6 +402,7 @@
!setname 0x4902 维多利亚 Arknights ! !setname 0x4902 维多利亚 Arknights !
!setname 0x4903 炎国 Arknights ! !setname 0x4903 炎国 Arknights !
!setname 0x4904 彩虹小队 Arknights ! !setname 0x4904 彩虹小队 Arknights !
!setname 0xa991 构造
!setname 0xa9e1 涩域拼图 !setname 0xa9e1 涩域拼图
!setname 0xa9f1 星壳 !setname 0xa9f1 星壳
!setname 0x2048 CiNo. !setname 0x2048 CiNo.
...@@ -536,6 +537,11 @@ ...@@ -536,6 +537,11 @@
!setname 0xf3a Silreticenty(缄默城) !setname 0xf3a Silreticenty(缄默城)
!setname 0xf3b Deobra(恶虺) !setname 0xf3b Deobra(恶虺)
!setname 0x5f3c Divicale(神之鳞) !setname 0x5f3c Divicale(神之鳞)
!setname 0xf3d 刻证兽
!setname 0x3f3d 春之刻证兽
!setname 0x5f3d 夏之刻证兽
!setname 0x6f3d 秋之刻证兽
!setname 0x9f3d 冬之刻证兽
!counter 0xf3 陨星指示物 !counter 0xf3 陨星指示物
!counter 0x1f35 龙鳞指示物 !counter 0x1f35 龙鳞指示物
...@@ -721,6 +727,10 @@ ...@@ -721,6 +727,10 @@
!setname 0x6a32 真典 !setname 0x6a32 真典
!setname 0x623 TUB !setname 0x623 TUB
#MEKK
!setname 0x730 圣印
!setname 0x732 六角之巅
#??? #???
!setname 0x926 机巧人偶|非「机巧」 マシンドール !setname 0x926 机巧人偶|非「机巧」 マシンドール
!setname 0x1925 人偶使 人形使い !setname 0x1925 人偶使 人形使い
...@@ -728,9 +738,3 @@ ...@@ -728,9 +738,3 @@
!setname 0x930 舰队装姬 Kantai Collection !setname 0x930 舰队装姬 Kantai Collection
!setname 0x940 深瞳明星 EyeDrops !setname 0x940 深瞳明星 EyeDrops
!setname 0x941 折纸 !setname 0x941 折纸
!setname 0xa991 构造
!setname 0xf3d 刻证兽
!setname 0x3f3d 春之刻证兽
!setname 0x5f3d 夏之刻证兽
!setname 0x6f3d 秋之刻证兽
!setname 0x9f3d 冬之刻证兽
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