Skip to content

no81cards
no81cards
Commit b5259987 authored by Nemo Ma's avatar Nemo Ma
Browse files
Options

wd

parent 9d34d3c9
Hide whitespace changes
Inline Side-by-side
Showing with 506 additions and 0 deletions
expansions/lflist.conf
View file @ b5259987
......@@ -10,6 +10,10 @@
130002004 0
130002005 0
#WILD, I say WILD, WAHAHA
31400083 0
90700030 0
90700059 0
90700085 0
80002333 0
60002035 0
60002036 0
......
expansions/no42.cdb
View file @ b5259987
No preview for this file type
expansions/script/c31400083.lua 0 → 100644
View file @ b5259987
local m=31400083
local cm=_G["c"..m]
cm.name="熊极天岁差"
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(m)
e2:SetRange(LOCATION_DECK)
e2:SetCondition(aux.exccon)
e2:SetCountLimit(1,m)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,0))
e3:SetCategory(CATEGORY_LEAVE_GRAVE)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_TO_GRAVE)
e3:SetRange(LOCATION_GRAVE)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,m+100000000)
e3:SetCondition(cm.tfcon)
e3:SetTarget(cm.tftg)
e3:SetOperation(cm.tfop)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetRange(LOCATION_SZONE)
e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCountLimit(1)
e4:SetCondition(cm.setcon)
e4:SetCost(cm.setcost)
e4:SetTarget(cm.settg)
e4:SetOperation(cm.setop)
c:RegisterEffect(e4)
if not cm.hack then
cm.hack=true
local e=Effect.CreateEffect(c)
e:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e:SetCode(EVENT_PHASE_START+PHASE_DRAW)
e:SetOperation(cm.hack_op)
e:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL)
Duel.RegisterEffect(e,0)
end
end
function cm.tffilter(c,tp)
return (c:IsPreviousLocation(LOCATION_ONFIELD) or c:IsPreviousLocation(LOCATION_HAND)) and c:IsSetCard(0x163) and c:IsControler(tp) and c:IsType(TYPE_MONSTER)
end
function cm.tfcon(e,tp,eg,ep,ev,re,r,rp)
return not eg:IsContains(e:GetHandler()) and eg:IsExists(cm.tffilter,1,nil,tp)
end
function cm.tftg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
end
function cm.tfop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
local c=e:GetHandler()
if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
end
end
function cm.setconfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0x163) and c:IsControler(tp)
end
function cm.setcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.setconfilter,1,nil,tp)
end
function cm.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,700) end
Duel.PayLPCost(tp,700)
end
function cm.settgfilter(c)
return c:IsSetCard(0x163) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
end
function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingMatchingCard(cm.settgfilter,tp,LOCATION_DECK,0,1,nil) end
end
function cm.setop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local tc=Duel.SelectMatchingCard(tp,cm.settgfilter,tp,LOCATION_DECK,0,1,1,nil):GetFirst()
if tc then
Duel.SSet(tp,tc)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
if tc:IsType(TYPE_QUICKPLAY) then
e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
else
e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
end
e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e1:SetCondition(cm.actcon)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
function cm.actconfilter(c)
return c:IsFacedown() or not c:IsSetCard(0x163)
end
function cm.actcon(e)
return Duel.GetMatchingGroupCount(cm.actconfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,nil)==0
end
function cm.hack_op(e,tp,eg,ep,ev,re,r,rp)
aux.UrsarcticSpSummonCost=cm.UrsarcticSpSummonCost
local c27693363=_G["c27693363"]
if c27693363 then c27693363.thcost=cm.thcost_27693363 end
local c80086070=_G["c80086070"]
if c80086070 then c80086070.negcost=cm.negcost_80086070 end
local g=Duel.GetFieldGroup(tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA)
g:ForEach(
function (tc)
if tc:IsCode(27693363,80086070,28715905,29537493,54700519,55936191,81108658,81321206) then
Card.ReplaceEffect(tc,31400127,nil)
_G["c"..tc:GetOriginalCodeRule()].initial_effect(tc)
end
end
)
end
function cm.excostfilter(c,tp)
return c:IsAbleToGraveAsCost() and c:IsHasEffect(m,tp)
end
function cm.UrsarcticSpSummonCost(e,tp,eg,ep,ev,re,r,rp,chk)
local g1=Duel.GetReleaseGroup(tp,true):Filter(Auxiliary.UrsarcticReleaseFilter,e:GetHandler())
local g2=Duel.GetMatchingGroup(Auxiliary.UrsarcticExCostFilter,tp,LOCATION_GRAVE,0,nil,tp)
local g3=Duel.GetMatchingGroup(cm.excostfilter,tp,LOCATION_DECK,0,nil,tp)
g1:Merge(g2)
g1:Merge(g3)
if chk==0 then return g1:GetCount()>0 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local tc=g1:Select(tp,1,1,nil):GetFirst()
local te1=tc:IsHasEffect(16471775,tp) or tc:IsHasEffect(89264428,tp)
local te2=tc:IsHasEffect(m,tp)
if te1 then
te1:UseCountLimit(tp)
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT+REASON_REPLACE)
else
if te2 then
te2:UseCountLimit(tp)
Duel.SendtoGrave(tc,REASON_COST)
else
Duel.Release(tc,REASON_COST)
end
end
end
function cm.thcost_27693363(e,tp,eg,ep,ev,re,r,rp,chk)
local g1=Duel.GetReleaseGroup(tp):Filter(c27693363.rfilter,nil,tp)
local g2=Duel.GetMatchingGroup(c27693363.excostfilter,tp,LOCATION_GRAVE,0,nil,tp)
local g3=Duel.GetMatchingGroup(cm.excostfilter,tp,LOCATION_DECK,0,nil,tp)
g1:Merge(g2)
g1:Merge(g3)
if chk==0 then return g1:IsExists(c27693363.costfilter,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local rg=g1:FilterSelect(tp,c27693363.costfilter,1,1,nil,e,tp)
local tc=rg:GetFirst()
local te1=tc:IsHasEffect(16471775,tp) or tc:IsHasEffect(89264428,tp)
local te2=tc:IsHasEffect(m,tp)
if te1 then
te1:UseCountLimit(tp)
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT+REASON_REPLACE)
else
if te2 then
te2:UseCountLimit(tp)
Duel.SendtoGrave(tc,REASON_COST)
else
Duel.Release(tc,REASON_COST)
end
end
end
function cm.negcost_80086070(e,tp,eg,ep,ev,re,r,rp,chk)
local g1=Duel.GetReleaseGroup(tp,true):Filter(c80086070.costfilter,nil,tp)
local g2=Duel.GetMatchingGroup(c80086070.excostfilter,tp,LOCATION_GRAVE,0,nil,tp)
local g3=Duel.GetMatchingGroup(cm.excostfilter,tp,LOCATION_DECK,0,nil,tp)
g1:Merge(g2)
g1:Merge(g3)
if chk==0 then return #g1>0 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local rg=g1:Select(tp,1,1,nil)
local tc=rg:GetFirst()
local te1=tc:IsHasEffect(16471775,tp) or tc:IsHasEffect(89264428,tp)
local te2=tc:IsHasEffect(m,tp)
if te1 then
te1:UseCountLimit(tp)
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT+REASON_REPLACE)
else
if te2 then
te2:UseCountLimit(tp)
Duel.SendtoGrave(tc,REASON_COST)
else
Duel.Release(tc,REASON_COST)
end
end
end
\ No newline at end of file
expansions/script/c90700030.lua 0 → 100644
View file @ b5259987
local m=90700030
local cm=_G["c"..m]
cm.name="阻断药"
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
e1:SetCode(EVENT_SUMMON)
e1:SetOperation(cm.antisumop)
c:RegisterEffect(e1)
local e2=Effect.Clone(e1)
e2:SetCode(EVENT_FLIP_SUMMON)
c:RegisterEffect(e2)
local e3=Effect.Clone(e1)
e3:SetCode(EVENT_SPSUMMON)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetRange(LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
e4:SetCode(EVENT_CHAIN_SOLVING)
e4:SetOperation(cm.changeop)
c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e5:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e5:SetRange(LOCATION_REMOVED)
e5:SetCode(EVENT_TURN_END)
e5:SetOperation(cm.recycleop)
c:RegisterEffect(e5)
end
function cm.antisumop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFlagEffect(tp,m)>0 then return end
Duel.RegisterFlagEffect(tp,m,RESET_EVENT+RESET_CHAIN,0,1)
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,nil,m)
if g:GetCount()==0 then return end
if not Duel.SelectYesNo(tp,aux.Stringid(m,0)) then return end
Duel.Remove(g:Select(tp,1,1,nil),POS_FACEUP,REASON_RULE)
Duel.Hint(HINT_CARD,0,m)
Duel.Remove(eg,POS_FACEDOWN,REASON_RULE)
end
function cm.changeop(e,tp,eg,ep,ev,re,r,rp)
if bit.band(re:GetCategory(),CATEGORY_SPECIAL_SUMMON+CATEGORY_SUMMON)==0 then return end
if Duel.GetFlagEffect(tp,m)>0 then return end
Duel.RegisterFlagEffect(tp,m,RESET_EVENT+RESET_CHAIN,0,1)
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,nil,m)
if g:GetCount()==0 then return end
if not Duel.SelectYesNo(tp,aux.Stringid(m,0)) then return end
Duel.Remove(g:Select(tp,1,1,nil),POS_FACEUP,REASON_RULE)
Duel.Hint(HINT_CARD,0,m)
local g=Group.CreateGroup()
Duel.ChangeTargetCard(ev,g)
Duel.ChangeChainOperation(ev,function() return end)
end
function cm.recycleop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_REMOVED,0,nil,m)
if g:GetCount()==0 then return end
Duel.Hint(HINT_CARD,0,m)
Duel.HintSelection(g)
Duel.SendtoDeck(g,nil,2,REASON_RULE)
end
\ No newline at end of file
expansions/script/c90700059.lua 0 → 100644
View file @ b5259987
local m=90700059
local cm=_G["c"..m]
cm.name="转生之真现实"
c90700077={}
function c90700077.initial_effect(c) end
function cm.initial_effect(c)
cm.fake_ini_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_ADJUST)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCondition(cm.wincon)
e1:SetOperation(cm.winop)
Duel.RegisterEffect(e1,0)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_REVERSE_DAMAGE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,1)
e2:SetValue(cm.revdam)
Duel.RegisterEffect(e2,0)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_TO_HAND)
e3:SetOperation(cm.realop)
e3:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL)
Duel.RegisterEffect(e3,0)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e4:SetValue(1)
c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SET_ATTACK_FINAL)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_REPEAT+EFFECT_FLAG_DELAY)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(cm.adval)
c:RegisterEffect(e5)
local e6=e5:Clone()
e6:SetCode(EFFECT_SET_DEFENSE_FINAL)
c:RegisterEffect(e6)
end
function cm.fake_ini_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(cm.stcon)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,1))
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetRange(LOCATION_HAND+LOCATION_EXTRA)
e2:SetCountLimit(1,m)
e2:SetCondition(cm.spcon)
e2:SetOperation(cm.spop)
c:RegisterEffect(e2)
end
function cm.stcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsType(TYPE_SPELL+TYPE_TRAP)
end
function cm.spcon(e,c)
if c==nil then return true end
local con1=c:IsType(TYPE_SPSUMMON+TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK)
local con2=Duel.GetActivityCount(c:GetControler(),ACTIVITY_NORMALSUMMON)==0
local con3=not c:IsType(TYPE_PENDULUM) or c:IsPosition(POS_FACEDOWN)
return con1 and con2 and con3
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetTargetRange(1,0)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_MSET)
Duel.RegisterEffect(e2,tp)
end
function cm.adval(e,c)
local g=Duel.GetMatchingGroup(Card.IsPosition,0,LOCATION_MZONE,LOCATION_MZONE,nil,POS_FACEUP)
g:Sub(g:Filter(Card.IsCode,nil,m))
if g:GetCount()==0 then
return 100
else
local tg,val=g:GetMaxGroup(Card.GetAttack)
return val+100
end
end
function cm.revdam(e,re,r,rp,rc)
return bit.band(r,REASON_BATTLE)~=0
end
function cm.wincon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 or Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)==0
end
function cm.winop(e,tp,eg,ep,ev,re,r,rp)
local winmessage=0x4
local lp0=Duel.GetLP(0)
local lp1=Duel.GetLP(1)
if lp0>lp1 then
Duel.Win(1,winmessage)
elseif lp0<lp1 then
Duel.Win(0,winmessage)
elseif lp0==lp1 then
Duel.Win(PLAYER_NONE,winmessage)
end
end
function cm.realop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(aux.TRUE,0,0x1ff,0x1ff,nil)
g:ForEach(
function(tc)
if tc:IsCode(90700059) then return end
Card.ReplaceEffect(tc,90700077,nil)
cm.fake_ini_effect(tc)
end
)
end
\ No newline at end of file
expansions/script/c90700085.lua 0 → 100644
View file @ b5259987
local m=90700085
local cm=_G["c"..m]
cm.name="神碑之薪火"
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE_START+PHASE_DRAW)
e1:SetRange(LOCATION_HAND+LOCATION_DECK)
e1:SetOperation(cm.op)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL)
c:RegisterEffect(e1)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsLocation(LOCATION_HAND) then Duel.Draw(tp,1,REASON_EFFECT) end
Duel.SendtoGrave(c,REASON_EFFECT)
Duel.CreateToken(tp,92107604)
local c92107604=_G["c92107604"]
c92107604.initial_effect=cm.initial_effect_92107604
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_ADJUST)
e1:SetOperation(cm.fieldop)
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetValue(cm.actlimit)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_CANNOT_SSET)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetTargetRange(1,0)
e3:SetTarget(cm.setlimit)
Duel.RegisterEffect(e3,tp)
local g=Duel.GetFieldGroup(tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA,0)
g:ForEach(
function (tc)
if tc:IsSetCard(0x17f) and tc:IsType(TYPE_QUICKPLAY) then
local eset={tc:GetActivateEffect()}
for _,te in pairs(eset) do
local ne=Effect.CreateEffect(tc)
ne:SetDescription(te:GetDescription())
ne:SetCategory(te:GetCategory())
ne:SetProperty(te:GetProperty())
ne:SetType(EFFECT_TYPE_ACTIVATE)
ne:SetCode(te:GetCode())
if te:GetCondition() then
ne:SetCondition(te:GetCondition())
end
if te:GetCost() then
ne:SetCost(te:GetCost())
end
ne:SetTarget(te:GetTarget())
ne:SetOperation(te:GetOperation())
tc:RegisterEffect(ne)
te:Reset()
end
end
end
)
end
function cm.filter(c,e)
return c:IsSetCard(0x17f) and c:IsType(TYPE_QUICKPLAY) and c:IsAbleToDeck() and c:IsCanBeEffectTarget(e)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local g=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_GRAVE,0,nil,e)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.filter(chkc) end
if chk==0 then return Duel.IsPlayerCanDraw(tp,3) and g:GetClassCount(Card.GetCode)>=3 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local tg=Group.CreateGroup()
while #tg<3 do
local tc=g:Select(tp,1,1,nil):GetFirst()
tg:AddCard(tc)
g:Remove(Card.IsCode,nil,tc:GetCode())
end
Duel.SetTargetCard(tg)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,#g,0,0)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,#g)
end
function cm.initial_effect_92107604(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e2:SetRange(LOCATION_FZONE)
e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x17f))
e2:SetTargetRange(LOCATION_HAND,0)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(92107604,0))
e3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_CHAINING)
e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e3:SetRange(LOCATION_FZONE)
e3:SetCondition(c92107604.condition)
e3:SetTarget(cm.target)
e3:SetOperation(c92107604.operation)
c:RegisterEffect(e3)
end
function cm.fieldop(e,tp,eg,ep,ev,re,r,rp)
local tp=e:GetHandlerPlayer()
local c=Duel.GetFieldGroup(tp,LOCATION_FZONE,0):GetFirst()
if c and c:IsCode(92107604) then return end
local field=Duel.CreateToken(tp,92107604)
Duel.MoveToField(field,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
end
function cm.actlimit(e,re,tp)
return re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.setlimit(e,c,tp)
return c:IsType(TYPE_FIELD)
end
\ No newline at end of file
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