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
 
HomePortalLatest imagesSearchRegisterLog in

Share
 

 D.D. Shift Dragon

View previous topic View next topic Go down 
AuthorMessage
cane_63106

cane_63106


Member Title : D.D. Dragon Kaiser
Posts : 454
Join date : 2013-07-23
Location : St. Louis, MO

D.D. Shift Dragon Empty
PostSubject: D.D. Shift Dragon   D.D. Shift Dragon Icon_minitimeSun Aug 11, 2013 9:08 am

2 things:
1. Can someone figure how to have this chain to summoning as well?
2. This thing will banish and target itself. If anyone knows how to exclude itself from being targeted once banished, plz do.
I personally wouldn't do that, because it's just cheap, but if it was to be put into mackpro or anything else, i know someone would abuse the hell out of that.

D.D. Shift Dragon Shift_10

--32083001
function c32083001.initial_effect(c)
--remove
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(32083001,0))
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMING_END_PHASE+TIMING_EQUIP)
e1:SetCost(c32083001.rmcost)
e1:SetTarget(c32083001.rmtg)
e1:SetOperation(c32083001.rmop)
c:RegisterEffect(e1)
end
function c32083001.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemove() end
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end
function c32083001.filter(c,e,tp)
    return c:IsCanBeSpecialSummoned(e,0,tp,false,false)and c:IsRace(RACE_DRAGON)and c:IsSetCard(0x7D53)
end

function c32083001.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_REMOVED) and c32083001.filter(chkc,e,tp) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
        and Duel.IsExistingTarget(c32083001.filter,tp,LOCATION_REMOVED,LOCATION_REMOVE,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
   local g=Duel.SelectTarget(tp,c32083001.filter,tp,LOCATION_REMOVED,LOCATION_REMOVE,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end

function c32083001.rmop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
        Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    end
end
Back to top Go down
http:// https://www.youtube.com/user/cane63106/videos
jackmoonward

jackmoonward
Admin
Admin

Posts : 75
Join date : 2013-08-03
Age : 27
Location : Classified

D.D. Shift Dragon Empty
PostSubject: Re: D.D. Shift Dragon   D.D. Shift Dragon Icon_minitimeSun Aug 11, 2013 11:18 am

Hold down the 'a' key on your keyboard if you want to force an activation.

As for the second issue:

--32083001
function c32083001.initial_effect(c)
--remove
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(32083001,0))
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMING_END_PHASE+TIMING_EQUIP)
e1:SetCost(c32083001.rmcost)
e1:SetTarget(c32083001.rmtg)
e1:SetOperation(c32083001.rmop)
c:RegisterEffect(e1)
end
function c32083001.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemove() end
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end
function c32083001.filter(c,e,tp)
    return c:IsCanBeSpecialSummoned(e,0,tp,false,false)and c:IsRace(RACE_DRAGON)and c:IsSetCard(0x7D53)
end

function c32083001.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_REMOVED) and c32083001.filter(chkc,e,tp) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
        and Duel.IsExistingTarget(c32083001.filter,tp,LOCATION_REMOVED,LOCATION_REMOVE,1,nil,e,tp,e:GetHandler()) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
   local g=Duel.SelectTarget(tp,c32083001.filter,tp,LOCATION_REMOVED,LOCATION_REMOVE,1,1,nil,e,tp,e:GetHandler())
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end

function c32083001.rmop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
        Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    end
end
Back to top Go down
http://www.tehmadhouse.tk
cane_63106

cane_63106


Member Title : D.D. Dragon Kaiser
Posts : 454
Join date : 2013-07-23
Location : St. Louis, MO

D.D. Shift Dragon Empty
PostSubject: Re: D.D. Shift Dragon   D.D. Shift Dragon Icon_minitimeSun Aug 11, 2013 7:13 pm

Thanks a lot. Didn't know about the 'a' key. 

It's still targeting itself for some reason. I'm going to keep looking up cards that exclude themselves and play around with that.
Back to top Go down
http:// https://www.youtube.com/user/cane63106/videos
Sponsored content





D.D. Shift Dragon Empty
PostSubject: Re: D.D. Shift Dragon   D.D. Shift Dragon Icon_minitime

Back to top Go down
 

D.D. Shift Dragon

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

 Similar topics

-
» Alliance Shift
» The Dragon's Gift
» D.D. God Dragon
» D.D. Dragon - Ouroboros
» D.D. Dragon - Seraph

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