Skip to content

no81cards
no81cards
Commit 8eb54eed authored by POLYMER's avatar POLYMER
Browse files
Options

fix

parent 239505b6
Hide whitespace changes
Inline Side-by-side
Showing with 0 additions and 2099 deletions
expansions/no81.cdb
View file @ 8eb54eed
No preview for this file type
expansions/script/c7438101.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 前菜-日式猪肉角煮
local m=7438101
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Antipasto=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
--[[if re then Debug.Message("01") end
if re and re:GetHandler()==e:GetHandler() then Debug.Message("02") end
if re:IsHasType(EFFECT_TYPE_ACTIVATE) then Debug.Message("03") end]]
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return c:IsType(TYPE_SPELL) and cm.Crooked_Cook_Soup(c) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
--[[if Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil) then Debug.Message("04") end
if Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then Debug.Message("05") end]]
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tep,tep,Duel.GetCurrentChain())
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
--[[--poschange
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SET_POSITION)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(POS_FACEUP_ATTACK)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)]]
--must attack
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_MUST_ATTACK)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
--client
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
end
expansions/script/c7438102.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 汤-什锦鸡肉茶汤
local m=7438102
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Soup=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return c:IsType(TYPE_SPELL) and cm.Crooked_Cook_Enree(c) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
--attackdown
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(-1000)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
--client
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
end
expansions/script/c7438103.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 副菜-鲑鱼精切刺身
local m=7438103
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Enree=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return c:IsType(TYPE_SPELL) and cm.Crooked_Cook_Main_Course(c) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
--disable
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetTargetRange(0,LOCATION_ONFIELD)
e2:SetTarget(cm.disable)
e2:SetCondition(cm.discon)
e2:SetCode(EFFECT_DISABLE)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
--client
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
end
function cm.discon(e,tp,eg,ep,ev,re,r,rp)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function cm.disable(e,c)
return c:IsType(TYPE_EFFECT) or c:GetOriginalType()&TYPE_EFFECT~=0 or c:IsLocation(LOCATION_SZONE)
end
expansions/script/c7438104.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 主菜-半熟罗勒菲力
local m=7438104
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Main_Course=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return c:IsType(TYPE_SPELL) and cm.Crooked_Cook_Salad(c) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT) and re and re:GetHandler():IsCode(82697249)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD)
e5:SetTargetRange(0,LOCATION_MZONE)
e5:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e5:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
e5:SetReset(RESET_PHASE+PHASE_END)
e5:SetCondition(cm.lockcon)
e5:SetValue(1)
Duel.RegisterEffect(e5,tp)
local e6=e5:Clone()
e6:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
e6:SetValue(cm.fuslimit)
Duel.RegisterEffect(e6,tp)
local e7=e5:Clone()
e7:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
Duel.RegisterEffect(e7,tp)
local e8=e5:Clone()
e8:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
Duel.RegisterEffect(e8,tp)
local e9=e5:Clone()
e9:SetCode(EFFECT_UNRELEASABLE_SUM)
Duel.RegisterEffect(e9,tp)
local e10=e5:Clone()
e10:SetCode(EFFECT_UNRELEASABLE_NONSUM)
Duel.RegisterEffect(e10,tp)
--client
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
end
function cm.lockcon(e)
return Duel.GetCurrentPhase()==PHASE_MAIN1
end
function cm.fuslimit(e,c,sumtype)
return sumtype==SUMMON_TYPE_FUSION
end
expansions/script/c7438105.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 沙拉-鳄梨培根沙拉
local m=7438105
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Salad=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
--e2:SetTarget(cm.destg)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return c:IsType(TYPE_SPELL) and cm.Crooked_Cook_Dessert(c) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.cfilter0(c)
return c:IsCode(7438301) and c:IsFaceup()
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT)
end
--[[function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
end]]
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
e1:SetCountLimit(1)
e1:SetOperation(cm.sop)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
--client
local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
--[[local c=e:GetHandler()
if Duel.GetLocationCount(1-tp,LOCATION_MZONE,tp)<=0 or Duel.IsExistingMatchingCard(cm.cfilter0,tp,0,LOCATION_ONFIELD,1,nil) then return end
if Duel.IsPlayerCanSpecialSummonMonster(tp,7438301,0,TYPES_TOKEN_MONSTER,0,0,1,RACE_PLANT,ATTRIBUTE_WATER,POS_FACEUP_ATTACK,1-tp) then
local token=Duel.CreateToken(tp,7438301)
Duel.SpecialSummon(token,0,tp,1-tp,false,false,POS_FACEUP_ATTACK)
end]]
end
function cm.sop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(1-tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
local g=Duel.GetMatchingGroup(Card.IsCanBeSpecialSummoned,tp,0,LOCATION_EXTRA,nil,e,0,1-tp,false,false,POS_FACEUP_ATTACK)
if g:GetCount()>0 then
local tc=g:RandomSelect(1-tp,1):GetFirst()
Duel.SpecialSummon(tc,0,1-tp,1-tp,false,false,POS_FACEUP_ATTACK)
end
end
expansions/script/c7438106.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 甜品-抹茶和风圣代
local m=7438106
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Dessert=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return c:IsType(TYPE_SPELL) and cm.Crooked_Cook_Drink(c) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(cm.indct)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_EXTRA_ATTACK)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetValue(1)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
--client
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
end
function cm.indct(e,re,r,rp)
if bit.band(r,REASON_BATTLE)~=0 then
return 1
else return 0 end
end
expansions/script/c7438107.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理 饮品-拉花提拉米苏
local m=7438107
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
cm.named_with_Crooked_Cook_Drink=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--act qp in hand
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e0:SetCondition(cm.actcon)
c:RegisterEffect(e0)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--activate
local e01=Effect.CreateEffect(c)
e01:SetDescription(aux.Stringid(m,1))
e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e01:SetCode(EVENT_CHAIN_SOLVED)
e01:SetRange(LOCATION_SZONE)
e01:SetProperty(EFFECT_FLAG_DELAY)
e01:SetCondition(cm.actcon2)
e01:SetTarget(cm.acttg)
e01:SetOperation(cm.actop)
c:RegisterEffect(e01)
local e02=e01:Clone()
e02:SetCode(7438201)
c:RegisterEffect(e02)
--destroyed
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_DESTROYED)
e2:SetCondition(cm.descon)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--remain field
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_REMAIN_FIELD)
c:RegisterEffect(e3)
end
function cm.confilter(c)
return cm.Crooked_Cook(c) and c:IsFaceup()
end
function cm.actcon(e)
return Duel.IsExistingMatchingCard(cm.confilter,e:GetHandlerPlayer(),LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand()
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabel(Duel.GetTurnCount())
e1:SetCountLimit(1)
e1:SetCondition(cm.thcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
Duel.RegisterEffect(e1,tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==e:GetLabel()+1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.thfilter,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
function cm.actcon2(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler()==e:GetHandler() and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.actfilter(c,tp)
return cm.Crooked_Cook(c) and c:IsType(TYPE_FIELD) and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_DECK,0,1,nil,tp) end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
local tc=Duel.SelectMatchingCard(tp,cm.actfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
if tc then
local fc=Duel.GetFieldCard(tp,0,LOCATION_FZONE)
if fc then
Duel.SendtoGrave(fc,REASON_RULE)
Duel.BreakEffect()
end
Duel.MoveToField(tc,tp,1-tp,LOCATION_FZONE,POS_FACEUP,true)
local te=tc:GetActivateEffect()
te:UseCountLimit(tp,1,true)
local tep=tc:GetControler()
local cost=te:GetCost()
if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
Duel.RaiseEvent(tc,7438201,te,0,tp,tp,Duel.GetCurrentChain())
end
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
--Recover by battle
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_RECOVER)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_BATTLE_DAMAGE)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetCondition(cm.recon)
e1:SetTarget(cm.retg)
e1:SetOperation(cm.reop)
Duel.RegisterEffect(e1,tp)
--client
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e3:SetTargetRange(1,0)
e3:SetDescription(aux.Stringid(m,5))
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,1-tp)
end
function cm.recon(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
return ep~=tp and tc:IsControler(tp) and cm.Crooked_Cook(tc)
end
function cm.retg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,PLAYER_ALL,300)
end
function cm.reop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLP(tp)>0 then
Duel.Recover(tp,300,REASON_EFFECT)
end
if Duel.GetLP(1-tp)>0 then
Duel.Recover(1-tp,300,REASON_EFFECT)
end
end
expansions/script/c7438108.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理餐厅 『Crépuscule』
local m=7438108
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.Crooked_Cook_Antipasto(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Antipasto
end
function cm.Crooked_Cook_Soup(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Soup
end
function cm.Crooked_Cook_Enree(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Enree
end
function cm.Crooked_Cook_Main_Course(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Main_Course
end
function cm.Crooked_Cook_Salad(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Salad
end
function cm.Crooked_Cook_Dessert(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Dessert
end
function cm.Crooked_Cook_Drink(c)
local m=_G["c"..c:GetCode()]
return m and m.named_with_Crooked_Cook_Drink
end
function cm.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,0))
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_FZONE)
e2:SetProperty(EFFECT_FLAG_BOTH_SIDE+EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1,m)
e2:SetTarget(cm.destg)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)
--Recover
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,2))
e3:SetCategory(CATEGORY_RECOVER)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e3:SetCode(EVENT_DESTROYED)
e3:SetRange(LOCATION_FZONE)
e3:SetCondition(cm.reccon)
e3:SetTarget(cm.rectg)
e3:SetOperation(cm.recop)
c:RegisterEffect(e3)
end
function cm.cfilter(c)
return c:IsReason(REASON_EFFECT) and cm.Crooked_Cook(c)
end
function cm.filter(c)
return c:IsType(TYPE_QUICKPLAY) and cm.Crooked_Cook(c)
end
function cm.thfilter(c,dc)
local f=false
if cm.Crooked_Cook_Antipasto(dc) then f=cm.Crooked_Cook_Soup(c) end
if cm.Crooked_Cook_Soup(dc) then f=cm.Crooked_Cook_Enree(c) end
if cm.Crooked_Cook_Enree(dc) then f=cm.Crooked_Cook_Main_Course(c) end
if cm.Crooked_Cook_Main_Course(dc) then f=cm.Crooked_Cook_Salad(c) end
if cm.Crooked_Cook_Salad(dc) then f=cm.Crooked_Cook_Dessert(c) end
if cm.Crooked_Cook_Dessert(dc) then f=cm.Crooked_Cook_Drink(c) end
return cm.Crooked_Cook(c) and c:IsAbleToHand() and (f or cm.Crooked_Cook_Antipasto(c))
end
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and cm.filter(chkc) and chkc~=e:GetHandler() end
if chk==0 then return Duel.IsExistingTarget(cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)>0 then
local dc=Duel.GetOperatedGroup():GetFirst()
local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,nil,dc)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
end
function cm.reccon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.cfilter,1,nil)
end
function cm.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,PLAYER_ALL,300)
end
function cm.recop(e,tp,eg,ep,ev,re,r,rp)
Duel.Recover(tp,300,REASON_EFFECT)
Duel.Recover(1-tp,300,REASON_EFFECT)
--attackdown
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e1:SetValue(-300)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
expansions/script/c7438201.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理人 总厨
local m=7438201
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.initial_effect(c)
--Destroy and Special Summon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.sptg)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1)
--[[--get effect
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,3))
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetCountLimit(1)
e2:SetCost(cm.descost)
e2:SetTarget(cm.destg)
e2:SetOperation(cm.desop)
c:RegisterEffect(e2)]]
--get effect
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(cm.effcon)
e2:SetOperation(cm.effop)
c:RegisterEffect(e2)
--[[if not cm.global_check then
cm.global_check=true
local ge0=Effect.CreateEffect(c)
ge0:SetType(EFFECT_TYPE_FIELD)
ge0:SetCode(EFFECT_ACTIVATE_COST)
ge0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
ge0:SetTargetRange(1,1)
ge0:SetTarget(cm.actarget)
ge0:SetOperation(cm.costop)
Duel.RegisterEffect(ge0,0)
cm.global_trigger_effect=Effect.CreateEffect(c)
end]]
end
function cm.desfilter(c,tp)
return c:IsFaceup() and cm.Crooked_Cook(c) and Duel.GetMZoneCount(tp,c)>0
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and cm.desfilter(chkc,tp) end
if chk==0 then return Duel.IsExistingTarget(cm.desfilter,tp,LOCATION_ONFIELD,0,1,nil,tp)
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,cm.desfilter,tp,LOCATION_ONFIELD,0,1,1,nil,tp)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function cm.thfilter(c)
return cm.Crooked_Cook(c) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER) and not c:IsCode(m)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_DECK,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
end
end
function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_COST) and re:IsActivated() and re:IsActiveType(TYPE_XYZ)
and c:IsPreviousLocation(LOCATION_OVERLAY) and re:GetHandler() and re:GetHandler():IsAttribute(ATTRIBUTE_FIRE)-- and cm.global_trigger_effect:GetLabelObject()==re
end
function cm.effop(e,tp,eg,ep,ev,re,r,rp)
if re and re:GetHandler() then
local c=e:GetHandler()
local rc=re:GetHandler()
Duel.Hint(HINT_CARD,0,m)
Duel.HintSelection(Group.FromCards(rc))
--[[local esetcountlimit=Effect.SetCountLimit
cm.global_count=0
cm.global_code=0
Effect.SetCountLimit=function(effect,count,code)
Debug.Message("123")
cm.global_count=count
cm.global_code=code
return esetcountlimit(effect,count,code)
end
--effect
local e1=re:Clone()
Debug.Message(cm.global_count)
Debug.Message(cm.global_code)
Effect.SetCountLimit=esetcountlimit
e1:SetCountLimit(cm.global_count,cm.global_code)]]
--e1:SetOwner(c)
--e1:SetCountLimit(1)
--[[local e1=cm.global_copy_effect:Clone()
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
rc:RegisterEffect(e1)]]
cm.COUNT_CODE_table={0}
local description=re:GetDescription()
local category=re:GetCategory()
local condition=re:GetCondition()
local cost=re:GetCost()
local target=re:GetTarget()
local operation=re:GetOperation()
local esetcountlimit=Effect.SetCountLimit
Effect.SetCountLimit=function(effect,count,code)
if code and bit.band(code,EFFECT_COUNT_CODE_SINGLE)==EFFECT_COUNT_CODE_SINGLE then
if cm.COUNT_CODE_table[1]==0 then cm.COUNT_CODE_table[1]=1 --Debug.Message("01")
end
--Debug.Message("0")
--Debug.Message("cm.COUNT_CODE_table2")
--Debug.Message(#cm.COUNT_CODE_table)
cm.COUNT_CODE_table[#cm.COUNT_CODE_table+1]=effect
return esetcountlimit(effect,count,0)
end
return esetcountlimit(effect,count,code)
end
local cregister=Card.RegisterEffect
Card.RegisterEffect=function(card,effect,flag)
if effect
and (not description or description==effect:GetDescription())
and (not category or category==effect:GetCategory())
and (not condition or condition==effect:GetCondition())
and (not cost or cost==effect:GetCost())
and (not target or target==effect:GetTarget())
and (not operation or operation==effect:GetOperation()) then
--Debug.Message("11")
if cm.COUNT_CODE_table[1]==1 then
--Debug.Message("1")
local ct=2
cm.COUNT_CODE_table[1]=59
while ct<=#cm.COUNT_CODE_table do
cregister(card,cm.COUNT_CODE_table[ct],flag)
ct=ct+1
--Debug.Message("2")
end
return
end
--Debug.Message("cm.COUNT_CODE_table")
--Debug.Message(#cm.COUNT_CODE_table)
return cregister(card,effect,flag)
end
if effect and cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
--Debug.Message("3")
return cregister(card,effect,flag)
end
return
end
local cid=rc:CopyEffect(rc:GetOriginalCodeRule(),RESET_EVENT+RESETS_STANDARD)
Card.RegisterEffect=cregister
Effect.SetCountLimit=esetcountlimit
if cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
cm.COUNT_CODE_table[1]=rc
--Debug.Message("cm.COUNT_CODE_table")
--Debug.Message(#cm.COUNT_CODE_table)
rc:RegisterFlagEffect(m+rc:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
local ct=2
while ct<=#cm.COUNT_CODE_table do
rc:RegisterFlagEffect(m+rc:GetFieldID()+cm.COUNT_CODE_table[ct]:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
ct=ct+1
end
local ge0=Effect.CreateEffect(c)
ge0:SetType(EFFECT_TYPE_FIELD)
ge0:SetCode(EFFECT_ACTIVATE_COST)
ge0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
ge0:SetLabelObject(table.unpack(cm.COUNT_CODE_table))
ge0:SetTargetRange(1,1)
ge0:SetTarget(cm.actarget)
ge0:SetCost(cm.costchk)
ge0:SetOperation(cm.costop)
Duel.RegisterEffect(ge0,0)
end
end
end
function cm.actarget(e,te,tp)
local tc=te:GetHandler()
if tc:GetFlagEffect(m+tc:GetFieldID())<=0 then return false end
--[[local COUNT_CODE_table={e:GetLabelObject()}
Debug.Message("COUNT_CODE_table")
Debug.Message(#COUNT_CODE_table)
local boolean=false
local ct=2
while ct<=#COUNT_CODE_table do
Debug.Message("COUNT_CODE_table")
Debug.Message(#COUNT_CODE_table)
Debug.Message(ct)
if te==COUNT_CODE_table[ct] then boolean=true end
ct=ct+1
end
Debug.Message("0")]]
return tc:GetFlagEffect(m+tc:GetFieldID()+te:GetFieldID())>0
end
function cm.costchk(e,te_or_c,tp)
--Debug.Message("1")
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
--Debug.Message("2")
return Duel.GetFlagEffect(tp,m+tc:GetFieldID())<=0
end
function cm.costop(e,tp,eg,ep,ev,re,r,rp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.RegisterFlagEffect(tp,m+tc:GetFieldID(),RESET_PHASE+PHASE_END,0,0,1)
end
--[[function cm.actarget(e,te,tp)
e:SetLabelObject(te)
return te:IsActivated() and te:IsActiveType(TYPE_XYZ) and te:GetHandler() and te:GetHandler():IsAttribute(ATTRIBUTE_FIRE)
end
function cm.costop(e,tp,eg,ep,ev,re,r,rp)
Debug.Message("123")
local te=e:GetLabelObject()
local tc=te:GetHandler()
cm.global_trigger_effect:SetLabelObject(te)
cm.global_copy_effect=te:Clone()
end]]
--[[function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) end
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,0,e:GetHandler())
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,0,aux.ExceptThisCard(e))
Duel.Destroy(g,REASON_EFFECT)
end]]
expansions/script/c7438202.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理人 厨师长
local m=7438202
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.initial_effect(c)
--Destroy and Special Summon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.sptg)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1)
--get effect
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(cm.effcon)
e2:SetOperation(cm.effop)
c:RegisterEffect(e2)
end
function cm.desfilter(c,tp)
return c:IsFaceup() and cm.Crooked_Cook(c) and Duel.GetMZoneCount(tp,c)>0
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and cm.desfilter(chkc,tp) end
if chk==0 then return Duel.IsExistingTarget(cm.desfilter,tp,LOCATION_ONFIELD,0,1,nil,tp)
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,cm.desfilter,tp,LOCATION_ONFIELD,0,1,1,nil,tp)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function cm.cfilter(c,code)
return c:IsCode(code) and (c:IsFaceup() or not c:IsOnField())
end
function cm.thfilter(c,tp)
return cm.Crooked_Cook(c) and c:IsType(TYPE_QUICKPLAY) and c:IsAbleToHand()
--and not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil,c:GetCode())
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_DECK,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
end
end
function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_COST) and re:IsActivated() and re:IsActiveType(TYPE_XYZ)
and c:IsPreviousLocation(LOCATION_OVERLAY) and re:GetHandler() and re:GetHandler():IsAttribute(ATTRIBUTE_FIRE)
end
function cm.effop(e,tp,eg,ep,ev,re,r,rp)
if re and re:GetHandler() then
local c=e:GetHandler()
local rc=re:GetHandler()
Duel.Hint(HINT_CARD,0,m)
Duel.HintSelection(Group.FromCards(rc))
cm.COUNT_CODE_table={0}
local description=re:GetDescription()
local category=re:GetCategory()
local condition=re:GetCondition()
local cost=re:GetCost()
local target=re:GetTarget()
local operation=re:GetOperation()
local esetcountlimit=Effect.SetCountLimit
Effect.SetCountLimit=function(effect,count,code)
if code and bit.band(code,EFFECT_COUNT_CODE_SINGLE)==EFFECT_COUNT_CODE_SINGLE then
if cm.COUNT_CODE_table[1]==0 then cm.COUNT_CODE_table[1]=1
end
cm.COUNT_CODE_table[#cm.COUNT_CODE_table+1]=effect
return esetcountlimit(effect,count,0)
end
return esetcountlimit(effect,count,code)
end
local cregister=Card.RegisterEffect
Card.RegisterEffect=function(card,effect,flag)
if effect
and (not description or description==effect:GetDescription())
and (not category or category==effect:GetCategory())
and (not condition or condition==effect:GetCondition())
and (not cost or cost==effect:GetCost())
and (not target or target==effect:GetTarget())
and (not operation or operation==effect:GetOperation()) then
if cm.COUNT_CODE_table[1]==1 then
local ct=2
cm.COUNT_CODE_table[1]=59
while ct<=#cm.COUNT_CODE_table do
cregister(card,cm.COUNT_CODE_table[ct],flag)
ct=ct+1
end
return
end
return cregister(card,effect,flag)
end
if effect and cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
return cregister(card,effect,flag)
end
return
end
local cid=rc:CopyEffect(rc:GetOriginalCodeRule(),RESET_EVENT+RESETS_STANDARD)
Card.RegisterEffect=cregister
Effect.SetCountLimit=esetcountlimit
if cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
cm.COUNT_CODE_table[1]=rc
rc:RegisterFlagEffect(m+rc:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
local ct=2
while ct<=#cm.COUNT_CODE_table do
rc:RegisterFlagEffect(m+rc:GetFieldID()+cm.COUNT_CODE_table[ct]:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
ct=ct+1
end
local ge0=Effect.CreateEffect(c)
ge0:SetType(EFFECT_TYPE_FIELD)
ge0:SetCode(EFFECT_ACTIVATE_COST)
ge0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
ge0:SetLabelObject(table.unpack(cm.COUNT_CODE_table))
ge0:SetTargetRange(1,1)
ge0:SetTarget(cm.actarget)
ge0:SetCost(cm.costchk)
ge0:SetOperation(cm.costop)
Duel.RegisterEffect(ge0,0)
end
end
end
function cm.actarget(e,te,tp)
local tc=te:GetHandler()
if tc:GetFlagEffect(m+tc:GetFieldID())<=0 then return false end
return tc:GetFlagEffect(m+tc:GetFieldID()+te:GetFieldID())>0
end
function cm.costchk(e,te_or_c,tp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.GetFlagEffect(tp,m+tc:GetFieldID())<=0
end
function cm.costop(e,tp,eg,ep,ev,re,r,rp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.RegisterFlagEffect(tp,m+tc:GetFieldID(),RESET_PHASE+PHASE_END,0,0,1)
end
expansions/script/c7438203.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理人 厨师长
local m=7438203
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.initial_effect(c)
--Destroy and Special Summon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.sptg)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1)
--get effect
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(cm.effcon)
e2:SetOperation(cm.effop)
c:RegisterEffect(e2)
end
function cm.desfilter(c,tp)
return c:IsFaceup() and cm.Crooked_Cook(c) and Duel.GetMZoneCount(tp,c)>0
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and cm.desfilter(chkc,tp) end
if chk==0 then return Duel.IsExistingTarget(cm.desfilter,tp,LOCATION_ONFIELD,0,1,nil,tp)
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,cm.desfilter,tp,LOCATION_ONFIELD,0,1,1,nil,tp)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function cm.xyzfilter(c)
return cm.Crooked_Cook(c) and c:IsXyzSummonable(nil)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local g=Duel.GetMatchingGroup(cm.xyzfilter,tp,LOCATION_EXTRA,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=g:Select(tp,1,1,nil)
Duel.XyzSummon(tp,tg:GetFirst(),nil)
end
end
end
end
function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_COST) and re:IsActivated() and re:IsActiveType(TYPE_XYZ)
and c:IsPreviousLocation(LOCATION_OVERLAY) and re:GetHandler() and re:GetHandler():IsAttribute(ATTRIBUTE_FIRE)
end
function cm.effop(e,tp,eg,ep,ev,re,r,rp)
if re and re:GetHandler() then
local c=e:GetHandler()
local rc=re:GetHandler()
Duel.Hint(HINT_CARD,0,m)
Duel.HintSelection(Group.FromCards(rc))
cm.COUNT_CODE_table={0}
local description=re:GetDescription()
local category=re:GetCategory()
local condition=re:GetCondition()
local cost=re:GetCost()
local target=re:GetTarget()
local operation=re:GetOperation()
local esetcountlimit=Effect.SetCountLimit
Effect.SetCountLimit=function(effect,count,code)
if code and bit.band(code,EFFECT_COUNT_CODE_SINGLE)==EFFECT_COUNT_CODE_SINGLE then
if cm.COUNT_CODE_table[1]==0 then cm.COUNT_CODE_table[1]=1
end
cm.COUNT_CODE_table[#cm.COUNT_CODE_table+1]=effect
return esetcountlimit(effect,count,0)
end
return esetcountlimit(effect,count,code)
end
local cregister=Card.RegisterEffect
Card.RegisterEffect=function(card,effect,flag)
if effect
and (not description or description==effect:GetDescription())
and (not category or category==effect:GetCategory())
and (not condition or condition==effect:GetCondition())
and (not cost or cost==effect:GetCost())
and (not target or target==effect:GetTarget())
and (not operation or operation==effect:GetOperation()) then
if cm.COUNT_CODE_table[1]==1 then
local ct=2
cm.COUNT_CODE_table[1]=59
while ct<=#cm.COUNT_CODE_table do
cregister(card,cm.COUNT_CODE_table[ct],flag)
ct=ct+1
end
return
end
return cregister(card,effect,flag)
end
if effect and cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
return cregister(card,effect,flag)
end
return
end
local cid=rc:CopyEffect(rc:GetOriginalCodeRule(),RESET_EVENT+RESETS_STANDARD)
Card.RegisterEffect=cregister
Effect.SetCountLimit=esetcountlimit
if cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
cm.COUNT_CODE_table[1]=rc
rc:RegisterFlagEffect(m+rc:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
local ct=2
while ct<=#cm.COUNT_CODE_table do
rc:RegisterFlagEffect(m+rc:GetFieldID()+cm.COUNT_CODE_table[ct]:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
ct=ct+1
end
local ge0=Effect.CreateEffect(c)
ge0:SetType(EFFECT_TYPE_FIELD)
ge0:SetCode(EFFECT_ACTIVATE_COST)
ge0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
ge0:SetLabelObject(table.unpack(cm.COUNT_CODE_table))
ge0:SetTargetRange(1,1)
ge0:SetTarget(cm.actarget)
ge0:SetCost(cm.costchk)
ge0:SetOperation(cm.costop)
Duel.RegisterEffect(ge0,0)
end
end
end
function cm.actarget(e,te,tp)
local tc=te:GetHandler()
if tc:GetFlagEffect(m+tc:GetFieldID())<=0 then return false end
return tc:GetFlagEffect(m+tc:GetFieldID()+te:GetFieldID())>0
end
function cm.costchk(e,te_or_c,tp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.GetFlagEffect(tp,m+tc:GetFieldID())<=0
end
function cm.costop(e,tp,eg,ep,ev,re,r,rp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.RegisterFlagEffect(tp,m+tc:GetFieldID(),RESET_PHASE+PHASE_END,0,0,1)
end
expansions/script/c7438204.lua deleted 100644 → 0
View file @ 239505b6
--背反之料理人 帮厨
local m=7438204
local cm=_G["c"..m]
cm.named_with_Crooked_Cook=1
function cm.Crooked_Cook(c)
local m=_G["c"..c:GetCode()]
return m and (m.named_with_Crooked_Cook or c:IsCode(82697249))
end
function cm.initial_effect(c)
--Destroy and Special Summon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_END_PHASE,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.sptg)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1)
--get effect
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(cm.effcon)
e2:SetOperation(cm.effop)
c:RegisterEffect(e2)
end
function cm.desfilter(c,tp)
return c:IsFaceup() and cm.Crooked_Cook(c) and Duel.GetMZoneCount(tp,c)>0
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and cm.desfilter(chkc,tp) end
if chk==0 then return Duel.IsExistingTarget(cm.desfilter,tp,LOCATION_ONFIELD,0,1,nil,tp)
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,cm.desfilter,tp,LOCATION_ONFIELD,0,1,1,nil,tp)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function cm.xyzfilter(c,tp)
return cm.Crooked_Cook(c) and c:IsType(TYPE_XYZ) and c:IsFaceup()
and Duel.IsExistingMatchingCard(cm.matfilter,tp,LOCATION_MZONE,0,1,c)
end
function cm.matfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsCanOverlay()
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local g=Duel.GetMatchingGroup(cm.xyzfilter,tp,LOCATION_MZONE,0,nil,tp)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
local tc=g:Select(tp,1,1,nil):GetFirst()
local xg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_MZONE,0,tc)
if xg:GetCount()>0 then
for oc in aux.Next(xg) do
local og=oc:GetOverlayGroup()
if og:GetCount()>0 then
Duel.SendtoGrave(og,REASON_RULE)
end
end
Duel.Overlay(tc,xg)
end
end
end
end
end
function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_COST) and re:IsActivated() and re:IsActiveType(TYPE_XYZ)
and c:IsPreviousLocation(LOCATION_OVERLAY) and re:GetHandler() and re:GetHandler():IsAttribute(ATTRIBUTE_FIRE)
end
function cm.effop(e,tp,eg,ep,ev,re,r,rp)
if re and re:GetHandler() then
local c=e:GetHandler()
local rc=re:GetHandler()
Duel.Hint(HINT_CARD,0,m)
Duel.HintSelection(Group.FromCards(rc))
cm.COUNT_CODE_table={0}
local description=re:GetDescription()
local category=re:GetCategory()
local condition=re:GetCondition()
local cost=re:GetCost()
local target=re:GetTarget()
local operation=re:GetOperation()
local esetcountlimit=Effect.SetCountLimit
Effect.SetCountLimit=function(effect,count,code)
if code and bit.band(code,EFFECT_COUNT_CODE_SINGLE)==EFFECT_COUNT_CODE_SINGLE then
if cm.COUNT_CODE_table[1]==0 then cm.COUNT_CODE_table[1]=1
end
cm.COUNT_CODE_table[#cm.COUNT_CODE_table+1]=effect
return esetcountlimit(effect,count,0)
end
return esetcountlimit(effect,count,code)
end
local cregister=Card.RegisterEffect
Card.RegisterEffect=function(card,effect,flag)
if effect
and (not description or description==effect:GetDescription())
and (not category or category==effect:GetCategory())
and (not condition or condition==effect:GetCondition())
and (not cost or cost==effect:GetCost())
and (not target or target==effect:GetTarget())
and (not operation or operation==effect:GetOperation()) then
if cm.COUNT_CODE_table[1]==1 then
local ct=2
cm.COUNT_CODE_table[1]=59
while ct<=#cm.COUNT_CODE_table do
cregister(card,cm.COUNT_CODE_table[ct],flag)
ct=ct+1
end
return
end
return cregister(card,effect,flag)
end
if effect and cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
return cregister(card,effect,flag)
end
return
end
local cid=rc:CopyEffect(rc:GetOriginalCodeRule(),RESET_EVENT+RESETS_STANDARD)
Card.RegisterEffect=cregister
Effect.SetCountLimit=esetcountlimit
if cm.COUNT_CODE_table[1] and cm.COUNT_CODE_table[1]==59 then
cm.COUNT_CODE_table[1]=rc
rc:RegisterFlagEffect(m+rc:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
local ct=2
while ct<=#cm.COUNT_CODE_table do
rc:RegisterFlagEffect(m+rc:GetFieldID()+cm.COUNT_CODE_table[ct]:GetFieldID(),RESET_EVENT+RESETS_STANDARD,0,0,1)
ct=ct+1
end
local ge0=Effect.CreateEffect(c)
ge0:SetType(EFFECT_TYPE_FIELD)
ge0:SetCode(EFFECT_ACTIVATE_COST)
ge0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
ge0:SetLabelObject(table.unpack(cm.COUNT_CODE_table))
ge0:SetTargetRange(1,1)
ge0:SetTarget(cm.actarget)
ge0:SetCost(cm.costchk)
ge0:SetOperation(cm.costop)
Duel.RegisterEffect(ge0,0)
end
end
end
function cm.actarget(e,te,tp)
local tc=te:GetHandler()
if tc:GetFlagEffect(m+tc:GetFieldID())<=0 then return false end
return tc:GetFlagEffect(m+tc:GetFieldID()+te:GetFieldID())>0
end
function cm.costchk(e,te_or_c,tp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.GetFlagEffect(tp,m+tc:GetFieldID())<=0
end
function cm.costop(e,tp,eg,ep,ev,re,r,rp)
local COUNT_CODE_table={e:GetLabelObject()}
local tc=COUNT_CODE_table[1]
return Duel.RegisterFlagEffect(tp,m+tc:GetFieldID(),RESET_PHASE+PHASE_END,0,0,1)
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