Commit 65ee80f7 authored by TanakaKotoha's avatar TanakaKotoha

fix

parent ae565e5d
Pipeline #564 passed with stages
in 43 minutes
......@@ -110,7 +110,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 and tc:GetAttack()<tc:GetBaseAttack() then
if tc:IsRelateToEffect(e) and tc:GetAttack()<tc:GetBaseAttack() and Duel.Destroy(tc,REASON_EFFECT)~=0 then
if Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
Duel.Draw(tp,1,REASON_EFFECT)
end
......
......@@ -16,14 +16,8 @@ function cm.initial_effect(c)
e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xa82))
e1:SetValue(1)
c:RegisterEffect(e1)
-- Duel.EnableGlobalFlag(GLOBALFLAG_BRAINWASHING_CHECK)
Duel.EnableGlobalFlag(GLOBALFLAG_BRAINWASHING_CHECK)
--e2
-- local e2=Effect.CreateEffect(c)
-- e2:SetCategory(CATEGORY_CONTROL)
-- e2:SetType(EFFECT_TYPE_FIELD)
-- e2:SetTarget(cm.target)
-- e2:SetOperation(cm.activate)
-- c:RegisterEffect(e2)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_REMOVE_BRAINWASHING)
......@@ -56,65 +50,62 @@ function cm.initial_effect(c)
c:RegisterEffect(e3)
end
--e2
--function cm.filter(c)
-- return c:GetControler()~=c:GetOwner() and c:IsSetCard(0xa82)
--end
--function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-- if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
--end
--function cm.activate(e,tp,eg,ep,ev,re,r,rp)
-- local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,LOCATION_MZONE)
-- local tg=Group.CreateGroup()
-- local tc=g:GetFirst()
-- while tc do
-- if not tc:IsImmuneToEffect(e) and tc:GetFlagEffect(m)==0 then
-- tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
-- - tg:AddCard(tc)
-- end
-- tc=g:GetNext()
-- end
-- tg:KeepAlive()
-- local e1=Effect.CreateEffect(e:GetHandler())
-- e1:SetType(EFFECT_TYPE_FIELD)
-- e1:SetCode(EFFECT_REMOVE_BRAINWASHING)
-- e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-- e1:SetTarget(aux.TargetEqualFunction(Card.GetFlagEffect,1,m))
-- e1:SetLabelObject(tg)
-- Duel.RegisterEffect(e1,tp)
function cm.filter(c)
return c:GetControler()~=c:GetOwner() and c:IsSetCard(0xa82)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,LOCATION_MZONE)
local tg=Group.CreateGroup()
local tc=g:GetFirst()
while tc do
if not tc:IsImmuneToEffect(e) and tc:GetFlagEffect(m)==0 then
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
tg:AddCard(tc)
end
tc=g:GetNext()
end
tg:KeepAlive()
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_REMOVE_BRAINWASHING)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e1:SetTarget(aux.TargetEqualFunction(Card.GetFlagEffect,1,m))
e1:SetLabelObject(tg)
Duel.RegisterEffect(e1,tp)
--force adjust
-- local e2=Effect.CreateEffect(e:GetHandler())
-- e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
--- e2:SetCode(EVENT_CHAIN_SOLVED)
-- e2:SetProperty(EFFECT_FLAG_DELAY)
-- e2:SetLabelObject(e1)
-- Duel.RegisterEffect(e2,tp)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_CHAIN_SOLVED)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
--reset
-- local e3=Effect.CreateEffect(e:GetHandler())
-- e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-- e3:SetCode(EVENT_CHAIN_SOLVED)
-- e3:SetLabelObject(e2)
-- e3:SetLabel(Duel.GetChainInfo(0,CHAININFO_CHAIN_ID))
-- e3:SetOperation(cm.reset)
-- Duel.RegisterEffect(e3,tp)
--end
--function cm.reset(e,tp,eg,ep,ev,re,r,rp)
-- if Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID)==e:GetLabel() then
-- local e2=e:GetLabelObject()
-- local e1=e2:GetLabelObject()
-- local tg=e1:GetLabelObject()
-- for tc in aux.Next(tg) do
-- tc:ResetFlagEffect(m)
-- end
-- tg:DeleteGroup()
-- e1:Reset()
-- e2:Reset()
-- e:Reset()
-- end
--end
local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_CHAIN_SOLVED)
e3:SetLabelObject(e2)
e3:SetLabel(Duel.GetChainInfo(0,CHAININFO_CHAIN_ID))
e3:SetOperation(cm.reset)
Duel.RegisterEffect(e3,tp)
end
function cm.reset(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID)==e:GetLabel() then
local e2=e:GetLabelObject()
local e1=e2:GetLabelObject()
local tg=e1:GetLabelObject()
for tc in aux.Next(tg) do
tc:ResetFlagEffect(m)
end
tg:DeleteGroup()
e1:Reset()
e2:Reset()
e:Reset()
end
end
--e9
--function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp)
-- return c:GetRace()~=(RACE_FAIRY or RACE_FIEND)
--end
function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp)
return not (c:IsRace(RACE_FAIRY) or c:IsRace(RACE_FIEND))
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