Commit cb79fb35 authored by 聖園ミカ's avatar 聖園ミカ 🐟

1+1=3

parent 35947432
No preview for this file type
...@@ -90,7 +90,7 @@ function cm.copyop(e,tp,eg,ep,ev,re,r,rp) ...@@ -90,7 +90,7 @@ function cm.copyop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local code=tc:GetOriginalCodeRule() local code=tc:GetOriginalCodeRule()
if not tc:IsType(TYPE_TRAPMONSTER) then if not tc:IsType(TYPE_TRAPMONSTER) then
cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,1) cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD,1)
end end
end end
end end
......
...@@ -65,7 +65,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -65,7 +65,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e2:SetCode(EFFECT_CANNOT_ACTIVATE) e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(0,1) e2:SetTargetRange(0,1)
e2:SetLabel(att) e2:SetLabel(atk)
e2:SetValue(cm.aclimit) e2:SetValue(cm.aclimit)
e2:SetReset(RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
......
...@@ -27,7 +27,7 @@ function cm.initial_effect(c) ...@@ -27,7 +27,7 @@ function cm.initial_effect(c)
e2:SetCondition(cm.spcon) e2:SetCondition(cm.spcon)
e2:SetTarget(cm.sptg) e2:SetTarget(cm.sptg)
e2:SetOperation(cm.spop) e2:SetOperation(cm.spop)
c:RegisterEffect(e2) --c:RegisterEffect(e2)
end end
function cm.lcheck(g) function cm.lcheck(g)
return g:GetClassCount(Card.GetLinkAttribute)==g:GetCount() and g:GetClassCount(Card.GetLinkRace)==1 return g:GetClassCount(Card.GetLinkAttribute)==g:GetCount() and g:GetClassCount(Card.GetLinkRace)==1
......
...@@ -7,7 +7,6 @@ function s.initial_effect(c) ...@@ -7,7 +7,6 @@ function s.initial_effect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,id)
e1:SetCondition(s.condition) e1:SetCondition(s.condition)
e1:SetTarget(s.target) e1:SetTarget(s.target)
e1:SetOperation(s.activate) e1:SetOperation(s.activate)
...@@ -17,7 +16,6 @@ function s.initial_effect(c) ...@@ -17,7 +16,6 @@ function s.initial_effect(c)
e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW) e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,id)
e2:SetTarget(s.tdtg) e2:SetTarget(s.tdtg)
e2:SetOperation(s.tdop) e2:SetOperation(s.tdop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
...@@ -31,7 +29,7 @@ function s.filter1(c,e,tp) ...@@ -31,7 +29,7 @@ function s.filter1(c,e,tp)
and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
end end
function s.filter2(c,e,tp,mc) function s.filter2(c,e,tp,mc)
return c:IsSetCard(0xce4) and mc:IsCanBeXyzMaterial(c) return c:IsSetCard(0xce4) and mc:IsCanBeXyzMaterial(c) and c:IsType(TYPE_XYZ)
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0 and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
end end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
local s,id,o=GetID() local s,id,o=GetID()
function s.initial_effect(c) function s.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DRAW) e1:SetCategory(CATEGORY_DRAW+CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
...@@ -18,11 +18,7 @@ function s.filter1(c) ...@@ -18,11 +18,7 @@ function s.filter1(c)
return c:IsFaceup() and c:IsType(TYPE_TRAP) return c:IsFaceup() and c:IsType(TYPE_TRAP)
end end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk) function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
local ct=Duel.GetMatchingGroupCount(s.filter1,tp,0,LOCATION_SZONE,nil) if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,0,LOCATION_ONFIELD,1,nil) end
if chk==0 then return ct>0 and Duel.IsPlayerCanDraw(tp,ct) and Duel.IsExistingMatchingCard(s.filter,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(ct)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,ct)
if e:IsHasType(EFFECT_TYPE_ACTIVATE) then if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
Duel.SetChainLimit(s.chainlm) Duel.SetChainLimit(s.chainlm)
end end
...@@ -46,8 +42,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,8 +42,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e2) tc:RegisterEffect(e2)
tc=g:GetNext() tc=g:GetNext()
local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER) local ct=Duel.GetMatchingGroupCount(s.filter1,tp,0,LOCATION_ONFIELD,nil)
local ct=Duel.GetMatchingGroupCount(s.filter,tp,0,LOCATION_ONFIELD,nil) Duel.Draw(tp,ct,REASON_EFFECT)
Duel.Draw(p,ct,REASON_EFFECT)
end end
end end
\ No newline at end of file
...@@ -3,7 +3,7 @@ local m=30901007 ...@@ -3,7 +3,7 @@ local m=30901007
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_PLANT),2,cm.lcheck) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_PLANT),2,99,cm.lcheck)
c:EnableReviveLimit() c:EnableReviveLimit()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -35,7 +35,7 @@ function cm.atkfilter(c) ...@@ -35,7 +35,7 @@ function cm.atkfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsCode(30901007) return c:IsType(TYPE_MONSTER) and c:IsCode(30901007)
end end
function cm.atkval(e,c) function cm.atkval(e,c)
return Duel.GetMatchingGroupCount(cm.atkfilter,c:GetControler(),LOCATION_MZONE,0,nil)*500 return Duel.GetMatchingGroupCount(cm.atkfilter,c:GetControler(),LOCATION_MZONE,0,nil)*1000
end end
function cm.lcheck(g,lc) function cm.lcheck(g,lc)
return g:GetClassCount(Card.GetLinkCode)==1 return g:GetClassCount(Card.GetLinkCode)==1
......
...@@ -63,11 +63,11 @@ end ...@@ -63,11 +63,11 @@ end
function cm.cfilter(c) function cm.cfilter(c)
return c:IsFaceup() and c:IsOriginalCodeRule(75646327) return c:IsFaceup() and c:IsOriginalCodeRule(75646327)
end end
function cm.con(e,tp,eg,ep,ev,re,r,rp) function cm.con(e)
return Duel.GetFlagEffect(tp,m+1)>0 return Duel.GetFlagEffect(e:GetHandlerPlayer(),m+1)>0
end end
function cm.econ(e,tp,eg,ep,ev,re,r,rp) function cm.econ(e)
return Duel.GetFlagEffect(tp,m+1)>0 and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD,0,1,nil) return Duel.GetFlagEffect(e:GetHandlerPlayer(),m+1)>0 and Duel.IsExistingMatchingCard(cm.cfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end end
function cm.regop(e,tp,eg,ep,ev,re,r,rp) function cm.regop(e,tp,eg,ep,ev,re,r,rp)
for tc in aux.Next(eg) do for tc in aux.Next(eg) do
......
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