Commit aba65e93 authored by 聖園ミカ's avatar 聖園ミカ 🐟

54188

parent 6bb48465
Pipeline #30784 passed with stages
in 44 minutes and 9 seconds
No preview for this file type
...@@ -110,7 +110,7 @@ function cm.damtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -110,7 +110,7 @@ function cm.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function cm.damop(e,tp,eg,ep,ev,re,r,rp) function cm.damop(e,tp,eg,ep,ev,re,r,rp)
local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER) local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
local dam=Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)*80 local dam=Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)*100
Duel.Damage(p,dam,REASON_EFFECT) Duel.Damage(p,dam,REASON_EFFECT)
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_FIELD)
......
...@@ -9,7 +9,6 @@ function cm.initial_effect(c) ...@@ -9,7 +9,6 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,m) e1:SetCountLimit(1,m)
e1:SetCost(cm.descost)
e1:SetTarget(cm.thtg) e1:SetTarget(cm.thtg)
e1:SetOperation(cm.thop) e1:SetOperation(cm.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
......
...@@ -19,6 +19,7 @@ function cm.initial_effect(c) ...@@ -19,6 +19,7 @@ function cm.initial_effect(c)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(cm.imtg) e3:SetTarget(cm.imtg)
e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e2=e3:Clone() local e2=e3:Clone()
e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
......
...@@ -28,6 +28,7 @@ function cm.initial_effect(c) ...@@ -28,6 +28,7 @@ function cm.initial_effect(c)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(cm.imtg) e3:SetTarget(cm.imtg)
e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e2=e3:Clone() local e2=e3:Clone()
e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
......
...@@ -60,10 +60,11 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,10 +60,11 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.IsExistingMatchingCard(cm.bsfil1,tp,LOCATION_SZONE,0,1,nil) and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then if Duel.IsExistingMatchingCard(cm.bsfil1,tp,LOCATION_SZONE,0,1,nil) and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
local g=Duel.GetMatchingGroup(cm.bsfil1,tp,LOCATION_SZONE,0,nil) local g=Duel.GetMatchingGroup(cm.bsfil1,tp,LOCATION_SZONE,0,nil)
if g:GetCount()>0 and Duel.Destroy(g,REASON_EFFECT)~=0 then if g:GetCount()>0 and Duel.Destroy(g,REASON_EFFECT)~=0 then
local tg=g:GetMinGroup(Card.GetAttack) local cg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
local tg=cg:GetMinGroup(Card.GetAttack)
if tg:GetCount()>1 then if tg:GetCount()>1 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_DESTROY)
local sg=tg:Select(tp,1,1,nil) local sg=tg:Select(1-tp,1,1,nil)
Duel.HintSelection(sg) Duel.HintSelection(sg)
Duel.Destroy(sg,REASON_RULE) Duel.Destroy(sg,REASON_RULE)
else Duel.Destroy(tg,REASON_RULE) end else Duel.Destroy(tg,REASON_RULE) end
...@@ -72,10 +73,11 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -72,10 +73,11 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.IsExistingMatchingCard(cm.bsfil2,tp,LOCATION_SZONE,0,1,nil) and Duel.IsExistingMatchingCard(cm.filter2,tp,0,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then if Duel.IsExistingMatchingCard(cm.bsfil2,tp,LOCATION_SZONE,0,1,nil) and Duel.IsExistingMatchingCard(cm.filter2,tp,0,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
local g=Duel.GetMatchingGroup(cm.bsfil2,tp,LOCATION_SZONE,0,nil) local g=Duel.GetMatchingGroup(cm.bsfil2,tp,LOCATION_SZONE,0,nil)
if g:GetCount()>0 and Duel.Destroy(g,REASON_EFFECT)~=0 then if g:GetCount()>0 and Duel.Destroy(g,REASON_EFFECT)~=0 then
local cg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
local tg=g:GetMinGroup(Card.GetDefense) local tg=g:GetMinGroup(Card.GetDefense)
if tg:GetCount()>1 then if tg:GetCount()>1 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_DESTROY)
local sg=tg:Select(tp,1,1,nil) local sg=tg:Select(1-tp,1,1,nil)
Duel.HintSelection(sg) Duel.HintSelection(sg)
Duel.Destroy(sg,REASON_RULE) Duel.Destroy(sg,REASON_RULE)
else Duel.Destroy(tg,REASON_RULE) end else Duel.Destroy(tg,REASON_RULE) end
......
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