Commit abe3317e authored by TanakaKotoha's avatar TanakaKotoha

Nowhere

parent 7d1465c7
No preview for this file type
...@@ -104,7 +104,7 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -104,7 +104,7 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+RESETS_STANDARD) e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
if e:GetHandler():GetOverlayGroup():IsExists(Card.IsType,1,nil,TYPE_PENDULUM) then if e:GetHandler():GetOverlayGroup():IsExists(Card.IsType,1,nil,TYPE_XYZ) then
Duel.Remove(tc,POS_FACEDOWN,REASON_EFFECT) Duel.Remove(tc,POS_FACEDOWN,REASON_EFFECT)
end end
end end
......
...@@ -6,7 +6,7 @@ function cm.initial_effect(c) ...@@ -6,7 +6,7 @@ function cm.initial_effect(c)
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--ep effects --ep effects
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(17060824,0))
e1:SetCategory(CATEGORY_TOHAND) e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
...@@ -28,8 +28,8 @@ function cm.initial_effect(c) ...@@ -28,8 +28,8 @@ function cm.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to grave --to grave
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1)) e3:SetDescription(aux.Stringid(17060824,1))
e3:SetCategory(CATEGORY_TOGRAVE) e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
...@@ -91,11 +91,11 @@ function cm.tgfilter(c) ...@@ -91,11 +91,11 @@ function cm.tgfilter(c)
return c:IsSummonType(SUMMON_TYPE_SPECIAL) and c:IsAbleToGrave() return c:IsSummonType(SUMMON_TYPE_SPECIAL) and c:IsAbleToGrave()
end end
function cm.filter(c,e,tp) function cm.filter(c,e,tp)
return cm.IsPilferer_Arthur(c) and c:IsType(TYPE_RITUAL) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) return c:IsSetCard(0x47f0) and c:IsType(TYPE_RITUAL) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true)
end end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsSummonType(SUMMON_TYPE_SPECIAL) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsSummonType(SUMMON_TYPE_SPECIAL) end
if chk==0 then return iCount(0,tp,m,1) and Duel.IsExistingTarget(cm.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler()) if chk==0 then return iCount(0,tp,17060824,1) and Duel.IsExistingTarget(cm.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler())
and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectTarget(tp,cm.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,e:GetHandler()) local g=Duel.SelectTarget(tp,cm.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,e:GetHandler())
......
...@@ -95,7 +95,7 @@ function cm.thcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -95,7 +95,7 @@ function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return not eg:IsContains(e:GetHandler()) and eg:IsExists(cm.cfilter,1,nil,tp) return not eg:IsContains(e:GetHandler()) and eg:IsExists(cm.cfilter,1,nil,tp)
end end
function cm.thfilter(c) function cm.thfilter(c)
return c:IsLevelBelow(4) and c:IsSetCard(0x7f0) and c:IsAbleToHand() return c:IsLevelBelow(4) and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
end end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
...@@ -27,7 +27,6 @@ function cm.initial_effect(c) ...@@ -27,7 +27,6 @@ function cm.initial_effect(c)
e3:SetCode(EVENT_SPSUMMON_SUCCESS) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY) e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,17060866) e3:SetCountLimit(1,17060866)
e3:SetCondition(cm.sptcon)
e3:SetTarget(cm.spttg) e3:SetTarget(cm.spttg)
e3:SetOperation(cm.sptop) e3:SetOperation(cm.sptop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
...@@ -59,9 +58,6 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -59,9 +58,6 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end end
function cm.sptcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonLocation()==LOCATION_SZONE
end
function cm.spttg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.spttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if chk==0 then return Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,17060867,0,0x4011,0,0,1,RACE_CYBERSE,ATTRIBUTE_FIRE) end and Duel.IsPlayerCanSpecialSummonMonster(tp,17060867,0,0x4011,0,0,1,RACE_CYBERSE,ATTRIBUTE_FIRE) end
......
...@@ -39,7 +39,7 @@ function cm.initial_effect(c) ...@@ -39,7 +39,7 @@ function cm.initial_effect(c)
end end
cm.is_named_with_Ma_Elf=1 cm.is_named_with_Ma_Elf=1
function cm.costfilter(c) function cm.costfilter(c)
return c:IsFaceup() and c:IsAbleToHandAsCost() return c:IsFaceup() and c:IsSetCard(0x7f0) and c:IsAbleToHandAsCost()
end end
function cm.spcon(e,c) function cm.spcon(e,c)
if c==nil then return true end if c==nil then return true end
...@@ -59,7 +59,7 @@ function cm.desfilter(c,e,tp,mc) ...@@ -59,7 +59,7 @@ function cm.desfilter(c,e,tp,mc)
return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,Group.FromCards(c,mc)) return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,Group.FromCards(c,mc))
end end
function cm.spfilter(c,e,tp,dg) function cm.spfilter(c,e,tp,dg)
return c:IsSetCard(0x7f0) and not c:IsCode(17060934) return c:IsSetCard(0x47f3) and not c:IsCode(17060934)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,dg,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,dg,c)>0
end end
function cm.extg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.extg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
......
...@@ -80,7 +80,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -80,7 +80,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
return true return true
end end
function cm.cfilter(c) function cm.cfilter(c)
return c:IsType(TYPE_PENDULUM) and c:IsType(TYPE_RITUAL) and c:IsAbleToGraveAsCost() return c:IsLevelBelow(7) and c:IsType(TYPE_PENDULUM) and c:IsType(TYPE_RITUAL) and c:IsAbleToGraveAsCost()
end end
function cm.copytg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.copytg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
......
...@@ -38,6 +38,6 @@ end ...@@ -38,6 +38,6 @@ end
function c20200002.cfilter(c) function c20200002.cfilter(c)
return c:IsFaceup() and c:IsSetCard(0xb30) return c:IsFaceup() and c:IsSetCard(0xb30)
end end
function c20200002.handcon(e) function c20200002.handcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c20200002.cfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) return Duel.IsExistingMatchingCard(c20200002.cfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
end end
\ No newline at end of file
...@@ -71,4 +71,4 @@ function c33330084.regop(e,tp,eg,ep,ev,re,r,rp) ...@@ -71,4 +71,4 @@ function c33330084.regop(e,tp,eg,ep,ev,re,r,rp)
tc=g:GetNext() tc=g:GetNext()
end end
end end
end end
\ No newline at end of file
...@@ -27,7 +27,7 @@ function c33330090.regop(e,tp,eg,ep,ev,re,r,rp) ...@@ -27,7 +27,7 @@ function c33330090.regop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c33330090.filter(c,tp) function c33330090.filter(c,tp)
return c:IsType(TYPE_SPELL) and (c:IsAbleToHand() or (c:IsSSetable() and Duel.GetLocationCount(tp,LOCATION_SZONE)>0)) return (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)) and (c:IsAbleToHand() or (c:IsSSetable() and Duel.GetLocationCount(tp,LOCATION_SZONE)>0))
end end
function c33330090.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c33330090.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
......
...@@ -14,12 +14,11 @@ function c33400114.initial_effect(c) ...@@ -14,12 +14,11 @@ function c33400114.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c33400114.tfilter(c,e,tp) function c33400114.tfilter(c,e,tp)
return c:IsCode(33400011) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) return c:IsCode(33400011) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end end
function c33400114.filter(c,e,tp) function c33400114.filter(c,e,tp)
return c:IsSetCard(0x3341) return c:IsSetCard(0x3341)
and Duel.IsExistingMatchingCard(c33400114.tfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.IsExistingMatchingCard(c33400114.tfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
and Duel.GetLocationCountFromEx(tp,tp,c)>0
end end
function c33400114.chkfilter(c) function c33400114.chkfilter(c)
return c:IsFaceup() and c:IsSetCard(0x3341) return c:IsFaceup() and c:IsSetCard(0x3341)
...@@ -70,7 +69,7 @@ function c33400114.tgop(e,tp,eg,ep,ev,re,r,rp) ...@@ -70,7 +69,7 @@ function c33400114.tgop(e,tp,eg,ep,ev,re,r,rp)
local dg=Duel.GetMatchingGroup(c33400114.ss,tp,LOCATION_GRAVE,0,nil,e,tp) local dg=Duel.GetMatchingGroup(c33400114.ss,tp,LOCATION_GRAVE,0,nil,e,tp)
if dg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(33400114,0)) then if dg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(33400114,0)) then
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c33400114.ss,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c33400114.ss,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
......
...@@ -26,7 +26,7 @@ function cm.initial_effect(c) ...@@ -26,7 +26,7 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_TO_GRAVE) e4:SetCode(EVENT_TO_GRAVE)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCountLimit(1,m) e4:SetCountLimit(1,m+10000)
e4:SetCondition(cm.con1) e4:SetCondition(cm.con1)
e4:SetTarget(cm.xyztg) e4:SetTarget(cm.xyztg)
e4:SetOperation(cm.xyzop) e4:SetOperation(cm.xyzop)
...@@ -37,7 +37,7 @@ function cm.initial_effect(c) ...@@ -37,7 +37,7 @@ function cm.initial_effect(c)
e41:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e41:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e41:SetCode(EVENT_SPSUMMON_SUCCESS) e41:SetCode(EVENT_SPSUMMON_SUCCESS)
e41:SetProperty(EFFECT_FLAG_DELAY) e41:SetProperty(EFFECT_FLAG_DELAY)
e41:SetCountLimit(1,m) e41:SetCountLimit(1,m+10000)
e41:SetTarget(cm.xyztg) e41:SetTarget(cm.xyztg)
e41:SetOperation(cm.xyzop) e41:SetOperation(cm.xyzop)
c:RegisterEffect(e41) c:RegisterEffect(e41)
...@@ -48,7 +48,7 @@ function cm.initial_effect(c) ...@@ -48,7 +48,7 @@ function cm.initial_effect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetCode(EVENT_TO_GRAVE) e5:SetCode(EVENT_TO_GRAVE)
e5:SetProperty(EFFECT_FLAG_DELAY) e5:SetProperty(EFFECT_FLAG_DELAY)
e5:SetCountLimit(1,m+10000) e5:SetCountLimit(1,m+20000)
e5:SetCondition(cm.con1) e5:SetCondition(cm.con1)
e5:SetTarget(cm.target) e5:SetTarget(cm.target)
e5:SetOperation(cm.activate) e5:SetOperation(cm.activate)
...@@ -59,7 +59,7 @@ function cm.initial_effect(c) ...@@ -59,7 +59,7 @@ function cm.initial_effect(c)
e51:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e51:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e51:SetCode(EVENT_SPSUMMON_SUCCESS) e51:SetCode(EVENT_SPSUMMON_SUCCESS)
e51:SetProperty(EFFECT_FLAG_DELAY) e51:SetProperty(EFFECT_FLAG_DELAY)
e51:SetCountLimit(1,m+10000) e51:SetCountLimit(1,m+20000)
e51:SetTarget(cm.target) e51:SetTarget(cm.target)
e51:SetOperation(cm.activate) e51:SetOperation(cm.activate)
c:RegisterEffect(e51) c:RegisterEffect(e51)
...@@ -82,7 +82,7 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -82,7 +82,7 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
local g2=Duel.SelectMatchingCard(tp,cm.refilter,tp,LOCATION_DECK,0,1,1,nil,tp) local g2=Duel.SelectMatchingCard(tp,cm.refilter,tp,LOCATION_DECK,0,1,1,nil,tp)
local tc2=g2:GetFirst() local tc2=g2:GetFirst()
Duel.Remove(tc2,POS_FACEUP,REASON_EFFECT) Duel.Remove(tc2,POS_FACEUP,REASON_EFFECT)
Duel.RegisterFlagEffect(tp,tc2:GetCode()+10000,RESET_EVENT+RESET_PHASE+PHASE_END,0,0) Duel.RegisterFlagEffect(tp,tc2:GetCode()+10000,RESET_EVENT+RESET_PHASE+PHASE_END,0,0)
end end
function cm.con1(e,tp,eg,ep,ev,re,r,rp) function cm.con1(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -29,7 +29,7 @@ function cm.initial_effect(c) ...@@ -29,7 +29,7 @@ function cm.initial_effect(c)
e5:SetCountLimit(1,m+10000) e5:SetCountLimit(1,m+10000)
e5:SetCondition(cm.con1) e5:SetCondition(cm.con1)
e5:SetTarget(cm.thtg) e5:SetTarget(cm.thtg)
e5:SetOperation(cm.tgop) e5:SetOperation(cm.thop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e51=Effect.CreateEffect(c) local e51=Effect.CreateEffect(c)
e51:SetDescription(aux.Stringid(m,1)) e51:SetDescription(aux.Stringid(m,1))
......
...@@ -29,7 +29,7 @@ function cm.initial_effect(c) ...@@ -29,7 +29,7 @@ function cm.initial_effect(c)
e5:SetCountLimit(1,m+10000) e5:SetCountLimit(1,m+10000)
e5:SetCondition(cm.con1) e5:SetCondition(cm.con1)
e5:SetTarget(cm.thtg) e5:SetTarget(cm.thtg)
e5:SetOperation(cm.tgop) e5:SetOperation(cm.thop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e51=Effect.CreateEffect(c) local e51=Effect.CreateEffect(c)
e51:SetDescription(aux.Stringid(m,1)) e51:SetDescription(aux.Stringid(m,1))
......
...@@ -58,11 +58,34 @@ local c=e:GetHandler() ...@@ -58,11 +58,34 @@ local c=e:GetHandler()
if Duel.SelectYesNo(tp,aux.Stringid(m,1)) then if Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local tr=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,0,1,1,c:IsCode(m)) local tr=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,0,1,1,c:IsCode(m))
Duel.Remove(tr,POS_FACEUP,REASON_EFFECT) tc=tr:GetFirst()
if Duel.Remove(tc,0,REASON_EFFECT+REASON_TEMPORARY)>0 then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetLabelObject(tc)
e1:SetCountLimit(1)
if Duel.GetCurrentPhase()==PHASE_STANDBY then
e1:SetLabel(Duel.GetTurnCount())
e1:SetCondition(cm.retcon)
e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
else
e1:SetReset(RESET_PHASE+PHASE_STANDBY)
end
e1:SetOperation(cm.retop)
Duel.RegisterEffect(e1,tp)
end
end end
end end
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
end end
function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()~=e:GetLabel()
end
function cm.retop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
Duel.ReturnToField(tc)
end
function cm.con1(e,tp,eg,ep,ev,re,r,rp) function cm.con1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -81,11 +104,10 @@ end ...@@ -81,11 +104,10 @@ end
function cm.reop(e,tp,eg,ep,ev,re,r,rp) function cm.reop(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.Remove(tc,POS_FACEUP,REASON_EFFECT) Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
end end
if Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) then if Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) then
if Duel.SelectYesNo(tp,aux.Stringid(m,2)) then if Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
Duel.RemoveOverlayCard(tp,1,0,1,1,REASON_EFFECT)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local tr=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil) local tr=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil)
Duel.Remove(tr,POS_FACEUP,REASON_EFFECT) Duel.Remove(tr,POS_FACEUP,REASON_EFFECT)
......
...@@ -80,7 +80,7 @@ function c40006762.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -80,7 +80,7 @@ function c40006762.spop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c40006762.slfilter(c,e,tp) function c40006762.slfilter(c,e,tp)
return c:IsLevelBelow(3) and c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,nil) and c:IsSetCard(0xf24) return c:IsLevelBelow(3) and c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0xf24)
end end
function c40006762.sltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c40006762.sltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c40006762.slfilter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c40006762.slfilter(chkc,e,tp) end
...@@ -91,25 +91,25 @@ function c40006762.sltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -91,25 +91,25 @@ function c40006762.sltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end end
function c40006762.slop(e,tp,eg,ep,ev,re,r,rp) function c40006762.slop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,nil) and tc:IsFaceup() and c:IsRelateToEffect(e) and c:IsFaceup() then if tc:IsRelateToEffect(e) then
local e2=Effect.CreateEffect(c) Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
end
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DISABLE) e2:SetCode(EFFECT_DISABLE)
e2:SetReset(RESET_EVENT+0x1fe0000) e2:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e2) tc:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_DISABLE_EFFECT) e3:SetCode(EFFECT_DISABLE_EFFECT)
e3:SetReset(RESET_EVENT+0x1fe0000) e3:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL) e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(tc:GetLevel()) e1:SetValue(tc:GetLevel())
e1:SetReset(RESET_EVENT+0x1ff0000) e1:SetReset(RESET_EVENT+0x1ff0000)
c:RegisterEffect(e1) e:GetHandler():RegisterEffect(e1)
end
Duel.SpecialSummonComplete()
end end
\ No newline at end of file
...@@ -51,7 +51,7 @@ function c60151601.initial_effect(c) ...@@ -51,7 +51,7 @@ function c60151601.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151601.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151601.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(60151601)==0 return not e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end end
function c60151601.filter(c) function c60151601.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -89,10 +89,10 @@ function c60151601.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,10 +89,10 @@ function c60151601.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c60151601.operation(e,tp,eg,ep,ev,re,r,rp) function c60151601.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)~=0 then
c:RegisterFlagEffect(60151601,RESET_EVENT+RESETS_STANDARD,0,1) c:RegisterFlagEffect(60151601,RESET_EVENT+RESETS_STANDARD,0,1)
end end
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
end end
function c60151601.filter3(c) function c60151601.filter3(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand() return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
......
...@@ -51,7 +51,7 @@ function c60151602.initial_effect(c) ...@@ -51,7 +51,7 @@ function c60151602.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151602.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151602.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(60151602)==0 return not e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end end
function c60151602.filter(c) function c60151602.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -89,7 +89,7 @@ function c60151602.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,7 +89,7 @@ function c60151602.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c60151602.operation(e,tp,eg,ep,ev,re,r,rp) function c60151602.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)~=0 then
c:RegisterFlagEffect(60151602,RESET_EVENT+RESETS_STANDARD,0,1) c:RegisterFlagEffect(60151602,RESET_EVENT+RESETS_STANDARD,0,1)
end end
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
......
...@@ -51,7 +51,7 @@ function c60151603.initial_effect(c) ...@@ -51,7 +51,7 @@ function c60151603.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151603.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151603.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(60151603)==0 return not e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end end
function c60151603.filter(c) function c60151603.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -89,7 +89,7 @@ function c60151603.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,7 +89,7 @@ function c60151603.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c60151603.operation(e,tp,eg,ep,ev,re,r,rp) function c60151603.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)~=0 then
if c:GetSummonLocation()==LOCATION_EXTRA then if c:GetSummonLocation()==LOCATION_EXTRA then
end end
......
...@@ -51,7 +51,7 @@ function c60151604.initial_effect(c) ...@@ -51,7 +51,7 @@ function c60151604.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151604.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151604.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(60151601)==0 return not e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end end
function c60151604.filter(c) function c60151604.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -89,7 +89,7 @@ function c60151604.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,7 +89,7 @@ function c60151604.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c60151604.operation(e,tp,eg,ep,ev,re,r,rp) function c60151604.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)~=0 then
if c:GetSummonLocation()==LOCATION_EXTRA then if c:GetSummonLocation()==LOCATION_EXTRA then
end end
......
...@@ -51,7 +51,7 @@ function c60151605.initial_effect(c) ...@@ -51,7 +51,7 @@ function c60151605.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151605.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151605.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(60151605)==0 return not e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end end
function c60151605.filter(c) function c60151605.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -89,7 +89,7 @@ function c60151605.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,7 +89,7 @@ function c60151605.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c60151605.operation(e,tp,eg,ep,ev,re,r,rp) function c60151605.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)~=0 then
if c:GetSummonLocation()==LOCATION_EXTRA then if c:GetSummonLocation()==LOCATION_EXTRA then
end end
......
...@@ -51,7 +51,7 @@ function c60151606.initial_effect(c) ...@@ -51,7 +51,7 @@ function c60151606.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151606.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151606.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(60151606)==0 return not e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end end
function c60151606.filter(c) function c60151606.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -89,7 +89,7 @@ function c60151606.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -89,7 +89,7 @@ function c60151606.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c60151606.operation(e,tp,eg,ep,ev,re,r,rp) function c60151606.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)~=0 then
if c:GetSummonLocation()==LOCATION_EXTRA then if c:GetSummonLocation()==LOCATION_EXTRA then
end end
......
...@@ -21,8 +21,8 @@ function c60151621.initial_effect(c) ...@@ -21,8 +21,8 @@ function c60151621.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c60151621.filter(c,tp) function c60151621.filter(c,tp)
local lv=c:GetLevel() local lv=c:GetOriginalLevel()
local rk=c:GetRank() local rk=c:GetOriginalRank()
return c:IsFaceup() and c:IsSetCard(0xcb25) and (c:IsType(TYPE_MONSTER) or c:IsLocation(LOCATION_PZONE)) and Duel.IsExistingMatchingCard(c60151621.pcfilter,tp,LOCATION_DECK,0,1,nil,lv,rk) return c:IsFaceup() and c:IsSetCard(0xcb25) and (c:IsType(TYPE_MONSTER) or c:IsLocation(LOCATION_PZONE)) and Duel.IsExistingMatchingCard(c60151621.pcfilter,tp,LOCATION_DECK,0,1,nil,lv,rk)
end end
function c60151621.pcfilter(c,lv,rk) function c60151621.pcfilter(c,lv,rk)
......
--玫瑰利刃 丽塔 --玫瑰利刃 丽塔
function c75646071.initial_effect(c) function c75646071.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,nil,4,2)
c:EnableReviveLimit()
--Remove equip --Remove equip
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(75646071,0)) e1:SetDescription(aux.Stringid(75646071,0))
......
...@@ -18,7 +18,7 @@ function c75646956.initial_effect(c) ...@@ -18,7 +18,7 @@ function c75646956.initial_effect(c)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(75646956,1)) e2:SetDescription(aux.Stringid(75646956,1))
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_NEGATED) e2:SetCode(EVENT_SUMMON_NEGATED)
e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,5646956) e2:SetCountLimit(1,5646956)
......
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