Skip to content

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

+1

parent b1b0c2a1
Hide whitespace changes
Inline Side-by-side
Showing with 68 additions and 45 deletions
expansions/222DIY.cdb
View file @ ffab16a5
No preview for this file type
expansions/script/c12008023.lua
View file @ ffab16a5
......@@ -34,7 +34,7 @@ function c12008023.initial_effect(c)
c:RegisterEffect(e2)
end
function c12008023.thfilter2(c)
return c:IsSetCard(0x1fb3) and c:IsAbleToHand()
return c:IsSetCard(0x1fb3) and c:IsRace(RACE_SEASERPENT) and c:IsAbleToHand()
end
function c12008023.sptg(e,tp,eg,ep,ev,re,r,rp,chk,mg)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil) and Duel.IsExistingMatchingCard(c12008023.thfilter2,tp,LOCATION_DECK,0,1,nil) end
......
expansions/script/c12059001.lua
View file @ ffab16a5
......@@ -41,8 +41,11 @@ function cm.indop(e,tp,eg,ep,ev,re,r,rp)
e2:SetTarget(aux.TargetBoolFunction(Card.IsSummonType,SUMMON_TYPE_XYZ))
rc:RegisterEffect(e2,true)
end
function cm.filter(c)
return not c:IsLevel(4)
end
function cm.hspcon(e,c)
if c==nil then return true end
return not Duel.IsExistingMatchingCard(Card.IsLevel,tp,LOCATION_MZONE,0,1,1,nil,4)
return not Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,0,1,1,nil) and Duel.IsExistingMatchingCard(Card.IsLevel,tp,LOCATION_MZONE,0,1,1,nil,4)
and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
end
\ No newline at end of file
expansions/script/c16100002.lua
View file @ ffab16a5
......@@ -24,12 +24,11 @@ function c16100002.initial_effect(c)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(16100002,1))
e4:SetCategory(CATEGORY_TOHAND)
e4:SetType(EFFECT_TYPE_TRIGGER_O)
e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_CHAINING)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetCondition(c16100002.chcon)
e4:SetTarget(c16100002.chtg)
e4:SetCost(c16100002.cost)
e4:SetOperation(c16100002.chop)
c:RegisterEffect(e4)
......@@ -67,8 +66,8 @@ function c16100002.op(e,tp,eg,ep,ev,re,r,rp)
end
end
--
function c16100002.chcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c16100002.thf,1-ep,LOCATION_DECK+LOCATION_HAND,0,1,nil)
function c16100002.chtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,rp,LOCATION_DECK+LOCATION_HAND,0,1,nil) end
end
--
function c16100002.cost(e,tp,eg,ep,ev,re,r,rp,chk)
......
expansions/script/c16100007.lua
View file @ ffab16a5
......@@ -5,7 +5,7 @@ function cm.initial_effect(c)
c:EnableCounterPermit(0xccf)
--Cannot to grave
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringm(m,0))
e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
......@@ -16,7 +16,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e1)
--Recover
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringm(m,1))
e2:SetDescription(aux.Stringid(m,1))
e2:SetCategory(CATEGORY_RECOVER)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_TO_GRAVE)
......
expansions/script/c16100008.lua
View file @ ffab16a5
......@@ -54,11 +54,13 @@ function cm.initial_effect(c)
e5:SetType(EFFECT_TYPE_IGNITION)
e5:SetRange(LOCATION_FZONE)
e5:SetCategory(CATEGORY_LVCHANGE)
e5:SetCountLimit(2)
e5:SetTarget(cm.lvtg)
e5:SetOperation(cm.lvop)
c:RegisterEffect(e5)
end
function cm.lvtg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local tt=c:GetCounter(0xccf)
if chk==0 then return Duel.IsExistingTarget(Card.IsLevelAbove,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,1) and tt>0 end
local t={}
......
expansions/script/c16100009.lua
View file @ ffab16a5
......@@ -5,7 +5,7 @@ function cm.initial_effect(c)
c:EnableCounterPermit(0xccf)
--ac or sp
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringm(m,0))
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetProperty(EFFECT_FLAG_DELAY)
......@@ -16,7 +16,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringm(m,1))
e2:SetDescription(aux.Stringid(m,1))
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_RECOVER)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_TO_GRAVE)
......
expansions/script/c16100013.lua
View file @ ffab16a5
......@@ -15,7 +15,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringm(m,0))
e2:SetDescription(aux.Stringid(m,0))
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_RECOVER)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_TO_GRAVE)
......
expansions/script/c16100021.lua
View file @ ffab16a5
local m=16100021
local cm=_G["c"..m]
function cm.initial_effect(c)
c:SetUniqueOnField(1,1,m)
c:EnableCounterPermit(0xccf)
--coin
aux.AddFusionProcFunRep(c,cm.fusfilter,2,true)
--
local e0=Effect.CreateEffect(c)
e0:SetCategory(CATEGORY_DESTROY)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetTarget(cm.destg)
e0:SetOperation(cm.desop)
c:RegisterEffect(e0)
--special summon condition
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......@@ -32,30 +41,40 @@ function cm.initial_effect(c)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
c:RegisterEffect(e3)
--
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_TOHAND)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_FREE_CHAIN)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetDescription(aux.Stringid(m,1))
e4:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
local e5=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_TOHAND)
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetCode(EVENT_FREE_CHAIN)
e5:SetRange(LOCATION_MZONE)
e5:SetCountLimit(1)
e5:SetDescription(aux.Stringid(m,1))
e5:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,0,LOCATION_HAND,1,nil) end
local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,0,LOCATION_HAND,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
end)
e4:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
e5:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
if #g==0 then return end
Duel.ConfirmCards(tp,g)
if not g:IsExists(cm.thfilter,2,nil) then return end
if not g:IsExists(cm.thfilter,2,nil) then Duel.ShuffleHand(1-tp) return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,tp,REASON_EFFECT)
Duel.ShuffleHand(1-tp)
end)
c:RegisterEffect(e1)
c:RegisterEffect(e5)
end
--
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0,nil)
end
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.Destroy(g,REASON_EFFECT)
end
function cm.thfilter(c)
return c:IsSetCard(0xcc0)
end
......
expansions/script/c16101149.lua
View file @ ffab16a5
......@@ -43,7 +43,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
end
function cm.tgfilter(c)
return c:IsAttackBelow(1700) and c:IsRace(RACE_WINDBEAST) and c:IsAbleToGrave()
return c:IsAttackAbove(1700) and c:IsRace(RACE_WINDBEAST) and c:IsAbleToGrave()
end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_DECK,0,1,nil) end
......
expansions/script/c33500611.lua
View file @ ffab16a5
......@@ -61,34 +61,34 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then
local sc=g:GetFirst()
while sc do
local e0=Effect.CreateEffect(c)
local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_PUBLIC)
e0:SetReset(RESET_PHASE+PHASE_END,1)
sc:RegisterEffect(e0)
-- local e1=Effect.CreateEffect(e:GetHandler())
-- e1:SetType(EFFECT_TYPE_SINGLE)
-- e1:SetCode(EFFECT_CANNOT_TRIGGER)
-- e1:SetReset(RESET_PHASE+PHASE_END,1)
-- sc:RegisterEffect(e1)
-- sc:RegisterFlagEffect(0,RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
-- local e5=Effect.CreateEffect(e:GetHandler())
-- e5:SetType(EFFECT_TYPE_FIELD)
-- e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-- e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-- e5:SetTargetRange(1,1)
-- e5:SetLabelObject(sc)
-- e5:SetTarget(cm.distg)
-- e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-- Duel.RegisterEffect(e5,tp)
-- local e6=e5:Clone()
-- e6:SetCode(EFFECT_CANNOT_SUMMON)
-- Duel.RegisterEffect(e6,tp)
-- local e1=Effect.CreateEffect(e:GetHandler())
-- e1:SetType(EFFECT_TYPE_SINGLE)
-- e1:SetCode(EFFECT_CANNOT_TRIGGER)
-- e1:SetReset(RESET_PHASE+PHASE_END,1)
-- sc:RegisterEffect(e1)
-- sc:RegisterFlagEffect(0,RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
-- local e5=Effect.CreateEffect(e:GetHandler())
-- e5:SetType(EFFECT_TYPE_FIELD)
-- e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-- e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-- e5:SetTargetRange(1,1)
-- e5:SetLabelObject(sc)
-- e5:SetTarget(cm.distg)
-- e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-- Duel.RegisterEffect(e5,tp)
-- local e6=e5:Clone()
-- e6:SetCode(EFFECT_CANNOT_SUMMON)
-- Duel.RegisterEffect(e6,tp)
sc=g:GetNext()
end
end
end
--function cm.distg(e,c)
-- local sc=e:GetLabelObject()
-- return c:IsOriginalCodeRule(sc)
-- local sc=e:GetLabelObject()
-- return c:IsOriginalCodeRule(sc)
--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