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)
e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
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:SetTarget(cm.rmtg)
e1:SetOperation(cm.rmop)
......
expansions/script/c12026040.lua
View file @ fc064ea2
......@@ -3,7 +3,7 @@ local m=12026040
local cm=_G["c"..m]
Duel.LoadScript("c12000000.lua")
function cm.initial_effect(c)
-- c:EnableReviveLimit()
-- c:EnableReviveLimit()
aux.EnablePendulumAttribute(c)
c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE)
--change scale
......@@ -35,11 +35,11 @@ function cm.initial_effect(c)
e3:SetOperation(cm.thop)
c:RegisterEffect(e3)
--spsummon condition
-- local e2=Effect.CreateEffect(c)
-- e2:SetType(EFFECT_TYPE_SINGLE)
-- e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-- e2:SetCode(EFFECT_SPSUMMON_CONDITION)
-- c:RegisterEffect(e2)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e2)
--special summon
local e3=Effect.CreateEffect(c)
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)
if g:GetCount()>0 then
g3:Merge(g)
end
if g1:GetCount()>0 then
g3:Merge(g1)
if sg:GetCount()>0 then
g3:Merge(sg)
end
if g3:GetCount()>0 then
Duel.Overlay(c,g3)
......
expansions/script/c16104424.lua
View file @ fc064ea2
......@@ -47,6 +47,7 @@ function cm.initial_effect(c)
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetRange(LOCATION_MZONE)
e5:SetCode(EVENT_FREE_CHAIN)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
e5:SetCountLimit(1)
e5:SetTarget(cm.rltg)
e5:SetOperation(cm.rlop)
......@@ -110,11 +111,16 @@ function cm.seop(e,tp)
local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
Duel.Destroy(g,REASON_EFFECT)
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)
if chkc then return cm.rlcheck(chkc,1-tp) end
if chk==0 then return Duel.IsExistingTarget(cm.rlcheck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) 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,tp) end
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()
if rg:GetFirst():IsControler(1-tp) then
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)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e2)
if tc:IsType(TYPE_TRAPMONSTER) then
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e3:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e3)
end
end
......
expansions/script/c33200742.lua
View file @ fc064ea2
......@@ -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)
end
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
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
......
expansions/script/c39101046.lua
View file @ fc064ea2
......@@ -17,6 +17,7 @@ function cm.initial_effect(c)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_GRAVE)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetCondition(1,m)
e2:SetCost(cm.pcost)
e2:SetTarget(cm.settg)
e2:SetOperation(cm.setop)
......
expansions/script/c64831002.lua
View file @ fc064ea2
......@@ -7,7 +7,6 @@ function c64831002.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BE_MATERIAL)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,64831009)
e1:SetCondition(c64831002.drcon)
e1:SetTarget(c64831002.drtg)
e1:SetOperation(c64831002.drop)
......@@ -45,14 +44,14 @@ function c64831002.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
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)
end
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)
end
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 g=Duel.SelectMatchingCard(tp,c64831002.synfil2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv)
if g:GetCount()>0 then
......
expansions/script/c65060032.lua
View file @ fc064ea2
......@@ -57,7 +57,7 @@ end
function c65060032.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
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()
if tc then
Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060033.lua
View file @ fc064ea2
......@@ -55,7 +55,7 @@ end
function c65060033.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
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()
if tc then
Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060034.lua
View file @ fc064ea2
......@@ -57,7 +57,7 @@ end
function c65060034.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
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()
if tc then
Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060035.lua
View file @ fc064ea2
......@@ -60,7 +60,7 @@ end
function c65060035.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
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()
if tc then
Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060036.lua
View file @ fc064ea2
......@@ -56,7 +56,7 @@ end
function c65060036.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
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()
if tc then
Duel.Summon(tp,tc,true,ce)
......
expansions/script/c65060037.lua
View file @ fc064ea2
......@@ -57,7 +57,7 @@ end
function c65060037.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
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()
if tc then
Duel.Summon(tp,tc,true,ce)
......
expansions/script/c71400009.lua
View file @ fc064ea2
......@@ -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()
end
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
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))
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()
if not tc1 then return end
Duel.MoveToField(tc1,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
......
expansions/script/c71400035.lua
View file @ fc064ea2
......@@ -53,7 +53,7 @@ end
function c71400035.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
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)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_DISABLE)
......@@ -117,7 +117,7 @@ function c71400035.op1a(e,tp,eg,ep,ev,re,r,rp)
local ec=re:GetHandler()
local loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE)
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)
end
end
......
expansions/script/c71400054.lua
View file @ fc064ea2
......@@ -80,7 +80,7 @@ function c71400054.filter3(c)
return c:IsSetCard(0x714) and c:IsAbleToDeck()
end
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)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,LOCATION_REMOVED)
end
......
expansions/script/c71400058.lua
View file @ fc064ea2
......@@ -35,9 +35,9 @@ function c71400058.filterc1(c)
return c:IsSetCard(0xb714) and c:IsType(TYPE_FIELD) and c:IsAbleToGraveAsCost()
end
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)
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)
end
function c71400058.filter1(c)
......
expansions/script/c71400060.lua
View file @ fc064ea2
......@@ -22,6 +22,7 @@ function c71400060.initial_effect(c)
--spsummon
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(71400060,0))
e2:SetCountLimit(1,71400060)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE+CATEGORY_GRAVE_SPSUMMON)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetType(EFFECT_TYPE_QUICK_O)
......@@ -44,7 +45,7 @@ function c71400060.con2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp
end
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
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
......
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