Commit 554b2435 authored by TanakaKotoha's avatar TanakaKotoha

fix

parent 82375b84
Pipeline #510 passed with stages
in 43 minutes and 14 seconds
...@@ -50,20 +50,17 @@ function c10970912.retop(e,tp,eg,ep,ev,re,r,rp) ...@@ -50,20 +50,17 @@ function c10970912.retop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
end end
function c10970912.desfilter(c) function c10970912.desfilter(c)
return c:IsFaceup() and c:IsSetCard(0x233) return c:IsFaceup() and (c:IsSetCard(0x233) or c:IsType(TYPE_FIELD))
end end
function c10970912.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c10970912.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(c10970912.desfilter,tp,LOCATION_ONFIELD,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c10970912.desfilter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
local g1=Duel.SelectTarget(tp,c10970912.desfilter,tp,LOCATION_ONFIELD,0,1,7,nil) local g1=Duel.SelectTarget(tp,c10970912.desfilter,tp,LOCATION_ONFIELD,0,1,2,nil)
end end
function c10970912.thfilter(c) function c10970912.thfilter(c)
return c:IsFaceup() and c:IsType(TYPE_FIELD) return c:IsFaceup() and c:IsType(TYPE_FIELD)
end end
function c10970912.filter2(c)
return c:IsFaceup() and c:IsSetCard(0x233) or c:IsType(TYPE_FIELD)
end
function c10970912.operation(e,tp,eg,ep,ev,re,r,rp) function c10970912.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
......
...@@ -36,7 +36,7 @@ function cm.initial_effect(c) ...@@ -36,7 +36,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e4) ]]-- c:RegisterEffect(e4) ]]--
end end
function c12004025.lcheck(g,lc) function c12004025.lcheck(g,lc)
return g:IsExists(Card.IsSetCard,1,nil,RACE_MACHINE) and g:IsExists(Card.IsSetCard,1,nil,0x1fbd) return g:IsExists(Card.IsRace,1,nil,RACE_MACHINE) and g:IsExists(Card.IsSetCard,1,nil,0x1fbd)
end end
function c12004025.hspcon(e,tp,eg,ep,ev,re,r,rp) function c12004025.hspcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
......
...@@ -33,7 +33,7 @@ end ...@@ -33,7 +33,7 @@ end
function cm.filter1(c) function cm.filter1(c)
return c:IsSetCard(0xfb5) and c:IsAbleToHand() and c:IsFacedown() return c:IsSetCard(0xfb5) and c:IsAbleToHand() and c:IsFacedown()
end end
function cm.cfilter2(c) function cm.filter2(c)
return c:IsSetCard(0xfb5) and c:IsAbleToHand() and c:IsFaceup() return c:IsSetCard(0xfb5) and c:IsAbleToHand() and c:IsFaceup()
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
......
...@@ -38,7 +38,7 @@ function cm.initial_effect(c) ...@@ -38,7 +38,7 @@ function cm.initial_effect(c)
e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW) e3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetValue(1) e3:SetCountLimit(1)
e3:SetTarget(cm.thtg) e3:SetTarget(cm.thtg)
e3:SetOperation(cm.thop) e3:SetOperation(cm.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
...@@ -68,7 +68,9 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,7 +68,9 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
Duel.SendtoDeck(g,nil,2,REASON_EFFECT) Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
if g then
g:GetFirst():ReverseInDeck() g:GetFirst():ReverseInDeck()
end
Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,1,REASON_EFFECT)
end end
......
...@@ -122,7 +122,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -122,7 +122,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp) function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp)
return not c:IsType(e:GetLabel()) and c:IsLocation(LOCATION_EXTRA) return c:IsLocation(LOCATION_EXTRA)
end end
function cm.spcon(e,c) function cm.spcon(e,c)
...@@ -140,11 +140,12 @@ function cm.actop(e,tp,eg,ep,ev,re,r,rp) ...@@ -140,11 +140,12 @@ function cm.actop(e,tp,eg,ep,ev,re,r,rp)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_LEAVE_FIELD) e1:SetCode(EVENT_LEAVE_FIELD)
e1:SetOperation(cm.levop) e1:SetOperation(cm.levop)
c:RegisterEffect(e1) c:RegisterEffect(e1,true)
end end
function cm.levop(e,tp,eg,ep,ev,re,r,rp) function cm.levop(e,tp,eg,ep,ev,re,r,rp)
Duel.Draw(tp,2,REASON_EFFECT) Duel.Draw(tp,2,REASON_EFFECT)
Duel.Recover(tp,2000,REASON_EFFECT) Duel.Recover(tp,2000,REASON_EFFECT)
e:Reset()
end end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -28,8 +28,21 @@ function c65060032.initial_effect(c) ...@@ -28,8 +28,21 @@ function c65060032.initial_effect(c)
e2:SetTarget(c65060032.target) e2:SetTarget(c65060032.target)
e2:SetOperation(c65060032.operation) e2:SetOperation(c65060032.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--without release
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetRange(LOCATION_FZONE)
e0:SetCondition(c65060032.ntcon)
e0:SetValue(SUMMON_TYPE_NORMAL)
c:RegisterEffect(e0)
e2:SetLabelObject(e0)
end end
function c65060032.filter(c) function c65060032.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.CheckTribute(c,0)
end
function c65060032.filter(c,e)
return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e) return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e)
end end
function c65060032.ccost(e,tp,eg,ep,ev,re,r,rp,chk) function c65060032.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -37,15 +50,17 @@ function c65060032.ccost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -37,15 +50,17 @@ function c65060032.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65060032.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65060032.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65060032.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end local ce=e:GetLabelObject()
if chk==0 then return Duel.IsExistingMatchingCard(c65060032.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,ce) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end end
function c65060032.operation(e,tp,eg,ep,ev,re,r,rp) function c65060032.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060032.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060032.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,e) Duel.Summon(tp,tc,true,ce)
end end
end end
......
...@@ -26,8 +26,21 @@ function c65060033.initial_effect(c) ...@@ -26,8 +26,21 @@ function c65060033.initial_effect(c)
e2:SetTarget(c65060033.target) e2:SetTarget(c65060033.target)
e2:SetOperation(c65060033.operation) e2:SetOperation(c65060033.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--without release
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetRange(LOCATION_FZONE)
e0:SetCondition(c65060033.ntcon)
e0:SetValue(SUMMON_TYPE_NORMAL)
c:RegisterEffect(e0)
e2:SetLabelObject(e0)
end end
function c65060033.filter(c) function c65060033.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.CheckTribute(c,0)
end
function c65060033.filter(c,e)
return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e) return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e)
end end
function c65060033.ccost(e,tp,eg,ep,ev,re,r,rp,chk) function c65060033.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -35,15 +48,17 @@ function c65060033.ccost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -35,15 +48,17 @@ function c65060033.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65060033.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65060033.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65060033.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end local ce=e:GetLabelObject()
if chk==0 then return Duel.IsExistingMatchingCard(c65060033.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,ce) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end end
function c65060033.operation(e,tp,eg,ep,ev,re,r,rp) function c65060033.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060033.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060033.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,e) Duel.Summon(tp,tc,true,ce)
end end
end end
......
...@@ -28,8 +28,21 @@ function c65060034.initial_effect(c) ...@@ -28,8 +28,21 @@ function c65060034.initial_effect(c)
e2:SetTarget(c65060034.target) e2:SetTarget(c65060034.target)
e2:SetOperation(c65060034.operation) e2:SetOperation(c65060034.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--without release
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetRange(LOCATION_FZONE)
e0:SetCondition(c65060034.ntcon)
e0:SetValue(SUMMON_TYPE_NORMAL)
c:RegisterEffect(e0)
e2:SetLabelObject(e0)
end end
function c65060034.filter(c) function c65060034.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.CheckTribute(c,0)
end
function c65060034.filter(c,e)
return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e) return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e)
end end
function c65060034.ccost(e,tp,eg,ep,ev,re,r,rp,chk) function c65060034.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -37,15 +50,17 @@ function c65060034.ccost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -37,15 +50,17 @@ function c65060034.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65060034.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65060034.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65060034.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end local ce=e:GetLabelObject()
if chk==0 then return Duel.IsExistingMatchingCard(c65060034.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,ce) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end end
function c65060034.operation(e,tp,eg,ep,ev,re,r,rp) function c65060034.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060034.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060034.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,e) Duel.Summon(tp,tc,true,ce)
end end
end end
......
...@@ -31,8 +31,21 @@ function c65060035.initial_effect(c) ...@@ -31,8 +31,21 @@ function c65060035.initial_effect(c)
e2:SetTarget(c65060035.target) e2:SetTarget(c65060035.target)
e2:SetOperation(c65060035.operation) e2:SetOperation(c65060035.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--without release
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetRange(LOCATION_FZONE)
e0:SetCondition(c65060035.ntcon)
e0:SetValue(SUMMON_TYPE_NORMAL)
c:RegisterEffect(e0)
e2:SetLabelObject(e0)
end end
function c65060035.filter(c) function c65060035.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.CheckTribute(c,0)
end
function c65060035.filter(c,e)
return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e) return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e)
end end
function c65060035.ccost(e,tp,eg,ep,ev,re,r,rp,chk) function c65060035.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -40,15 +53,17 @@ function c65060035.ccost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -40,15 +53,17 @@ function c65060035.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65060035.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65060035.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65060035.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end local ce=e:GetLabelObject()
if chk==0 then return Duel.IsExistingMatchingCard(c65060035.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,ce) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end end
function c65060035.operation(e,tp,eg,ep,ev,re,r,rp) function c65060035.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060035.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060035.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,e) Duel.Summon(tp,tc,true,ce)
end end
end end
......
...@@ -27,8 +27,21 @@ function c65060036.initial_effect(c) ...@@ -27,8 +27,21 @@ function c65060036.initial_effect(c)
e2:SetTarget(c65060036.target) e2:SetTarget(c65060036.target)
e2:SetOperation(c65060036.operation) e2:SetOperation(c65060036.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--without release
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetRange(LOCATION_FZONE)
e0:SetCondition(c65060036.ntcon)
e0:SetValue(SUMMON_TYPE_NORMAL)
c:RegisterEffect(e0)
e2:SetLabelObject(e0)
end end
function c65060036.filter(c) function c65060036.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.CheckTribute(c,0)
end
function c65060036.filter(c,e)
return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e) return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e)
end end
function c65060036.ccost(e,tp,eg,ep,ev,re,r,rp,chk) function c65060036.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -36,15 +49,17 @@ function c65060036.ccost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -36,15 +49,17 @@ function c65060036.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65060036.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65060036.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65060036.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end local ce=e:GetLabelObject()
if chk==0 then return Duel.IsExistingMatchingCard(c65060036.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,ce) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end end
function c65060036.operation(e,tp,eg,ep,ev,re,r,rp) function c65060036.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060036.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060036.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,e) Duel.Summon(tp,tc,true,ce)
end end
end end
......
...@@ -28,8 +28,21 @@ function c65060037.initial_effect(c) ...@@ -28,8 +28,21 @@ function c65060037.initial_effect(c)
e2:SetTarget(c65060037.target) e2:SetTarget(c65060037.target)
e2:SetOperation(c65060037.operation) e2:SetOperation(c65060037.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--without release
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetRange(LOCATION_FZONE)
e0:SetCondition(c65060037.ntcon)
e0:SetValue(SUMMON_TYPE_NORMAL)
c:RegisterEffect(e0)
e2:SetLabelObject(e0)
end end
function c65060037.filter(c) function c65060037.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.CheckTribute(c,0)
end
function c65060037.filter(c,e)
return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e) return c:IsType(TYPE_DUAL) and c:IsSummonable(true,e)
end end
function c65060037.ccost(e,tp,eg,ep,ev,re,r,rp,chk) function c65060037.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -37,15 +50,17 @@ function c65060037.ccost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -37,15 +50,17 @@ function c65060037.ccost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65060037.target(e,tp,eg,ep,ev,re,r,rp,chk) function c65060037.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65060037.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end local ce=e:GetLabelObject()
if chk==0 then return Duel.IsExistingMatchingCard(c65060037.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,ce) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end end
function c65060037.operation(e,tp,eg,ep,ev,re,r,rp) function c65060037.operation(e,tp,eg,ep,ev,re,r,rp)
local ce=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c65060037.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c65060037.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then if tc then
Duel.Summon(tp,tc,true,e) Duel.Summon(tp,tc,true,ce)
end end
end 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