Skip to content

Y
ygopro-222DIY-cards
Commit 83561e90 authored by Huangnan's avatar Huangnan
Browse files
Options

fix

parent 1f6df009
Show whitespace changes
Inline Side-by-side
Showing with 106 additions and 46 deletions
expansions/FiNALE.cdb
View file @ 83561e90
No preview for this file type
expansions/script/c1000364.lua
View file @ 83561e90
--铁血·热血·冷血的吸血鬼杀手 --铁血·热血·冷血的吸血鬼杀手
function c1000364.initial_effect(c) local s,id,o=GetID()
function s.initial_effect(c)
--fusion material --fusion material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0xc203),aux.FilterBoolFunction(Card.IsFusionSetCard,0xc202,0xc201),true) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_FUSION_MATERIAL)
e0:SetCondition(s.fuscon)
e0:SetOperation(s.fusop)
c:RegisterEffect(e0)
aux.AddContactFusionProcedure(c,Card.IsAbleToGraveAsCost,LOCATION_MZONE,0,Duel.SendtoGrave,POS_FACEUP,REASON_COST) aux.AddContactFusionProcedure(c,Card.IsAbleToGraveAsCost,LOCATION_MZONE,0,Duel.SendtoGrave,POS_FACEUP,REASON_COST)
--spsummon condition --spsummon condition
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -12,27 +19,27 @@ function c1000364.initial_effect(c) ...@@ -12,27 +19,27 @@ function c1000364.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--disable --disable
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(1000364,0)) e3:SetDescription(aux.Stringid(id,0))
e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DISABLE) e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DISABLE)
e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_CHAINING) e3:SetCode(EVENT_CHAINING)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1) e3:SetCountLimit(1)
e3:SetCondition(c1000364.discon) e3:SetCondition(s.discon)
e3:SetTarget(c1000364.distg) e3:SetTarget(s.distg)
e3:SetOperation(c1000364.disop) e3:SetOperation(s.disop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon --spsummon
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(1000364,1)) e4:SetDescription(aux.Stringid(id,1))
e4:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e4:SetCode(EVENT_TO_GRAVE) e4:SetCode(EVENT_TO_GRAVE)
e4:SetCountLimit(1,1000364) e4:SetCountLimit(1,id)
e4:SetCondition(c1000364.condition) e4:SetCondition(s.condition)
e4:SetTarget(c1000364.target) e4:SetTarget(s.target)
e4:SetOperation(c1000364.operation) e4:SetOperation(s.operation)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--cannot be target --cannot be target
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
...@@ -48,27 +55,76 @@ function c1000364.initial_effect(c) ...@@ -48,27 +55,76 @@ function c1000364.initial_effect(c)
e6:SetCode(EFFECT_DISABLE) e6:SetCode(EFFECT_DISABLE)
e6:SetRange(LOCATION_MZONE) e6:SetRange(LOCATION_MZONE)
e6:SetTargetRange(0,LOCATION_MZONE) e6:SetTargetRange(0,LOCATION_MZONE)
e6:SetCondition(c1000364.adcon) e6:SetCondition(s.adcon)
e6:SetTarget(c1000364.adtg) e6:SetTarget(s.adtg)
c:RegisterEffect(e6) c:RegisterEffect(e6)
local e7=e6:Clone() local e7=e6:Clone()
e7:SetCode(EFFECT_DISABLE_EFFECT) e7:SetCode(EFFECT_DISABLE_EFFECT)
c:RegisterEffect(e7) c:RegisterEffect(e7)
local e8=e6:Clone() local e8=e6:Clone()
e8:SetCode(EFFECT_SET_ATTACK_FINAL) e8:SetCode(EFFECT_SET_ATTACK_FINAL)
e8:SetValue(c1000364.atkval) e8:SetValue(s.atkval)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
function c1000364.discon(e,tp,eg,ep,ev,re,r,rp) function s.fusfilter1(c)
return c:IsSetCard(0xc200) and (c:IsLevel(2) or c:IsLevel(4))
end
function s.fusfilter2(c)
return c:IsSetCard(0xc200) and (c:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_FUSION))
end
function s.fuscon(e,g,gc,chkfnf)
if g==nil then return true end
local c=e:GetHandler()
local chkf=bit.band(chkfnf,0xff)
local mg=g:Filter(Card.IsCanBeFusionMaterial,nil,c)
local g1=mg:Filter(s.fusfilter1,nil)
local g2=mg:Filter(s.fusfilter2,nil)
if gc then
if not gc:IsCanBeFusionMaterial(c) then return false end
if s.fusfilter1(gc) then
return g2:IsExists(aux.TRUE,1,gc)
elseif s.fusfilter2(gc) then
return g1:IsExists(aux.TRUE,1,gc)
else return false end
end
return g1:IsExists(aux.TRUE,1,nil) and g2:IsExists(aux.TRUE,1,nil)
end
function s.fusop(e,tp,eg,ep,ev,re,r,rp,gc,chkfnf)
local c=e:GetHandler()
local chkf=bit.band(chkfnf,0xff)
local mg=eg:Filter(Card.IsCanBeFusionMaterial,nil,c)
local g1=mg:Filter(s.fusfilter1,nil)
local g2=mg:Filter(s.fusfilter2,nil)
local tc1,tc2
if gc then
if s.fusfilter1(gc) then
tc1=gc
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
tc2=g2:SelectUnselect(Group.FromCards(gc),tp,false,false,1,1)
else
tc2=gc
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
tc1=g1:SelectUnselect(Group.FromCards(gc),tp,false,false,1,1)
end
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
tc1=g1:SelectUnselect(nil,tp,false,false,1,1)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
tc2=g2:SelectUnselect(Group.FromCards(tc1),tp,false,false,1,1)
end
local sg=Group.FromCards(tc1,tc2)
Duel.SetFusionMaterial(sg)
end
function s.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp~=tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainDisablable(ev) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp~=tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainDisablable(ev)
end end
function c1000364.distg(e,tp,eg,ep,ev,re,r,rp,chk) function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end end
function c1000364.disop(e,tp,eg,ep,ev,re,r,rp) function s.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateEffect(ev) Duel.NegateEffect(ev)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectMatchingCard(tp,Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
...@@ -77,27 +133,27 @@ function c1000364.disop(e,tp,eg,ep,ev,re,r,rp) ...@@ -77,27 +133,27 @@ function c1000364.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
end end
function c1000364.condition(e,tp,eg,ep,ev,re,r,rp) function s.condition(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return c:IsReason(REASON_DESTROY) and c:IsReason(REASON_BATTLE+REASON_EFFECT) return c:IsReason(REASON_DESTROY) and c:IsReason(REASON_BATTLE+REASON_EFFECT)
and c:IsPreviousLocation(LOCATION_ONFIELD) and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD) and c:GetPreviousControler()==tp
end end
function c1000364.filter(c,e,tp) function s.filter(c,e,tp)
return c:IsSetCard(0xc200) and not c:IsCode(1000364) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0xc200) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c1000364.target(e,tp,eg,ep,ev,re,r,rp,chk) function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c1000364.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_DECK)
local rec=e:GetHandler():GetBaseAttack() local rec=e:GetHandler():GetBaseAttack()
Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(rec) Duel.SetTargetParam(rec)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec)
end end
function c1000364.operation(e,tp,eg,ep,ev,re,r,rp) function s.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c1000364.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_DECK,0,1,1,nil,e,tp)
local c=e:GetHandler() local c=e:GetHandler()
if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)>0 then if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)>0 then
Duel.BreakEffect() Duel.BreakEffect()
...@@ -105,14 +161,14 @@ function c1000364.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -105,14 +161,14 @@ function c1000364.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Recover(p,d,REASON_EFFECT) Duel.Recover(p,d,REASON_EFFECT)
end end
end end
function c1000364.adcon(e) function s.adcon(e)
local c=e:GetHandler() local c=e:GetHandler()
return Duel.GetAttacker()==c and c:GetBattleTarget() return Duel.GetAttacker()==c and c:GetBattleTarget()
and (Duel.GetCurrentPhase()==PHASE_DAMAGE or Duel.GetCurrentPhase()==PHASE_DAMAGE_CAL) and (Duel.GetCurrentPhase()==PHASE_DAMAGE or Duel.GetCurrentPhase()==PHASE_DAMAGE_CAL)
end end
function c1000364.adtg(e,c) function s.adtg(e,c)
return c==e:GetHandler():GetBattleTarget() return c==e:GetHandler():GetBattleTarget()
end end
function c1000364.atkval(e,c) function s.atkval(e,c)
return math.ceil(c:GetBaseAttack()/2) return math.ceil(c:GetBaseAttack()/2)
end end
\ No newline at end of file
expansions/script/c12400026.lua
View file @ 83561e90
...@@ -5,7 +5,7 @@ function s.initial_effect(c) ...@@ -5,7 +5,7 @@ function s.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--Search --Search
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1)) e3:SetDescription(aux.Stringid(id,1))
e3:SetCategory(CATEGORY_TOGRAVE) e3:SetCategory(CATEGORY_TOGRAVE)
e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN) e3:SetCode(EVENT_FREE_CHAIN)
......
expansions/script/c12400035.lua
View file @ 83561e90
...@@ -70,7 +70,7 @@ end ...@@ -70,7 +70,7 @@ end
-- --
function s.e1tgfilter(c,e,tp) function s.e1tgfilter(c,e,tp)
return c:IsFaceup() and c:IsSetCard(0x32a1) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0x32a1) and c:IsType(TYPE_MONSTER)
and Duel.IsExistingTarget(s.e1tgfilter2,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,c:GetCode(),e,tp) and Duel.IsExistingMatchingCard(s.e1tgfilter2,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,c:GetCode(),e,tp)
end end
function s.e1tgfilter2(c,code,e,tp) function s.e1tgfilter2(c,code,e,tp)
return c:IsType(TYPE_MONSTER) and c:IsCode(code) return c:IsType(TYPE_MONSTER) and c:IsCode(code)
...@@ -95,7 +95,7 @@ function s.e1op(e,tp,eg,ep,ev,re,r,rp) ...@@ -95,7 +95,7 @@ function s.e1op(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
local tc2=sg:GetFirst() local tc2=sg:GetFirst()
Duel.SpecialSummon(tc2,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tc2,0,tp,tp,false,false,POS_FACEUP)
local g3=Duel.GetMatchingGroup(Card.IsXyzSummonable,tp,LOCATION_EXTRA,0,nil) local g3=Duel.GetMatchingGroup(Card.IsXyzSummonable,tp,LOCATION_EXTRA,0,nil,nil)
if g3:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then if g3:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=g3:Select(tp,1,1,nil) local tg=g3:Select(tp,1,1,nil)
......
expansions/script/c12400036.lua
View file @ 83561e90
...@@ -92,7 +92,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -92,7 +92,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
local g3=Duel.GetMatchingGroup(Card.IsXyzSummonable,tp,LOCATION_EXTRA,0,nil) local g3=Duel.GetMatchingGroup(Card.IsXyzSummonable,tp,LOCATION_EXTRA,0,nil,nil)
if g3:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then if g3:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=g3:Select(tp,1,1,nil) local tg=g3:Select(tp,1,1,nil)
......
expansions/script/c12400042.lua
View file @ 83561e90
...@@ -122,10 +122,8 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -122,10 +122,8 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,nil) local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
if Duel.GetFlagEffect(tp,id+10000)<2 then if Duel.GetFlagEffect(tp,id+10000)<2 then
local dg=Duel.GetOperatedGroup() local tc=g:GetFirst()
local tc=dg:GetFirst()
while tc do while tc do
Duel.NegateRelatedChain(tc,RESET_TURN_SET) Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -149,7 +147,7 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -149,7 +147,7 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
e3:SetReset(RESET_EVENT+RESETS_STANDARD) e3:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
end end
tc=dg:GetNext() tc=g:GetNext()
end end
end end
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
......
expansions/script/c47530105.lua
View file @ 83561e90
...@@ -7,7 +7,7 @@ function c47530105.initial_effect(c) ...@@ -7,7 +7,7 @@ function c47530105.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE) e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetTarget(c47530105.disable) e1:SetTarget(c47530105.disable)
e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -30,7 +30,7 @@ function c47530105.initial_effect(c) ...@@ -30,7 +30,7 @@ function c47530105.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c47530105.disable(e,c) function c47530105.disable(e,c)
return c:IsRace(RACE_MACHINE) and c:IsType(TYPE_EFFECT) or bit.band(c:GetOriginalType(),TYPE_EFFECT)==TYPE_EFFECT return c:IsRace(RACE_MACHINE)
end end
function c47530105.mtcon(e,tp,eg,ep,ev,re,r,rp) function c47530105.mtcon(e,tp,eg,ep,ev,re,r,rp)
return r==REASON_SYNCHRO and eg:IsExists(Card.IsRace,1,nil,RACE_MACHINE) return r==REASON_SYNCHRO and eg:IsExists(Card.IsRace,1,nil,RACE_MACHINE)
......
expansions/script/c50221305.lua
View file @ 83561e90
...@@ -51,7 +51,9 @@ function c50221305.ptg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -51,7 +51,9 @@ function c50221305.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
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 c50221305.pop(e,tp,eg,ep,ev,re,r,rp) function c50221305.pop(e,tp,eg,ep,ev,re,r,rp)
local zone=e:GetHandler():GetLinkedZone(tp) local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local zone=c:GetLinkedZone(tp)
if zone~=0 then if zone~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c50221305.pfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,zone) local g=Duel.SelectMatchingCard(tp,c50221305.pfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,zone)
......
expansions/script/c75642012.lua
View file @ 83561e90
...@@ -40,12 +40,15 @@ function s.initial_effect(c) ...@@ -40,12 +40,15 @@ function s.initial_effect(c)
e4:SetValue(1) e4:SetValue(1)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function s.tfilter(c)
return c:IsFaceupEx() and c:IsSetCard(0x62c4)
end
function s.atg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function s.atg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler() local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsAttackAbove(0) end if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsAttackAbove(0) end
if chk==0 then return Duel.IsExistingTarget(Card.IsAttackAbove,tp,LOCATION_GRAVE+LOCATION_MZONE,0,1,nil,0) end if chk==0 then return Duel.IsExistingTarget(s.tfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,0,1,nil,0) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
Duel.SelectTarget(tp,Card.IsAttackAbove,tp,LOCATION_GRAVE+LOCATION_MZONE,0,1,1,nil,0) Duel.SelectTarget(tp,s.tfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,0,1,1,nil,0)
end end
function s.aop(e,tp,eg,ep,ev,re,r,rp) function s.aop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
expansions/script/c81907104.lua
View file @ 83561e90
...@@ -25,6 +25,7 @@ function cm.initial_effect(c) ...@@ -25,6 +25,7 @@ function cm.initial_effect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_TO_GRAVE) e3:SetCode(EVENT_TO_GRAVE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(1) e3:SetCountLimit(1)
e3:SetCondition(cm.tgcon) e3:SetCondition(cm.tgcon)
e3:SetTarget(cm.tgtg) e3:SetTarget(cm.tgtg)
...@@ -86,7 +87,7 @@ function cm.tgcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -86,7 +87,7 @@ function cm.tgcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.tgfilter,1,nil,tp) return eg:IsExists(cm.tgfilter,1,nil,tp)
end end
function cm.tgfilter(c,tp) function cm.tgfilter(c,tp)
return c:IsPreviousLocation(LOCATION_ONFIELD) and c:GetPreviousControler()==tp and c:IsLocation(LOCATION_GRAVE) return c:IsPreviousLocation(LOCATION_ONFIELD) and c:GetPreviousControler()==tp
end end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 or Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0) and Duel.IsPlayerCanSpecialSummonMonster(tp,81900022,nil,TYPES_TOKEN_MONSTER,0,0,5,RACE_BEAST,ATTRIBUTE_FIRE) end if chk==0 then return (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 or Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0) and Duel.IsPlayerCanSpecialSummonMonster(tp,81900022,nil,TYPES_TOKEN_MONSTER,0,0,5,RACE_BEAST,ATTRIBUTE_FIRE) 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