i saw this card on ycm the other day by any chance was that you

Yes, it is my card.

cool it looks pretty good i think it would be really good in monarchs and i would def side this card

Thanks, I think I would use this card,too.

hmm this card would make my lockdown deck OP in more ways than one.  That aside it doesn't look that OP by itself at least but I'm sure some crafty bugger out there will find a way, they always do.

Considering how the game has become focused around Xyz and Synchro Monsters, I think this card would be an incredibly potent boardwipe, bypassing anti-targeting and anti-destruction effects we're seeing so often lately.

We still need a lot more cards to balance the game out though.  So it could take more cards like this one to make the game more fun.  


Yes it would be very potent too but for every power there is always a counter for it.  Players of any game understand that better than anyone.  

And that makes them so interessting, because you will never have a safe victory just by playing a certain type ^^

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
if not c35001831.global_check then
c35001831.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c35001831.checkop)
Duel.RegisterEffect(ge1,0)
end
end
function c35001831.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if tc:IsPreviousLocation(LOCATION_EXTRA) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,35001831,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,35001831,RESET_PHASE+PHASE_END,0,1) end
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsDisabled() and Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra()
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

I don't know if this card affects pendulum monsters somehow, though.

VB99 wrote:

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
if not c35001831.global_check then
c35001831.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c35001831.checkop)
Duel.RegisterEffect(ge1,0)
end
end
function c35001831.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if tc:IsPreviousLocation(LOCATION_EXTRA) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,35001831,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,35001831,RESET_PHASE+PHASE_END,0,1) end
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsDisabled() and Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra()
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

I don't know if this card affects pendulum monsters somehow, though.

I use this Script but my card won't activate.

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsDisabled() and Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra()
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

Please try this.
This script isn't able to stop you from summoning, but I would like to see weather or not it activates now. If it does, then I did something wrong with the "prevention" part.

I can summon, but I can't activate it, I can only Set it.

I think there might be a problem with the filter...

How about:

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsDisabled() and Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra() and c:IsType(TYPE_FUSION)
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

It should be activateable now, I believe.

No, it still won't activate. I can only Set it when opponent have Xyz monsters on the field.

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra() and c:IsType(TYPE_FUSION)
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

I modified the cost, maybe you can activate it now^^

Maybe it is because of the function for the cost. Maybe this will help^^'

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra() and c:IsType(TYPE_FUSION)
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

Lol same idea XD

Looks like it XD

No I cannot activate it. Every time I only get option to Set it.

Maybe it is because the filters only includes Fusions. Try this:

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToExtra() and c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
end
end

If you get an error, please tell us, what the error says^^

I don't get an error, i just can't actiavate it, again.

Hmmmm, ok, I change the operation to sent it to hand instead back to the extra deck, because for Fusions/ Synchros/ Xyz sending to hand = sending to extra deck.
If this doesn't help, I still have another suggestion^^'

function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToHand() and c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,0,REASON_EFFECT)
end
end

Still not working. Can you write that another suggestion.

I change the Location --> now it is working for the whole field, but only for Synchros, XYZ and Fusions:


function c35001831.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35001831.cost)
e1:SetTarget(c35001831.target)
e1:SetOperation(c35001831.operation)
c:RegisterEffect(e1)
end
function c35001831.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,1000) end
Duel.PayLPCost(tp,1000)
end
function c35001831.filter(c)
return c:IsAbleToHand() and c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
end
function c35001831.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,g:GetCount(),0,0)
end
function c35001831.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c35001831.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,0,REASON_EFFECT)
end
end