Skip to content

Y
ygopro-222DIY-cards
Commit ef704426 authored by 聖園ミカ's avatar 聖園ミカ 🐟
Browse files
Options

byd

parent 1325d5ee
Hide whitespace changes
Inline Side-by-side
Showing with 69 additions and 68 deletions
expansions/script/c35100413.lua
View file @ ef704426
......@@ -10,7 +10,7 @@ function c35100413.initial_effect(c)
e1:SetTarget(c35100413.sptg)
e1:SetOperation(c35100413.spop)
c:RegisterEffect(e1)
--negate
--negate
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(35100413,1))
e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
......@@ -20,11 +20,11 @@ function c35100413.initial_effect(c)
e2:SetRange(LOCATION_HAND)
e2:SetCountLimit(1,35100413)
e2:SetCondition(c35100413.discon)
e2:SetCost(c35100413.discost)
e2:SetCost(c35100413.discost)
e2:SetTarget(c35100413.distg)
e2:SetOperation(c35100413.disop)
c:RegisterEffect(e2)
--to hand(self)
--to hand(self)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(35100413,2))
e3:SetCategory(CATEGORY_TOHAND)
......@@ -37,8 +37,8 @@ function c35100413.initial_effect(c)
e3:SetTarget(c35100413.thtg2)
e3:SetOperation(c35100413.thop2)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetRange(LOCATION_GRAVE)
local e4=e3:Clone()
e4:SetRange(LOCATION_GRAVE)
end
function c35100413.rmfilter(c)
return c:IsSetCard(0x1a94) and c:IsAbleToRemove()
......@@ -51,7 +51,7 @@ function c35100413.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
and (Duel.IsExistingMatchingCard(c35100413.rmfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,c)
or Duel.IsExistingMatchingCard(c35100413.cfilter1,tp,LOCATION_ONFIELD,0,1,nil)) end
or Duel.IsExistingMatchingCard(c35100413.cfilter1,tp,LOCATION_ONFIELD,0,1,nil)) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
if not Duel.IsExistingMatchingCard(c35100413.cfilter1,tp,LOCATION_ONFIELD,0,1,nil) then
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE) end
......@@ -66,25 +66,25 @@ function c35100413.spop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c35100413.rmfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
if #g>0 then
Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
end
end
end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(500)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
--indes
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_NO_TURN_RESET)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e2:SetCountLimit(1)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(c35100413.valcon)
c:RegisterEffect(e2)
end
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(500)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
--indes
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_NO_TURN_RESET)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e2:SetCountLimit(1)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(c35100413.valcon)
c:RegisterEffect(e2)
end
end
function c35100413.valcon(e,re,r,rp)
return bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0
......@@ -94,7 +94,7 @@ function c35100413.disfilter(c)
end
function c35100413.discon(e,tp,eg,ep,ev,re,r,rp)
return rp~=tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
and Duel.IsExistingMatchingCard(c35100413.disfilter,tp,LOCATION_ONFIELD,0,1,nil)
and Duel.IsExistingMatchingCard(c35100413.disfilter,tp,LOCATION_ONFIELD,0,1,nil)
end
function c35100413.discost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
......@@ -111,24 +111,24 @@ end
function c35100413.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(-500)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetValue(500)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(-500)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetValue(500)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
end
end
function c35100413.thcon2(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsCode(35100401) or aux.IsCodeListed(re,35100401)
return re:GetHandler():IsCode(35100401) or aux.IsCodeListed(re:GetHandler(),35100401)
end
function c35100413.thtg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToHand() end
......
expansions/script/c35100424.lua
View file @ ef704426
......@@ -100,16 +100,17 @@ function c35100424.ovltgfilter(c)
return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsSetCard(0x1a94) and c:IsAbleToRemoveAsCost()
end
function c35100424.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return (e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)
or Duel.IsExistingMatchingCard(c35100424.ovltgfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,2,nil)) end
local result=Duel.SelectOption(tp,aux.Stringid(35100424,2),aux.Stringid(35100424,3))
if result==0 then
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,c35100424.ovltgfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,2,2,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
local b1=e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)
local b2=Duel.IsExistingMatchingCard(c35100424.ovltgfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,2,nil))
if chk==0 then return b1 or b2 end
local op=aux.SelectFromOptions(tp,{b1,aux.Stringid(35100424,2)},{b2,aux.Stringid(35100424,3)})
if op==1 then
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
elseif op==2 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,c35100424.ovltgfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,2,2,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
end
function c35100424.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
expansions/script/c35100434.lua
View file @ ef704426
--遮蒙时耀的阴霾牢笼
function c35100434.initial_effect(c)
--Activate
--Activate
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
e0:SetCode(EVENT_FREE_CHAIN)
......@@ -12,12 +12,12 @@ function c35100434.initial_effect(c)
e1:SetRange(LOCATION_SZONE)
e1:SetCode(EFFECT_TO_HAND_REDIRECT)
e1:SetTargetRange(0xfe,0xff)
e1:SetCondition(c35100434.recon)
e1:SetTarget(c35100434.retg)
e1:SetCondition(c35100434.recon)
e1:SetTarget(c35100434.retg)
e1:SetValue(LOCATION_REMOVED)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_TO_DECK_REDIRECT)
local e2=e1:Clone()
e2:SetCode(EFFECT_TO_DECK_REDIRECT)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
......@@ -28,7 +28,7 @@ function c35100434.initial_effect(c)
e3:SetTargetRange(0,1)
e3:SetValue(c35100434.aclimit)
c:RegisterEffect(e3)
--to grave
--to grave
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(35100434,0))
e4:SetCategory(CATEGORY_TOGRAVE+CATEGORY_TOHAND)
......@@ -74,7 +74,7 @@ function c35100434.lpop(e,tp,eg,ep,ev,re,r,rp)
end
end
function c35100434.cfilter(c)
return c:IsSetCard(0x1a94) and c:IsAbleToRemoveAsCost() and c:IsControler(tp)
return c:IsSetCard(0x1a94) and c:IsAbleToRemoveAsCost()
end
function c35100434.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35100434.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
......@@ -125,16 +125,16 @@ function c35100434.spop(e,tp,eg,ep,ev,re,r,rp)
if ct>=2 then
Duel.BreakEffect()
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetReset(RESET_PHASE+PHASE_END)
e4:SetTarget(c35100434.imtg)
e4:SetTargetRange(LOCATION_ONFIELD,LOCATION_ONFIELD)
e4:SetCode(EFFECT_UNRELEASABLE_SUM)
e4:SetValue(1)
Duel.RegisterEffect(e4,tp)
local e5=e4:Clone()
e5:SetCode(EFFECT_UNRELEASABLE_NONSUM)
Duel.RegisterEffect(e5,tp)
e4:SetCode(EFFECT_UNRELEASABLE_SUM)
e4:SetValue(1)
Duel.RegisterEffect(e4,tp)
local e5=e4:Clone()
e5:SetCode(EFFECT_UNRELEASABLE_NONSUM)
Duel.RegisterEffect(e5,tp)
local e6=e4:Clone()
e6:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e6:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
......@@ -144,10 +144,10 @@ function c35100434.spop(e,tp,eg,ep,ev,re,r,rp)
if ct==3 and (g1:GetCount()>0 or g2:GetCount()>0 or g3:GetCount()>0) then
Duel.BreakEffect()
if g1:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TODECK)
local sg1=g1:Select(1-tp,1,1,nil)
Duel.HintSelection(sg1)
sg:Merge(sg1)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TODECK)
local sg1=g1:Select(1-tp,1,1,nil)
Duel.HintSelection(sg1)
sg:Merge(sg1)
end
if g2:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TODECK)
......@@ -161,7 +161,7 @@ function c35100434.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.HintSelection(sg3)
sg:Merge(sg3)
end
Duel.SendtoDeck(sg,nil,SEQ_DECKBOTTOM,REASON_RULE)
Duel.SendtoDeck(sg,nil,SEQ_DECKBOTTOM,REASON_RULE)
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