Skip to content

Y
ygopro-222DIY-cards
Commit bf8e37f3 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

Suit

parent ad0f7249
Hide whitespace changes
Inline Side-by-side
Showing with 57 additions and 41 deletions
expansions/222DIY.cdb
View file @ bf8e37f3
No preview for this file type
expansions/script/c11700008.lua
View file @ bf8e37f3
......@@ -55,9 +55,20 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then
local t1=g:GetFirst()
local t2=g:GetNext()
Duel.SpecialSummon(t1,0,tp,tp,false,false,POS_FACEUP)
Duel.SpecialSummon(t1,0,tp,tp,false,false,POS_FACEUP)
if t2 then
Duel.SpecialSummon(t2,0,tp,tp,false,false,POS_FACEUP)
end
Duel.SpecialSummon(t2,0,tp,tp,false,false,POS_FACEUP)
end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetTargetRange(1,0)
e1:SetTarget(cm.splimit)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
end
function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
return not c:IsSetCard(0x280) and c:IsLocation(LOCATION_EXTRA)
end
\ No newline at end of file
expansions/script/c11700010.lua
View file @ bf8e37f3
......@@ -43,7 +43,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e4)
end
function cm.spcostfilter(c)
return c:IsAbleToRemoveAsCost() and c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK)
return c:IsAbleToRemoveAsCost() and c:IsAttribute(ATTRIBUTE_EARTH)
end
function cm.spcon(e,c)
if c==nil then return true end
......@@ -105,7 +105,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not (c:IsLocation(LOCATION_GRAVE) and ((c:GetBaseAttack()>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) or (c:GetBaseAttack()==0 and c:IsAbleToDeck()))) then return end
local tc1=c:GetFlagEffect(m)
if c:IsRelateToEffect(e) then
if c:IsRelateToEffect(e) then
local tc2=2300-500*tc1
if tc2<0 then tc2=0 end
Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP)
......
expansions/script/c11700015.lua
View file @ bf8e37f3
......@@ -19,6 +19,7 @@ function cm.initial_effect(c)
e4:SetCategory(CATEGORY_ATKCHANGE)
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetCost(cm.cost)
e4:SetOperation(cm.op)
c:RegisterEffect(e4)
......
expansions/script/c11700016.lua
View file @ bf8e37f3
......@@ -18,7 +18,7 @@ function cm.initial_effect(c)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
e3:SetCategory(CATEGORY_REMOVE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLED)
e3:SetCost(cm.cost)
e3:SetTarget(cm.target)
......
expansions/script/c17060835.lua
View file @ bf8e37f3
......@@ -35,7 +35,7 @@ function cm.IsMillion_Arthur(c)
end
function cm.splimit(e,c)
if not c then return false end
return not cm.IsMillion_Arthur(c)
return not c:IsSetCard(0x7f0)
end
function cm.filter0(c)
return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToGrave()
......
expansions/script/c33400033.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400033.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
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(ec)
local e3=Effect.CreateEffect(token)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_CHAINING)
e3:SetRange(LOCATION_SZONE)
......
expansions/script/c33400035.lua
View file @ bf8e37f3
......@@ -203,13 +203,13 @@ function c33400035.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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400035.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
e5:SetType(EFFECT_TYPE_EQUIP)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetValue(c33400035.valcon)
......
expansions/script/c33400037.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400037.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_SZONE)
......
expansions/script/c33400220.lua
View file @ bf8e37f3
......@@ -214,13 +214,13 @@ 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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400220.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
e5:SetType(EFFECT_TYPE_EQUIP)
e5:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e5:SetValue(c33400220.valcon)
......
expansions/script/c33400222.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400222.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_SZONE)
......
expansions/script/c33400320.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400320.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
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(ec)
local e3=Effect.CreateEffect(token)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetRange(LOCATION_SZONE)
......
expansions/script/c33400411.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400411.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
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(ec)
local e3=Effect.CreateEffect(token)
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
......
expansions/script/c33400413.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(c33400413.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
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(ec)
local e3=Effect.CreateEffect(token)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
......
expansions/script/c33400524.lua
View file @ bf8e37f3
......@@ -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(ec)
local e4=Effect.CreateEffect(token)
e4:SetType(EFFECT_TYPE_EQUIP)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetValue(cm.efilter1)
token:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(ec)
local e5=Effect.CreateEffect(token)
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(ec)
local e2=Effect.CreateEffect(token)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCategory(CATEGORY_COUNTER)
e2:SetProperty(EFFECT_FLAG_DELAY)
......
expansions/script/c53701015.lua
View file @ bf8e37f3
......@@ -72,7 +72,7 @@ function c53701015.tgfilter(c)
end
function c53701015.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(1-tp,c53701015.tgfilter,1-tp,0,LOCATION_DECK,1,1,nil)
local g=Duel.SelectMatchingCard(1-tp,c53701015.tgfilter,1-tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.Destroy(g,REASON_EFFECT)
end
......
expansions/script/c53701017.lua
View file @ bf8e37f3
......@@ -66,11 +66,11 @@ function c53701017.discost(e,tp,eg,ep,ev,re,r,rp,chk)
end
function c53701017.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local zone=e:GetHandler():GetLinkedZone(tp)
if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_ONFIELD+LOCATION_GRAVE) and chkc:IsAbleToRemove() end
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) and zone~=0
if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsAbleToRemove() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,nil) and zone~=0
and Duel.IsPlayerCanSpecialSummonMonster(tp,53701018,0,0x4011,100,100,1,RACE_MACHINE,ATTRIBUTE_DARK) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil)
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
......
expansions/script/c53701020.lua
View file @ bf8e37f3
......@@ -21,7 +21,7 @@ function c53701020.initial_effect(c)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(53701020,0))
e3:SetCategory(CATEGORY_TOHAND)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetRange(LOCATION_GRAVE)
e3:SetCode(EVENT_DESTROYED)
......
expansions/script/c53701023.lua
View file @ bf8e37f3
......@@ -21,14 +21,15 @@ function c53701023.initial_effect(c)
e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetRange(LOCATION_REMOVED)
e2:SetCountLimit(1,53701023+EFFECT_COUNT_CODE_DUEL)
e2:SetCondition(c53701023.condition)
e2:SetTarget(c53701023.target)
e2:SetOperation(c53701023.operation)
c:RegisterEffect(e2)
end
function c53701023.cfilter(c,tp,rp)
return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsSetCard(0x530)
and c:IsPreviousLocation(LOCATION_MZONE) and c:GetPreviousControler()==tp
and (c:IsReason(REASON_BATTLE) or (rp==1-tp and c:IsReason(REASON_EFFECT)))
return c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_MZONE)
and c:IsPreviousPosition(POS_FACEUP) and c:IsSetCard(0x530)
and (c:IsReason(REASON_BATTLE) or c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp)
end
function c53701023.drcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c53701023.cfilter,1,nil,tp)
......@@ -43,6 +44,9 @@ function c53701023.drop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end
function c53701023.condition(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c53701023.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanDiscardDeck(1-tp,1)
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) 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