Commit 76b090fe authored by TanakaKotoha's avatar TanakaKotoha

foo foo

parent af8f1990
No preview for this file type
......@@ -29,8 +29,8 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmDecktop(tp,7)
local g=Duel.GetDecktopGroup(tp,7)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
local sg=g:Select(tp,2,5,nil)
if sg:GetClassCount(Card.GetCode())==1 then
local sg=g:Select(tp,2,3,nil)
if sg:GetClassCount(Card.GetCode)==1 then
Duel.SendtoHand(sg,tp,REASON_EFFECT)
end
end
\ No newline at end of file
......@@ -3,8 +3,9 @@ Duel.LoadScript("c12038000.lua")
local m=12038014
local cm=_G["c"..m]
function cm.initial_effect(c)
----synchro summon
aux.AddSynchroMixProcedure(c,aux.Tuner(nil),aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),nil,aux.NonTuner(nil),1,99)
aux.AddSynchroProcedure(c,aux.Tuner(nil),aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1)
c:EnableReviveLimit()
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......
......@@ -45,7 +45,7 @@ function cm.cost1(e,c,tp,st)
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_ONFIELD,0,1,nil,12038000)
end
function cm.ovfilter(c)
local tp=c:GetControl()
local tp=c:GetControler()
return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0xfa6) and c:GetOverlayCount()==0
end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -22,7 +22,7 @@ function cm.initial_effect(c)
--target
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,1))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetTarget(cm.target)
......@@ -81,15 +81,14 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoDeck(c,tp,2,REASON_EFFECT)
c:ReverseInDeck()
Duel.ShuffleDeck(tp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
local tc=Duel.GetOperatedGroup()
if tc and tc:GetFirst():IsAttackBelow(1500) then
Duel.SendtoHand(tc,tp,REASON_EFFECT)
end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
local tc=Duel.GetOperatedGroup()
if tc and tc:GetFirst():IsAttackBelow(1500) then
Duel.SendtoHand(tc,tp,REASON_EFFECT)
end
end
end
......@@ -100,7 +99,7 @@ function cm.spcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
return ft>0 and c:IsFaceup() and Duel.IsExistingMatchingCard(cm.dspfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.GetFieldGroup(tp,LOCATION_MZONE,0):GetClassCount(Card.GetAttack())==1
return ft>0 and c:IsFaceup() and Duel.IsExistingMatchingCard(cm.dspfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.GetFieldGroup(tp,LOCATION_MZONE,0):GetClassCount(Card.GetAttack)==1
end
function cm.negcon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
......
......@@ -110,7 +110,7 @@ function c16160001.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
end
function c16160001.tkop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and Duel.IsPlayerCanSpecialSummonMonster(tp,16160002,nil,0x4011,4000,4000,10,RACE_PLANT,ATTRIBUTE_EARTH) then
if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,16160002,nil,0x4011,4000,4000,10,RACE_PLANT,ATTRIBUTE_EARTH) then
local token=Duel.CreateToken(tp,16160002)
Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
local e1=Effect.CreateEffect(e:GetHandler())
......@@ -126,6 +126,8 @@ function c16160001.tkop(e,tp,eg,ep,ev,re,r,rp)
end
end
function c16160001.filter(c,mc)
if not c then return false end
if not c:GetReasonEffect() then return c:GetReasonCard()==mc end
return c:GetReasonCard()==mc or c:GetReasonEffect():GetHandler()==mc
end
function c16160001.desop(e,tp,eg,ep,ev,re,r,rp)
......
--向着伊甸
function c16160003.initial_effect(c)
aux.AddCodeList(c,16160001)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16160003,0))
......@@ -95,7 +96,7 @@ function c16160003.ssfilter(c)
return c:IsCode(16160001) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden()
end
function c16160003.sstg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c16160003.thfilter,tp,LOCATION_GRAVE,0,1,nil) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) end
if chk==0 then return Duel.IsExistingMatchingCard(c16160003.ssfilter,tp,LOCATION_GRAVE,0,1,nil) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) end
end
function c16160003.ssop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return end
......
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