Raidraptor - Ultimate Falcon anime version

[chevalierx]

Hello

the script work fine

no image or defense info or number of xyz Materials

Raidraptor - Ultimate Falcon

? Level 10 monsters


Unaffected by your opponent's card effects. You can detach 1 Xyz Material from this card; negate the effects of all face-up cards your opponent currently controls until the end of this turn, then all monsters your opponent controls lose 1000 ATK. During the End Phase, if this card was Xyz Summoned by using a "Raidraptor" Xyz Monster as a Material this turn: Activate 1 of these effects.
● If your opponent controls a monster: All monsters your opponent controls lose 1000 ATK.
● If your opponent controls no monsters: Inflict 1000 damage to your opponent.


--Raidraptor - Ultimate Falcon
function c79889236.initial_effect©
--xyz summon
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WINDBEAST),5,10)
c:EnableReviveLimit()
--immune
local e1=Effect.CreateEffect©
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(c79889236.efilter)
c:RegisterEffect(e1)
--negate
local e2=Effect.CreateEffect©
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetCost(c79889236.negcost)
e2:SetOperation(c79889236.negop)
c:RegisterEffect(e2)

--Damage
local e3=Effect.CreateEffect©
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c79889236.condit1)
e3:SetOperation(c79889236.desop)
c:RegisterEffect(e3)
end
function c79889236.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer()
end
function c79889236.filter3©
return c:IsSetCard(0xba) and c:IsType(TYPE_XYZ)
end
function c79889236.condit1(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetOverlayGroup():IsExists(c79889236.filter3,1,nil)
end
function c79889236.negcost(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 c79889236.filter©
return c:IsFaceup() and (c:IsLocation(LOCATION_SZONE+LOCATION_MZONE+LOCATION_PZONE) or c:IsType(TYPE_EFFECT)) and not c:IsDisabled()
end
function c79889236.filter2©
return c:IsFaceup() and c:IsLocation(LOCATION_MZONE)
end
function c79889236.negop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c79889236.filter,tp,0,LOCATION_ONFIELD,c)
local tc=g:GetFirst()
while tc do
local e1=Effect.CreateEffect©
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
local e2=Effect.CreateEffect©
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e2)
local e3=Effect.CreateEffect©
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetValue(-1000)
e3:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3)
tc=g:GetNext()
end
end
function c79889236.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c79889236.filter2,tp,0,LOCATION_ONFIELD,c)
local g2=Duel.GetFieldGroupCount(e:GetHandlerPlayer(),0,LOCATION_MZONE)
if g2>0 then
local tc=g:GetFirst()
while tc do
local e3=Effect.CreateEffect©
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetValue(-1000)
tc:RegisterEffect(e3)
tc=g:GetNext()
end
end
if g2==0 then Duel.Damage(1-tp,1000,REASON_EFFECT) end
end