Commit 9f8c7f05 authored by Nemo Ma's avatar Nemo Ma

fix

parent d1dc6bb8
This diff is collapsed.
...@@ -2,88 +2,88 @@ ...@@ -2,88 +2,88 @@
local m=60152304 local m=60152304
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
--special summon --special summon
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetDescription(aux.Stringid(60152304,0)) e0:SetDescription(aux.Stringid(60152304,0))
e0:SetType(EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SPSUMMON_PROC) e0:SetCode(EFFECT_SPSUMMON_PROC)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e0:SetRange(LOCATION_HAND) e0:SetRange(LOCATION_HAND)
e0:SetCondition(c60152304.spcon) e0:SetCondition(c60152304.spcon)
c:RegisterEffect(e0) c:RegisterEffect(e0)
-- --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(60152304,1)) e1:SetDescription(aux.Stringid(60152304,1))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,60152304) e1:SetCountLimit(1,60152304)
e1:SetTarget(c60152304.e1tg) e1:SetTarget(c60152304.e1tg)
e1:SetOperation(c60152304.e1op) e1:SetOperation(c60152304.e1op)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e11=e1:Clone() local e11=e1:Clone()
e11:SetCode(EVENT_SPSUMMON_SUCCESS) e11:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e11) c:RegisterEffect(e11)
--to hand --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(60152304,2)) e2:SetDescription(aux.Stringid(60152304,2))
e2:SetCategory(CATEGORY_DESTROY) e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_TO_GRAVE) e2:SetCode(EVENT_TO_GRAVE)
e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,6012304) e2:SetCountLimit(1,6012304)
e2:SetCondition(c60152304.e2con) e2:SetCondition(c60152304.e2con)
e2:SetTarget(c60152304.e2tg) e2:SetTarget(c60152304.e2tg)
e2:SetOperation(c60152304.e2op) e2:SetOperation(c60152304.e2op)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c60152304.spcon(e,c) function c60152304.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0,nil)==0 return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0,nil)==0
and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end end
function c60152304.e1tgfilter(c) function c60152304.e1tgfilter(c)
return c:IsFaceup() and c:IsSetCard(0xcb26) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb26) and c:IsType(TYPE_MONSTER)
end end
function c60152304.e1tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60152304.e1tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c60152304.e1tgfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c60152304.e1tgfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c60152304.e1tgfilter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c60152304.e1tgfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.IsAbleToEnterBP() end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c60152304.e1tgfilter,tp,LOCATION_MZONE,0,1,1,nil) Duel.SelectTarget(tp,c60152304.e1tgfilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
end end
function c60152304.e1op(e,tp,eg,ep,ev,re,r,rp) function c60152304.e1op(e,tp,eg,ep,ev,re,r,rp)
local tc0=Duel.GetFirstTarget() local tc0=Duel.GetFirstTarget()
if tc0:IsRelateToEffect(e) and tc0:IsFaceup() then if tc0:IsRelateToEffect(e) and tc0:IsFaceup() then
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DIRECT_ATTACK) e1:SetCode(EFFECT_DIRECT_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc0:RegisterEffect(e1) tc0:RegisterEffect(e1)
if tc0:IsType(TYPE_XYZ) and e:GetHandler():IsRelateToEffect(e) and not e:GetHandler():IsImmuneToEffect(e) if tc0:IsType(TYPE_XYZ) and e:GetHandler():IsRelateToEffect(e) and not e:GetHandler():IsImmuneToEffect(e)
and tc0:IsLocation(LOCATION_MZONE) and tc0:IsFaceup() and Duel.SelectYesNo(tp,aux.Stringid(60152301,4)) then and tc0:IsLocation(LOCATION_MZONE) and tc0:IsFaceup() and Duel.SelectYesNo(tp,aux.Stringid(60152301,4)) then
Duel.Overlay(tc0,Group.FromCards(e:GetHandler())) Duel.Overlay(tc0,Group.FromCards(e:GetHandler()))
end end
end end
end end
function c60152304.e2con(e,tp,eg,ep,ev,re,r,rp) function c60152304.e2con(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) return not e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
end end
function c60152304.e2tgfilter(c) function c60152304.e2tgfilter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
end end
function c60152304.e2tg(e,tp,eg,ep,ev,re,r,rp,chk) function c60152304.e2tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c60152304.e2tgfilter,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60152304.e2tgfilter,tp,0,LOCATION_ONFIELD,1,nil) end
local g=Duel.GetMatchingGroup(c60152304.e2tgfilter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c60152304.e2tgfilter,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
end end
function c60152304.e2op(e,tp,eg,ep,ev,re,r,rp) function c60152304.e2op(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,c60152304.e2tgfilter,tp,0,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60152304.e2tgfilter,tp,0,LOCATION_ONFIELD,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
end end
\ No newline at end of file
This diff is collapsed.
...@@ -116,6 +116,7 @@ end ...@@ -116,6 +116,7 @@ end
function c60152312.e99op(e,tp,eg,ep,ev,re,r,rp) function c60152312.e99op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if not (tc:IsRelateToEffect(e) and tc:IsFaceup()) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
local g0=Group.CreateGroup() local g0=Group.CreateGroup()
local gb=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0) local gb=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0)
......
This diff is collapsed.
...@@ -87,7 +87,7 @@ function c60152314.e2op(e,tp,eg,ep,ev,re,r,rp) ...@@ -87,7 +87,7 @@ function c60152314.e2op(e,tp,eg,ep,ev,re,r,rp)
e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CLIENT_HINT) e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CLIENT_HINT)
e1:SetCategory(CATEGORY_DRAW) e1:SetCategory(CATEGORY_DRAW)
e1:SetCode(EVENT_LEAVE_FIELD) e1:SetCode(EVENT_LEAVE_FIELD)
e1:SetReset(RESET_EVENT+RESET_TURN_SET+RESET_OVERLAY+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetCondition(c60152314.e2opcon) e1:SetCondition(c60152314.e2opcon)
e1:SetOperation(c60152314.e2opop) e1:SetOperation(c60152314.e2opop)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
...@@ -120,7 +120,7 @@ function c60152314.e2op(e,tp,eg,ep,ev,re,r,rp) ...@@ -120,7 +120,7 @@ function c60152314.e2op(e,tp,eg,ep,ev,re,r,rp)
e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CLIENT_HINT) e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CLIENT_HINT)
e1:SetCategory(CATEGORY_DRAW) e1:SetCategory(CATEGORY_DRAW)
e1:SetCode(EVENT_LEAVE_FIELD) e1:SetCode(EVENT_LEAVE_FIELD)
e1:SetReset(RESET_EVENT+RESET_TURN_SET+RESET_OVERLAY+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetCondition(c60152314.e2opcon) e1:SetCondition(c60152314.e2opcon)
e1:SetOperation(c60152314.e2opop) e1:SetOperation(c60152314.e2opop)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
...@@ -172,6 +172,7 @@ end ...@@ -172,6 +172,7 @@ end
function c60152314.e99op(e,tp,eg,ep,ev,re,r,rp) function c60152314.e99op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if not (tc:IsRelateToEffect(e) and tc:IsFaceup()) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
local g0=Group.CreateGroup() local g0=Group.CreateGroup()
local gb=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0) local gb=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0)
......
This diff is collapsed.
This diff is collapsed.
...@@ -52,7 +52,7 @@ end ...@@ -52,7 +52,7 @@ end
function c60159907.spcon(e,c) function c60159907.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
return Duel.GetMZoneCount(tp)>-2 return Duel.GetLocationCount(tp,LOCATION_MZONE)>-2
and Duel.CheckReleaseGroup(tp,c60159907.spfilter1,1,nil,tp,c) and Duel.CheckReleaseGroup(tp,c60159907.spfilter1,1,nil,tp,c)
end end
function c60159907.spop(e,tp,eg,ep,ev,re,r,rp,c) function c60159907.spop(e,tp,eg,ep,ev,re,r,rp,c)
......
--假面的舞踏会 --假面的舞踏会
function c60159909.initial_effect(c) function c60159909.initial_effect(c)
c:SetUniqueOnField(1,1,60159909) c:SetUniqueOnField(1,1,60159909)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,60159909) e1:SetCountLimit(1,60159909+EFFECT_COUNT_CODE_OATH)
e1:SetHintTiming(0,0x1c0) e1:SetHintTiming(0,0x1c0)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--adjust --adjust
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
...@@ -16,7 +16,7 @@ function c60159909.initial_effect(c) ...@@ -16,7 +16,7 @@ function c60159909.initial_effect(c)
e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
e2:SetOperation(c60159909.adjustop) e2:SetOperation(c60159909.adjustop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--disable spsummon --disable spsummon
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetRange(LOCATION_SZONE) e3:SetRange(LOCATION_SZONE)
...@@ -25,16 +25,16 @@ function c60159909.initial_effect(c) ...@@ -25,16 +25,16 @@ function c60159909.initial_effect(c)
e3:SetTargetRange(1,1) e3:SetTargetRange(1,1)
e3:SetTarget(c60159909.splimit) e3:SetTarget(c60159909.splimit)
c:RegisterEffect(e3) c:RegisterEffect(e3)
-- --
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(60159909,0)) e4:SetDescription(aux.Stringid(60159909,0))
e4:SetType(EFFECT_TYPE_QUICK_O) e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_FREE_CHAIN) e4:SetCode(EVENT_FREE_CHAIN)
e4:SetCountLimit(1) e4:SetCountLimit(1)
e4:SetProperty(EFFECT_FLAG_BOTH_SIDE) e4:SetProperty(EFFECT_FLAG_BOTH_SIDE)
e4:SetRange(LOCATION_SZONE) e4:SetRange(LOCATION_SZONE)
e4:SetHintTiming(0,0x1c0) e4:SetHintTiming(0,0x1c0)
e4:SetCondition(c60159909.atcon) e4:SetCondition(c60159909.atcon)
e4:SetTarget(c60159909.attg) e4:SetTarget(c60159909.attg)
e4:SetOperation(c60159909.atop) e4:SetOperation(c60159909.atop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
...@@ -62,13 +62,13 @@ function c60159909.atcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -62,13 +62,13 @@ function c60159909.atcon(e,tp,eg,ep,ev,re,r,rp)
end end
function c60159909.attg(e,tp,eg,ep,ev,re,r,rp,chk) function c60159909.attg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil) end if chk==0 then return Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil) end
Duel.Hint(HINT_SELECTMSG,tp,562) Duel.Hint(HINT_SELECTMSG,tp,562)
local rc=Duel.AnnounceAttribute(tp,1,0xffff) local rc=Duel.AnnounceAttribute(tp,1,0xffff)
e:SetLabel(rc) e:SetLabel(rc)
end end
function c60159909.atop(e,tp,eg,ep,ev,re,r,rp) function c60159909.atop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
......
...@@ -7,16 +7,21 @@ function c60159910.initial_effect(c) ...@@ -7,16 +7,21 @@ function c60159910.initial_effect(c)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,60159910) e1:SetCountLimit(1,60159910)
e1:SetCost(c60159910.cost)
e1:SetTarget(c60159910.target) e1:SetTarget(c60159910.target)
e1:SetOperation(c60159910.activate) e1:SetOperation(c60159910.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c60159910.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
end
function c60159910.filter(c) function c60159910.filter(c)
return c:IsFacedown() and c:IsAbleToChangeControler() return c:IsAbleToChangeControler() and not c:IsType(TYPE_PENDULUM)
end end
function c60159910.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60159910.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(1-tp) and c60159910.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(1-tp) and c60159910.filter(chkc) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>1 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>2
and Duel.IsExistingTarget(c60159910.filter,tp,0,LOCATION_SZONE,1,nil) end and Duel.IsExistingTarget(c60159910.filter,tp,0,LOCATION_SZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectTarget(tp,c60159910.filter,tp,0,LOCATION_SZONE,1,1,nil) local g=Duel.SelectTarget(tp,c60159910.filter,tp,0,LOCATION_SZONE,1,1,nil)
......
...@@ -52,7 +52,7 @@ function c60159911.spfilter(c) ...@@ -52,7 +52,7 @@ function c60159911.spfilter(c)
end end
function c60159911.spcon(e,c) function c60159911.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetMZoneCount(c:GetControler())>0 return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c60159911.spfilter,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,2,nil) and Duel.IsExistingMatchingCard(c60159911.spfilter,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,2,nil)
end end
function c60159911.sumlimit(e,c,sump,sumtype,sumpos,targetp,se) function c60159911.sumlimit(e,c,sump,sumtype,sumpos,targetp,se)
...@@ -60,6 +60,7 @@ function c60159911.sumlimit(e,c,sump,sumtype,sumpos,targetp,se) ...@@ -60,6 +60,7 @@ function c60159911.sumlimit(e,c,sump,sumtype,sumpos,targetp,se)
end end
function c60159911.aclimit(e,re,tp) function c60159911.aclimit(e,re,tp)
return bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL and e:GetHandler():GetSummonLocation()==LOCATION_HAND and e:GetHandler():IsFaceup() and re:IsActiveType(TYPE_MONSTER) and bit.band(re:GetHandler():GetSummonLocation(),LOCATION_EXTRA+LOCATION_GRAVE)~=0 return bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL and e:GetHandler():GetSummonLocation()==LOCATION_HAND and e:GetHandler():IsFaceup() and re:IsActiveType(TYPE_MONSTER) and bit.band(re:GetHandler():GetSummonLocation(),LOCATION_EXTRA+LOCATION_GRAVE)~=0
and not re:GetHandler():IsImmuneToEffect(e)
end end
function c60159911.ctcon(e,tp,eg,ep,ev,re,r,rp) function c60159911.ctcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
--地狱使者亲临 --地狱使者亲临
function c60159915.initial_effect(c) function c60159915.initial_effect(c)
aux.AddRitualProcGreaterCode(c,60159914) aux.AddCodeList(c,60159914)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
...@@ -22,6 +22,7 @@ function c60159915.initial_effect(c) ...@@ -22,6 +22,7 @@ function c60159915.initial_effect(c)
e2:SetOperation(c60159915.activate) e2:SetOperation(c60159915.activate)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c60159915.fit_monster={60159914}
function c60159915.filter(c,e,tp,m) function c60159915.filter(c,e,tp,m)
if not c:IsCode(60159914) or bit.band(c:GetType(),0x81)~=0x81 if not c:IsCode(60159914) or bit.band(c:GetType(),0x81)~=0x81
or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,true,true) or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,true,true)
...@@ -130,4 +131,4 @@ function c60159915.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -130,4 +131,4 @@ function c60159915.activate(e,tp,eg,ep,ev,re,r,rp)
end end
function c60159915.efilter(e,te) function c60159915.efilter(e,te)
return te:GetOwner()~=e:GetOwner() return te:GetOwner()~=e:GetOwner()
end end
\ No newline at end of file
...@@ -57,7 +57,7 @@ function c60159917.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -57,7 +57,7 @@ function c60159917.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmCards(1-tp,tc) Duel.ConfirmCards(1-tp,tc)
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil) local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_GRAVE,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.Remove(g,POS_FACEUP,REASON_EFFECT) Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
......
...@@ -3,139 +3,145 @@ function c60159918.initial_effect(c) ...@@ -3,139 +3,145 @@ function c60159918.initial_effect(c)
c:SetUniqueOnField(1,1,60159918) c:SetUniqueOnField(1,1,60159918)
c:EnableReviveLimit() c:EnableReviveLimit()
--cannot special summon --cannot special summon
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION) e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(aux.synlimit) e0:SetValue(aux.synlimit)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--special summon rule --special summon rule
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC) e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_EXTRA) e2:SetRange(LOCATION_EXTRA)
e2:SetCondition(c60159918.sprcon) e2:SetCondition(c60159918.sprcon)
e2:SetOperation(c60159918.sprop) e2:SetOperation(c60159918.sprop)
e2:SetValue(SUMMON_TYPE_SYNCHRO) e2:SetValue(SUMMON_TYPE_SYNCHRO)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--lv --lv
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_CHANGE_LEVEL) e4:SetCode(EFFECT_CHANGE_LEVEL)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_DELAY+EFFECT_FLAG_CANNOT_DISABLE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetValue(c60159918.val) e4:SetValue(c60159918.val)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--atk --atk
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_SET_BASE_ATTACK) e4:SetCode(EFFECT_SET_BASE_ATTACK)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetValue(c60159918.adval) e4:SetValue(c60159918.adval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EFFECT_SET_BASE_DEFENSE) e5:SetCode(EFFECT_SET_BASE_DEFENSE)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--atk --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(60159918,0)) e1:SetDescription(aux.Stringid(60159918,0))
e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE) e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetCondition(c60159918.atkcon) e1:SetCondition(c60159918.atkcon)
e1:SetCost(c60159918.spcost) e1:SetCost(c60159918.spcost)
e1:SetTarget(c60159918.target) e1:SetTarget(c60159918.target)
e1:SetOperation(c60159918.atkop) e1:SetOperation(c60159918.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c60159918.sprfilter1(c,tp) function c60159918.sprfilter1(c,tp)
local lv=c:GetLevel() local lv=c:GetLevel()
return c:IsFaceup() and c:IsType(TYPE_TUNER) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToGraveAsCost() return c:IsFaceup() and c:IsType(TYPE_TUNER) and c:IsAbleToGraveAsCost()
and Duel.IsExistingMatchingCard(c60159918.sprfilter2,tp,LOCATION_MZONE,0,1,nil,lv) and Duel.IsExistingMatchingCard(c60159918.sprfilter2,tp,LOCATION_MZONE,0,1,nil,lv)
end end
function c60159918.sprfilter2(c,lv) function c60159918.sprfilter2(c,lv)
return c:IsFaceup() and c:GetLevel()~=lv and not c:IsType(TYPE_TUNER) and not c:IsType(TYPE_XYZ) return c:IsFaceup() and c:GetLevel()~=lv and not c:IsType(TYPE_TUNER) and not c:IsType(TYPE_XYZ)
and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToGraveAsCost() and c:IsAbleToGraveAsCost()
end end
function c60159918.sprcon(e,c) function c60159918.sprcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
return Duel.GetMZoneCount(tp)>-2 return Duel.GetLocationCount(tp,LOCATION_MZONE)>-2
and Duel.IsExistingMatchingCard(c60159918.sprfilter1,tp,LOCATION_MZONE,0,1,nil,tp) and Duel.IsExistingMatchingCard(c60159918.sprfilter1,tp,LOCATION_MZONE,0,1,nil,tp)
end end
function c60159918.sprop(e,tp,eg,ep,ev,re,r,rp,c) function c60159918.sprop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g1=Duel.SelectMatchingCard(tp,c60159918.sprfilter1,tp,LOCATION_MZONE,0,1,1,nil,tp) local g1=Duel.SelectMatchingCard(tp,c60159918.sprfilter1,tp,LOCATION_MZONE,0,1,1,nil,tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g2=Duel.SelectMatchingCard(tp,c60159918.sprfilter2,tp,LOCATION_MZONE,0,1,1,nil,g1:GetFirst():GetLevel()) local g2=Duel.SelectMatchingCard(tp,c60159918.sprfilter2,tp,LOCATION_MZONE,0,1,1,nil,g1:GetFirst():GetLevel())
g1:Merge(g2) g1:Merge(g2)
Duel.SendtoGrave(g1,REASON_COST) Duel.SendtoGrave(g1,REASON_COST)
c:SetMaterial(g1) c:SetMaterial(g1)
end end
function c60159918.val(e,c) function c60159918.val(e,c)
local g=c:GetMaterial() local g=c:GetMaterial()
local lv=0 local lv=0
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
lv=lv+(tc:GetLevel()) lv=lv+(tc:GetLevel())
tc=g:GetNext() tc=g:GetNext()
end end
return lv return lv
end end
function c60159918.adval(e,c) function c60159918.adval(e,c)
return e:GetHandler():GetLevel()*300 return e:GetHandler():GetLevel()*300
end end
function c60159918.atkcon(e,tp,eg,ep,ev,re,r,rp) function c60159918.atkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
end end
function c60159918.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c60159918.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToExtraAsCost() end if chk==0 then return e:GetHandler():IsAbleToExtraAsCost() end
Duel.SendtoDeck(e:GetHandler(),nil,0,REASON_COST) Duel.SendtoDeck(e:GetHandler(),nil,0,REASON_COST)
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
end end
function c60159918.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60159918.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
end end
function c60159918.atkop(e,tp,eg,ep,ev,re,r,rp) function c60159918.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
local tc=g:GetFirst()
while tc do
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_ATTACK_FINAL)
e1:SetValue((tc:GetAttack())/2)
e1:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e1)
local e5=e1:Clone()
e5:SetCode(EFFECT_SET_DEFENSE_FINAL)
e5:SetValue((tc:GetDefense())/2)
c:RegisterEffect(e5)
tc=g:GetNext()
end
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetCountLimit(1) e1:SetTarget(c60159918.tg)
e1:SetCondition(c60159918.thcon) e1:SetValue(c60159918.atkval)
e1:SetOperation(c60159918.thop) e1:SetCode(EFFECT_SET_ATTACK_FINAL)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
e2:SetValue(c60159918.defval)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetCountLimit(1)
e3:SetCondition(c60159918.thcon)
e3:SetOperation(c60159918.thop)
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,tp)
end
function c60159918.tg(e,c)
return c:IsFaceup()
end
function c60159918.atkval(e,c)
return c:GetAttack()/2
end
function c60159918.defval(e,c)
return c:GetDefense()/2
end end
function c60159918.thfilter(c) function c60159918.thfilter(c)
return c:IsFaceup() and (c:GetAttack()~=c:GetBaseAttack() or c:GetDefense()~=c:GetBaseDefense()) return c:IsFaceup() and (c:GetAttack()~=c:GetBaseAttack() or c:GetDefense()~=c:GetBaseDefense())
end end
function c60159918.thcon(e,tp,eg,ep,ev,re,r,rp) function c60159918.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c60159918.thfilter,tp,0,LOCATION_MZONE,1,nil) return Duel.IsExistingMatchingCard(c60159918.thfilter,tp,0,LOCATION_MZONE,1,nil)
end end
function c60159918.thop(e,tp,eg,ep,ev,re,r,rp) function c60159918.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,60159918) Duel.Hint(HINT_CARD,0,60159918)
local sg=Duel.GetMatchingGroup(c60159918.thfilter,tp,0,LOCATION_MZONE,nil) local sg=Duel.GetMatchingGroup(c60159918.thfilter,tp,0,LOCATION_MZONE,nil)
local ct=Duel.Destroy(sg,REASON_EFFECT) local ct=Duel.Destroy(sg,REASON_EFFECT)
if ct>0 then if ct>0 then
Duel.Damage(1-tp,ct*600,REASON_EFFECT) Duel.Damage(1-tp,ct*600,REASON_EFFECT)
end end
end end
--朔时的祈愿 --朔时的祈愿
function c60159919.initial_effect(c) function c60159919.initial_effect(c)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_PLAYER_TARGET)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c60159919.target) e1:SetTarget(c60159919.target)
e1:SetOperation(c60159919.activate) e1:SetOperation(c60159919.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c60159919.filter(c,e,tp) function c60159919.spfilter1(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp)
end end
function c60159919.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60159919.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.GetMZoneCount(tp)>0 and Duel.IsPlayerCanDraw(tp,1) if chk==0 then return Duel.GetLocationCount(1-tp,LOCATION_MZONE,tp)>0 and Duel.IsPlayerCanDraw(tp,1)
and Duel.IsExistingTarget(c60159919.filter,tp,0,LOCATION_GRAVE,1,nil,e,tp) end and Duel.IsExistingTarget(c60159919.spfilter1,tp,0,LOCATION_GRAVE,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c60159919.filter,tp,0,LOCATION_GRAVE,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,c60159919.spfilter1,tp,0,LOCATION_GRAVE,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end end
function c60159919.activate(e,tp,eg,ep,ev,re,r,rp) function c60159919.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,1-tp,false,false,POS_FACEUP) Duel.SpecialSummon(tc,0,tp,1-tp,false,false,POS_FACEUP)
Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,1,REASON_EFFECT)
end end
end end
\ No newline at end of file
...@@ -39,7 +39,7 @@ function c60159921.effcon(e) ...@@ -39,7 +39,7 @@ function c60159921.effcon(e)
return e:GetHandler():GetOverlayCount()>0 return e:GetHandler():GetOverlayCount()>0
end end
function c60159921.discon(e,tp,eg,ep,ev,re,r,rp) function c60159921.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp==1-tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp~=tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
end end
function c60159921.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c60159921.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
......
...@@ -29,7 +29,7 @@ function c60159924.filter(c) ...@@ -29,7 +29,7 @@ function c60159924.filter(c)
and bit.band(c:GetSummonLocation(),LOCATION_EXTRA+LOCATION_GRAVE)~=0 and bit.band(c:GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL and bit.band(c:GetSummonLocation(),LOCATION_EXTRA+LOCATION_GRAVE)~=0 and bit.band(c:GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
end end
function c60159924.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60159924.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c60159924.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c60159924.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c60159924.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c60159924.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c60159924.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) Duel.SelectTarget(tp,c60159924.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
...@@ -37,8 +37,9 @@ end ...@@ -37,8 +37,9 @@ end
function c60159924.activate(e,tp,eg,ep,ev,re,r,rp) function c60159924.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
local code=tc:GetCode() local code=tc:GetCode()
if tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsDisabled() and tc:IsControler(1-tp) then if tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsDisabled()
then
Duel.NegateRelatedChain(tc,RESET_TURN_SET) Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
...@@ -55,7 +56,7 @@ function c60159924.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -55,7 +56,7 @@ function c60159924.activate(e,tp,eg,ep,ev,re,r,rp)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SET_ATTACK) e3:SetCode(EFFECT_SET_ATTACK)
e3:SetValue(0) e3:SetValue(0)
e3:SetReset(RESET_EVENT+0x1fe0000) e3:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
...@@ -81,8 +82,8 @@ end ...@@ -81,8 +82,8 @@ end
function c60159924.activate2(e,tp,eg,ep,ev,re,r,rp) function c60159924.activate2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
local code=tc:GetCode() local code=tc:GetCode()
if tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsDisabled() and tc:IsControler(1-tp) and tc:IsType(TYPE_EFFECT) then if tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsDisabled() and tc:IsType(TYPE_EFFECT) then
Duel.NegateRelatedChain(tc,RESET_TURN_SET) Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
...@@ -161,21 +161,34 @@ ...@@ -161,21 +161,34 @@
!setname 0x6da0 幻梦迷境 !setname 0x6da0 幻梦迷境
!setname 0x9da0 星光歌剧 !setname 0x9da0 星光歌剧
#LaiBill 601 0xb20-0xb2f #LaiBill 529508379 601 0xb20-0xb2f
!setname 0xab20 幻想曲 !setname 0xab20 幻想曲
!setname 0xcb20 乐章
!setname 0x3b21 千夜 !setname 0x3b21 千夜
!setname 0x5b21 天玲 !setname 0x5b21 天玲
!setname 0x9b21 天夜 !setname 0x9b21 天夜
!setname 0xab21 绘雨 !setname 0xab21 绘雨
!setname 0xb22 乖离
!setname 0x5b22 纯白型
!setname 0x3b23 爱莎 !setname 0x3b23 爱莎
!setname 0x5b23 晓美焰 !setname 0x5b23 晓美焰
!setname 0x9b23 ├军团┤ !setname 0x6b23 FantasiaT
!setname 0x9b23 军团
!setname 0xab23 两仪式 !setname 0xab23 两仪式
!setname 0xcb23 圣白莲 !setname 0xcb23 圣白莲
!setname 0x3b24 天符 !setname 0x3b24 天符
!setname 0x3b26 天空的水晶部队
!setname 0x6b25 佐仓杏子 !setname 0x6b25 佐仓杏子
!setname 0xcb25 鹿目圆香
!setname 0x3b26 天空的水晶部队
!setname 0x6b26 魔铳
!setname 0x9b26 魔缎
!setname 0xab26 线膛燧发枪
!setname 0xcb26 连结姬 !setname 0xcb26 连结姬
!setname 0x6b27 皇家骑士
!setname 0x9b27 何蒙库鲁兹
!setname 0xab27 素晴
!setname 0x3b28 LUKA
!setname 0x9b28 RWBY
#星眼 334 0x340-0x34f #星眼 334 0x340-0x34f
!setname 0x340 灵装 !setname 0x340 灵装
......
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