sign out

expansions/script/c20100518.lua

@@ -25,7 +25,7 @@ end
 function cm.filter1(c,tp,distance)
 	if not c:IsCode(20100500) then return false end
 	local x,y=C9.GetCoordinate(c,tp)
-	return Duel.IsExistingMatchingCard(cm.filter2,tp,0,LOCATION_ONFIELD,1,c,tp,x,y,distance)
+	return Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c,tp,x,y,distance)
 end
 
 function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
@@ -42,8 +42,8 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	C9.RE_Check(tc,e)
 	local x,y=C9.GetCoordinate(tc,tp)
-	local dg=Duel.GetMatchingGroup(cm.filter2,tp,0,LOCATION_ONFIELD,tc,tp,x,y,2)
-	local dg1=Duel.GetMatchingGroup(cm.filter2,tp,0,LOCATION_ONFIELD,tc,tp,x,y,1)
+	local dg=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,tc,tp,x,y,2)
+	local dg1=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,tc,tp,x,y,1)
 	if #dg>0 and Duel.Destroy(dg,REASON_EFFECT)>2 and #dg1>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
 		Duel.Destroy(dg1,REASON_EFFECT)
 	end

expansions/script/c81000000 (2).lua

---Extra Data of DJ.Tenka
-Tenka=Tenka or {}
---Mogami Shizuka, 81018xxx, 0x81b
-function Tenka.Shizuka(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_SINGLE)
-	ea:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
-	ea:SetValue(1)
-	c:RegisterEffect(ea)
-	local eb=Effect.CreateEffect(c)
-	eb:SetType(EFFECT_TYPE_SINGLE)
-	eb:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	eb:SetRange(LOCATION_MZONE)
-	eb:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
-	eb:SetCountLimit(1)
-	eb:SetValue(Tenka.valcon)
-	c:RegisterEffect(eb)
-end
-function Tenka.valcon(e,re,r,rp)
-	return bit.band(r,REASON_BATTLE)~=0
-end
---Kitakami Reika, 81015xxx(81015028~ ), 0x81a
---Reika effect condition
-function Tenka.ReikaCon(e,tp,eg,ep,ev,re,r,rp)
-	local tp=e:GetHandlerPlayer()
-	for i=0,4 do
-		if Duel.GetFieldCard(tp,LOCATION_SZONE,i) then return false end
-	end
-	return true
-end
---koikake atk
-function Tenka.KoikakeRitual(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_SINGLE)
-	ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	ea:SetRange(LOCATION_MZONE)
-	ea:SetCode(EFFECT_UPDATE_ATTACK)
-	ea:SetCondition(Tenka.atkcon)
-	ea:SetValue(Tenka.btkval)
-	c:RegisterEffect(ea)
-end
-function Tenka.KoikakeLink(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_SINGLE)
-	ea:SetCode(EFFECT_UPDATE_ATTACK)
-	ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	ea:SetRange(LOCATION_MZONE)
-	ea:SetCondition(Tenka.atkcon)
-	ea:SetValue(Tenka.atkval)
-	c:RegisterEffect(ea)
-end
-function Tenka.atkcon(e)
-	local ph=Duel.GetCurrentPhase()
-	return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
-end
-function Tenka.atkfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
-end
-function Tenka.atkval(e,c)
-	local lg=c:GetLinkedGroup():Filter(Tenka.atkfilter,nil)
-	return lg:GetSum(Card.GetLevel)*300
-end
-function Tenka.btkval(e,c)
-	return c:GetLevel()*300
-end
---kobayashi maid dragon
---advanced summon
-function Tenka.MaidDragon(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_SINGLE)
-	ea:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	ea:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
-	ea:SetTargetRange(LOCATION_SZONE,LOCATION_SZONE)
-	ea:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_FIELD))
-	ea:SetValue(POS_FACEUP_ATTACK)
-	c:RegisterEffect(ea)
-end
---
-function Tenka.Asamiya(c)
-	c:EnableReviveLimit()
-	aux.AddCodeList(c,81027000)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_SINGLE)
-	ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	ea:SetCode(EFFECT_CHANGE_CODE)
-	ea:SetRange(LOCATION_MZONE+LOCATION_HAND)
-	ea:SetValue(81027000)
-	c:RegisterEffect(ea)
-end
---
-function Tenka.EightOne(c)
-	c:EnableReviveLimit()
-	local eb=Effect.CreateEffect(c)
-	eb:SetType(EFFECT_TYPE_SINGLE)
-	eb:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	eb:SetCode(EFFECT_SPSUMMON_CONDITION)
-	eb:SetValue(aux.FALSE)
-	c:RegisterEffect(eb)
-end
---
-function Tenka.Einstein(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_FIELD)
-	ea:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
-	ea:SetRange(LOCATION_MZONE)
-	ea:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	ea:SetTargetRange(0,1)
-	ea:SetCondition(Tenka.rfcon)
-	c:RegisterEffect(ea)
-	if not Tenka.global_check then
-		Tenka.global_check=true
-		local gea=Effect.CreateEffect(c)
-		gea:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		gea:SetCode(EVENT_DAMAGE)
-		gea:SetOperation(Tenka.checkop)
-		Duel.RegisterEffect(gea,0)
-	end
-end
-function Tenka.rfcon(e)
-	return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()
-end
-function Tenka.checkop(e,tp,eg,ep,ev,re,r,rp)
-	if bit.band(r,REASON_BATTLE)~=0 then
-		Duel.RegisterFlagEffect(ep,81024000,RESET_PHASE+PHASE_END,0,1)
-	end
-end
-function Tenka.EinMainCon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetFlagEffect(tp,81024000)~=0 and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
-end
-function Tenka.EinBattleCon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return ep==tp and c:IsRelateToBattle()
-end
---
-function Tenka.PyroLink(c)
-	local eb=Effect.CreateEffect(c)
-	eb:SetType(EFFECT_TYPE_SINGLE)
-	eb:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	eb:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
-	eb:SetValue(1)
-	c:RegisterEffect(eb)
-end
---

expansions/script/c81024001.lua

@@ -8,6 +8,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_DAMAGE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)

expansions/script/c81024002.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024003.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_DRAW)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024004.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_REMOVE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024006.lua

@@ -11,6 +11,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_REMOVE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024007.lua

@@ -11,6 +11,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_HANDES)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024013.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_RECOVER)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024014.lua

@@ -9,7 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024015.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024016.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024017.lua

@@ -8,7 +8,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)

expansions/script/c81024018.lua

@@ -9,7 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_TODECK)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024019.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024020.lua

@@ -9,6 +9,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024026.lua

@@ -10,6 +10,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024027.lua

@@ -11,6 +11,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_DESTROY)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024028.lua

@@ -11,7 +11,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024029.lua

@@ -10,6 +10,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024030.lua

@@ -12,6 +12,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
 	e1:SetCondition(Tenka.EinBattleCon)

expansions/script/c81024033.lua

@@ -20,7 +20,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCondition(Tenka.EinBattleCon)