Commit b8fdd20e authored by Tachibana's avatar Tachibana

得得得得得

parent 93eb814d
...@@ -35,7 +35,7 @@ end ...@@ -35,7 +35,7 @@ end
function c12300720.actg(e,tp,eg,ep,ev,re,r,rp,chk) function c12300720.actg(e,tp,eg,ep,ev,re,r,rp,chk)
local b1=Duel.IsExistingMatchingCard(c12300720.filth,tp,LOCATION_DECK,0,1,nil) local b1=Duel.IsExistingMatchingCard(c12300720.filth,tp,LOCATION_DECK,0,1,nil)
and Duel.GetFlagEffect(tp,12300720)==0 and Duel.GetFlagEffect(tp,12300720)==0
local b2=Duel.IsExistingMatchingCard(c12300720.filcg,tp,0,LOCATION_MZONE,1,nil) and Duel.IsExistingMatchingCard(c12300720.filsp,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) and c12300720.chkcp(tp) local b2=Duel.IsExistingMatchingCard(c12300720.filcg,tp,0,LOCATION_MZONE,1,nil) and Duel.IsExistingMatchingCard(c12300720.filsp,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) and c12300720.chkcp(tp)
if chk==0 then return b1 or b2 end if chk==0 then return b1 or b2 end
local sel=1 local sel=1
if b1 and b2 then if b1 and b2 then
......
...@@ -72,7 +72,7 @@ function cm.cfilter2(c) ...@@ -72,7 +72,7 @@ function cm.cfilter2(c)
return c:IsFaceup() and c:IsSetCard(0x6343) and c:IsType(TYPE_SPELL+TYPE_EQUIP) return c:IsFaceup() and c:IsSetCard(0x6343) and c:IsType(TYPE_SPELL+TYPE_EQUIP)
end end
function cm.atkval2(e,c) function cm.atkval2(e,c)
return Duel.GetMatchingGroupCount(cm.cfilter2,tp,LOCATION_ONFIELD,0,nil) return Duel.GetMatchingGroupCount(cm.cfilter2,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,nil)
end end
function cm.con3(e,tp,eg,ep,ev,re,r,rp) function cm.con3(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -44,6 +44,7 @@ function cm.initial_effect(c) ...@@ -44,6 +44,7 @@ function cm.initial_effect(c)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCountLimit(2,m) e4:SetCountLimit(2,m)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCondition(cm.con)
e4:SetCost(cm.discost) e4:SetCost(cm.discost)
e4:SetTarget(cm.target) e4:SetTarget(cm.target)
e4:SetOperation(cm.activate) e4:SetOperation(cm.activate)
...@@ -55,6 +56,7 @@ function cm.initial_effect(c) ...@@ -55,6 +56,7 @@ function cm.initial_effect(c)
e5:SetProperty(EFFECT_FLAG_DELAY) e5:SetProperty(EFFECT_FLAG_DELAY)
e5:SetCountLimit(2,m) e5:SetCountLimit(2,m)
e5:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e5:SetCondition(cm.con)
e5:SetCost(cm.discost) e5:SetCost(cm.discost)
e5:SetTarget(cm.target) e5:SetTarget(cm.target)
e5:SetOperation(cm.activate) e5:SetOperation(cm.activate)
...@@ -66,6 +68,7 @@ function cm.initial_effect(c) ...@@ -66,6 +68,7 @@ function cm.initial_effect(c)
e6:SetProperty(EFFECT_FLAG_DELAY) e6:SetProperty(EFFECT_FLAG_DELAY)
e6:SetCountLimit(2,m) e6:SetCountLimit(2,m)
e6:SetRange(LOCATION_MZONE) e6:SetRange(LOCATION_MZONE)
e6:SetCondition(cm.con)
e6:SetCost(cm.discost) e6:SetCost(cm.discost)
e6:SetTarget(cm.target) e6:SetTarget(cm.target)
e6:SetOperation(cm.activate) e6:SetOperation(cm.activate)
...@@ -117,6 +120,9 @@ function cm.aclimit(e,re,tp) ...@@ -117,6 +120,9 @@ function cm.aclimit(e,re,tp)
return re:GetActivateLocation()==LOCATION_REMOVED return re:GetActivateLocation()==LOCATION_REMOVED
end end
function cm.tdcon1(e,tp,eg,ep,ev,re,r,rp)
return not eg:IsContains(e:GetHandler())
end
function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
local ft=0 local ft=0
if e:GetHandler():GetFlagEffect(33401301)>0 then ft=1 end if e:GetHandler():GetFlagEffect(33401301)>0 then ft=1 end
...@@ -125,11 +131,11 @@ function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -125,11 +131,11 @@ function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end end
end end
function cm.filter(c) function cm.filter(c,mc)
return c:IsAbleToRemove() return c:IsAbleToRemove()
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return eg:IsExists(cm.filter,1,nil) end if chk==0 then return eg:IsExists(cm.filter,1,nil,e:GetHandler()) end
local g=eg:Filter(cm.filter,nil) local g=eg:Filter(cm.filter,nil)
Duel.SetTargetCard(g) Duel.SetTargetCard(g)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
......
...@@ -171,7 +171,8 @@ function cm.activate2(e,tp,eg,ep,ev,re,r,rp) ...@@ -171,7 +171,8 @@ function cm.activate2(e,tp,eg,ep,ev,re,r,rp)
end end
function cm.setfilter(c) function cm.setfilter(c)
return c:IsFaceup() and c:IsCanTurnSet() return c:IsFaceup() and (c:IsType(TYPE_MONSTER) and c:IsCanTurnSet())
and (c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable())
end end
function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
......
...@@ -38,10 +38,11 @@ end ...@@ -38,10 +38,11 @@ end
function cm.setop(e,tp,eg,ep,ev,re,r,rp) function cm.setop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) then return end if not Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local tc=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil) local tg=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
local tc=tg:GetFirst()
Duel.SSet(tp,tc) Duel.SSet(tp,tc)
if Duel.IsExistingMatchingCard(cm.ckfilter,tp,0,LOCATION_ONFIELD,1,nil) then if Duel.IsExistingMatchingCard(cm.ckfilter,tp,0,LOCATION_ONFIELD,1,nil) then
if tc:IsType(TYPE_TRAP) then if tc:IsType(TYPE_TRAP) then
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN) e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
......
...@@ -38,7 +38,7 @@ function cm.initial_effect(c) ...@@ -38,7 +38,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--tograve --tograve
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(m,0)) e4:SetDescription(aux.Stringid(m,1))
e4:SetCategory(CATEGORY_HANDES) e4:SetCategory(CATEGORY_HANDES)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY)
......
...@@ -37,8 +37,8 @@ function cm.initial_effect(c) ...@@ -37,8 +37,8 @@ function cm.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--tograve --tograve
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(m,0)) e4:SetDescription(aux.Stringid(m,1))
e4:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCode(EVENT_PAY_LPCOST) e4:SetCode(EVENT_PAY_LPCOST)
......
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