Skip to content

Y
ygopro-222DIY-cards
Commit b014d383 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

2000 years later

parent 1905010b
Hide whitespace changes
Inline Side-by-side
Showing with 208 additions and 117 deletions
expansions/222DIY.cdb
View file @ b014d383
No preview for this file type
expansions/script/c33701017.lua
View file @ b014d383
...@@ -22,7 +22,7 @@ function s.initial_effect(c) ...@@ -22,7 +22,7 @@ function s.initial_effect(c)
--negate --negate
local e2 = Effect.CreateEffect(c) local e2 = Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(id, 1)) e2:SetDescription(aux.Stringid(id, 1))
e2:SetCategory(CATEGORY_DISABLE) -- e2:SetCategory(CATEGORY_DISABLE)
e2:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP + EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP + EFFECT_FLAG_DELAY)
...@@ -49,23 +49,25 @@ end ...@@ -49,23 +49,25 @@ end
function s.spfilter(c) function s.spfilter(c)
return c:IsSetCard(0x144e) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost() return c:IsSetCard(0x144e) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
end end
function s.MZFilter(c, tp) --function s.MZFilter(c, tp)
return c:IsLocation(LOCATION_MZONE) and c:GetSequence() < 5 and c:IsControler(tp) -- return c:IsLocation(LOCATION_MZONE) and c:GetSequence() < 5 and c:IsControler(tp)
end --end
function s.ChkfMMZ(sumcount) --function s.ChkfMMZ(sumcount)
return function(sg, e, tp, mg) -- return function(sg, e, tp, mg)
return sg:FilterCount(s.MZFilter, nil, tp) + Duel.GetLocationCount(tp, LOCATION_MZONE) >= sumcount -- return sg:FilterCount(s.MZFilter, nil, tp) + Duel.GetLocationCount(tp, LOCATION_MZONE) >= sumcount
end -- end
end --end
function s.spcost(e, tp, eg, ep, ev, re, r, rp, chk) function s.spcost(e, tp, eg, ep, ev, re, r, rp, chk)
local rg = Duel.GetMatchingGroup(s.spfilter, tp, LOCATION_HAND + LOCATION_GRAVE, 0, e:GetHandler()) local rg = Duel.GetMatchingGroup(s.spfilter, tp, LOCATION_HAND + LOCATION_GRAVE, 0, e:GetHandler())
if chk == 0 then -- if chk == 0 then
return Duel.GetLocationCount(tp, LOCATION_MZONE) > -2 and #rg > 1 and -- return Duel.GetLocationCount(tp, LOCATION_MZONE) > -2 and #rg > 1 and
rg:CheckSubGroup(s.ChkfMMZ(1), 2, 2, tp) -- rg:CheckSubGroup(s.ChkfMMZ(1), 2, 2, tp)
end -- end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) if rg:GetCount()>1 then
local g = rg:SelectSubGroup(s.ChkfMMZ(1), tp, 2, 2, tp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
Duel.Remove(g, POS_FACEUP, REASON_COST) local g=rg:Select(tp,2,2,nil)
Duel.Remove(g, POS_FACEUP, REASON_COST)
end
end end
function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk) function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk)
local c = e:GetHandler() local c = e:GetHandler()
...@@ -76,25 +78,25 @@ function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk) ...@@ -76,25 +78,25 @@ function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk)
end end
function s.spop(e, tp, eg, ep, ev, re, r, rp) function s.spop(e, tp, eg, ep, ev, re, r, rp)
local c = e:GetHandler() local c = e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c, 0, tp, tp, true, true, POS_FACEUP) ~= 0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c, 1, tp, tp, true, true, POS_FACEUP) ~= 0 then
c:CompleteProcedure() c:CompleteProcedure()
c:RegisterFlagEffect(id, RESET_EVENT + RESETS_STANDARD, 0, 0) -- c:RegisterFlagEffect(id, RESET_EVENT + RESETS_STANDARD, 0, 0)
end end
end end
function s.negop(e, tp, eg, ep, ev, re, r, rp) function s.negop(e, tp, eg, ep, ev, re, r, rp)
local c = e:GetHandler() local c = e:GetHandler()
if c:GetFlagEffect(id) ~= 0 then if not c:GetSummonType()==SUMMON_TYPE_SPECIAL+1 then return end
local e1 = Effect.CreateEffect(c) local e1 = Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
e1:SetTargetRange(0, LOCATION_ONFIELD) e1:SetTargetRange(0, LOCATION_ONFIELD)
e1:SetTarget(s.disable) e1:SetTarget(s.disable)
e1:SetReset(RESET_PHASE + PHASE_END + RESET_OPPO_TURN) e1:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
Duel.RegisterEffect(e1, tp) e1:SetLabel(c:GetFieldID())
end Duel.RegisterEffect(e1, tp)
end end
function s.disable(e, c) function s.disable(e,c)
return c ~= e:GetHandler() and aux.disfilter1(c) return c:GetFieldID()~=e:GetLabel() and (not c:IsType(TYPE_MONSTER) or (c:IsType(TYPE_EFFECT) or bit.band(c:GetOriginalType(),TYPE_EFFECT)==TYPE_EFFECT))
end end
function s.spfilter2(c, e, tp, zone) function s.spfilter2(c, e, tp, zone)
return c:IsSetCard(0x144e) and c:IsCanBeSpecialSummoned(e, 0, tp, false, false, POS_FACEUP, tp, zone) return c:IsSetCard(0x144e) and c:IsCanBeSpecialSummoned(e, 0, tp, false, false, POS_FACEUP, tp, zone)
......
expansions/script/c33701018.lua
View file @ b014d383
...@@ -49,23 +49,26 @@ end ...@@ -49,23 +49,26 @@ end
function s.spfilter(c) function s.spfilter(c)
return c:IsSetCard(0x144e) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost() return c:IsSetCard(0x144e) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
end end
function s.MZFilter(c, tp) --function s.MZFilter(c, tp)
return c:IsLocation(LOCATION_MZONE) and c:GetSequence() < 5 and c:IsControler(tp) -- return c:IsLocation(LOCATION_MZONE) and c:GetSequence() < 5 and c:IsControler(tp)
end --end
function s.ChkfMMZ(sumcount) --function s.ChkfMMZ(sumcount)
return function(sg, tp) -- return function(sg, tp)
return sg:FilterCount(s.MZFilter, nil, tp) + Duel.GetLocationCount(tp, LOCATION_MZONE) >= sumcount -- return sg:FilterCount(s.MZFilter, nil, tp) + Duel.GetLocationCount(tp, LOCATION_MZONE) >= sumcount
end -- end
end --end
function s.spcost(e, tp, eg, ep, ev, re, r, rp, chk) function s.spcost(e, tp, eg, ep, ev, re, r, rp, chk)
local rg = Duel.GetMatchingGroup(s.spfilter, tp, LOCATION_HAND + LOCATION_MZONE + LOCATION_GRAVE, 0, e:GetHandler()) local rg = Duel.GetMatchingGroup(s.spfilter, tp, LOCATION_HAND + LOCATION_GRAVE, 0, e:GetHandler())
if chk == 0 then -- if chk == 0 then
return Duel.GetLocationCount(tp, LOCATION_MZONE) > -3 and #rg > 1 and -- return Duel.GetLocationCount(tp, LOCATION_MZONE) > -3 and #rg > 1 and
rg:CheckSubGroup(s.ChkfMMZ(1), 3, 3, tp) -- rg:CheckSubGroup(s.ChkfMMZ(1), 3, 3, tp)
end -- end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) -- Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g = rg:SelectSubGroup(s.ChkfMMZ(1), 3, 3, tp) if rg:GetCount()>2 then
Duel.Remove(g, POS_FACEUP, REASON_COST) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=rg:Select(tp,3,3,nil)
Duel.Remove(g, POS_FACEUP, REASON_COST)
end
end end
function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk) function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk)
local c = e:GetHandler() local c = e:GetHandler()
......
expansions/script/c33701019.lua
View file @ b014d383
...@@ -30,13 +30,14 @@ function s.initial_effect(c) ...@@ -30,13 +30,14 @@ function s.initial_effect(c)
e2:SetTarget(s.drtg) e2:SetTarget(s.drtg)
e2:SetOperation(s.drop) e2:SetOperation(s.drop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
Duel.AddCustomActivityCounter(33701019,ACTIVITY_CHAIN,aux.FALSE)
end end
function s.xcheck(g, lc, tp) function s.xcheck(g, lc, tp)
return g:IsExists(Card.IsXyzSetCard, 1, nil, 0x144e) return g:IsExists(Card.IsXyzSetCard, 1, nil, 0x144e)
end end
function s.spcon(e, tp, eg, ep, ev, re, r, rp) function s.spcon(e, tp, eg, ep, ev, re, r, rp)
local ct = Duel.GetActivityCount(tp, ACTIVITY_CHAIN) return Duel.GetTurnPlayer() == tp
return Duel.GetTurnPlayer() == tp and ct == 0 and Duel.GetCustomActivityCount(33701019,tp,ACTIVITY_CHAIN)==0
end end
function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk) function s.sptg(e, tp, eg, ep, ev, re, r, rp, chk)
local c = e:GetHandler() local c = e:GetHandler()
......
expansions/script/c33701021.lua
View file @ b014d383
...@@ -6,23 +6,23 @@ local id = 33701021 ...@@ -6,23 +6,23 @@ local id = 33701021
function s.initial_effect(c) function s.initial_effect(c)
--Activate --Activate
local e1 = Effect.CreateEffect(c) local e1 = Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND + CATEGORY_SEARCH) e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(s.activate) e1:SetOperation(s.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Skip phases --Skip phases
local e2 = Effect.CreateEffect(c) local e2 = Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS + EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e2:SetCode(EVENT_PHASE + PHASE_STANDBY) e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetRange(LOCATION_FZONE) e2:SetRange(LOCATION_FZONE)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetOperation(s.skipop) e2:SetOperation(s.skipop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--recover --recover
local e3 = Effect.CreateEffect(c) local e3 = Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_PHASE + PHASE_END) e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetRange(LOCATION_GRAVE) e3:SetRange(LOCATION_GRAVE)
e3:SetCountLimit(1) e3:SetCountLimit(1)
e3:SetCondition(s.thcon) e3:SetCondition(s.thcon)
...@@ -34,14 +34,12 @@ function s.tgfilter(c) ...@@ -34,14 +34,12 @@ function s.tgfilter(c)
return c:IsSetCard(0x144e) and c:IsAbleToGrave() return c:IsSetCard(0x144e) and c:IsAbleToGrave()
end end
function s.activate(e, tp, eg, ep, ev, re, r, rp) function s.activate(e, tp, eg, ep, ev, re, r, rp)
if not e:GetHandler():IsRelateToEffect(e) then if not e:GetHandler():IsRelateToEffect(e) then return end
return local g=Duel.GetMatchingGroup(s.tgfilter,tp,LOCATION_DECK,0,nil)
end if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
local g = Duel.GetMatchingGroup(s.tgfilter, tp, LOCATION_DECK, 0, nil)
if g:CheckSubGroup(aux.dncheck, 1, 3) and Duel.SelectYesNo(tp, aux.Stringid(id, 0)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local dg = g:SelectSubGroup(aux.dncheck, tp, 1, 3) local dg=g:Select(tp,1,3,nil)
Duel.SendtoGrave(dg, REASON_EFFECT) Duel.SendtoGrave(dg,REASON_EFFECT)
end end
end end
function s.skipop(e, tp, eg, ep, ev, re, r, rp) function s.skipop(e, tp, eg, ep, ev, re, r, rp)
......
expansions/script/c33701023.lua
View file @ b014d383
...@@ -28,17 +28,36 @@ end ...@@ -28,17 +28,36 @@ end
function s.condition(e, tp, eg, ep, ev, re, r, rp) function s.condition(e, tp, eg, ep, ev, re, r, rp)
return Duel.GetTurnPlayer() ~= tp and Duel.IsAbleToEnterBP() return Duel.GetTurnPlayer() ~= tp and Duel.IsAbleToEnterBP()
end end
function s.rfilter(c,tp)
return c:IsSetCard(0x144e) and (c:IsControler(tp) or c:IsFaceup())
end
function s.fgoal(sg,tp)
if sg:GetCount()>0 and Duel.GetMZoneCount(tp,sg)>0 then
Duel.SetSelectedCard(sg)
return Duel.CheckReleaseGroup(tp,nil,0,nil)
else return false end
end
function s.cost(e, tp, eg, ep, ev, re, r, rp, chk) function s.cost(e, tp, eg, ep, ev, re, r, rp, chk)
if chk == 0 then -- if chk == 0 then
return Duel.CheckReleaseGroupCost(tp, Card.IsSetCard, 2, false, aux.ReleaseCheckMMZ, nil, 0x144e) -- return Duel.CheckReleaseGroupCost(tp, Card.IsSetCard, 2, false, aux.ReleaseCheckMMZ, nil, 0x144e)
end -- end
local g = Duel.SelectReleaseGroupCost(tp, Card.IsSetCard, 2, 2, false, aux.ReleaseCheckMMZ, nil, 0x144e) -- local g = Duel.SelectReleaseGroupCost(tp, Card.IsSetCard, 2, 2, false, aux.ReleaseCheckMMZ, nil, 0x144e)
Duel.Release(g, REASON_COST) -- Duel.Release(g, REASON_COST)
local rg=Duel.GetReleaseGroup(tp):Filter(s.rfilter,nil,tp)
if chk==0 then return rg:CheckSubGroup(s.fgoal,2,2,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=rg:SelectSubGroup(tp,s.fgoal,false,2,2,tp)
Duel.Release(g,REASON_COST)
end end
function s.activate(e, tp, eg, ep, ev, re, r, rp) function s.activate(e, tp, eg, ep, ev, re, r, rp)
if Duel.IsChainDisablable(0) then if Duel.IsChainDisablable(0) then
local g = Duel.GetMatchingGroup(Card.IsAbleToGrave, tp, 0, LOCATION_MZONE, nil) local g = Duel.GetMatchingGroup(Card.IsAbleToGrave, tp, 0, LOCATION_MZONE, nil)
if #g > 1 and Duel.SelectYesNo(1 - tp, aux.Stringid(id, 0)) then if g:GetCount()>1 then --and Duel.SelectYesNo(1 - tp, aux.Stringid(id, 0)) then
sel=Duel.SelectOption(1-tp,1213,1214)
else
sel=Duel.SelectOption(1-tp,1214)+1
end
if sel==0 then
Duel.Hint(HINT_SELECTMSG, 1 - tp, HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG, 1 - tp, HINTMSG_TOGRAVE)
local sg = g:Select(1 - tp, 2, 2, nil) local sg = g:Select(1 - tp, 2, 2, nil)
Duel.SendtoGrave(sg, REASON_EFFECT) Duel.SendtoGrave(sg, REASON_EFFECT)
...@@ -52,15 +71,13 @@ function s.tgfilter(c) ...@@ -52,15 +71,13 @@ function s.tgfilter(c)
return c:IsSetCard(0x144e) and c:IsAbleToGrave() return c:IsSetCard(0x144e) and c:IsAbleToGrave()
end end
function s.tgtg(e, tp, eg, ep, ev, re, r, rp, chk) function s.tgtg(e, tp, eg, ep, ev, re, r, rp, chk)
if chk == 0 then if chk == 0 then return Duel.IsExistingMatchingCard(s.tgfilter, tp, LOCATION_DECK, 0, 2, nil) end
return Duel.IsExistingMatchingCard(s.tgfilter, tp, LOCATION_DECK, 0, 2, nil)
end
Duel.SetOperationInfo(0, CATEGORY_TOGRAVE, nil, 2, tp, LOCATION_DECK) Duel.SetOperationInfo(0, CATEGORY_TOGRAVE, nil, 2, tp, LOCATION_DECK)
end end
function s.tgop(e, tp, eg, ep, ev, re, r, rp) function s.tgop(e, tp, eg, ep, ev, re, r, rp)
Duel.Hint(HINT_SELECTMSG, tp, HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG, tp, HINTMSG_TOGRAVE)
local g = Duel.SelectMatchingCard(tp, s.tgfilter, tp, LOCATION_DECK, 0, 2, 2, nil) local g = Duel.SelectMatchingCard(tp, s.tgfilter, tp, LOCATION_DECK, 0, 2, 2, nil)
if #g > 0 then if g:GetCount()>0 then
Duel.SendtoGrave(g, REASON_EFFECT) Duel.SendtoGrave(g, REASON_EFFECT)
end end
end end
expansions/script/c47510217.lua
View file @ b014d383
...@@ -47,7 +47,6 @@ function c47510217.initial_effect(c) ...@@ -47,7 +47,6 @@ function c47510217.initial_effect(c)
--indes --indes
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD) e5:SetType(EFFECT_TYPE_FIELD)
e5:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT) e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetRange(LOCATION_EXTRA) e5:SetRange(LOCATION_EXTRA)
e5:SetTargetRange(LOCATION_MZONE,0) e5:SetTargetRange(LOCATION_MZONE,0)
...@@ -146,7 +145,7 @@ function c47510217.sumop(e,tp,eg,ep,ev,re,r,rp) ...@@ -146,7 +145,7 @@ function c47510217.sumop(e,tp,eg,ep,ev,re,r,rp)
Duel.SpecialSummon(g1,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g1,0,tp,tp,false,false,POS_FACEUP)
end end
end end
function c47510217.indtg(c) function c47510217.indtg(e,c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_EARTH) return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_EARTH)
end end
function c47510217.indct(e,re,r,rp) function c47510217.indct(e,re,r,rp)
......
expansions/script/c65072000.lua
View file @ b014d383
...@@ -43,11 +43,11 @@ function c65072000.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,11 +43,11 @@ function c65072000.op(e,tp,eg,ep,ev,re,r,rp)
local tc=g1:GetFirst() local tc=g1:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(11,0,aux.Stringid(code,0))
elseif m==1 and b2 then elseif m==1 and b2 then
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_EFFECT+REASON_DISCARD,e:GetHandler()) Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_EFFECT+REASON_DISCARD,e:GetHandler())
local g2=Duel.SelectMatchingCard(tp,c65072000.fil2,tp,LOCATION_DECK,0,1,1,nil) local g2=Duel.SelectMatchingCard(tp,c65072000.fil2,tp,LOCATION_DECK,0,1,1,nil)
Duel.SendtoHand(g2,tp,REASON_EFFECT) Duel.SendtoHand(g2,tp,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g2) Duel.ConfirmCards(1-tp,g2)
end end
end end
\ No newline at end of file
expansions/script/c65072001.lua
View file @ b014d383
...@@ -60,7 +60,7 @@ function c65072001.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,7 +60,7 @@ function c65072001.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
...@@ -111,4 +111,4 @@ function c65072001.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -111,4 +111,4 @@ function c65072001.operation(e,tp,eg,ep,ev,re,r,rp)
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.ChangeTargetCard(ev,Group.FromCards(tc)) Duel.ChangeTargetCard(ev,Group.FromCards(tc))
end end
end end
\ No newline at end of file
expansions/script/c65072002.lua
View file @ b014d383
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c65072002.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072002.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end
Duel.Hint(21,0,aux.Stringid(65072002,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072002,0))
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
...@@ -81,4 +81,4 @@ function c65072002.efop(e,tp,eg,ep,ev,re,r,rp) ...@@ -81,4 +81,4 @@ function c65072002.efop(e,tp,eg,ep,ev,re,r,rp)
local cid=tc:CopyEffect(code,RESET_EVENT+RESETS_STANDARD) local cid=tc:CopyEffect(code,RESET_EVENT+RESETS_STANDARD)
tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(code,1)) tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(code,1))
end end
end end
\ No newline at end of file
expansions/script/c65072003.lua
View file @ b014d383
...@@ -58,7 +58,7 @@ function c65072003.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -58,7 +58,7 @@ function c65072003.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
......
expansions/script/c65072004.lua
View file @ b014d383
...@@ -60,7 +60,7 @@ function c65072004.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,7 +60,7 @@ function c65072004.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
...@@ -102,3 +102,4 @@ end ...@@ -102,3 +102,4 @@ end
function c65072004.efilter(e,te) function c65072004.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetOwnerPlayer() return te:GetOwnerPlayer()~=e:GetOwnerPlayer()
end end
expansions/script/c65072005.lua
View file @ b014d383
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c65072005.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072005.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end
Duel.Hint(21,0,aux.Stringid(65072005,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072005,0))
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
...@@ -83,6 +83,6 @@ function c65072005.tfop(e,tp,eg,ep,ev,re,r,rp) ...@@ -83,6 +83,6 @@ function c65072005.tfop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.SelectMatchingCard(tp,c65072005.tffilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst() local tc=Duel.SelectMatchingCard(tp,c65072005.tffilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
if tc then if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(tc:GetCode(),0)) Duel.Hint(11,0,aux.Stringid(tc:GetCode(),0))
end end
end end
expansions/script/c65072006.lua
View file @ b014d383
...@@ -61,7 +61,7 @@ function c65072006.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -61,7 +61,7 @@ function c65072006.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
......
expansions/script/c65072007.lua
View file @ b014d383
...@@ -17,7 +17,7 @@ function c65072007.filter(c) ...@@ -17,7 +17,7 @@ function c65072007.filter(c)
end end
function c65072007.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072007.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65072007.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c65072007.filter,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(21,0,aux.Stringid(65072007,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072007,0))
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end end
function c65072007.activate(e,tp,eg,ep,ev,re,r,rp) function c65072007.activate(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c65072008.lua
View file @ b014d383
...@@ -60,7 +60,7 @@ function c65072008.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,7 +60,7 @@ function c65072008.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
...@@ -99,3 +99,4 @@ function c65072008.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -99,3 +99,4 @@ function c65072008.operation(e,tp,eg,ep,ev,re,r,rp)
tc=g:GetNext() tc=g:GetNext()
end end
end end
expansions/script/c65072009.lua
View file @ b014d383
...@@ -60,7 +60,7 @@ function c65072009.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,7 +60,7 @@ function c65072009.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
...@@ -93,3 +93,5 @@ function c65072009.sop(e,tp,eg,ep,ev,re,r,rp) ...@@ -93,3 +93,5 @@ function c65072009.sop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoDeck(g,nil,2,REASON_EFFECT) Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
end end
end end
expansions/script/c65072010.lua
View file @ b014d383
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c65072010.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072010.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end
Duel.Hint(21,0,aux.Stringid(65072010,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072010,0))
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
......
expansions/script/c65072011.lua
View file @ b014d383
...@@ -60,7 +60,7 @@ function c65072011.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,7 +60,7 @@ function c65072011.cop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
local code=tc:GetCode() local code=tc:GetCode()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.Hint(21,0,aux.Stringid(code,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(code,0))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
......
expansions/script/c65072012.lua
View file @ b014d383
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c65072012.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c65072012.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCode(65071999) end if chkc then return chkc:IsCode(65071999) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,65071999) end if chk==0 then return Duel.IsExistingTarget(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,65071999) end
Duel.Hint(21,0,aux.Stringid(65072012,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072012,0))
local g=Duel.SelectTarget(tp,Card.IsCode,tp,LOCATION_MZONE,0,1,1,nil,65071999) local g=Duel.SelectTarget(tp,Card.IsCode,tp,LOCATION_MZONE,0,1,1,nil,65071999)
end end
function c65072012.op(e,tp,eg,ep,ev,re,r,rp) function c65072012.op(e,tp,eg,ep,ev,re,r,rp)
...@@ -74,4 +74,4 @@ function c65072012.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,4 +74,4 @@ function c65072012.operation(e,tp,eg,ep,ev,re,r,rp)
token:RegisterEffect(e5,true) token:RegisterEffect(e5,true)
end end
end end
end end
\ No newline at end of file
expansions/script/c65072013.lua
View file @ b014d383
...@@ -20,7 +20,7 @@ end ...@@ -20,7 +20,7 @@ end
function c65072013.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c65072013.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsCode(65071999) and chkc:IsControler(tp) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsCode(65071999) and chkc:IsControler(tp) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,65071999) end if chk==0 then return Duel.IsExistingTarget(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,65071999) end
Duel.Hint(21,0,aux.Stringid(65072013,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072013,0))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,Card.IsCode,tp,LOCATION_MZONE,0,1,1,nil,65071999) Duel.SelectTarget(tp,Card.IsCode,tp,LOCATION_MZONE,0,1,1,nil,65071999)
end end
...@@ -46,3 +46,4 @@ function c65072013.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,3 +46,4 @@ function c65072013.activate(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e5) tc:RegisterEffect(e5)
end end
end end
expansions/script/c65072014.lua
View file @ b014d383
...@@ -19,7 +19,7 @@ function c65072014.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -19,7 +19,7 @@ function c65072014.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(c65072014.desfilter,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) if chk==0 then return Duel.IsExistingTarget(c65072014.desfilter,tp,LOCATION_ONFIELD,0,1,e:GetHandler())
and Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end and Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(21,0,aux.Stringid(65072014,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072014,0))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g1=Duel.SelectTarget(tp,c65072014.desfilter,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler()) local g1=Duel.SelectTarget(tp,c65072014.desfilter,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler())
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
...@@ -51,4 +51,4 @@ function c65072014.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -51,4 +51,4 @@ function c65072014.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.BreakEffect() Duel.BreakEffect()
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
end end
\ No newline at end of file
expansions/script/c65072017.lua
View file @ b014d383
...@@ -32,7 +32,7 @@ function c65072017.initial_effect(c) ...@@ -32,7 +32,7 @@ function c65072017.initial_effect(c)
end end
function c65072017.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072017.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072017,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072017,0))
end end
function c65072017.val(e,c) function c65072017.val(e,c)
local tp=e:GetHandlerPlayer() local tp=e:GetHandlerPlayer()
...@@ -86,7 +86,15 @@ function c65072017.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -86,7 +86,15 @@ function c65072017.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072017.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072017.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072017.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072017.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
end local g=Duel.SelectMatchingCard(tp,c65072017.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c65072018.lua
View file @ b014d383
...@@ -32,7 +32,7 @@ function c65072018.initial_effect(c) ...@@ -32,7 +32,7 @@ function c65072018.initial_effect(c)
end end
function c65072018.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072018.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072018,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072018,0))
end end
function c65072018.discon(e,tp,eg,ep,ev,re,r,rp) function c65072018.discon(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler()==e:GetHandler() return re:GetHandler()==e:GetHandler()
...@@ -97,7 +97,15 @@ function c65072018.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -97,7 +97,15 @@ function c65072018.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072018.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072018.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072018.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072018.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65072018.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end end
expansions/script/c65072019.lua
View file @ b014d383
...@@ -20,7 +20,7 @@ end ...@@ -20,7 +20,7 @@ end
function c65072019.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072019.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) and Duel.IsExistingMatchingCard(c65072019.tgfil,tp,LOCATION_FZONE,0,1,nil) end and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) and Duel.IsExistingMatchingCard(c65072019.tgfil,tp,LOCATION_FZONE,0,1,nil) end
Duel.Hint(21,0,aux.Stringid(65072019,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072019,0))
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
...@@ -35,4 +35,4 @@ function c65072019.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -35,4 +35,4 @@ function c65072019.activate(e,tp,eg,ep,ev,re,r,rp)
if i==num or not Duel.SelectYesNo(tp,aux.Stringid(65072019,2)) then break end if i==num or not Duel.SelectYesNo(tp,aux.Stringid(65072019,2)) then break end
end end
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
end end
\ No newline at end of file
expansions/script/c65072020.lua
View file @ b014d383
...@@ -17,7 +17,7 @@ end ...@@ -17,7 +17,7 @@ end
function c65072020.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072020.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) and Duel.IsExistingMatchingCard(c65072020.tgfil,tp,LOCATION_GRAVE,0,1,nil) end and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) and Duel.IsExistingMatchingCard(c65072020.tgfil,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(21,0,aux.Stringid(65072020,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072020,0))
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
...@@ -50,4 +50,4 @@ function c65072020.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -50,4 +50,4 @@ function c65072020.activate(e,tp,eg,ep,ev,re,r,rp)
end end
function c65072020.splimit(e,c) function c65072020.splimit(e,c)
return not c:IsCode(65071999) return not c:IsCode(65071999)
end end
\ No newline at end of file
expansions/script/c65072021.lua
View file @ b014d383
...@@ -32,7 +32,7 @@ function c65072021.initial_effect(c) ...@@ -32,7 +32,7 @@ function c65072021.initial_effect(c)
end end
function c65072021.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072021.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072021,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072021,0))
end end
function c65072021.discon(e,tp,eg,ep,ev,re,r,rp) function c65072021.discon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
...@@ -97,7 +97,16 @@ function c65072021.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -97,7 +97,16 @@ function c65072021.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072021.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072021.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072021.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072021.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65072021.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end end
expansions/script/c65072022.lua
View file @ b014d383
...@@ -31,7 +31,7 @@ function c65072022.initial_effect(c) ...@@ -31,7 +31,7 @@ function c65072022.initial_effect(c)
end end
function c65072022.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072022.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072022,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072022,0))
end end
function c65072022.discon(e,tp,eg,ep,ev,re,r,rp) function c65072022.discon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler()==Duel.GetAttacker() and e:GetHandler():IsRelateToBattle() return e:GetHandler()==Duel.GetAttacker() and e:GetHandler():IsRelateToBattle()
...@@ -92,7 +92,15 @@ function c65072022.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -92,7 +92,15 @@ function c65072022.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072022.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072022.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072022.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072022.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65072022.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end end
expansions/script/c65072023.lua
View file @ b014d383
...@@ -20,6 +20,7 @@ function c65072023.thfil(c) ...@@ -20,6 +20,7 @@ function c65072023.thfil(c)
end end
function c65072023.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c65072023.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65072023.costfil,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(c65072016.thfil,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c65072023.costfil,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(c65072016.thfil,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072023,0))
local num1=Duel.GetMatchingGroup(c65072023.costfil,tp,LOCATION_GRAVE,0,nil):GetClassCount(Card.GetCode) local num1=Duel.GetMatchingGroup(c65072023.costfil,tp,LOCATION_GRAVE,0,nil):GetClassCount(Card.GetCode)
local num2=Duel.GetMatchingGroupCount(c65072023.thfil,tp,LOCATION_DECK,0,nil) local num2=Duel.GetMatchingGroupCount(c65072023.thfil,tp,LOCATION_DECK,0,nil)
if num1>num2 then num1=num2 end if num1>num2 then num1=num2 end
...@@ -32,7 +33,6 @@ function c65072023.filter(c) ...@@ -32,7 +33,6 @@ function c65072023.filter(c)
end end
function c65072023.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072023.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072023,0))
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,e:GetLabel(),tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,e:GetLabel(),tp,LOCATION_DECK)
end end
function c65072023.activate(e,tp,eg,ep,ev,re,r,rp) function c65072023.activate(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c65072024.lua
View file @ b014d383
...@@ -20,6 +20,7 @@ function c65072024.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -20,6 +20,7 @@ function c65072024.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c65072024.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c65072024.filter(chkc) end
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
and Duel.IsExistingTarget(c65072024.filter,tp,LOCATION_REMOVED,0,1,nil) end and Duel.IsExistingTarget(c65072024.filter,tp,LOCATION_REMOVED,0,1,nil) end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072024,0))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectTarget(tp,c65072024.filter,tp,LOCATION_REMOVED,0,1,num,nil) local g=Duel.SelectTarget(tp,c65072024.filter,tp,LOCATION_REMOVED,0,1,num,nil)
e:SetLabel(g:GetCount()) e:SetLabel(g:GetCount())
......
expansions/script/c65072025.lua
View file @ b014d383
...@@ -32,7 +32,7 @@ function c65072025.initial_effect(c) ...@@ -32,7 +32,7 @@ function c65072025.initial_effect(c)
end end
function c65072025.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072025.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072025,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072025,0))
end end
function c65072025.val(e,te) function c65072025.val(e,te)
return te:GetOwner()==e:GetHandler() return te:GetOwner()==e:GetHandler()
...@@ -89,7 +89,15 @@ function c65072025.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,7 +89,15 @@ function c65072025.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072025.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072025.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072025.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072025.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65072025.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end end
expansions/script/c65072026.lua
View file @ b014d383
...@@ -30,7 +30,8 @@ function c65072026.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -30,7 +30,8 @@ function c65072026.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local g=eg:Filter(c65072026.confil,nil) local g=eg:Filter(c65072026.confil,nil)
local gn=g:GetCount() local gn=g:GetCount()
if chk==0 then return Duel.IsExistingMatchingCard(c65072026.costfil,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingTarget(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,1,nil,e) end if chk==0 then return Duel.IsExistingMatchingCard(c65072026.costfil,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingTarget(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,1,nil,e) end
local num=Duel.GetMatchingGroup(c65072026.tgfil,tp,0,LOCATION_ONFIELD,nil) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072026,0))
local num=Duel.GetMatchingGroup(c65072026.tgfil,tp,0,LOCATION_ONFIELD,nil,e)
if gn>num then gn=num end if gn>num then gn=num end
local tgg=Duel.SelectMatchingCard(tp,c65072026.costfil,tp,LOCATION_DECK,0,1,gn,nil) local tgg=Duel.SelectMatchingCard(tp,c65072026.costfil,tp,LOCATION_DECK,0,1,gn,nil)
Duel.SendtoGrave(tgg,REASON_COST) Duel.SendtoGrave(tgg,REASON_COST)
......
expansions/script/c65072027.lua
View file @ b014d383
...@@ -17,6 +17,7 @@ function c65072027.costfil(c) ...@@ -17,6 +17,7 @@ function c65072027.costfil(c)
end end
function c65072027.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c65072027.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65072027.costfil,tp,LOCATION_DECK,0,1,nil) and Duel.GetMZoneCount(tp)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end if chk==0 then return Duel.IsExistingMatchingCard(c65072027.costfil,tp,LOCATION_DECK,0,1,nil) and Duel.GetMZoneCount(tp)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,65071999,0,0x4011,2100,2100,6,RACE_FAIRY,ATTRIBUTE_LIGHT,POS_FACEUP) end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072027,0))
local num1=Duel.GetMatchingGroup(c65072027.costfil,tp,LOCATION_DECK,0,nil):GetClassCount(Card.GetCode) local num1=Duel.GetMatchingGroup(c65072027.costfil,tp,LOCATION_DECK,0,nil):GetClassCount(Card.GetCode)
local num2=Duel.GetMZoneCount(tp) local num2=Duel.GetMZoneCount(tp)
if num1>num2 then num1=num2 end if num1>num2 then num1=num2 end
...@@ -28,7 +29,6 @@ function c65072027.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -28,7 +29,6 @@ function c65072027.cost(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c65072027.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072027.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072027,0))
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
...@@ -58,4 +58,4 @@ function c65072027.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -58,4 +58,4 @@ function c65072027.activate(e,tp,eg,ep,ev,re,r,rp)
end end
function c65072027.splimit(e,c) function c65072027.splimit(e,c)
return not c:IsCode(65071999) return not c:IsCode(65071999)
end end
\ No newline at end of file
expansions/script/c65072028.lua
View file @ b014d383
...@@ -32,7 +32,7 @@ function c65072028.initial_effect(c) ...@@ -32,7 +32,7 @@ function c65072028.initial_effect(c)
end end
function c65072028.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072028.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072028,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072028,0))
end end
function c65072028.distg(e,c) function c65072028.distg(e,c)
local ec=e:GetHandler() local ec=e:GetHandler()
...@@ -91,7 +91,15 @@ function c65072028.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -91,7 +91,15 @@ function c65072028.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072028.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072028.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072028.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072028.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65072028.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end end
expansions/script/c65072029.lua
View file @ b014d383
...@@ -32,7 +32,7 @@ function c65072029.initial_effect(c) ...@@ -32,7 +32,7 @@ function c65072029.initial_effect(c)
end end
function c65072029.music(e,tp,eg,ep,ev,re,r,rp,chk) function c65072029.music(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(21,0,aux.Stringid(65072029,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072029,0))
end end
function c65072029.val(e,te) function c65072029.val(e,te)
return te:GetOwnerPlayer()==e:GetHandlerPlayer() and te:GetOwner()~=e:GetOwner() return te:GetOwnerPlayer()==e:GetHandlerPlayer() and te:GetOwner()~=e:GetOwner()
...@@ -84,7 +84,16 @@ function c65072029.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -84,7 +84,16 @@ function c65072029.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
end end
function c65072029.tgopfil(c)
return c:IsReleasableByEffect() and c:IsCode(65071999)
end
function c65072029.tgop(e,tp,eg,ep,ev,re,r,rp) function c65072029.tgop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) if Duel.IsExistingMatchingCard(c65072029.tgopfil,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65072029.tgopfil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Release(g,REASON_EFFECT)
else
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
end
end end
expansions/script/c65072030.lua
View file @ b014d383
...@@ -21,6 +21,7 @@ function c65072030.thfil(c) ...@@ -21,6 +21,7 @@ function c65072030.thfil(c)
end end
function c65072030.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65072030.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65072030.thfil,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c65072030.thfil,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65072030,0))
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
end end
function c65072030.operation(e,tp,eg,ep,ev,re,r,rp) function c65072030.operation(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c82206025.lua
View file @ b014d383
...@@ -8,8 +8,10 @@ function cm.initial_effect(c) ...@@ -8,8 +8,10 @@ function cm.initial_effect(c)
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetDescription(aux.Stringid(m,0)) e0:SetDescription(aux.Stringid(m,0))
e0:SetCategory(CATEGORY_DESTROY+CATEGORY_SEARCH+CATEGORY_TOHAND) e0:SetCategory(CATEGORY_DESTROY+CATEGORY_SEARCH+CATEGORY_TOHAND)
e0:SetType(EFFECT_TYPE_IGNITION) e0:SetType(EFFECT_TYPE_IGNITION)
e0:SetRange(LOCATION_PZONE) e0:SetCountLimit(1,82226025)
e0:SetRange(LOCATION_PZONE)
e0:SetCondition(cm.thcon)
e0:SetTarget(cm.thtg) e0:SetTarget(cm.thtg)
e0:SetOperation(cm.thop) e0:SetOperation(cm.thop)
c:RegisterEffect(e0) c:RegisterEffect(e0)
...@@ -38,6 +40,9 @@ function cm.initial_effect(c) ...@@ -38,6 +40,9 @@ function cm.initial_effect(c)
e2:SetOperation(cm.thop2) e2:SetOperation(cm.thop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_PZONE,0,1,e:GetHandler(),0x129d)
end
function cm.thfilter(c) function cm.thfilter(c)
return c:IsSetCard(0x129d) and c:IsAbleToHand() and c:IsAttackBelow(1437) return c:IsSetCard(0x129d) and c:IsAbleToHand() and c:IsAttackBelow(1437)
end 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