Commit 25c3ca30 authored by wind2009's avatar wind2009

Fix

parent dd0532fc
Pipeline #41043 passed with stages
in 2 minutes and 52 seconds
No preview for this file type
#created by ygomobile
100251001
100251002
\ No newline at end of file
...@@ -28,7 +28,7 @@ function s.initial_effect(c) ...@@ -28,7 +28,7 @@ function s.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function s.cfilter(c) function s.cfilter(c)
return c:GetType()==TYPE_SPELL+TYPE_RITUAL and c:IsAbleToRemoveAsCost() and c:CheckActivateEffect(true,true,false)~=nil return c:IsAllTypes(TYPE_RITUAL+TYPE_SPELL) and c:IsAbleToRemoveAsCost() and c:CheckActivateEffect(true,true,false)~=nil
end end
function s.rscost(e,tp,eg,ep,ev,re,r,rp,chk) function s.rscost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsPublic() if chk==0 then return not e:GetHandler():IsPublic()
...@@ -66,11 +66,11 @@ function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -66,11 +66,11 @@ function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local sg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,c) local sg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,c)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
end end
function s.operadesoption(e,tp,eg,ep,ev,re,r,rp) function s.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local sg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,aux.ExceptThisCard(e)) local sg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,aux.ExceptThisCard(e))
if Duel.Destroy(sg,REASON_EFFECT) if Duel.Destroy(sg,REASON_EFFECT)>0
and c:IsRelateToChain() and c:IsFaceup() then and c:IsRelateToChain() and c:IsFaceup() and c:IsType(TYPE_MONSTER) then
Duel.BreakEffect() Duel.BreakEffect()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
...@@ -79,4 +79,4 @@ function s.operadesoption(e,tp,eg,ep,ev,re,r,rp) ...@@ -79,4 +79,4 @@ function s.operadesoption(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
end end
\ No newline at end of file
...@@ -21,23 +21,34 @@ function s.initial_effect(c) ...@@ -21,23 +21,34 @@ function s.initial_effect(c)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCondition(s.eqcon) e2:SetCondition(s.eqcon)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--indes --atk
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE) e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE) e3:SetValue(s.atkval)
e3:SetTarget(s.indtg)
e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--at limit --indes
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(0,LOCATION_MZONE) e4:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e4:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET) e4:SetTarget(s.indtg)
e4:SetValue(s.atlimit) e4:SetValue(1)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--at limit
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD)
e5:SetRange(LOCATION_MZONE)
e5:SetTargetRange(0,LOCATION_MZONE)
e5:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
e5:SetValue(s.atlimit)
c:RegisterEffect(e5)
end
function s.can_equip_monster(c)
return true
end end
function s.eqcon(e,tp,eg,ep,ev,re,r,rp) function s.eqcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetBattledGroupCount()>0 return e:GetHandler():GetBattledGroupCount()>0
...@@ -63,33 +74,39 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp) ...@@ -63,33 +74,39 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp)
if c:IsRelateToChain() and c:IsFaceup() and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then if c:IsRelateToChain() and c:IsFaceup() and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.eqfilter),tp,0,LOCATION_MZONE,1,1,nil,c,tp) local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.eqfilter),tp,0,LOCATION_MZONE,1,1,nil,c,tp)
local sc=g:GetFirst() if g:GetCount()>0 then
if sc and Duel.Equip(tp,sc,c,false) then Duel.HintSelection(g)
local e1=Effect.CreateEffect(c) local sc=g:GetFirst()
e1:SetType(EFFECT_TYPE_SINGLE) s.equip_monster(c,tp,sc)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetLabelObject(c)
e1:SetValue(s.eqlimit)
sc:RegisterEffect(e1)
local atk=sc:GetTextAttack()
if sc:IsFacedown() then atk=0 end
if atk<0 then atk=0 end
if atk>0 then
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_EQUIP)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_OWNER_RELATE)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(atk)
sc:RegisterEffect(e2)
end
end end
end end
end end
function s.equip_monster(c,tp,tc)
if tc and Duel.Equip(tp,tc,c,false) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(s.eqlimit)
tc:RegisterEffect(e1)
tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,0)
end
end
function s.eqlimit(e,c) function s.eqlimit(e,c)
return c==e:GetLabelObject() return e:GetOwner()==c
end
function s.atkval(e,c)
local atk=0
local g=c:GetEquipGroup()
local tc=g:GetFirst()
while tc do
if tc:GetFlagEffect(id)~=0 and tc:IsFaceup() and tc:GetTextAttack()>=0 and tc:GetOriginalType()&TYPE_MONSTER~=0 then
atk=atk+tc:GetTextAttack()
end
tc=g:GetNext()
end
return atk
end end
function s.indtg(e,c) function s.indtg(e,c)
local tc=e:GetHandler() local tc=e:GetHandler()
...@@ -97,4 +114,4 @@ function s.indtg(e,c) ...@@ -97,4 +114,4 @@ function s.indtg(e,c)
end end
function s.atlimit(e,c) function s.atlimit(e,c)
return c~=e:GetHandler() return c~=e:GetHandler()
end end
\ No newline at end of file
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