Skip to content

Y
ygopro-scripts
Commit 4fe79f7c authored by DailyShana's avatar DailyShana
Browse files
Options

fix

parent ee84f244
Show whitespace changes
Inline Side-by-side
Showing with 214 additions and 76 deletions
c10591919.lua
View file @ 4fe79f7c
...@@ -39,17 +39,28 @@ function c10591919.opa(e,tp,eg,ep,ev,re,r,rp) ...@@ -39,17 +39,28 @@ function c10591919.opa(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
if not tc then return end if not tc then return end
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(10591919,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetOperation(c10591919.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
tc:RegisterEffect(e1) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c10591919.descon)
e1:SetOperation(c10591919.desop)
Duel.RegisterEffect(e1,tp)
end
function c10591919.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(10591919)~=e:GetLabel() then
e:Reset()
return false
else return true end
end end
function c10591919.desop(e,tp,eg,ep,ev,re,r,rp) function c10591919.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
function c10591919.cond(e) function c10591919.cond(e)
return e:GetHandler():IsDefensePos() return e:GetHandler():IsDefensePos()
......
c17236839.lua
View file @ 4fe79f7c
...@@ -66,17 +66,27 @@ function c17236839.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -66,17 +66,27 @@ function c17236839.activate(e,tp,eg,ep,ev,re,r,rp)
fop(ce,e,tp,tc,mat2) fop(ce,e,tp,tc,mat2)
end end
tc:CompleteProcedure() tc:CompleteProcedure()
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(17236839,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetRange(LOCATION_MZONE)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetReset(RESET_EVENT+0x1fe0000) e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c17236839.descon)
e1:SetOperation(c17236839.desop) e1:SetOperation(c17236839.desop)
tc:RegisterEffect(e1,true) Duel.RegisterEffect(e1,tp)
end end
end end
function c17236839.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(17236839)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c17236839.desop(e,tp,eg,ep,ev,re,r,rp) function c17236839.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c42002073.lua
View file @ 4fe79f7c
...@@ -100,17 +100,27 @@ end ...@@ -100,17 +100,27 @@ end
function c42002073.spop(e,tp,eg,ep,ev,re,r,rp) function c42002073.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(42002073,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetOperation(c42002073.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
tc:RegisterEffect(e1,true) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c42002073.descon)
e1:SetOperation(c42002073.desop)
Duel.RegisterEffect(e1,tp)
end end
end end
function c42002073.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(42002073)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c42002073.desop(e,tp,eg,ep,ev,re,r,rp) function c42002073.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c4423206.lua
View file @ 4fe79f7c
...@@ -32,18 +32,29 @@ function c4423206.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,18 +32,29 @@ function c4423206.spop(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,c4423206.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c4423206.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)~=0 then local tc=g:GetFirst()
if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)~=0 then
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(4423206,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetOperation(c4423206.desop)
e1:SetReset(RESET_EVENT+0x1fe0000)
e1:SetCountLimit(1) e1:SetCountLimit(1)
g:GetFirst():RegisterEffect(e1,true) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c4423206.descon)
e1:SetOperation(c4423206.desop)
Duel.RegisterEffect(e1,tp)
end end
end end
function c4423206.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(4423206)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c4423206.desop(e,tp,eg,ep,ev,re,r,rp) function c4423206.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c53291093.lua
View file @ 4fe79f7c
...@@ -34,17 +34,29 @@ function c53291093.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -34,17 +34,29 @@ function c53291093.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
Duel.BreakEffect() Duel.BreakEffect()
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
local sc=sg:GetFirst()
local fid=e:GetHandler():GetFieldID()
sc:RegisterFlagEffect(53291093,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetOperation(c53291093.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
sg:GetFirst():RegisterEffect(e1) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(sc)
e1:SetCondition(c53291093.descon)
e1:SetOperation(c53291093.desop)
Duel.RegisterEffect(e1,tp)
end end
end end
end end
function c53291093.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(53291093)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c53291093.desop(e,tp,eg,ep,ev,re,r,rp) function c53291093.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c57777714.lua
View file @ 4fe79f7c
...@@ -46,19 +46,28 @@ function c57777714.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -46,19 +46,28 @@ function c57777714.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end end
function c57777714.operation(e,tp,eg,ep,ev,re,r,rp) function c57777714.operation(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) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(57777714,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c57777714.descon)
e1:SetOperation(c57777714.desop) e1:SetOperation(c57777714.desop)
e1:SetReset(RESET_EVENT+0x1fe0000) Duel.RegisterEffect(e1,tp)
tc:RegisterEffect(e1)
end end
end end
function c57777714.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(57777714)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c57777714.desop(e,tp,eg,ep,ev,re,r,rp) function c57777714.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c652362.lua
View file @ 4fe79f7c
...@@ -26,16 +26,27 @@ end ...@@ -26,16 +26,27 @@ end
function c652362.spop(e,tp,eg,ep,ev,re,r,rp) function c652362.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(652362,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetOperation(c652362.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
tc:RegisterEffect(e1) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c652362.descon)
e1:SetOperation(c652362.desop)
Duel.RegisterEffect(e1,tp)
end end
end end
function c652362.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(652362)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c652362.desop(e,tp,eg,ep,ev,re,r,rp) function c652362.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c72029628.lua
View file @ 4fe79f7c
...@@ -68,17 +68,27 @@ function c72029628.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,17 +68,27 @@ function c72029628.activate(e,tp,eg,ep,ev,re,r,rp)
fop(ce,e,tp,tc,mat2) fop(ce,e,tp,tc,mat2)
end end
tc:CompleteProcedure() tc:CompleteProcedure()
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(72029628,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c72029628.descon)
e1:SetOperation(c72029628.desop) e1:SetOperation(c72029628.desop)
e1:SetReset(RESET_EVENT+0x1fe0000) Duel.RegisterEffect(e1,tp)
e1:SetCountLimit(1)
tc:RegisterEffect(e1,true)
end end
end end
function c72029628.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(72029628)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c72029628.desop(e,tp,eg,ep,ev,re,r,rp) function c72029628.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c74926274.lua
View file @ 4fe79f7c
...@@ -42,19 +42,28 @@ function c74926274.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -42,19 +42,28 @@ function c74926274.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c74926274.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,lv) local g=Duel.SelectMatchingCard(tp,c74926274.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,lv)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(74926274,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c74926274.descon)
e1:SetOperation(c74926274.desop) e1:SetOperation(c74926274.desop)
e1:SetReset(RESET_EVENT+0x1fe0000) Duel.RegisterEffect(e1,tp)
tc:RegisterEffect(e1,true)
end end
end end
function c74926274.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(74926274)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c74926274.desop(e,tp,eg,ep,ev,re,r,rp) function c74926274.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c7573135.lua
View file @ 4fe79f7c
...@@ -42,22 +42,27 @@ function c7573135.hspop(e,tp,eg,ep,ev,re,r,rp) ...@@ -42,22 +42,27 @@ function c7573135.hspop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.SpecialSummon(tc,113,tp,tp,false,false,POS_FACEUP_DEFENSE) Duel.SpecialSummon(tc,113,tp,tp,false,false,POS_FACEUP_DEFENSE)
tc:RegisterFlagEffect(7573135,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1) local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(7573135,RESET_EVENT+0x1fe0000,0,1,fid)
tc:RegisterFlagEffect(tc:GetOriginalCode(),RESET_EVENT+0x1ff0000,0,0) tc:RegisterFlagEffect(tc:GetOriginalCode(),RESET_EVENT+0x1ff0000,0,0)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetLabel(fid)
e1:SetLabelObject(tc) e1:SetLabelObject(tc)
e1:SetCondition(c7573135.retcon) e1:SetCondition(c7573135.retcon)
e1:SetOperation(c7573135.retop) e1:SetOperation(c7573135.retop)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
end end
end end
function c7573135.retcon(e,tp,eg,ep,ev,re,r,rp) function c7573135.retcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject() local tc=e:GetLabelObject()
return tc:GetFlagEffect(7573135)>0 if tc:GetFlagEffectLabel(7573135)~=e:GetLabel() then
e:Reset()
return false
else return true end
end end
function c7573135.retop(e,tp,eg,ep,ev,re,r,rp) function c7573135.retop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject() local tc=e:GetLabelObject()
......
c76066541.lua
View file @ 4fe79f7c
...@@ -33,19 +33,28 @@ function c76066541.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -33,19 +33,28 @@ function c76066541.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c76066541.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c76066541.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)~=0 then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(76066541,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c76066541.descon)
e1:SetOperation(c76066541.desop) e1:SetOperation(c76066541.desop)
e1:SetReset(RESET_EVENT+0x1fe0000) Duel.RegisterEffect(e1,tp)
tc:RegisterEffect(e1)
end end
end end
function c76066541.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(76066541)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c76066541.desop(e,tp,eg,ep,ev,re,r,rp) function c76066541.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_EFFECT) Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
end end
c8339504.lua
View file @ 4fe79f7c
...@@ -48,23 +48,32 @@ function c8339504.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -48,23 +48,32 @@ function c8339504.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c8339504.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,tc,e,tp) local g=Duel.SelectMatchingCard(tp,c8339504.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,tc,e,tp)
local sc=g:GetFirst() local sc=g:GetFirst()
if sc then if sc and Duel.SpecialSummon(sc,0,tp,tp,false,false,POS_FACEUP)~=0 then
Duel.SpecialSummon(sc,0,tp,tp,false,false,POS_FACEUP)
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
c:CancelToGrave() c:CancelToGrave()
Duel.Overlay(sc,Group.FromCards(c)) Duel.Overlay(sc,Group.FromCards(c))
end end
local fid=c:GetFieldID()
sc:RegisterFlagEffect(8339504,RESET_EVENT+0x1fe0000,0,1,fid)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(sc)
e1:SetCondition(c8339504.tgcon)
e1:SetOperation(c8339504.tgop) e1:SetOperation(c8339504.tgop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp)
sc:RegisterEffect(e1)
end end
end end
function c8339504.tgcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(8339504)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c8339504.tgop(e,tp,eg,ep,ev,re,r,rp) function c8339504.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT) Duel.SendtoGrave(e:GetLabelObject(),REASON_EFFECT)
end end
c94484482.lua
View file @ 4fe79f7c
...@@ -40,16 +40,27 @@ function c94484482.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,16 +40,27 @@ function c94484482.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c94484482.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c94484482.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)~=0 then if tc and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)~=0 then
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(94484482,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c94484482.retcon)
e1:SetOperation(c94484482.retop) e1:SetOperation(c94484482.retop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp)
tc:RegisterEffect(e1)
end end
end end
function c94484482.retcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(94484482)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c94484482.retop(e,tp,eg,ep,ev,re,r,rp) function c94484482.retop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT) Duel.SendtoHand(e:GetLabelObject(),nil,REASON_EFFECT)
end end
c96570609.lua
View file @ 4fe79f7c
...@@ -92,19 +92,30 @@ function c96570609.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -92,19 +92,30 @@ function c96570609.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
local fid=e:GetHandler():GetFieldID()
tc:RegisterFlagEffect(96570609,RESET_EVENT+0x1fe0000,0,1,fid)
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+EFFECT_TYPE_CONTINUOUS)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1) e1:SetCountLimit(1)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetLabel(fid)
e1:SetLabelObject(tc)
e1:SetCondition(c96570609.thcon)
e1:SetOperation(c96570609.thop) e1:SetOperation(c96570609.thop)
e1:SetReset(RESET_EVENT+0x1fe0000) Duel.RegisterEffect(e1,tp)
tc:RegisterEffect(e1,true)
end end
end end
end end
function c96570609.thcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
if tc:GetFlagEffectLabel(96570609)~=e:GetLabel() then
e:Reset()
return false
else return true end
end
function c96570609.thop(e,tp,eg,ep,ev,re,r,rp) function c96570609.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT) Duel.SendtoHand(e:GetLabelObject(),nil,REASON_EFFECT)
end end
function c96570609.sumcon(e,tp,eg,ep,ev,re,r,rp) function c96570609.sumcon(e,tp,eg,ep,ev,re,r,rp)
local ph=Duel.GetCurrentPhase() local ph=Duel.GetCurrentPhase()
......
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