Commit 10f5a54b authored by 聖園ミカ's avatar 聖園ミカ 🐟

54188

parent ad409764
Pipeline #31067 passed with stage
in 28 minutes and 14 seconds
No preview for this file type
...@@ -25,7 +25,7 @@ function cm.initial_effect(c) ...@@ -25,7 +25,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function cm.spfilter(c) function cm.spfilter(c)
return c:IsCode(81010032,52500002,12492080,12492090) return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER)
end end
function cm.spcon(e,c) function cm.spcon(e,c)
if c==nil then return true end if c==nil then return true end
...@@ -47,5 +47,5 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp,c) ...@@ -47,5 +47,5 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.SendtoGrave(g,REASON_SPSUMMON+REASON_DISCARD) Duel.SendtoGrave(g,REASON_SPSUMMON+REASON_DISCARD)
end end
function cm.acttg(e,c) function cm.acttg(e,c)
return c:IsCode(81010032,52500002,12492080,12492090) return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER)
end end
...@@ -38,7 +38,7 @@ function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -38,7 +38,7 @@ function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD) Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
end end
function cm.thfilter(c) function cm.thfilter(c)
return c:IsCode(52500002,81010032,12492080,12492090) and c:IsAbleToHand() return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER) and c:IsAbleToHand()
end end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
...@@ -54,7 +54,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsCode(52500002,81010032,12492080,12492090) return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsSetCard(0x2aa) and re:GetHandler():IsType(TYPE_COUNTER)
end end
function cm.spfilter(c,e,tp) function cm.spfilter(c,e,tp)
return c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -31,8 +31,7 @@ function cm.mfilter(c) ...@@ -31,8 +31,7 @@ function cm.mfilter(c)
return c:IsLinkRace(RACE_FAIRY) and c:IsLinkAttribute(ATTRIBUTE_WATER) return c:IsLinkRace(RACE_FAIRY) and c:IsLinkAttribute(ATTRIBUTE_WATER)
end end
function cm.thfilter(c) function cm.thfilter(c)
if not c:IsCode(81010032,52500002,12492080,12492090) then return false end return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER) and (c:IsAbleToHand() or c:IsSSetable())
return c:IsAbleToHand() or c:IsSSetable()
end end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
......
...@@ -31,7 +31,7 @@ function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -31,7 +31,7 @@ function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk)
and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler()) local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
e:SetLabel(g:GetFirst():GetCode()) e:SetLabel(g:GetFirst())
g:AddCard(e:GetHandler()) g:AddCard(e:GetHandler())
Duel.SendtoGrave(g,REASON_DISCARD+REASON_COST) Duel.SendtoGrave(g,REASON_DISCARD+REASON_COST)
end end
...@@ -50,8 +50,8 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -50,8 +50,8 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
local sg=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_DECK,0,nil,e,tp) local sg=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
local code=e:GetLabel() local pc=e:GetLabel()
if (code==52500002 or code==81010032 or code==12492080 or code==12492090) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and #sg>0 if (pc:IsSetCard(0x2aa) and pc:IsType(TYPE_COUNTER)) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and #sg>0
and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local rg=sg:Select(tp,1,1,nil) local rg=sg:Select(tp,1,1,nil)
......
...@@ -31,7 +31,7 @@ function cm.costfilter(c,tp) ...@@ -31,7 +31,7 @@ function cm.costfilter(c,tp)
and Duel.IsExistingMatchingCard(cm.srfilter,tp,LOCATION_DECK,0,1,nil,c:GetCode()) and Duel.IsExistingMatchingCard(cm.srfilter,tp,LOCATION_DECK,0,1,nil,c:GetCode())
end end
function cm.srfilter(c,code) function cm.srfilter(c,code)
return c:IsCode(52500002,81010032,12492080,12492090) and not c:IsCode(code) and c:IsAbleToHand() return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER) and not c:IsCode(code) and c:IsAbleToHand()
end end
function cm.srcost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.srcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND,0,1,nil,tp) end if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND,0,1,nil,tp) end
...@@ -54,7 +54,7 @@ function cm.srop(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function cm.srop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsCode(52500002,81010032,12492080,12492090) return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsSetCard(0x2aa) and re:GetHandler():IsType(TYPE_COUNTER)
end end
function cm.spfilter(c,e,tp) function cm.spfilter(c,e,tp)
return c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -26,7 +26,7 @@ function cm.initial_effect(c) ...@@ -26,7 +26,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsCode(52500002,81010032,12492080,12492090) return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsSetCard(0x2aa) and re:GetHandler():IsType(TYPE_COUNTER)
end end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
...@@ -29,7 +29,7 @@ function cm.initial_effect(c) ...@@ -29,7 +29,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function cm.setfilter(c) function cm.setfilter(c)
return c:IsCode(52500002,81010032,12492080,12492090) and c:IsSSetable() return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER) and c:IsSSetable()
end end
function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,1,nil) end
...@@ -40,7 +40,7 @@ function cm.setop(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +40,7 @@ function cm.setop(e,tp,eg,ep,ev,re,r,rp)
if tc then Duel.SSet(tp,tc) end if tc then Duel.SSet(tp,tc) end
end end
function cm.rmcon(e,tp,eg,ep,ev,re,r,rp) function cm.rmcon(e,tp,eg,ep,ev,re,r,rp)
return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsCode(52500002,81010032,12492080,12492090) return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsSetCard(0x2aa) and re:GetHandler():IsType(TYPE_COUNTER)
end end
function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsAbleToRemove() end if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsAbleToRemove() end
......
...@@ -47,7 +47,7 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,7 +47,7 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function cm.stfilter(c) function cm.stfilter(c)
return c:IsCode(52500002,81010032,12492080,12492090) and c:IsSSetable() return c:IsSetCard(0x2aa) and c:IsType(TYPE_COUNTER) and c:IsSSetable()
end end
function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
......
...@@ -226,6 +226,7 @@ ...@@ -226,6 +226,7 @@
!setname 0x52a0 澄闪 !setname 0x52a0 澄闪
!setname 0x32a1 八狱 !setname 0x32a1 八狱
!setname 0x52a1 灾祸 !setname 0x52a1 灾祸
!setname 0x2aa Never Gonna
#AddCodeList(12410000) 奥契丝卡名记述 #AddCodeList(12410000) 奥契丝卡名记述
!counter 0x2a0 雷电指示物 !counter 0x2a0 雷电指示物
!counter 0x32a1 魔法指示物 !counter 0x32a1 魔法指示物
......
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