Commit 67ea0b53 authored by Nemo Ma's avatar Nemo Ma

fix

parent e374f7c1
No preview for this file type
...@@ -4,86 +4,86 @@ ...@@ -4,86 +4,86 @@
local s = c33700428 local s = c33700428
local id = 33700428 local id = 33700428
function s.initial_effect(c) function s.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c, aux.FilterBoolFunctionEx(Card.IsType, TYPE_TOKEN), 4, 4) aux.AddLinkProcedure(c, aux.FilterBoolFunction(Card.IsLinkType, TYPE_TOKEN), 4, 4)
--battle indestructable --battle indestructable
local e1 = Effect.CreateEffect(c) local e1 = Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE) e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e1:SetValue(1) e1:SetValue(1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--direct --direct
local e2 = Effect.CreateEffect(c) local e2 = Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DIRECT_ATTACK) e2:SetCode(EFFECT_DIRECT_ATTACK)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--count damage --count damage
local e3 = Effect.CreateEffect(c) local e3 = Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS) e3:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_DAMAGE) e3:SetCode(EVENT_DAMAGE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetLabel(0) e3:SetLabel(0)
e3:SetOperation(s.damop) e3:SetOperation(s.damop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4 = Effect.CreateEffect(c) local e4 = Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS) e4:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_TURN_END) e4:SetCode(EVENT_TURN_END)
e4:SetLabelObject(e3) e4:SetLabelObject(e3)
e4:SetCondition(s.resetop) e4:SetCondition(s.resetop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--skip --skip
local e5 = Effect.CreateEffect(c) local e5 = Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_QUICK_O) e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetCode(EVENT_FREE_CHAIN) e5:SetCode(EVENT_FREE_CHAIN)
e5:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e5:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE) e5:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
e5:SetLabelObject(e3) e5:SetLabelObject(e3)
e5:SetCondition(s.skipcon) e5:SetCondition(s.skipcon)
e5:SetOperation(s.skipop) e5:SetOperation(s.skipop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function s.damop(e, tp, eg, ep, ev, re, r, rp) function s.damop(e, tp, eg, ep, ev, re, r, rp)
if ep == tp and (r & REASON_BATTLE == REASON_BATTLE or (r & REASON_EFFECT == REASON_EFFECT and rp == 1 - tp)) then if ep == tp and (r & REASON_BATTLE == REASON_BATTLE or (r & REASON_EFFECT == REASON_EFFECT and rp == 1 - tp)) then
e:SetLabel(e:GetLabel() + ev) e:SetLabel(e:GetLabel() + ev)
end end
end end
function s.resetop(e, tp, eg, ep, ev, re, r, rp) function s.resetop(e, tp, eg, ep, ev, re, r, rp)
e:GetLabelObject():SetLabel(0) e:GetLabelObject():SetLabel(0)
return false return false
end end
function s.skipcon(e, tp, eg, ep, ev, re, r, rp) function s.skipcon(e, tp, eg, ep, ev, re, r, rp)
return Duel.GetTurnPlayer() ~= tp and e:GetLabelObject():GetLabel() >= 3000 return Duel.GetTurnPlayer() ~= tp and e:GetLabelObject():GetLabel() >= 3000
end end
function s.skipop(e, tp, eg, ep, ev, re, r, rp) function s.skipop(e, tp, eg, ep, ev, re, r, rp)
local c = e:GetHandler() local c = e:GetHandler()
local e1 = Effect.CreateEffect(c) local e1 = Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(3000) e1:SetValue(3000)
e1:SetReset(RESET_EVENT + RESETS_STANDARD + RESET_PHASE + PHASE_END + RESET_SELF_TURN) e1:SetReset(RESET_EVENT + RESETS_STANDARD + RESET_PHASE + PHASE_END + RESET_SELF_TURN)
c:RegisterEffect(e1) c:RegisterEffect(e1)
Duel.SkipPhase(1 - tp, PHASE_MAIN1, RESET_PHASE + PHASE_END, 1) Duel.SkipPhase(1 - tp, PHASE_MAIN1, RESET_PHASE + PHASE_END, 1)
Duel.SkipPhase(1 - tp, PHASE_BATTLE, RESET_PHASE + PHASE_END, 1) Duel.SkipPhase(1 - tp, PHASE_BATTLE, RESET_PHASE + PHASE_END, 1)
Duel.SkipPhase(1 - tp, PHASE_MAIN2, RESET_PHASE + PHASE_END, 1) Duel.SkipPhase(1 - tp, PHASE_MAIN2, RESET_PHASE + PHASE_END, 1)
Duel.SkipPhase(1 - tp, PHASE_END, RESET_PHASE + PHASE_END, 1) Duel.SkipPhase(1 - tp, PHASE_END, RESET_PHASE + PHASE_END, 1)
Duel.SkipPhase(tp, PHASE_DRAW, RESET_PHASE + PHASE_END, 2) Duel.SkipPhase(tp, PHASE_DRAW, RESET_PHASE + PHASE_END, 2)
local e2 = Effect.CreateEffect(c) local e2 = Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_PHASE + PHASE_END) e2:SetCode(EVENT_PHASE + PHASE_END)
e2:SetCondition(s.drcon) e2:SetCondition(s.drcon)
e2:SetOperation(s.drop) e2:SetOperation(s.drop)
Duel.RegisterEffect(e2, tp) Duel.RegisterEffect(e2, tp)
end end
function s.drcon(e, tp, eg, ep, ev, re, r, rp) function s.drcon(e, tp, eg, ep, ev, re, r, rp)
return tp == Duel.GetTurnPlayer() return tp == Duel.GetTurnPlayer()
end end
function s.drop(e, tp, eg, ep, ev, re, r, rp) function s.drop(e, tp, eg, ep, ev, re, r, rp)
Duel.Draw(tp, 1, REASON_EFFECT) Duel.Draw(tp, 1, REASON_EFFECT)
e:Reset() e:Reset()
end end
...@@ -4,7 +4,7 @@ local m=33700939 ...@@ -4,7 +4,7 @@ local m=33700939
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,cm.ffilter,2,true) aux.AddFusionProcFunRep(c,cm.ffilter,27,true)
local e1=rscf.SetSpecialSummonProduce(c,LOCATION_EXTRA,cm.con,cm.op) local e1=rscf.SetSpecialSummonProduce(c,LOCATION_EXTRA,cm.con,cm.op)
local e2=rsef.I(c,{m,0},{1,m},"tg,th,se",nil,LOCATION_MZONE,nil,nil,cm.tg2,cm.op2) local e2=rsef.I(c,{m,0},{1,m},"tg,th,se",nil,LOCATION_MZONE,nil,nil,cm.tg2,cm.op2)
end end
......
...@@ -4,7 +4,7 @@ local m=33700940 ...@@ -4,7 +4,7 @@ local m=33700940
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,cm.ffilter,2,true) aux.AddFusionProcFunRep(c,cm.ffilter,9,true)
local e1=rscf.SetSpecialSummonProduce(c,LOCATION_EXTRA,cm.con,cm.op) local e1=rscf.SetSpecialSummonProduce(c,LOCATION_EXTRA,cm.con,cm.op)
local f1=function(tp,re,rp) local f1=function(tp,re,rp)
return tp~=rp return tp~=rp
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment