Commit 8ee02b20 authored by POLYMER's avatar POLYMER

fix

parent 2be1e9df
......@@ -9,7 +9,7 @@ function c10105660.initial_effect(c)
e1:SetTarget(c10105660.sptg)
e1:SetOperation(c10105660.spop)
c:RegisterEffect(e1)
--equip
--equip
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_EQUIP)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
......@@ -21,7 +21,7 @@ function c10105660.initial_effect(c)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
end
end
function c10105660.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsPublic() end
end
......@@ -61,7 +61,8 @@ function c10105660.eqop(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetProperty(EFFECT_FLAG_COPY_INHERIT+EFFECT_FLAG_OWNER_RELATE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetLabelObject(c)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c10105660.eqlimit)
tc:RegisterEffect(e1)
......
......@@ -133,8 +133,10 @@ function cm.costop(e,tp,eg,ep,ev,re,r,rp)
return _GetActiveType(se)
end
function Effect.IsActiveType(se,typ)
local typ2=se:GetActiveType()
return typ&typ2~=0
if se==te then
return TYPE_MONSTER&typ>0
end
return _IsActiveType(se,typ)
end
function Card.GetType(sc)
if sc==e:GetHandler() then
......@@ -143,8 +145,10 @@ function cm.costop(e,tp,eg,ep,ev,re,r,rp)
return _GetType(sc)
end
function Card.IsType(sc,typ)
local typ2=sc:GetType()
return typ&typ2~=0
if sc==e:GetHandler() then
return typ&(TYPE_MONSTER+TYPE_EFFECT)>0
end
return _IsType(sc,typ)
end
function Card.GetOriginalType(sc)
if sc==e:GetHandler() then
......
......@@ -83,9 +83,9 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()<=0 then return end
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_DESTROY)
local sg=g:Select(1-tp,1,#g,nil)
local lp=Duel.GetLP(tp)
local lp=Duel.GetLP(e:GetHandlerPlayer())
local ct=Duel.Destroy(sg,REASON_EFFECT)
if ct>0 then
Duel.SetLP(tp,lp-ct*500)
Duel.SetLP(e:GetHandlerPlayer(),lp-ct*500)
end
end
\ No newline at end of file
......@@ -11,7 +11,6 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,m)
e1:SetCost(cm.thcost)
e1:SetCondition(cm.thcon)
e1:SetTarget(cm.thtg)
......
......@@ -70,8 +70,9 @@ function c22348442.eqop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterFlagEffect(22348442,RESET_EVENT+RESETS_STANDARD,0,0)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_COPY_INHERIT+EFFECT_FLAG_OWNER_RELATE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetLabelObject(c)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c22348442.eqlimit)
tc:RegisterEffect(e1)
......
......@@ -44,7 +44,7 @@ function s.initial_effect(c)
c:RegisterEffect(e4)
end
function s.thfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xaf1)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xcf1)
and c:IsAbleToHand()
end
function s.activate(e,tp,eg,ep,ev,re,r,rp)
......@@ -57,14 +57,14 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
end
end
function s.atfilter(c)
return c:IsFaceup() and not c:IsSetCard(0xaf1)
return c:IsFaceup() and not c:IsSetCard(0xcf1)
end
function s.atcon(e)
local tp=e:GetHandlerPlayer()
return Duel.IsExistingMatchingCard(s.atfilter,tp,LOCATION_MZONE,0,1,nil)
end
function s.atlimit(e,c)
return c:IsSetCard(0xaf1) and c:IsFaceup()
return c:IsSetCard(0xcf1) and c:IsFaceup()
end
function s.xyzconfilter(c,tp)
return c:IsFaceup()
......@@ -80,7 +80,7 @@ function s.fselect(sg,tp)
return mg:CheckSubGroup(s.matfilter,1,#mg,tp,sg)
end
function s.matfilter(sg,tp,g)
if sg:Filter(Card.IsSetCard,nil,0xaf1):GetCount()==0 then return false end
if sg:Filter(Card.IsSetCard,nil,0xcf1):GetCount()==0 then return false end
return Duel.IsExistingMatchingCard(s.xyzfilter1,tp,LOCATION_EXTRA,0,1,nil,sg)
end
function s.xyzfilter1(c,mg)
......@@ -95,7 +95,7 @@ function s.xyzfilter2(c,mg)
return mg:CheckSubGroup(s.gselect,1,#mg,c)
end
function s.gselect(sg,c)
if sg:Filter(Card.IsSetCard,nil,0xaf1):GetCount()==0 then return false end
if sg:Filter(Card.IsSetCard,nil,0xcf1):GetCount()==0 then return false end
return c:IsXyzSummonable(sg,#sg,#sg)
end
function s.xyzop(e,tp,eg,ep,ev,re,r,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