--Gladiator Beast Alexctavius function c40933340.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCode2(c,42592719,29590752,true,true) --spsummon condition local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetCode(EFFECT_SPSUMMON_CONDITION) e1:SetValue(c40933340.splimit) c:RegisterEffect(e1) --special summon rule local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD) e2:SetCode(EFFECT_SPSUMMON_PROC) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE) e2:SetRange(LOCATION_EXTRA) e2:SetCondition(c40933340.sprcon) e2:SetOperation(c40933340.sprop) c:RegisterEffect(e2) --Immune local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE) e3:SetCode(EFFECT_IMMUNE_EFFECT) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetRange(LOCATION_MZONE) e3:SetValue(c40933340.efilter) c:RegisterEffect(e3) --to hand local e4=Effect.CreateEffect(c) e4:SetDescription(aux.Stringid(40933340,0)) e4:SetCategory(CATEGORY_TOHAND) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_SPSUMMON_SUCCESS) e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e4:SetTarget(c40933340.rtg) e4:SetOperation(c40933340.rop) c:RegisterEffect(e4) --Attack Destroy local e5=Effect.CreateEffect(c) e5:SetDescription(aux.Stringid(40933340,1)) e5:SetCategory(CATEGORY_DESTROY) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e5:SetCode(EVENT_ATTACK_ANNOUNCE) e5:SetRange(LOCATION_MZONE) e5:SetTarget(c40933340.destg) e5:SetOperation(c40933340.desop) c:RegisterEffect(e5) --special summon local e6=Effect.CreateEffect(c) e6:SetDescription(aux.Stringid(40933340,2)) e6:SetCategory(CATEGORY_SPECIAL_SUMMON) e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e6:SetCode(EVENT_PHASE+PHASE_BATTLE) e6:SetRange(LOCATION_MZONE) e6:SetCondition(c40933340.spcon) e6:SetCost(c40933340.spcost) e6:SetTarget(c40933340.sptg) e6:SetOperation(c40933340.spop) c:RegisterEffect(e6) end function c40933340.splimit(e,se,sp,st) return e:GetHandler():GetLocation()~=LOCATION_EXTRA end function c40933340.spfilter1(c,tp) return c:IsFusionCode(42592719) and c:IsAbleToDeckOrExtraAsCost() and c:IsCanBeFusionMaterial(nil,true) and Duel.IsExistingMatchingCard(c40933340.spfilter2,tp,LOCATION_ONFIELD,0,1,c) end function c40933340.spfilter2(c) return c:IsFusionCode(29590752) and c:IsCanBeFusionMaterial() and c:IsAbleToDeckOrExtraAsCost() end function c40933340.sprcon(e,c) if c==nil then return true end local tp=c:GetControler() return Duel.GetLocationCount(tp,LOCATION_MZONE)>-2 and Duel.IsExistingMatchingCard(c40933340.spfilter1,tp,LOCATION_ONFIELD,0,1,nil,tp) end function c40933340.sprop(e,tp,eg,ep,ev,re,r,rp,c) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(40933340,3)) local g1=Duel.SelectMatchingCard(tp,c40933340.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(40933340,4)) local g2=Duel.SelectMatchingCard(tp,c40933340.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst()) g1:Merge(g2) local tc=g1:GetFirst() while tc do if not tc:IsFaceup() then Duel.ConfirmCards(1-tp,tc) end tc=g1:GetNext() end Duel.SendtoDeck(g1,nil,2,REASON_COST) end function c40933340.efilter(e,te) return te:IsActiveType(TYPE_SPELL+TYPE_TRAP) and te:GetOwnerPlayer()~=e:GetHandlerPlayer() end function c40933340.rtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsOnField() and chkc:IsAbleToHand() end if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end function c40933340.rop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc and tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) end end function c40933340.dfilter(c) return c:IsFacedown() end function c40933340.destg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(c40933340.dfilter,tp,0,LOCATION_SZONE,1,nil) end local g=Duel.GetMatchingGroup(c40933340.dfilter,tp,0,LOCATION_SZONE,nil) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0) end function c40933340.desop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(c40933340.dfilter,tp,0,LOCATION_SZONE,nil) Duel.Destroy(g,REASON_EFFECT) end function c40933340.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetBattledGroupCount()>0 end function c40933340.spcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsAbleToExtraAsCost() end Duel.SendtoDeck(c,nil,0,REASON_COST) end function c40933340.filter(c,e,tp) return c:IsLevelBelow(5) and c:IsSetCard(0x19) and c:IsCanBeSpecialSummoned(e,120,tp,true,false) end function c40933340.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 and Duel.IsExistingMatchingCard(c40933340.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end function c40933340.spop(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,c40933340.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local tc=g:GetFirst() if tc then Duel.SpecialSummon(tc,120,tp,tp,true,false,POS_FACEUP) tc:RegisterFlagEffect(tc:GetOriginalCode(),RESET_EVENT+0x1ff0000,0,0) end end