Skip to content

Y
ygopro-222DIY-cards
Commit fc064ea2 authored by Tachibana's avatar Tachibana
Browse files
Options

得得得得得

parent f760b859
Hide whitespace changes
Inline Side-by-side
Showing with 42 additions and 33 deletions
expansions/222DIY.cdb
View file @ fc064ea2
No preview for this file type
expansions/script/c10070007.lua
View file @ fc064ea2
...@@ -20,7 +20,7 @@ function cm.initial_effect(c) ...@@ -20,7 +20,7 @@ function cm.initial_effect(c)
e1:SetCategory(CATEGORY_REMOVE) e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,m) e1:SetCountLimit(1,m)
e1:SetTarget(cm.rmtg) e1:SetTarget(cm.rmtg)
e1:SetOperation(cm.rmop) e1:SetOperation(cm.rmop)
......
expansions/script/c12026040.lua
View file @ fc064ea2
...@@ -3,7 +3,7 @@ local m=12026040 ...@@ -3,7 +3,7 @@ local m=12026040
local cm=_G["c"..m] local cm=_G["c"..m]
Duel.LoadScript("c12000000.lua") Duel.LoadScript("c12000000.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
-- c:EnableReviveLimit() -- c:EnableReviveLimit()
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE) c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE)
--change scale --change scale
...@@ -35,11 +35,11 @@ function cm.initial_effect(c) ...@@ -35,11 +35,11 @@ function cm.initial_effect(c)
e3:SetOperation(cm.thop) e3:SetOperation(cm.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon condition --spsummon condition
-- local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
-- e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
-- e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-- e2:SetCode(EFFECT_SPSUMMON_CONDITION) e2:SetCode(EFFECT_SPSUMMON_CONDITION)
-- c:RegisterEffect(e2) c:RegisterEffect(e2)
--special summon --special summon
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
......
expansions/script/c16104417.lua
View file @ fc064ea2
...@@ -60,8 +60,8 @@ function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,8 +60,8 @@ function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
g3:Merge(g) g3:Merge(g)
end end
if g1:GetCount()>0 then if sg:GetCount()>0 then
g3:Merge(g1) g3:Merge(sg)
end end
if g3:GetCount()>0 then if g3:GetCount()>0 then
Duel.Overlay(c,g3) Duel.Overlay(c,g3)
......
expansions/script/c16104424.lua
View file @ fc064ea2
...@@ -47,6 +47,7 @@ function cm.initial_effect(c) ...@@ -47,6 +47,7 @@ function cm.initial_effect(c)
e5:SetType(EFFECT_TYPE_QUICK_O) e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e5:SetCode(EVENT_FREE_CHAIN) e5:SetCode(EVENT_FREE_CHAIN)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
e5:SetCountLimit(1) e5:SetCountLimit(1)
e5:SetTarget(cm.rltg) e5:SetTarget(cm.rltg)
e5:SetOperation(cm.rlop) e5:SetOperation(cm.rlop)
...@@ -110,11 +111,16 @@ function cm.seop(e,tp) ...@@ -110,11 +111,16 @@ function cm.seop(e,tp)
local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
function cm.rlcheck(c,tp)
local sg=c:GetColumnGroup()
sg:AddCard(c)
return sg:IsExists(function(c,tp) return c:IsReleasable() and c:IsControler(tp) end ,1,nil,tp)
end
function cm.rltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.rltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return cm.rlcheck(chkc,1-tp) end if chkc then return cm.rlcheck(chkc,1-tp) and c:IsLocation(LOCATION_ONFIELD) end
if chk==0 then return Duel.IsExistingTarget(cm.rlcheck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(cm.rlcheck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local rg=Duel.SelectTarget(tp,cm.rlcheck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) local rg=Duel.SelectTarget(tp,cm.rlcheck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,tp)
local sg=rg:GetFirst():GetColumnGroup() local sg=rg:GetFirst():GetColumnGroup()
if rg:GetFirst():IsControler(1-tp) then if rg:GetFirst():IsControler(1-tp) then
sg:Merge(rg) sg:Merge(rg)
......
expansions/script/c33200737.lua
View file @ fc064ea2
...@@ -86,21 +86,21 @@ function c33200737.rmop(e,tp,eg,ep,ev,re,r,rp) ...@@ -86,21 +86,21 @@ function c33200737.rmop(e,tp,eg,ep,ev,re,r,rp)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetCode(EFFECT_DISABLE_EFFECT) e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET) e2:SetValue(RESET_TURN_SET)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e2) tc:RegisterEffect(e2)
if tc:IsType(TYPE_TRAPMONSTER) then if tc:IsType(TYPE_TRAPMONSTER) then
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EFFECT_DISABLE_TRAPMONSTER) e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e3:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
end end
end end
......
expansions/script/c33200742.lua
View file @ fc064ea2
...@@ -81,7 +81,7 @@ function c33200742.ccon(e,tp,eg,ep,ev,re,r,rp) ...@@ -81,7 +81,7 @@ function c33200742.ccon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) and e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) and e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end end
function c33200742.spfilter(c,e,tp) function c33200742.spfilter(c,e,tp)
return c:IsSetCard(0xc32a) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0xc32a) and not c:IsCode(33200742) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c33200742.ctg(e,tp,eg,ep,ev,re,r,rp,chk) function c33200742.ctg(e,tp,eg,ep,ev,re,r,rp,chk)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c33200742.spfilter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c33200742.spfilter(chkc,e,tp) end
......
expansions/script/c39101046.lua
View file @ fc064ea2
...@@ -17,6 +17,7 @@ function cm.initial_effect(c) ...@@ -17,6 +17,7 @@ function cm.initial_effect(c)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetCode(EVENT_FREE_CHAIN) e2:SetCode(EVENT_FREE_CHAIN)
e2:SetCondition(1,m)
e2:SetCost(cm.pcost) e2:SetCost(cm.pcost)
e2:SetTarget(cm.settg) e2:SetTarget(cm.settg)
e2:SetOperation(cm.setop) e2:SetOperation(cm.setop)
......
expansions/script/c64831002.lua
View file @ fc064ea2
...@@ -7,7 +7,6 @@ function c64831002.initial_effect(c) ...@@ -7,7 +7,6 @@ function c64831002.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BE_MATERIAL) e1:SetCode(EVENT_BE_MATERIAL)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,64831009)
e1:SetCondition(c64831002.drcon) e1:SetCondition(c64831002.drcon)
e1:SetTarget(c64831002.drtg) e1:SetTarget(c64831002.drtg)
e1:SetOperation(c64831002.drop) e1:SetOperation(c64831002.drop)
...@@ -45,14 +44,14 @@ function c64831002.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -45,14 +44,14 @@ function c64831002.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
end end
function c64831002.tg(e,tp,eg,ep,ev,re,r,rp,chk) function c64831002.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 end if chk==0 then return Duel.GetMZoneCount(tp)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c64831002.synfil2(c,e,tp,lv) function c64831002.synfil2(c,e,tp,lv)
return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and c:IsSetCard(0x5410) and c:IsType(TYPE_SYNCHRO) and c:IsLevel(lv) return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and c:IsSetCard(0x5410) and c:IsType(TYPE_SYNCHRO) and c:IsLevel(lv)
end end
function c64831002.op(e,tp,eg,ep,ev,re,r,rp) function c64831002.op(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCountFromEx(tp)<=0 then return end if Duel.GetMZoneCount(tp)<=0 then return end
local lv=e:GetLabel() local lv=e:GetLabel()
local g=Duel.SelectMatchingCard(tp,c64831002.synfil2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv) local g=Duel.SelectMatchingCard(tp,c64831002.synfil2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv)
if g:GetCount()>0 then if g:GetCount()>0 then
......
expansions/script/c65060032.lua
View file @ fc064ea2
...@@ -57,7 +57,7 @@ end ...@@ -57,7 +57,7 @@ end
function c65060032.operation(e,tp,eg,ep,ev,re,r,rp) function c65060032.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject() local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060032.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060032.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,ce)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,ce) Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060033.lua
View file @ fc064ea2
...@@ -55,7 +55,7 @@ end ...@@ -55,7 +55,7 @@ end
function c65060033.operation(e,tp,eg,ep,ev,re,r,rp) function c65060033.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject() local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060033.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060033.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,ce)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,ce) Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060034.lua
View file @ fc064ea2
...@@ -57,7 +57,7 @@ end ...@@ -57,7 +57,7 @@ end
function c65060034.operation(e,tp,eg,ep,ev,re,r,rp) function c65060034.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject() local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060034.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060034.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,ce)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,ce) Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060035.lua
View file @ fc064ea2
...@@ -60,7 +60,7 @@ end ...@@ -60,7 +60,7 @@ end
function c65060035.operation(e,tp,eg,ep,ev,re,r,rp) function c65060035.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject() local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060035.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060035.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,ce)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,ce) Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060036.lua
View file @ fc064ea2
...@@ -56,7 +56,7 @@ end ...@@ -56,7 +56,7 @@ end
function c65060036.operation(e,tp,eg,ep,ev,re,r,rp) function c65060036.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject() local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060036.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060036.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,ce)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,ce) Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060037.lua
View file @ fc064ea2
...@@ -57,7 +57,7 @@ end ...@@ -57,7 +57,7 @@ end
function c65060037.operation(e,tp,eg,ep,ev,re,r,rp) function c65060037.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject() local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060037.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060037.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,ce)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,ce) Duel.Summon(tp,tc,true,ce)
......
expansions/script/c71400009.lua
View file @ fc064ea2
...@@ -65,11 +65,13 @@ function c71400009.filter2(c,tp) ...@@ -65,11 +65,13 @@ function c71400009.filter2(c,tp)
return c:IsSetCard(0xb714) and c:IsType(TYPE_FIELD) and c:CheckUniqueOnField(tp) and not c:IsForbidden() return c:IsSetCard(0xb714) and c:IsType(TYPE_FIELD) and c:CheckUniqueOnField(tp) and not c:IsForbidden()
end end
function c71400009.tg2(e,tp,eg,ep,ev,re,r,rp,chk) function c71400009.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c71400009.filter2,tp,LOCATION_OVERLAY,0,1,nil,tp) end local g=Duel.GetOverlayGroup(tp,0,1)
if chk==0 then return g:IsExists(c71400009.filter2,1,nil,tp) end
end end
function c71400009.op2(e,tp,eg,ep,ev,re,r,rp) function c71400009.op2(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetOverlayGroup(tp,0,1)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(71400001,3)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(71400001,3))
local g1=Duel.SelectMatchingCard(tp,c71400009.filter2,tp,LOCATION_OVERLAY,0,1,1,nil,tp) local g1=g:FilterSelect(tp,c71400009.filter2,1,1,nil,tp)
local tc1=g1:GetFirst() local tc1=g1:GetFirst()
if not tc1 then return end if not tc1 then return end
Duel.MoveToField(tc1,tp,tp,LOCATION_FZONE,POS_FACEUP,true) Duel.MoveToField(tc1,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
......
expansions/script/c71400035.lua
View file @ fc064ea2
...@@ -53,7 +53,7 @@ end ...@@ -53,7 +53,7 @@ end
function c71400035.op1(e,tp,eg,ep,ev,re,r,rp) function c71400035.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
yume.ActivateYumeField(e,tp,0,0,LOCATION_DECK+LOCATION_REMOVED) yume.ActivateYumeField(e,tp,0,0,LOCATION_DECK+LOCATION_REMOVED)
if Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0) then if Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0) and c:IsLocation(LOCATION_SZONE) then
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)
...@@ -117,7 +117,7 @@ function c71400035.op1a(e,tp,eg,ep,ev,re,r,rp) ...@@ -117,7 +117,7 @@ function c71400035.op1a(e,tp,eg,ep,ev,re,r,rp)
local ec=re:GetHandler() local ec=re:GetHandler()
local loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE) local loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE)
seq=aux.MZoneSequence(seq) seq=aux.MZoneSequence(seq)
if ((rp==tp and seq==tseq) or (rp==1-tp and seq==4-tseq)) and (not ec:IsSetCard(0x714) and (ec:IsLocation(loc) or loc&LOCATION_ONFIELD==0) or not (ec:IsPreviousSetCard(0x714) or ec:IsLocation(loc)) and loc&LOCATION_ONFIELD~=0) then if loc&LOCATION_ONFIELD~=0 and ((rp==tp and seq==tseq) or (rp==1-tp and seq==4-tseq)) and (not ec:IsSetCard(0x714) and ec:IsLocation(loc) or not (ec:IsPreviousSetCard(0x714) or ec:IsLocation(loc))) then
Duel.NegateEffect(ev) Duel.NegateEffect(ev)
end end
end end
......
expansions/script/c71400054.lua
View file @ fc064ea2
...@@ -80,7 +80,7 @@ function c71400054.filter3(c) ...@@ -80,7 +80,7 @@ function c71400054.filter3(c)
return c:IsSetCard(0x714) and c:IsAbleToDeck() return c:IsSetCard(0x714) and c:IsAbleToDeck()
end end
function c71400054.tg3(e,tp,eg,ep,ev,re,r,rp,chk) function c71400054.tg3(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return Duel.IsExistingMatchingCard(71400054.filter3,tp,LOCATION_REMOVED,0,1,nil) end
local g=Duel.GetMatchingGroup(c71400054.filter3,tp,LOCATION_REMOVED,0,nil) local g=Duel.GetMatchingGroup(c71400054.filter3,tp,LOCATION_REMOVED,0,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,LOCATION_REMOVED) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,LOCATION_REMOVED)
end end
......
expansions/script/c71400058.lua
View file @ fc064ea2
...@@ -35,9 +35,9 @@ function c71400058.filterc1(c) ...@@ -35,9 +35,9 @@ function c71400058.filterc1(c)
return c:IsSetCard(0xb714) and c:IsType(TYPE_FIELD) and c:IsAbleToGraveAsCost() return c:IsSetCard(0xb714) and c:IsType(TYPE_FIELD) and c:IsAbleToGraveAsCost()
end end
function c71400058.cost1(e,tp,eg,ep,ev,re,r,rp,chk) function c71400058.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c71400058.filter1c,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c71400058.filterc1,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c71400058.filter1c,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c71400058.filterc1,tp,LOCATION_DECK,0,1,1,nil)
Duel.SendtoGrave(g,REASON_COST) Duel.SendtoGrave(g,REASON_COST)
end end
function c71400058.filter1(c) function c71400058.filter1(c)
......
expansions/script/c71400060.lua
View file @ fc064ea2
...@@ -22,6 +22,7 @@ function c71400060.initial_effect(c) ...@@ -22,6 +22,7 @@ function c71400060.initial_effect(c)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(71400060,0)) e2:SetDescription(aux.Stringid(71400060,0))
e2:SetCountLimit(1,71400060)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE+CATEGORY_GRAVE_SPSUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE+CATEGORY_GRAVE_SPSUMMON)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
...@@ -44,7 +45,7 @@ function c71400060.con2(e,tp,eg,ep,ev,re,r,rp) ...@@ -44,7 +45,7 @@ function c71400060.con2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp return Duel.GetTurnPlayer()~=tp
end end
function c71400060.filterc2(c) function c71400060.filterc2(c)
return c:IsReleasable() or c:IsLocation(LOCATION_HAND) and c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsSetCard(0xe714) and (c:IsReleasable() or c:IsLocation(LOCATION_HAND) and c:IsType(TYPE_SPELL+TYPE_TRAP))
end end
function c71400060.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function c71400060.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.IsExistingMatchingCard(c71400060.filterc2,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) end if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.IsExistingMatchingCard(c71400060.filterc2,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) 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