Skip to content

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

eme

parent 84930ed0
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 225 additions and 148 deletions
expansions/script/c4210011.lua
View file @ 12de48d4
......@@ -14,7 +14,7 @@ function c4210011.initial_effect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_HAND)
e2:SetRange(LOCATION_HAND+LOCATION_DECK)
e2:SetValue(SUMMON_TYPE_SPECIAL)
e2:SetCondition(c4210011.spcon)
e2:SetOperation(c4210011.spop)
......@@ -24,7 +24,7 @@ function c4210011.initial_effect(c)
e3:SetDescription(aux.Stringid(4210011,3))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_GRAVE)
e3:SetTarget(c4210011.ottg)
e3:SetOperation(c4210011.otop)
......@@ -60,7 +60,7 @@ function c4210011.otop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterEffect(e1,tp)
if e:GetHandler():IsLocation(LOCATION_GRAVE) then
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
end
end
end
function c4210011.atktg(e,c)
return c:IsSetCard(0xa2f)
......@@ -73,7 +73,7 @@ function c4210011.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
end
function c4210011.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c4210011.tgfilter,tp,LOCATION_GRAVE,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
......
expansions/script/c4210012.lua
View file @ 12de48d4
This diff is collapsed.
expansions/script/c4210013.lua
View file @ 12de48d4
......@@ -14,7 +14,7 @@ function c4210013.initial_effect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_HAND)
e2:SetRange(LOCATION_HAND+LOCATION_DECK)
e2:SetValue(SUMMON_TYPE_SPECIAL)
e2:SetCondition(c4210013.spcon)
e2:SetOperation(c4210013.spop)
......@@ -24,7 +24,7 @@ function c4210013.initial_effect(c)
e3:SetDescription(aux.Stringid(4210013,0))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_GRAVE)
e3:SetTarget(c4210013.ottg)
e3:SetOperation(c4210013.otop)
......@@ -37,7 +37,7 @@ function c4210013.initial_effect(c)
e4:SetRange(LOCATION_MZONE)
e4:SetCode(EVENT_LEAVE_FIELD)
e4:SetCountLimit(1)
e4:SetCondition(function(e) return e:GetHandler():GetFlagEffect(4210013)~=0 end)
e4:SetCondition(function(e) return e:GetHandler():GetFlagEffect(4210013)~=0 end)
e4:SetCost(c4210013.thcost)
e4:SetTarget(c4210013.thtg)
e4:SetOperation(c4210013.thop)
......@@ -78,7 +78,7 @@ function c4210013.otop(e,tp,eg,ep,ev,re,r,rp)
end
if e:GetHandler():IsLocation(LOCATION_GRAVE) then
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
end
end
end
function c4210013.tgfilter(c,e,tp)
return c:IsSetCard(0xa2f) and c:IsAbleToHand()
......@@ -88,7 +88,7 @@ function c4210013.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
end
function c4210013.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c4210013.tgfilter,tp,LOCATION_REMOVED,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
......@@ -151,7 +151,7 @@ end
function c4210013.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c4210013.thfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
if g:GetCount()>0 then
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
......
expansions/script/c4210014.lua
View file @ 12de48d4
......@@ -14,7 +14,7 @@ function c4210014.initial_effect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_HAND)
e2:SetRange(LOCATION_HAND+LOCATION_DECK)
e2:SetValue(SUMMON_TYPE_SPECIAL)
e2:SetCondition(c4210014.spcon)
e2:SetOperation(c4210014.spop)
......@@ -24,7 +24,7 @@ function c4210014.initial_effect(c)
e3:SetDescription(aux.Stringid(4210014,0))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_GRAVE)
e3:SetTarget(c4210014.ottg)
e3:SetOperation(c4210014.otop)
......@@ -77,10 +77,10 @@ function c4210014.otop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterFlagEffect(0,RESET_EVENT+0xd7b0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(4210014,3))
tc:RegisterEffect(e1)
tc=g:GetNext()
end
end
if e:GetHandler():IsLocation(LOCATION_GRAVE) then
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
end
end
end
function c4210014.tgfilter(c,e,tp)
return c:IsSetCard(0xa2f) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......@@ -143,6 +143,6 @@ function c4210014.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Release(g,REASON_COST)
c:RegisterFlagEffect(0,RESET_EVENT+0xcff0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(4210010,1))
c:RegisterFlagEffect(4210010,RESET_EVENT+0xcff0000,0,0)
c:RegisterFlagEffect(0,RESET_EVENT+0xcff0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(4210014,1))
c:RegisterFlagEffect(0,RESET_EVENT+0xcff0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(4210014,1))
c:RegisterFlagEffect(4210014,RESET_EVENT+0xcff0000,0,0)
end
\ No newline at end of file
expansions/script/c4210015.lua
View file @ 12de48d4
......@@ -14,7 +14,7 @@ function c4210015.initial_effect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_HAND)
e2:SetRange(LOCATION_HAND+LOCATION_DECK)
e2:SetValue(SUMMON_TYPE_SPECIAL)
e2:SetCondition(c4210015.spcon)
e2:SetOperation(c4210015.spop)
......@@ -25,7 +25,7 @@ function c4210015.initial_effect(c)
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_RELEASE)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_GRAVE)
e3:SetCondition(c4210015.otcon)
e3:SetTarget(c4210015.ottg)
......@@ -62,7 +62,7 @@ function c4210015.otop(e,tp,eg,ep,ev,re,r,rp)
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_EFFECT+REASON_DISCARD,nil)
if e:GetHandler():IsLocation(LOCATION_GRAVE) then
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
end
end
end
end
function c4210015.splimit(e,se,sp,st)
......
expansions/script/c65030041.lua
View file @ 12de48d4
......@@ -35,7 +35,7 @@ function c65030041.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmCards(1-tp,g)
end
end
function c65030041.filter2(c)
function c65030041.filter2(c,tp)
local at=c:GetAttribute()
local lv=c:GetLevel()
if c:IsType(TYPE_XYZ) then lv=c:GetRank() end
......@@ -47,10 +47,10 @@ function c65030041.spfilter(c,at,lv)
end
function c65030041.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:GetControler()~=tp and c65030041.filter2(chkc) end
if chk==0 then return Duel.IsExistingTarget(c65030041.filter2,tp,0,LOCATION_MZONE,1,nil) end
if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:GetControler()~=tp and c65030041.filter2(chkc,tp) end
if chk==0 then return Duel.IsExistingTarget(c65030041.filter2,tp,0,LOCATION_MZONE,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
local g=Duel.SelectTarget(tp,c65030041.filter2,tp,0,LOCATION_MZONE,1,1,nil)
local g=Duel.SelectTarget(tp,c65030041.filter2,tp,0,LOCATION_MZONE,1,1,nil,tp)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK)
end
......
expansions/script/c65030099.lua 0 → 100644
View file @ 12de48d4
--二向镜色 空蓝之后
function c65030099.initial_effect(c)
--xyzlimit
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
e0:SetValue(1)
c:RegisterEffect(e0)
--draw
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_MZONE)
e1:SetTarget(c65030099.tg)
e1:SetOperation(c65030099.op)
c:RegisterEffect(e1)
--spsummon
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,65030099)
e2:SetTarget(c65030099.sptg)
e2:SetOperation(c65030099.spop)
c:RegisterEffect(e2)
end
function c65030099.tgfil(c,tp)
return c:IsSetCard(0x6da9) and c:IsAbleToHand() and c:IsFaceup() and Duel.GetMZoneCount(tp,c)>0
end
function c65030099.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return c65030099.tgfil(chkc,tp) and chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) end
if chk==0 then return Duel.IsExistingTarget(c65030099.tgfil,tp,LOCATION_MZONE,0,1,nil,tp) and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
local g=Duel.SelectTarget(tp,c65030099.tgfil,tp,LOCATION_MZONE,0,1,1,nil,tp)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c65030099.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
if Duel.SendtoHand(tc,nil,REASON_EFFECT)~=0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetMZoneCount(tp)>0 and e:GetHandler():IsRelateToEffect(e) then
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
end
end
end
function c65030099.tdfil(c)
return c:IsSetCard(0x6da9) and c:IsAbleToGrave() and c:GetLevel()>0
end
function c65030099.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsFaceup() and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(c65030099.tdfil,tp,LOCATION_HAND,0,1,nil) end
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
end
function c65030099.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
local c=e:GetHandler()
if tc:IsRelateToEffect(e) and tc:IsFaceup() and Duel.IsExistingMatchingCard(c65030099.tdfil,tp,LOCATION_HAND,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c65030099.tdfil,tp,LOCATION_HAND,0,1,1,nil)
Duel.HintSelection(g)
local gc=g:GetFirst()
local lv=gc:GetLevel()
if Duel.SendtoGrave(g,REASON_EFFECT)~=0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CHANGE_LEVEL)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(lv)
tc:RegisterEffect(e1)
end
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