Commit 5ddb1fec authored by TanakaKotoha's avatar TanakaKotoha

Suit

parent 59bc909c
......@@ -29,7 +29,7 @@ function cm.initial_effect(c)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(17060864,1))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
......@@ -95,7 +95,7 @@ function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return not eg:IsContains(e:GetHandler()) and eg:IsExists(cm.cfilter,1,nil,tp)
end
function cm.thfilter(c)
return c:IsLevelBelow(4) and c:IsRace(RACE_WARRIOR) and c:IsAbleToHand()
return c:IsLevelBelow(4) and c:IsSetCard(0x7f0) and c:IsAbleToHand()
end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
......@@ -28,6 +28,18 @@ function cm.initial_effect(c)
e3:SetCode(EFFECT_SELF_DESTROY)
e3:SetCondition(cm.sdcon)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_DESTROY)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCode(EVENT_SSET)
e4:SetRange(LOCATION_MZONE)
e4:SetCondition(cm.sdcon)
e4:SetOperation(cm.desop)
c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EVENT_MSET)
c:RegisterEffect(e5)
--atklimit
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE)
......@@ -50,13 +62,17 @@ function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
e1:SetValue(lv)
e1:SetReset(RESET_EVENT+0xff0000)
c:RegisterEffect(e1)
if Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,nil) and e:GetHandler():GetLevel()==666 then
local sg=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_ONFIELD,nil)
Duel.Destroy(sg,REASON_EFFECT)
end
end
function cm.sdcon(e)
return e:GetHandler():GetLevel()==666
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_ONFIELD,nil)
Duel.Destroy(sg,REASON_EFFECT)
function cm.desop(e,tp,eg,ep,ev,re,r,rp)
if rp==tp then return false end
Duel.Destroy(eg,REASON_EFFECT)
end
function cm.atkcon(e)
return e:GetHandler():GetLevel()>100 and e:GetHandler():GetLevel()<666
......
......@@ -156,20 +156,20 @@ function c33400033.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400033.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_EQUIP)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetValue(c33400033.valcon)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--inm
local e3=Effect.CreateEffect(token)
local e3=Effect.CreateEffect(ec)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_CHAINING)
e3:SetRange(LOCATION_SZONE)
......
......@@ -105,13 +105,13 @@ function c33400037.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400037.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_SZONE)
......@@ -120,7 +120,7 @@ function c33400037.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--inm
local e6=Effect.CreateEffect(token)
local e6=Effect.CreateEffect(ec)
e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e6:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
e6:SetCode(EVENT_DESTROYED)
......
......@@ -214,20 +214,20 @@ function c33400220.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400220.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_EQUIP)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetValue(c33400220.valcon)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--inm
local e6=Effect.CreateEffect(token)
local e6=Effect.CreateEffect(ec)
e6:SetType(EFFECT_TYPE_QUICK_O)
e6:SetCategory(CATEGORY_ANNOUNCE)
e6:SetRange(LOCATION_SZONE)
......
......@@ -114,13 +114,13 @@ function c33400222.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400222.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_SZONE)
......@@ -129,7 +129,7 @@ function c33400222.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--inm
local e6=Effect.CreateEffect(token)
local e6=Effect.CreateEffect(ec)
e6:SetType(EFFECT_TYPE_QUICK_O)
e6:SetCategory(CATEGORY_ANNOUNCE)
e6:SetRange(LOCATION_SZONE)
......
......@@ -91,13 +91,13 @@ function c33400320.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400320.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_SZONE)
......@@ -106,7 +106,7 @@ function c33400320.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--atkup
local e3=Effect.CreateEffect(token)
local e3=Effect.CreateEffect(ec)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetRange(LOCATION_SZONE)
......
......@@ -100,20 +100,20 @@ function c33400411.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400411.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_EQUIP)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetValue(c33400411.valcon)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--inm
local e3=Effect.CreateEffect(token)
local e3=Effect.CreateEffect(ec)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_CHAINING)
e3:SetCategory(CATEGORY_EQUIP)
......@@ -131,7 +131,7 @@ end
function c33400411.valcon(e,re,r,rp)
return r==REASON_BATTLE
end
function c33400411.op3(e,tp,eg,ep,ev,re,r,rp)
function c33400411.op3(e,tp,eg,ep,ev,re,r,rp)
local e3_1=Effect.CreateEffect(e:GetHandler())
e3_1:SetType(EFFECT_TYPE_SINGLE)
e3_1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
......@@ -158,7 +158,7 @@ function c33400411.op3(e,tp,eg,ep,ev,re,r,rp)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(c33400411.eqlimit)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
tc:RegisterEffect(e1)
end
end
end
......
......@@ -67,7 +67,7 @@ function c33400413.eqop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
local g=Duel.SelectMatchingCard(tp,c33400413.eqfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,tc,tp)
if g:GetCount()>0 then
Duel.Equip(tp,g:GetFirst(),tc)
Duel.Equip(tp,g:GetFirst(),tc)
end
end
end
......@@ -98,13 +98,13 @@ function c33400413.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400413.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_SZONE)
......@@ -113,7 +113,7 @@ function c33400413.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--atkup
local e3=Effect.CreateEffect(token)
local e3=Effect.CreateEffect(ec)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
......
......@@ -245,20 +245,20 @@ function cm.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
token:CancelToGrave()
if Duel.Equip(tp,token,ec,false) then
--immune
local e4=Effect.CreateEffect(token)
local e4=Effect.CreateEffect(ec)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(cm.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(token)
local e5=Effect.CreateEffect(ec)
e5:SetType(EFFECT_TYPE_EQUIP)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetValue(cm.valcon)
e5:SetCountLimit(1)
token:RegisterEffect(e5)
--set p
local e2=Effect.CreateEffect(token)
local e2=Effect.CreateEffect(ec)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCategory(CATEGORY_COUNTER)
e2:SetProperty(EFFECT_FLAG_DELAY)
......
......@@ -90,7 +90,7 @@ function c81012063.actcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(g,REASON_COST)
end
function c81012063.actop(e,tp,eg,ep,ev,re,r,rp)
local e2=Effect.CreateEffect(c)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
......
......@@ -74,7 +74,7 @@ function c81015040.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local lc=g:GetFirst()
if lc==sc then lc=g:GetNext() end
if lc and lc:IsRelateToEffect(e) and Duel.SendtoDeck(lc,nil,2,REASON_EFFECT)>0 and lc:IsLocation(LOCATION_DECK) and sc and sc:IsRelateToEffect(e) then
if lc and lc:IsRelateToEffect(e) and Duel.SendtoDeck(lc,nil,2,REASON_EFFECT)>0 and lc:IsLocation(LOCATION_DECK+LOCATION_EXTRA) and sc and sc:IsRelateToEffect(e) then
Duel.Destroy(sc,REASON_EFFECT)
end
end
......
......@@ -50,7 +50,7 @@ function c81019024.spop(e,tp,eg,ep,ev,re,r,rp)
end
function c81019024.repfilter(c,tp)
return c:IsFaceup() and c:GetBaseAttack()==1550
and c:IsOnField() and c:IsControler(tp) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
end
function c81019024.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(c81019024.repfilter,1,nil,tp) end
......
......@@ -17,6 +17,7 @@ function c81040049.initial_effect(c)
e1:SetRange(LOCATION_GRAVE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,81040949)
e1:SetCondition(aux.exccon)
e1:SetTarget(c81040049.tdtg)
e1:SetOperation(c81040049.tdop)
c:RegisterEffect(e1)
......
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