I'm going to try a couple of these soon

Turn Jump and Summoning Clock look like fun ones to mess with peoples' heads with.

Lol dont get your hope high.The chance you will get these cards in 0 to 0,1%.They dont do request or anything witch is so sad.I mean the idea for the site is awesome but execution is so aweful.I made 2 request 4-5 cards in total and i didn't get any of these so better dont hope much.

i might do it but not now problably only in holidays of summer but i have to check a tutorial !

and i'm in the 8th grade of school so don't expect anything done until the summer!I will work more in the summer!

sredoje0 wrote:

Lol dont get your hope high.The chance you will get these cards in 0 to 0,1%.They dont do request or anything witch is so sad.I mean the idea for the site is awesome but execution is so aweful.I made 2 request 4-5 cards in total and i didn't get any of these so better dont hope much.

They do but it takes someone that can program the cards.  If no one can than no one well.  If all else fails learn some lua and XML and take up the missing position yourself.

and btw im one guy running a store going to college and looking after my family on top of doing this so yeah it takes time for me to get some things done

^exactly. not everyone who knows how to script has free time. I just moved from St. Louis to Florida and am getting settled into my new home with my gf and kids. people have lives. be patient and try to learn a bit during your down time like most of us.

umm...didnt mean for the thread to get all fired up o.0

--Fricka's Midation
function c????.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c????.activate)
e1:SetCost(c????.descost)
c:RegisterEffect(e1)
end
function c????.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function c????.rfilter(c)
return c:IsCode(????)
end
function c????.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c????.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,c????.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end

I'm pretty sure this is right. Just fill in the ???? with whatever number you want this card to be and whatever you want WJ to be.

Hey Thanks cane_63106

it doesnt matter to me which ID number you give the cards as all i have is the latest version of mackpro (and plus I can't test the card til Wotan's Judgement is coded...and I have a hard time figuring where to put the numbers for this card in the script and where the numbers for Wotan's Judgement is going to be.)

As long as it isn't one that is in use by any other card it should work.

Found these:

--Royal Straight Slasher
function c180.initial_effect(c)
c:EnableReviveLimit()
--cannot special summon
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e1)
--Destroy
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCost(c180.cost)
e2:SetTarget(c180.destg)
e2:SetOperation(c180.desop)
c:RegisterEffect(e2)
end
function c180.costfilter1(c)
return c:GetLevel()==1 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter2(c)
return c:GetLevel()==2 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter3(c)
return c:GetLevel()==3 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter4(c)
return c:GetLevel()==4 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter5(c)
return c:GetLevel()==5 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c180.costfilter1,tp,LOCATION_DECK,0,1,nil) end
local g1=Duel.SelectMatchingCard(tp,c180.costfilter1,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g1,1,REASON_COST)
if chk==g1 then return Duel.IsExistingMatchingCard(c180.costfilter2,tp,LOCATION_DECK,0,1,nil) end
local g2=Duel.SelectMatchingCard(tp,c180.costfilter2,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g2,1,REASON_COST)
if chk==g2 then return Duel.IsExistingMatchingCard(c180.costfilter3,tp,LOCATION_DECK,0,1,nil) end
local g3=Duel.SelectMatchingCard(tp,c180.costfilter3,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g3,1,REASON_COST)
if chk==g3 then return Duel.IsExistingMatchingCard(c180.costfilter4,tp,LOCATION_DECK,0,1,nil) end
local g4=Duel.SelectMatchingCard(tp,c180.costfilter4,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g4,1,REASON_COST)
if chk==g4 then return Duel.IsExistingMatchingCard(c180.costfilter5,tp,LOCATION_DECK,0,1,nil) end
local g5=Duel.SelectMatchingCard(tp,c180.costfilter5,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g5,1,REASON_COST)
end
function c180.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end
local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function c180.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,0,LOCATION_ONFIELD,nil)
Duel.Destroy(g,REASON_EFFECT)
end

--Royal Straight
function c181.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c181.cost)
e1:SetTarget(c181.target)
e1:SetOperation(c181.activate)
c:RegisterEffect(e1)
end
function c181.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,25652259)
and Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,64788463) 
and Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,90876561) end
local g1=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,25652259)
local g2=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,64788463)
g1:Merge(g2)
local g3=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,90876561)
g1:Merge(g3)
Duel.Release(g1,REASON_COST)
end
function c181.filter(c,e,tp)
return c:IsCode(180) and c:IsCanBeSpecialSummoned(e,0,tp,true,true) and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
end
function c181.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c181.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
end
function c181.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c181.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
g:GetFirst():CompleteProcedure()
end

cane_63106 wrote:

Found these:

--Royal Straight Slasher
function c180.initial_effect(c)
c:EnableReviveLimit()
--cannot special summon
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e1)
--Destroy
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCost(c180.cost)
e2:SetTarget(c180.destg)
e2:SetOperation(c180.desop)
c:RegisterEffect(e2)
end
function c180.costfilter1(c)
return c:GetLevel()==1 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter2(c)
return c:GetLevel()==2 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter3(c)
return c:GetLevel()==3 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter4(c)
return c:GetLevel()==4 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.costfilter5(c)
return c:GetLevel()==5 and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c180.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c180.costfilter1,tp,LOCATION_DECK,0,1,nil) end
local g1=Duel.SelectMatchingCard(tp,c180.costfilter1,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g1,1,REASON_COST)
if chk==g1 then return Duel.IsExistingMatchingCard(c180.costfilter2,tp,LOCATION_DECK,0,1,nil) end
local g2=Duel.SelectMatchingCard(tp,c180.costfilter2,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g2,1,REASON_COST)
if chk==g2 then return Duel.IsExistingMatchingCard(c180.costfilter3,tp,LOCATION_DECK,0,1,nil) end
local g3=Duel.SelectMatchingCard(tp,c180.costfilter3,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g3,1,REASON_COST)
if chk==g3 then return Duel.IsExistingMatchingCard(c180.costfilter4,tp,LOCATION_DECK,0,1,nil) end
local g4=Duel.SelectMatchingCard(tp,c180.costfilter4,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g4,1,REASON_COST)
if chk==g4 then return Duel.IsExistingMatchingCard(c180.costfilter5,tp,LOCATION_DECK,0,1,nil) end
local g5=Duel.SelectMatchingCard(tp,c180.costfilter5,tp,LOCATION_DECK,0,1,1,nil,e,tp)
Duel.SendtoGrave(g5,1,REASON_COST)
end
function c180.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end
local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function c180.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,0,LOCATION_ONFIELD,nil)
Duel.Destroy(g,REASON_EFFECT)
end

--Royal Straight
function c181.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c181.cost)
e1:SetTarget(c181.target)
e1:SetOperation(c181.activate)
c:RegisterEffect(e1)
end
function c181.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,25652259)
and Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,64788463) 
and Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,90876561) end
local g1=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,25652259)
local g2=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,64788463)
g1:Merge(g2)
local g3=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,90876561)
g1:Merge(g3)
Duel.Release(g1,REASON_COST)
end
function c181.filter(c,e,tp)
return c:IsCode(180) and c:IsCanBeSpecialSummoned(e,0,tp,true,true) and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
end
function c181.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c181.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
end
function c181.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c181.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
g:GetFirst():CompleteProcedure()
end

aren't these from Tea82's Ultimate Collection? the only problem i have with these is Royal Straight ingame description is in a different language then english

yup. i just downloaded it to see some new cards people have made and they were there. You shouldn't worry about the description if you already know the effect