Commit 5c665dfe authored by TanakaKotoha's avatar TanakaKotoha

micro

parent f3def031
......@@ -5,7 +5,7 @@ function cm.initial_effect(c)
c:SetSPSummonOnce(10200855)
--fusion material
c:EnableReviveLimit()
aux.AddFusionProcFunFunRep(c,cm.filter1,cm.filter2,1,63,true,true)
aux.AddFusionProcCodeFunRep(c,10200655,cm.filter,1,63,true,true)
aux.AddContactFusionProcedure(c,Card.IsReleasable,LOCATION_HAND,0,Duel.Release,REASON_COST+REASON_MATERIAL)
--spsummon condition
local e0=Effect.CreateEffect(c)
......@@ -23,12 +23,12 @@ function cm.initial_effect(c)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
end
function cm.filter1(c)
return c:IsCode(10200655) and c:IsLocation(LOCATION_HAND)
end
function cm.filter2(c)
function cm.filter(c)
return c:IsRace(RACE_MACHINE) and c:IsLocation(LOCATION_HAND)
end
function cm.splimit(e,se,sp,st)
return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
end
function cm.chainlm(e,rp,tp)
return tp==rp
......
......@@ -49,8 +49,8 @@ function c33310210.thfilter(c)
return c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
end
function c33310210.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c33310210.thfilter(chkc) and e:GetHandler():GetFlagEffect(33310210)==0 end
if chk==0 then return Duel.IsExistingTarget(c33310210.thfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c33310210.thfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c33310210.thfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) and e:GetHandler():GetFlagEffect(33310210)==0 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectTarget(tp,c33310210.thfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
......
......@@ -36,7 +36,7 @@ function c33310214.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp) or Duel.GetMatchingGroupCount(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)>0 end
end
function c33310214.thop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)>0
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local b1=Duel.IsPlayerCanDraw(tp)
local b2=g:GetCount()>0
local off=1
......
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