Commit 7530da63 authored by argon.sun's avatar argon.sun

fix

parent 40833b4e
...@@ -22,7 +22,7 @@ function c13821299.spfilter(c) ...@@ -22,7 +22,7 @@ function c13821299.spfilter(c)
end end
function c13821299.spcon(e,c) function c13821299.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c13821299.spfilter,c:GetControler(),0,LOCATION_ONFIELD,1,nil) and Duel.IsExistingMatchingCard(c13821299.spfilter,c:GetControler(),0,LOCATION_ONFIELD,1,nil)
end end
function c13821299.spop(e,tp,eg,ep,ev,re,r,rp,c) function c13821299.spop(e,tp,eg,ep,ev,re,r,rp,c)
......
...@@ -14,7 +14,7 @@ function c14824019.initial_effect(c) ...@@ -14,7 +14,7 @@ function c14824019.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c14824019.filter(c) function c14824019.filter(c)
return c:IsSetCard(0x106e) and c:IsAbleToHand() return c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
end end
function c14824019.shtg(e,tp,eg,ep,ev,re,r,rp,chk) function c14824019.shtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
......
...@@ -47,9 +47,10 @@ function c17573739.spfilter2(c,att) ...@@ -47,9 +47,10 @@ function c17573739.spfilter2(c,att)
end end
function c17573739.spcon(e,c) function c17573739.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 local tp=c:GetControler()
and not Duel.IsExistingMatchingCard(c17573739.exfilter,c:GetControler(),LOCATION_ONFIELD,0,1,nil) return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c17573739.spfilter1,c:GetControler(),0,LOCATION_MZONE,1,nil,tp) and not Duel.IsExistingMatchingCard(c17573739.exfilter,tp,LOCATION_ONFIELD,0,1,nil)
and Duel.IsExistingMatchingCard(c17573739.spfilter1,tp,0,LOCATION_MZONE,1,nil,tp)
end end
function c17573739.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c17573739.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsFaceup() end if chkc then return chkc:IsOnField() and chkc:IsFaceup() end
......
...@@ -53,5 +53,5 @@ function c21702241.damop(e,tp,eg,ep,ev,re,r,rp) ...@@ -53,5 +53,5 @@ function c21702241.damop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
local ec=c:GetEquipTarget() local ec=c:GetEquipTarget()
Duel.Damage(ec:GetControler(),ec:GetBaseAttack(),REASON_DAMAGE) Duel.Damage(ec:GetControler(),ec:GetBaseAttack(),REASON_EFFECT)
end end
...@@ -52,7 +52,7 @@ function c23205979.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -52,7 +52,7 @@ function c23205979.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_HANDES,0,0,1-tp,1) Duel.SetOperationInfo(0,CATEGORY_HANDES,0,0,1-tp,1)
end end
function c23205979.operation(e,tp,eg,ep,ev,re,r,rp) function c23205979.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(ep,LOCATION_HAND,0,nil) local g=Duel.GetFieldGroup(ep,LOCATION_HAND,0)
if g:GetCount()==0 then return end if g:GetCount()==0 then return end
local sg=g:RandomSelect(1-tp,1) local sg=g:RandomSelect(1-tp,1)
Duel.SendtoGrave(sg,REASON_DISCARD+REASON_EFFECT) Duel.SendtoGrave(sg,REASON_DISCARD+REASON_EFFECT)
...@@ -73,7 +73,7 @@ function c23205979.desop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -73,7 +73,7 @@ function c23205979.desop2(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetCurrentPhase()==PHASE_DAMAGE and not Duel.IsDamageCalculated() then if Duel.GetCurrentPhase()==PHASE_DAMAGE and not Duel.IsDamageCalculated() then
e:GetLabelObject():SetLabel(1) e:GetLabelObject():SetLabel(1)
else else
Debug.Message(c:IsDisabled()) if c:IsHasEffect(EFFECT_DISABLE) then return end
if not c:IsDisabled() then Duel.Destroy(c,REASON_EFFECT) end if not c:IsDisabled() then Duel.Destroy(c,REASON_EFFECT) end
end end
end end
...@@ -82,6 +82,7 @@ function c23205979.desop3(e,tp,eg,ep,ev,re,r,rp) ...@@ -82,6 +82,7 @@ function c23205979.desop3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local des=e:GetLabelObject():GetLabel() local des=e:GetLabelObject():GetLabel()
e:GetLabelObject():SetLabel(0) e:GetLabelObject():SetLabel(0)
if c:IsHasEffect(EFFECT_DISABLE) then return end
if des==1 and not c:IsDisabled() then if des==1 and not c:IsDisabled() then
Duel.Destroy(c,REASON_EFFECT) Duel.Destroy(c,REASON_EFFECT)
end end
......
...@@ -85,10 +85,3 @@ function c2356994.retop(e,tp,eg,ep,ev,re,r,rp) ...@@ -85,10 +85,3 @@ function c2356994.retop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(c,nil,REASON_EFFECT) Duel.SendtoHand(c,nil,REASON_EFFECT)
end end
end end
function c2356994.dcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return ep~=tp and c==Duel.GetAttacker()
end
function c2356994.dop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChangeBattleDamage(ep,Duel.GetBattleDamage(ep)/2)
end
...@@ -36,7 +36,7 @@ function c24082387.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -36,7 +36,7 @@ function c24082387.target(e,tp,eg,ep,ev,re,r,rp,chk)
local rg=Duel.SelectMatchingCard(tp,c24082387.filter1,tp,LOCATION_DECK,0,1,1,nil,e,tp,cg,minc) local rg=Duel.SelectMatchingCard(tp,c24082387.filter1,tp,LOCATION_DECK,0,1,1,nil,e,tp,cg,minc)
e:SetLabel(rg:GetFirst():GetLevel()) e:SetLabel(rg:GetFirst():GetLevel())
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local sg=cg:SelectWithSumEqual(tp,Card.GetLevel,e:GetLabel(),1) local sg=cg:SelectWithSumEqual(tp,Card.GetLevel,e:GetLabel(),minc,99)
Duel.SendtoGrave(sg,REASON_COST) Duel.SendtoGrave(sg,REASON_COST)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
......
...@@ -60,9 +60,9 @@ end ...@@ -60,9 +60,9 @@ end
function c25343017.filter(c) function c25343017.filter(c)
return c:IsRace(RACE_PSYCHO) and c:IsAbleToRemove() return c:IsRace(RACE_PSYCHO) and c:IsAbleToRemove()
end end
function c25343017.rmtg(e,tp,eg,ep,ev,re,r,rp,chk) function c25343017.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chk:IsControler(tp) and c25343017.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chk:IsControler(tp) and c25343017.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c25343017.cfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingTarget(c25343017.cfilter,tp,LOCATION_GRAVE,0,1,nil,e,PLAYER_NONE) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectTarget(tp,c25343017.filter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectTarget(tp,c25343017.filter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
...@@ -72,7 +72,7 @@ function c25343017.rmop(e,tp,eg,ep,ev,re,r,rp) ...@@ -72,7 +72,7 @@ function c25343017.rmop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) then
tc:RegisterFlagEffect(25343017,RESET_EVENT+0x1fe0000,0,0) tc:RegisterFlagEffect(25343017,RESET_EVENT+0x1fe0000,0,0)
e:GetLabelObject(25343017):SetLabel(1) e:GetLabelObject():SetLabel(1)
if c:GetFlagEffect(25343017)==0 then if c:GetFlagEffect(25343017)==0 then
c:RegisterFlagEffect(25343017,RESET_EVENT+0x1680000,0,0) c:RegisterFlagEffect(25343017,RESET_EVENT+0x1680000,0,0)
e:GetLabelObject():GetLabelObject():Clear() e:GetLabelObject():GetLabelObject():Clear()
......
...@@ -14,7 +14,7 @@ function c27340877.filter(c) ...@@ -14,7 +14,7 @@ function c27340877.filter(c)
return c:IsFacedown() and c:GetRace()~=0 return c:IsFacedown() and c:GetRace()~=0
end end
function c27340877.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c27340877.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsCOntroler(tp) and c27340877.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c27340877.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c27340877.filter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c27340877.filter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEDOWN) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEDOWN)
Duel.SelectTarget(tp,c27340877.filter,tp,LOCATION_MZONE,0,1,1,nil) Duel.SelectTarget(tp,c27340877.filter,tp,LOCATION_MZONE,0,1,1,nil)
......
...@@ -54,14 +54,14 @@ function c28912357.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,14 +54,14 @@ function c28912357.spcon(e,tp,eg,ep,ev,re,r,rp)
return not c:IsLocation(LOCATION_DECK) and c:IsPreviousPosition(POS_FACEUP) return not c:IsLocation(LOCATION_DECK) and c:IsPreviousPosition(POS_FACEUP)
end end
function c28912357.spfilter(c,e,tp) function c28912357.spfilter(c,e,tp)
return c:IsLevelBelow(3) and c:IsSetCard(0x72) and c:IsCanBeSpecialSummoned(e,0x8,tp,false,false) return c:IsLevelBelow(3) and c:IsSetCard(0x72) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c28912357.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c28912357.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c28912357.spfilter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c28912357.spfilter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c28912357.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingTarget(c28912357.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c28912357.spfilter,tp,LOCATION_GRAVE,0,1,1,ni,e,tpl) local g=Duel.SelectTarget(tp,c28912357.spfilter,tp,LOCATION_GRAVE,0,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)
end end
function c28912357.spop(e,tp,eg,ep,ev,re,r,rp) function c28912357.spop(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -79,10 +79,3 @@ function c38538445.retop(e,tp,eg,ep,ev,re,r,rp) ...@@ -79,10 +79,3 @@ function c38538445.retop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(c,nil,REASON_EFFECT) Duel.SendtoHand(c,nil,REASON_EFFECT)
end end
end end
function c38538445.dcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return ep~=tp and c==Duel.GetAttacker()
end
function c38538445.dop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChangeBattleDamage(ep,Duel.GetBattleDamage(ep)/2)
end
...@@ -61,3 +61,6 @@ end ...@@ -61,3 +61,6 @@ end
function c41230939.eqlimit(e,c) function c41230939.eqlimit(e,c)
return e:GetOwner()==c return e:GetOwner()==c
end end
function c41230939.repval(e,re,r,rp)
return bit.band(r,REASON_BATTLE)~=0
end
...@@ -29,7 +29,7 @@ function c41613948.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -29,7 +29,7 @@ function c41613948.cost(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c41613948.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c41613948.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToRemove() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToRemove() end
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_MZONE,1,nil,tp) end if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
......
...@@ -12,7 +12,7 @@ function c42956963.initial_effect(c) ...@@ -12,7 +12,7 @@ function c42956963.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c42956963.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c42956963.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,nil,1,nil) end if chk==0 then return Duel.CheckReleaseGroup(tp,nil,1,nil) end
local g=Duel.SelectReleaseGroup(tp,nil,1,1,nil) local g=Duel.SelectReleaseGroup(tp,nil,1,1,nil)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
......
...@@ -19,7 +19,7 @@ end ...@@ -19,7 +19,7 @@ end
function c50491121.filter(c) function c50491121.filter(c)
return c:IsFaceup() and c:IsSetCard(0x6f) return c:IsFaceup() and c:IsSetCard(0x6f)
end end
function c50491121.atktg(e,tp,eg,ep,ev,re,r,rp,chk) function c50491121.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c50491121.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c50491121.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c50491121.filter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end if chk==0 then return Duel.IsExistingTarget(c50491121.filter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
......
...@@ -3,7 +3,7 @@ function c50621530.initial_effect(c) ...@@ -3,7 +3,7 @@ function c50621530.initial_effect(c)
--atkup --atkup
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAGSINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(c50621530.atkval) e1:SetValue(c50621530.atkval)
......
...@@ -16,7 +16,7 @@ function c52340274.filter2(c) ...@@ -16,7 +16,7 @@ function c52340274.filter2(c)
return c:IsFaceup() and not c:IsType(TYPE_XYZ) return c:IsFaceup() and not c:IsType(TYPE_XYZ)
end end
function c52340274.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c52340274.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c52340274.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c52340274.filter1(chkc) end
if chk==0 then return Duel.IsExistingTarget(c52340274.filter1,tp,LOCATION_MZONE,0,1,nil) if chk==0 then return Duel.IsExistingTarget(c52340274.filter1,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsExistingMatchingCard(c52340274.filter2,tp,LOCATION_MZONE,0,2,nil) end and Duel.IsExistingMatchingCard(c52340274.filter2,tp,LOCATION_MZONE,0,2,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
......
...@@ -70,7 +70,7 @@ function c54451023.spfilter(c,e,tp) ...@@ -70,7 +70,7 @@ function c54451023.spfilter(c,e,tp)
return c:IsRace(RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsRace(RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c54451023.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c54451023.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c54451023.spfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c54451023.spfilter(chkc,e,tp) end
if chk==0 then return Duel.IsExistingTarget(c54451023.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingTarget(c54451023.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c54451023.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,c54451023.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
......
...@@ -21,5 +21,5 @@ end ...@@ -21,5 +21,5 @@ end
function c54878498.operation(e,tp,eg,ep,ev,re,r,rp) function c54878498.operation(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
if not a:IsRelateToBattle() then return end if not a:IsRelateToBattle() then return end
Duel.SendtoHand(a,nil,0,REASON_EFFECT) Duel.SendtoHand(a,nil,REASON_EFFECT)
end end
...@@ -15,7 +15,7 @@ function c56514812.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -15,7 +15,7 @@ function c56514812.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_HANDES,0,0,ep,1) Duel.SetOperationInfo(0,CATEGORY_HANDES,0,0,ep,1)
end end
function c56514812.operation(e,tp,eg,ep,ev,re,r,rp) function c56514812.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(ep,LOCATION_HAND,0,nil) local g=Duel.GetFieldGroup(ep,LOCATION_HAND,0)
if g:GetCount()==0 then return end if g:GetCount()==0 then return end
local sg=g:RandomSelect(ep,1) local sg=g:RandomSelect(ep,1)
Duel.SendtoGrave(sg,REASON_DISCARD+REASON_EFFECT) Duel.SendtoGrave(sg,REASON_DISCARD+REASON_EFFECT)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
function c60741115.initial_effect(c) function c60741115.initial_effect(c)
-- --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(61864793,0)) e1:SetDescription(aux.Stringid(60741115,0))
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING) e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_GRAVE) e1:SetRange(LOCATION_GRAVE)
......
...@@ -76,7 +76,7 @@ function c65196094.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -76,7 +76,7 @@ function c65196094.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local lv=cg:GetFirst():GetLevel() local lv=cg:GetFirst():GetLevel()
Duel.SendtoDeck(cg,nil,0,REASON_COST) Duel.SendtoDeck(cg,nil,0,REASON_COST)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=spg:SelectWithSumEqual(tp,Card.GetLevel,lv,1) local sg=spg:SelectWithSumEqual(tp,Card.GetLevel,lv,1,ft+1)
Duel.SetTargetCard(sg) Duel.SetTargetCard(sg)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,sg:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,sg:GetCount(),0,0)
end end
......
...@@ -37,7 +37,9 @@ function c65301952.setcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -37,7 +37,9 @@ function c65301952.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)
and Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) end and Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
Duel.DiscardHand(tp,Card.IsAbleToGraveAsCost,1,1,REASON_COST) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,1,nil)
Duel.SendtoGrave(g,REASON_COST)
end end
function c65301952.filter(c) function c65301952.filter(c)
return c:IsType(TYPE_SPELL) and not c:IsType(TYPE_FIELD) and c:IsSSetable() return c:IsType(TYPE_SPELL) and not c:IsType(TYPE_FIELD) and c:IsSSetable()
...@@ -47,7 +49,7 @@ function c65301952.settg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -47,7 +49,7 @@ function c65301952.settg(e,tp,eg,ep,ev,re,r,rp,chk)
and Duel.IsExistingMatchingCard(c65301952.filter,tp,LOCATION_DECK,0,1,nil) end and Duel.IsExistingMatchingCard(c65301952.filter,tp,LOCATION_DECK,0,1,nil) end
end end
function c65301952.setop(e,tp,eg,ep,ev,re,r,rp) function c65301952.setop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)==0 then return end if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectMatchingCard(tp,Card.IsSSetable,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,Card.IsSSetable,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
......
...@@ -4,12 +4,12 @@ function c66947414.initial_effect(c) ...@@ -4,12 +4,12 @@ function c66947414.initial_effect(c)
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:SetCondition(c66947414.condition) e1:SetCondition(c66947414.accon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--cannot normal summon --cannot normal summon or set
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetCode(EFFECT_CANNOT_SUMMON) e2:SetCode(EFFECT_CANNOT_SUMMON)
...@@ -19,36 +19,52 @@ function c66947414.initial_effect(c) ...@@ -19,36 +19,52 @@ function c66947414.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--special summon --special summon
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e4:SetDescription(aux.Stringid(66947414,0))
e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_PHASE+PHASE_END)
e4:SetRange(LOCATION_SZONE) e4:SetRange(LOCATION_SZONE)
e4:SetCode(EVENT_TO_GRAVE) e4:SetProperty(EFFECT_FLAG_REPEAT)
e4:SetOperation(c66947414.checkop) e4:SetCountLimit(1)
c:RegisterEffect(e4,0) e4:SetCondition(c66947414.spcon)
local e5=Effect.CreateEffect(c) e4:SetTarget(c66947414.sptg)
e5:SetDescription(aux.Stringid(66947414,0)) e4:SetOperation(c66947414.spop)
e5:SetCategory(CATEGORY_SPECIAL_SUMMON) c:RegisterEffect(e4)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) if not c66947414.global_check then
e5:SetCode(EVENT_PHASE+PHASE_END) c66947414.global_check=true
e5:SetRange(LOCATION_SZONE) c66947414[0]=false
e5:SetCountLimit(1) c66947414[1]=false
e5:SetCondition(c66947414.spcon) local ge1=Effect.CreateEffect(c)
e5:SetTarget(c66947414.sptg) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetOperation(c66947414.spop) ge1:SetCode(EVENT_TO_GRAVE)
c:RegisterEffect(e5) ge1:SetOperation(c66947414.checkop)
end Duel.RegisterEffect(ge1,0)
function c66947414.condition(e,tp,eg,ep,ev,re,r,rp) local ge2=Effect.CreateEffect(c)
return not Duel.CheckNormalSummonActivity(tp) ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
end ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
function c66947414.chkfilter(c,tp) ge2:SetOperation(c66947414.clear)
return c:IsSetCard(0x15) and c:IsReason(REASON_DESTROY) and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_MZONE) Duel.RegisterEffect(ge2,0)
end
end end
function c66947414.checkop(e,tp,eg,ep,ev,re,r,rp) function c66947414.checkop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c66947414.chkfilter,1,nil,tp) then local tc=eg:GetFirst()
e:GetHandler():RegisterFlagEffect(66947414,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1) while tc do
if tc:IsSetCard(0x15) and tc:IsReason(REASON_DESTROY)
and tc:IsPreviousLocation(LOCATION_MZONE) and tc:IsPreviousPosition(POS_FACEUP) then
c66947414[tc:GetControler()]=true
end
tc=eg:GetNext()
end end
end end
function c66947414.clear(e,tp,eg,ep,ev,re,r,rp)
c66947414[0]=false
c66947414[1]=false
end
function c66947414.accon(e,tp,eg,ep,ev,re,r,rp)
return not Duel.CheckNormalSummonActivity(tp)
end
function c66947414.spcon(e,tp,eg,ep,ev,re,r,rp) function c66947414.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(66947414)~=0 return c66947414[tp]
end end
function c66947414.filter(c,e,tp) function c66947414.filter(c,e,tp)
return c:IsSetCard(0x15) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x15) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -15,8 +15,8 @@ function c691925.costfilter(c) ...@@ -15,8 +15,8 @@ function c691925.costfilter(c)
return c:IsSetCard(0x38) and c:IsType(TYPE_MONSTER) and c:IsDiscardable() return c:IsSetCard(0x38) and c:IsType(TYPE_MONSTER) and c:IsDiscardable()
end end
function c691925.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c691925.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c691925.costfilter,tp,LOCATION_HAND,0,1,nil,0x38) end if chk==0 then return Duel.IsExistingMatchingCard(c691925.costfilter,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,c691925.costfilter,1,1,REASON_COST+REASON_DISCARD,nil,0x38) Duel.DiscardHand(tp,c691925.costfilter,1,1,REASON_COST+REASON_DISCARD,nil)
end end
function c691925.target(e,tp,eg,ep,ev,re,r,rp,chk) function c691925.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,4) end if chk==0 then return Duel.IsPlayerCanDraw(tp,4) end
......
...@@ -14,7 +14,7 @@ function c71283180.filter(c,e) ...@@ -14,7 +14,7 @@ function c71283180.filter(c,e)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() and c:IsCanBeEffectTarget(e) return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() and c:IsCanBeEffectTarget(e)
end end
function c71283180.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c71283180.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c71283180.filter(chkc) end if chkc then return chkc:IsOnField() and c71283180.filter(chkc,e) end
if chk==0 then return true end if chk==0 then return true end
local g=Duel.GetMatchingGroup(c71283180.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,e) local g=Duel.GetMatchingGroup(c71283180.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,e)
if g:GetCount()<2 then if g:GetCount()<2 then
......
...@@ -33,7 +33,7 @@ function c73428497.filter(c,e,tp) ...@@ -33,7 +33,7 @@ function c73428497.filter(c,e,tp)
return c:IsSetCard(0x72) and c:GetCode()~=73428497 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x72) and c:GetCode()~=73428497 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c73428497.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c73428497.sptg(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)>-1
and Duel.IsExistingMatchingCard(c73428497.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c73428497.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
......
...@@ -21,5 +21,5 @@ end ...@@ -21,5 +21,5 @@ end
function c7852878.operation(e,tp,eg,ep,ev,re,r,rp) function c7852878.operation(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
if not a:IsRelateToBattle() then return end if not a:IsRelateToBattle() then return end
Duel.Destroy(a,nil,0,REASON_EFFECT) Duel.Destroy(a,REASON_EFFECT)
end end
...@@ -40,7 +40,7 @@ end ...@@ -40,7 +40,7 @@ end
function c82841979.spcon(e,c) function c82841979.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and
Duel.IsExistingMatchingCard(c82841979.spfilter,tp,LOCATION_GRAVE,0,1,nil) Duel.IsExistingMatchingCard(c82841979.spfilter,c:GetControler(),LOCATION_GRAVE,0,1,nil)
end end
function c82841979.spop(e,tp,eg,ep,ev,re,r,rp,c) function c82841979.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
......
...@@ -86,7 +86,7 @@ function c84243274.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -86,7 +86,7 @@ function c84243274.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_Remove,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
end end
function c84243274.rmop(e,tp,eg,ep,ev,re,r,rp) function c84243274.rmop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
......
...@@ -24,7 +24,7 @@ function c86585274.initial_effect(c) ...@@ -24,7 +24,7 @@ function c86585274.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c86585274.cffilter(c) function c86585274.cffilter(c)
return c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL) and c:IsPublic() return c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL) and not c:IsPublic()
end end
function c86585274.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c86585274.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c86585274.cffilter,tp,LOCATION_HAND,0,3,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c86585274.cffilter,tp,LOCATION_HAND,0,3,nil) end
......
...@@ -36,7 +36,7 @@ end ...@@ -36,7 +36,7 @@ end
function c87608852.checkop1(e,tp,eg,ep,ev,re,r,rp) function c87608852.checkop1(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst() local tc=eg:GetFirst()
while tc do while tc do
if tc:IsLevelAbove(5) and (not tc:IsRace(RACE_SPELLCASTER) or not tc:IsAttribute(0x30)) then if tc:IsLevelAbove(5) then
c87608852[tc:GetSummonPlayer()]=false c87608852[tc:GetSummonPlayer()]=false
end end
tc=eg:GetNext() tc=eg:GetNext()
...@@ -67,7 +67,7 @@ function c87608852.spcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -67,7 +67,7 @@ function c87608852.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
end end
function c87608852.splimit(e,c,sump,sumtype,sumpos,targetp,se) function c87608852.splimit(e,c,sump,sumtype,sumpos,targetp,se)
return c:IsLevelAbove(5) and (not c:IsRace(RACE_SPELLCASTER) or not c:IsAttribute(0x30)) return c:IsLevelAbove(5)
end end
function c87608852.spfilter(c,e,tp) function c87608852.spfilter(c,e,tp)
return c:IsLevelAbove(5) and c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(0x30) return c:IsLevelAbove(5) and c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(0x30)
......
...@@ -29,7 +29,7 @@ function c90673413.filter(c,e,tp) ...@@ -29,7 +29,7 @@ function c90673413.filter(c,e,tp)
return c:IsSetCard(0x54) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x54) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c90673413.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c90673413.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c90673413.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c90673413.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c90673413.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingTarget(c90673413.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
......
...@@ -59,7 +59,7 @@ function c90951921.filter(c) ...@@ -59,7 +59,7 @@ function c90951921.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x70) and c:IsAbleToRemove() return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x70) and c:IsAbleToRemove()
end end
function c90951921.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c90951921.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(GRAVE) and chkc:IsControler(tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) end
if chk==0 then if chk==0 then
if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3 if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3
or not Duel.IsExistingTarget(c90951921.filter,tp,LOCATION_GRAVE,0,1,nil) then return false end or not Duel.IsExistingTarget(c90951921.filter,tp,LOCATION_GRAVE,0,1,nil) then return false end
...@@ -73,7 +73,7 @@ function c90951921.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -73,7 +73,7 @@ function c90951921.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end end
function c90951921.activate(e,tp,eg,ep,ev,re,r,rp) function c90951921.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEP,REASON_EFFECT)~=0 then if tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 then
Duel.BreakEffect() Duel.BreakEffect()
local g=Duel.GetDecktopGroup(tp,2) local g=Duel.GetDecktopGroup(tp,2)
Duel.ConfirmCards(tp,g) Duel.ConfirmCards(tp,g)
......
...@@ -65,7 +65,7 @@ function c91895091.spfilter(c,e,tp) ...@@ -65,7 +65,7 @@ function c91895091.spfilter(c,e,tp)
return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c91895091.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c91895091.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkcIsControler(tp) and c91895091.spfilter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c91895091.spfilter(chkc,e,tp) end
if chk==0 then return Duel.IsExistingTarget(c91895091.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingTarget(c91895091.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c91895091.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,c91895091.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
......
...@@ -9,11 +9,12 @@ function c923596.initial_effect(c) ...@@ -9,11 +9,12 @@ function c923596.initial_effect(c)
e1:SetTarget(c923596.target) e1:SetTarget(c923596.target)
e1:SetOperation(c923596.operation) e1:SetOperation(c923596.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--damage --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(923596,1)) e2:SetDescription(aux.Stringid(923596,1))
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND) e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetCode(EVENT_FLIP) e2:SetCode(EVENT_FLIP)
e2:SetTarget(c923596.shtg) e2:SetTarget(c923596.shtg)
e2:SetOperation(c923596.shop) e2:SetOperation(c923596.shop)
...@@ -35,7 +36,7 @@ function c923596.filter(c) ...@@ -35,7 +36,7 @@ function c923596.filter(c)
return c:IsSetCard(0x72) and c:GetCode()~=923596 and c:IsAbleToHand() return c:IsSetCard(0x72) and c:GetCode()~=923596 and c:IsAbleToHand()
end end
function c923596.shtg(e,tp,eg,ep,ev,re,r,rp,chk) function c923596.shtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return Duel.IsExistingMatchingCard(c923596.filter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end end
function c923596.shop(e,tp,eg,ep,ev,re,r,rp) function c923596.shop(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -26,17 +26,17 @@ function c92394653.initial_effect(c) ...@@ -26,17 +26,17 @@ function c92394653.initial_effect(c)
e3:SetOperation(c92394653.mtop) e3:SetOperation(c92394653.mtop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c92394653.filter(c) function c92394653.filter(c,tp)
return c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousPosition(POS_FACEUP) return c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousPosition(POS_FACEUP)
and c:IsControler(tp) and c:IsType(TYPE_SPIRIT) and c:IsControler(tp) and c:IsType(TYPE_SPIRIT)
end end
function c92394653.condition(e,tp,eg,ep,ev,re,r,rp) function c92394653.condition(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c92394653.filter,1,nil) return eg:IsExists(c92394653.filter,1,nil,tp)
end end
function c92394653.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c92394653.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToHand() end if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToHand() end
if chk==0 then return e:GetHandler():IsRelateToEffect(e) end if chk==0 then return e:GetHandler():IsRelateToEffect(e) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,g:GetCount(),0,0)
end end
......
...@@ -19,7 +19,7 @@ function c9748752.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -19,7 +19,7 @@ function c9748752.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsAbleToRemove() end if chkc then return chkc:IsOnField() and chkc:IsAbleToRemove() end
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,tp) local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.SetOperationInfo(0,CATEGORY_REMOVE,tc,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,tc,1,0,0)
......
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