This repository was archived by the owner on Oct 4, 2024. It is now read-only.
-
-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathc511005088.lua
More file actions
60 lines (56 loc) · 1.54 KB
/
Copy pathc511005088.lua
File metadata and controls
60 lines (56 loc) · 1.54 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
--Performapal Reborn Force
--復活のエンタメ-リボーン・フォース-
--By Shad3
local s,id=GetID()
function s.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(s.cd)
e1:SetOperation(s.op)
c:RegisterEffect(e1)
--Global check
aux.GlobalCheck(s,function()
s.sreg={}
local ge1=Effect.GlobalEffect()
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_DESTROYED)
ge1:SetOperation(s.reg_op)
Duel.RegisterEffect(ge1,0)
aux.AddValuesReset(function()
s.sreg[0]=false
s.sreg[1]=false
end)
end)
end
function s.reg_op(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
if tc:IsType(TYPE_MONSTER) and tc:IsSetCard(0x9f) then s.sreg[tc:GetPreviousControler()]=true end
tc=eg:GetNext()
end
end
function s.cd(e,tp,eg,ep,ev,re,r,rp)
return s.sreg[tp]
end
function s.op(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_REFLECT_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(s.ref_val)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
if (Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE) then
Duel.SkipPhase(Duel.GetTurnPlayer(),PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE,1)
end
end
function s.ref_val(e,re,val,r,rp,rc)
if (r&REASON_EFFECT)~=0 then
e:Reset()
return true
end
return false
end