Commit a48a1152 authored by mercury233's avatar mercury233 Committed by GitHub

update ファラオの審判 (#2106)

parent c39fb098
--ファラオの審判 --ファラオの審判
function c55948544.initial_effect(c) function c55948544.initial_effect(c)
--Activate (YU-JYO) --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(55948544,0))
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(c55948544.condition1)
e1:SetCost(c55948544.cost) e1:SetCost(c55948544.cost)
e1:SetOperation(c55948544.operation1) e1:SetTarget(c55948544.target)
e1:SetOperation(c55948544.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Activate (UNITY)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(55948544,1))
e2:SetType(EFFECT_TYPE_ACTIVATE)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetCondition(c55948544.condition2)
e2:SetCost(c55948544.cost)
e2:SetOperation(c55948544.operation2)
c:RegisterEffect(e2)
end
function c55948544.condition1(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,81332143)
end end
function c55948544.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c55948544.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2)) Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
end end
function c55948544.operation1(e,tp,eg,ep,ev,re,r,rp) function c55948544.target(e,tp,eg,ep,ev,re,r,rp,chk)
if not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,81332143) then return end local b1=Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,81332143)
local b2=Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,14731897)
if chk==0 then return b1 or b2 end
local op=aux.SelectFromOptions(tp,
{b1,aux.Stringid(55948544,0)},
{b2,aux.Stringid(55948544,1)})
e:SetLabel(op)
end
function c55948544.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local e1=Effect.CreateEffect(c) local op=e:GetLabel()
e1:SetType(EFFECT_TYPE_FIELD) if op==1 and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,81332143) then
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) local e1=Effect.CreateEffect(c)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(0,1) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
Duel.RegisterEffect(e1,tp) e1:SetReset(RESET_PHASE+PHASE_END)
local e2=e1:Clone() e1:SetTargetRange(0,1)
e2:SetCode(EFFECT_CANNOT_SUMMON) Duel.RegisterEffect(e1,tp)
Duel.RegisterEffect(e2,tp) local e2=e1:Clone()
local e3=e1:Clone() e2:SetCode(EFFECT_CANNOT_SUMMON)
e3:SetCode(EFFECT_CANNOT_FLIP_SUMMON) Duel.RegisterEffect(e2,tp)
Duel.RegisterEffect(e3,tp) local e3=e1:Clone()
local e4=e1:Clone() e3:SetCode(EFFECT_CANNOT_FLIP_SUMMON)
e4:SetCode(EFFECT_CANNOT_MSET) Duel.RegisterEffect(e3,tp)
Duel.RegisterEffect(e4,tp) local e4=e1:Clone()
local e5=e1:Clone() e4:SetCode(EFFECT_CANNOT_MSET)
e5:SetCode(EFFECT_CANNOT_TURN_SET) Duel.RegisterEffect(e4,tp)
Duel.RegisterEffect(e5,tp) local e5=e1:Clone()
local e6=Effect.CreateEffect(c) e5:SetCode(EFFECT_CANNOT_TURN_SET)
e6:SetType(EFFECT_TYPE_FIELD) Duel.RegisterEffect(e5,tp)
e6:SetProperty(EFFECT_FLAG_PLAYER_TARGET) local e6=Effect.CreateEffect(c)
e6:SetCode(EFFECT_CANNOT_ACTIVATE) e6:SetType(EFFECT_TYPE_FIELD)
e6:SetTargetRange(0,1) e6:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e6:SetValue(c55948544.aclimit1) e6:SetCode(EFFECT_CANNOT_ACTIVATE)
e6:SetReset(RESET_PHASE+PHASE_END) e6:SetTargetRange(0,1)
Duel.RegisterEffect(e6,tp) e6:SetValue(c55948544.aclimit1)
local e7=Effect.CreateEffect(c) e6:SetReset(RESET_PHASE+PHASE_END)
e7:SetType(EFFECT_TYPE_FIELD) Duel.RegisterEffect(e6,tp)
e7:SetCode(EFFECT_DISABLE) local e7=Effect.CreateEffect(c)
e7:SetTargetRange(0,LOCATION_MZONE) e7:SetType(EFFECT_TYPE_FIELD)
e7:SetTarget(c55948544.distg1) e7:SetCode(EFFECT_DISABLE)
e7:SetReset(RESET_PHASE+PHASE_END) e7:SetTargetRange(0,LOCATION_MZONE)
Duel.RegisterEffect(e7,tp) e7:SetTarget(c55948544.distg1)
local e8=Effect.CreateEffect(c) e7:SetReset(RESET_PHASE+PHASE_END)
e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) Duel.RegisterEffect(e7,tp)
e8:SetCode(EVENT_CHAIN_SOLVING) local e8=Effect.CreateEffect(c)
e8:SetCondition(c55948544.discon1) e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e8:SetOperation(c55948544.disop) e8:SetCode(EVENT_CHAIN_SOLVING)
e8:SetReset(RESET_PHASE+PHASE_END) e8:SetCondition(c55948544.discon1)
Duel.RegisterEffect(e8,tp) e8:SetOperation(c55948544.disop)
e8:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e8,tp)
end
if op==2 and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,14731897) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SSET)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(0,1)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetTargetRange(0,1)
e2:SetValue(c55948544.aclimit2)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_DISABLE)
e3:SetTargetRange(0,LOCATION_SZONE)
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,tp)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_DISABLE_TRAPMONSTER)
e4:SetTargetRange(0,LOCATION_MZONE)
e4:SetTarget(c55948544.distg2)
e4:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e4,tp)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_CHAIN_SOLVING)
e5:SetCondition(c55948544.discon2)
e5:SetOperation(c55948544.disop)
e5:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e5,tp)
end
end end
function c55948544.aclimit1(e,re,tp) function c55948544.aclimit1(e,re,tp)
return re:IsActiveType(TYPE_MONSTER) return re:IsActiveType(TYPE_MONSTER)
...@@ -81,51 +115,6 @@ end ...@@ -81,51 +115,6 @@ end
function c55948544.discon1(e,tp,eg,ep,ev,re,r,rp) function c55948544.discon1(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and rp==1-tp return re:IsActiveType(TYPE_MONSTER) and rp==1-tp
end end
function c55948544.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateEffect(ev)
end
function c55948544.condition2(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,14731897)
end
function c55948544.operation2(e,tp,eg,ep,ev,re,r,rp)
if not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,14731897) then return end
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SSET)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(0,1)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetTargetRange(0,1)
e2:SetValue(c55948544.aclimit2)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_DISABLE)
e3:SetTargetRange(0,LOCATION_SZONE)
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,tp)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_DISABLE_TRAPMONSTER)
e4:SetTargetRange(0,LOCATION_MZONE)
e4:SetTarget(c55948544.distg2)
e4:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e4,tp)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_CHAIN_SOLVING)
e5:SetCondition(c55948544.discon2)
e5:SetOperation(c55948544.disop)
e5:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e5,tp)
end
function c55948544.aclimit2(e,re,tp) function c55948544.aclimit2(e,re,tp)
return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) return re:IsActiveType(TYPE_SPELL+TYPE_TRAP)
end end
...@@ -135,3 +124,6 @@ end ...@@ -135,3 +124,6 @@ end
function c55948544.discon2(e,tp,eg,ep,ev,re,r,rp) function c55948544.discon2(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and rp==1-tp return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and rp==1-tp
end end
function c55948544.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateEffect(ev)
end
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