RaiZZZ19
Posts : 81 Join date : 2013-08-03 Location : Bat Cave
| Subject: Cyber Suit & Knuckle Sword Mon Nov 04, 2013 3:07 pm | |
| Cyber Suit & Knuckle Sword (ID-66600018)You can only control 1 face-up "Cyber Suit & Knuckle Sword". Equip only to a "No.39: Utopia" monster you control. It gains 250 ATK and treated as Machine-Type. While this card is equipped to "No.39: Utopia" while it has no Xyz Material; it can't be destroyed by it's own effect. When the equipped monster would be destroyed; you can destroy this card instead. If this face-up card on the field is destroyed and sent to the graveyard; attach this as overlay to an Xyz monster you control. You can only use this effect of "Cyber Suit & Knuckle Sword" once per turn. - CODE:
--Cyber Suit & Knuckle Sword (Script by RaiZZZ19) function c66600018.initial_effect(c) c:SetUniqueOnField(1,0,66600018) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_EQUIP) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetTarget(c66600018.target) e1:SetOperation(c66600018.operation) c:RegisterEffect(e1) --Equip limit local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_EQUIP_LIMIT) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetValue(c66600018.eqlimit) c:RegisterEffect(e2) --equip (ATK & RACE) local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_EQUIP) e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetValue(250) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) e4:SetType(EFFECT_TYPE_EQUIP) e4:SetCode(EFFECT_CHANGE_RACE) e4:SetValue(RACE_MACHINE) c:RegisterEffect(e4) --destroy subsitute local e5=Effect.CreateEffect(c) e5:SetType(EFFECT_TYPE_EQUIP+EFFECT_TYPE_CONTINUOUS) e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e5:SetCode(EFFECT_DESTROY_REPLACE) e5:SetTarget(c66600018.reptg) e5:SetOperation(c66600018.repop) c:RegisterEffect(e5) --indes local e6=Effect.CreateEffect(c) e6:SetType(EFFECT_TYPE_FIELD) e6:SetCode(EFFECT_INDESTRUCTABLE_EFFECT) e6:SetRange(LOCATION_SZONE) e6:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE) e6:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x7f)) e6:SetValue(c66600018.efilter) c:RegisterEffect(e6) --material local e7=Effect.CreateEffect(c) e7:SetDescription(aux.Stringid(66600018,1)) e7:SetCategory(CATEGORY_SPECIAL_SUMMON) e7:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e7:SetCode(EVENT_TO_GRAVE) e7:SetCondition(c66600018.ocon) e7:SetTarget(c66600018.otg) e7:SetOperation(c66600018.oop) c:RegisterEffect(e7) end function c66600018.eqlimit(e,c) return c:IsCode(84013237) end function c66600018.filter(c) return c:IsFaceup() and c:IsCode(84013237) end function c66600018.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and c66600018.filter(chkc) end if chk==0 then return Duel.IsExistingTarget(c66600018.filter,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.SelectTarget(tp,c66600018.filter,tp,LOCATION_MZONE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) end function c66600018.operation(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,e:GetHandler(),tc) end end function c66600018.reptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end return Duel.SelectYesNo(tp,aux.Stringid(66600018,0)) end function c66600018.repop(e,tp,eg,ep,ev,re,r,rp) Duel.Destroy(e:GetHandler(),REASON_EFFECT+REASON_REPLACE) end function c66600018.efilter(e,re,rp,c) return re:GetHandler()==c end function c66600018.ocon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_DESTROY) and c:CheckUniqueOnField(tp) end function c66600018.ofilter(c) return c:IsFaceup() and c:IsType(TYPE_XYZ) end function c66600018.otg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c66600018.ofilter(chkc) end if chk==0 then return e:GetHandler():IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingTarget(c66600018.ofilter,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.SelectTarget(tp,c66600018.ofilter,tp,LOCATION_MZONE,0,1,1,nil) end function c66600018.oop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) and tc:IsFaceup() and c:IsRelateToEffect(e) then c:CancelToGrave() Duel.Overlay(tc,Group.FromCards(c)) end end
|
|
Tea82
Posts : 18 Join date : 2013-07-12 Location : Greece
| Subject: Re: Cyber Suit & Knuckle Sword Tue Nov 05, 2013 1:00 pm | |
| Very nice custom card RaiZZZ198) I am going to test it as soon as i find a free time!! |
|
RaiZZZ19
Posts : 81 Join date : 2013-08-03 Location : Bat Cave
| Subject: Re: Cyber Suit & Knuckle Sword Tue Nov 05, 2013 1:47 pm | |
| Thanks. I'm proud of it too. That's why the sword is my signature.. |
|
Sponsored content
| Subject: Re: Cyber Suit & Knuckle Sword | |
| |
|