a place for all your custom card needs you can post scripts pics and request for card to be made also please donate to the funding for a new server made for custom card duels
 
HomePortalCalendarFAQSearchMemberlistUsergroupsRegisterLog in

Share | .
 

 Custom Cards By DaScopeStarter

View previous topic View next topic Go down 
AuthorMessage
DaScopeStarter

avatar


Posts : 30
Join date : 2013-07-10
Location : Brooklyn

PostSubject: Custom Cards By DaScopeStarter   Thu Aug 08, 2013 6:10 am

Hey Guys I've Been Gone for god knows how long this is probably due to me looking for colleges to attend to.. but anyway i have some of my own cards and scripts 

so we have 3 xyz so take these and if you want these images i will send my deviantart link to them 

--Number 38: Galaxy Warrior Utopia
function c806000091.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.XyzFilterFunctionF(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT),4),3)
c:EnableReviveLimit()
--attack up
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetDescription(aux.Stringid(806000091,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_MZONE)
e1:SetCost(c806000091.cost)
e1:SetOperation(c806000091.operation)
c:RegisterEffect(e1)
end
function c806000091.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function c806000091.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_ATTACK)
e1:SetValue(c:GetBaseAttack()*2)
e1:SetReset(RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_END,2)
c:RegisterEffect(e1)
end
end


--Number C38: Galatic Knight Utopian Champion
function c87941410.initial_effect(c)
        --xyz summon
        aux.AddXyzProcedure(c,aux.XyzFilterFunction(c,5),3)
        c:EnableReviveLimit()
    --indestructable by effect
    local e1=Effect.CreateEffect(c)
        e1:SetType(EFFECT_TYPE_SINGLE)
        e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
        e1:SetRange(LOCATION_MZONE)
        e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
        e1:SetCondition(c87941410.incon)
        e1:SetValue(1)
        c:RegisterEffect(e1)
        --destroy
        local e2=Effect.CreateEffect(c)
        e2:SetCategory(CATEGORY_DESTROY)
        e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
        e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
        e2:SetCode(EVENT_PHASE+PHASE_BATTLE)
        e2:SetCountLimit(1)
        e2:SetRange(LOCATION_MZONE)
        e2:SetCondition(c87941410.descon)
        e2:SetTarget(c87941410.destg)
        e2:SetOperation(c87941410.desop)
        c:RegisterEffect(e2)
        --remove material
        local e3=Effect.CreateEffect(c)
        e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
        e3:SetCode(EVENT_PHASE+PHASE_END)
        e3:SetRange(LOCATION_MZONE)
        e3:SetProperty(EFFECT_FLAG_REPEAT)
        e3:SetCountLimit(1)
        e3:SetCondition(c87941410.rmcon)
        e3:SetOperation(c87941410.rmop)
        c:RegisterEffect(e3)
end
function c87941410.incon(e)
        return e:GetHandler():GetOverlayCount()>0
end
function c87941410.descon(e,tp,eg,ep,ev,re,r,rp)
        return e:GetHandler():GetBattledGroupCount()>0
end
function c87941410.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        if chkc then return chkc:GetControler()~=tp and chkc:IsOnField() and chkc:IsDestructable() end
        if chk==0 then return true end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
        local g=Duel.SelectTarget(tp,Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,1,nil)
        Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function c87941410.desop(e,tp,eg,ep,ev,re,r,rp)
        if e:GetHandler():GetOverlayCount()==0 then return end
        local tc=Duel.GetFirstTarget()
        if tc and tc:IsRelateToEffect(e) then
                Duel.Destroy(tc,REASON_EFFECT)
        end
end
function c87941410.rmcon(e,tp,eg,ep,ev,re,r,rp)
        return Duel.GetTurnPlayer()==tp
end
function c87941410.rmop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if c:GetOverlayCount()>0 then
                c:RemoveOverlayCard(tp,1,1,REASON_EFFECT)
        end
end


--Neo Number 38 Neo Champion Galaxy
function c85121942.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.XyzFilterFunction(c,5),4)
c:EnableReviveLimit()
--damage
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(85121942,0))
e1:SetCategory(CATEGORY_DAMAGE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_BATTLE_DESTROYING)
e1:SetCondition(c85121942.damcon)
e1:SetTarget(c85121942.damtg)
e1:SetOperation(c85121942.damop)
c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
e2:SetDescription(aux.Stringid(85121942,1))
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c85121942.descon)
e2:SetCost(c85121942.descost)
e2:SetTarget(c85121942.destg)
e2:SetOperation(c85121942.desop)
c:RegisterEffect(e2)
end
function c85121942.damcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return c:IsRelateToBattle() and bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER)
end
function c85121942.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local c=e:GetHandler()
local bc=c:GetBattleTarget()
local dam=bc:GetAttack()/2
if dam<0 then dam=0 end
Duel.SetTargetPlayer(1-tp)
Duel.SetTargetParam(dam)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
end
function c85121942.damop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Damage(p,d,REASON_EFFECT)
end
function c85121942.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetOverlayGroup():IsExists(Card.IsCode,1,nil,806000091)
end
function c85121942.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function c85121942.filter(c)
return c:IsDestructable()
end
function c85121942.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c85121942.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c85121942.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,c85121942.filter,tp,0,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,g:GetFirst():GetAttack())
end
function c85121942.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsControler(1-tp) then
local atk=tc:GetAttack()
if atk<0 or tc:IsFacedown() then atk=0 end
if Duel.Destroy(tc,REASON_EFFECT)~=0 then
Duel.Damage(1-tp,atk,REASON_EFFECT)
end
end
end
http://jetstef2010.deviantart.com/ this is were you will find the art

_________________
Skype:stefthehedgehog1
DN:YamiZeroDuel
Dev Pro: DaScopeStarter

~To Enjoy dueling you need to know how to stop taking things seriously and just let go
Back to top Go down
View user profile
 

Custom Cards By DaScopeStarter

View previous topic View next topic Back to top 
Page 1 of 1

 Similar topics

-
» Custom Cards made by JudgmentDuelist
» Custom Cards [Request]
» [ARC-V] Finally the 4 Dragons Together
» Malefic Custom Card Pack w/ Anime Effect (YgoPro)
» [CSS] Custom Archetype "Shintai"

Permissions in this forum:You cannot reply to topics in this forum
Mackpro :: MackPro :: Custom Cards-