Commit 1685cc75 authored by Tachibana's avatar Tachibana

得得得得得

parent c05a552d
...@@ -33,7 +33,7 @@ function c12010007.thcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -33,7 +33,7 @@ function c12010007.thcon(e,tp,eg,ep,ev,re,r,rp)
return ep==1-tp return ep==1-tp
end end
function c12010007.thfilter(c,e,tp) function c12010007.thfilter(c,e,tp)
return ( c:IsSetCard(0xfba) or c:IsSetCard(0x1fbd) ) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0xfba) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c12010007.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c12010007.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
...@@ -49,7 +49,7 @@ function c12010007.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -49,7 +49,7 @@ function c12010007.thop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c12010007.spfilter(c) function c12010007.spfilter(c)
return ( c:IsSetCard(0xfba) or c:IsSetCard(0x1fbd) ) and c:IsFaceup() and c:IsAbleToHand() return c:IsSetCard(0xfba) and c:IsFaceup() and c:IsAbleToHand()
end end
function c12010007.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c12010007.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c12010007.spfilter(chkc) and chkc:IsControler(tp) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c12010007.spfilter(chkc) and chkc:IsControler(tp) end
...@@ -60,7 +60,7 @@ function c12010007.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -60,7 +60,7 @@ function c12010007.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function c12010007.spthfilter(c) function c12010007.spthfilter(c)
return c:IsSetCard(0xfbc) and c:IsAbleToHand() and c:IsType(TYPE_TRAP) return c:IsSetCard(0xfbc) and c:IsAbleToHand() and c:IsType(TYPE_TRAP+TYPE_SPELL)
end end
function c12010007.spop(e,tp,eg,ep,ev,re,r,rp) function c12010007.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
......
...@@ -16,6 +16,14 @@ function c12010042.initial_effect(c) ...@@ -16,6 +16,14 @@ function c12010042.initial_effect(c)
e2:SetCondition(c12010042.condition) e2:SetCondition(c12010042.condition)
e2:SetOperation(c12010042.operation) e2:SetOperation(c12010042.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--indes
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e3:SetValue(1)
c:RegisterEffect(e3)
--SearchCard --SearchCard
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_ATKCHANGE) e2:SetCategory(CATEGORY_SEARCH+CATEGORY_ATKCHANGE)
......
...@@ -20,7 +20,7 @@ function c33200724.initial_effect(c) ...@@ -20,7 +20,7 @@ function c33200724.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c33200724.filter(c,e,tp) function c33200724.filter(c,e,tp)
return c:IsSetCard(0xc32a) and not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return c:IsSetCard(0xc32a) and not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
end end
function c33200724.filter2(c) function c33200724.filter2(c)
return c:IsFaceup() and c:IsCanAddCounter(0x32a,2) return c:IsFaceup() and c:IsCanAddCounter(0x32a,2)
...@@ -35,7 +35,7 @@ function c33200724.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -35,7 +35,7 @@ function c33200724.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c33200724.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c33200724.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE) and Duel.IsExistingMatchingCard(c33200724.filter2,tp,LOCATION_ONFIELD,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(33200724,2)) then if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) and Duel.IsExistingMatchingCard(c33200724.filter2,tp,LOCATION_ONFIELD,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(33200724,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COUNTER) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COUNTER)
local sg=Duel.SelectMatchingCard(tp,c33200724.filter2,tp,LOCATION_ONFIELD,0,1,1,nil) local sg=Duel.SelectMatchingCard(tp,c33200724.filter2,tp,LOCATION_ONFIELD,0,1,1,nil)
if sg:GetCount()>0 then if sg:GetCount()>0 then
......
...@@ -6,7 +6,7 @@ function c33200730.initial_effect(c) ...@@ -6,7 +6,7 @@ function c33200730.initial_effect(c)
--tohand --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(33200730,0)) e1:SetDescription(aux.Stringid(33200730,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_REMOVE) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
...@@ -40,7 +40,7 @@ function c33200730.spfilter(c) ...@@ -40,7 +40,7 @@ function c33200730.spfilter(c)
return c:IsSetCard(0xc32a) and c:IsFaceup() and c:IsAbleToRemove() return c:IsSetCard(0xc32a) and c:IsFaceup() and c:IsAbleToRemove()
end end
function c33200730.thfilter(c) function c33200730.thfilter(c)
return c:IsSetCard(0xc32a) and c:IsAbleToHand() return c:IsAbleToHand()
end end
function c33200730.spcon(e,tp,eg,ep,ev,re,r,rp) function c33200730.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2 return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
...@@ -68,9 +68,8 @@ function c33200730.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,9 +68,8 @@ function c33200730.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
if Duel.IsExistingMatchingCard(c33200730.thfilter,tp,0,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(33200730,2)) then if Duel.IsExistingMatchingCard(c33200730.thfilter,tp,0,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(33200730,2)) then
local sg=Duel.SelectMatchingCard(tp,c33200730.thfilter,tp,0,LOCATION_ONFIELD,1,1,nil) local sg=Duel.SelectMatchingCard(tp,c33200730.thfilter,tp,0,LOCATION_ONFIELD,1,1,nil)
local thtc=sg:GetFirst() Duel.HintSelection(sg)
Duel.HintSelection(thtc) Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.SendtoHand(thtc,nil,REASON_EFFECT)
end end
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