wocaonima

expansions/script/123.lua

---二重战队屠戮者 暗鸦
-local m=0
-local cm=_G["c"..m]
-xpcall(function() require("expansions/script/123") end,function() require("script/123") end)
-function cm.initial_effect(c)
-	
-end

expansions/script/c10158000.lua

 --原田秋叶
 local m=10158000
 local cm=_G["c"..m]
-Duel.LoadScript("c26800000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
     aux.AddCodeList(c,10158000)
 	--xyz summon

expansions/script/c20123000.lua

 --星希花音
 local m=20123000
 local cm=_G["c"..m]
-
-if not Kanon then
-   Kanon=Kanon or {}
-------
-function Kanon.Attack(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetDescription(aux.Stringid(20123001,1))
-	ea:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	ea:SetCode(EVENT_BATTLE_START)
-	ea:SetTarget(Kanon.ChainAttackTg)
-	ea:SetRange(LOCATION_MZONE)
-	ea:SetCategory(CATEGORY_ATKCHANGE)
-	ea:SetOperation(Kanon.ChainAttackOp)
-	ea:SetCountLimit(1)
-	c:RegisterEffect(ea)
-end
-function Kanon.ChainAttackTg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	local ac=Duel.GetAttacker()
-	if chk==0 then return ac:IsControler(tp) and ac:IsRace(RACE_WARRIOR) and ac~=c 
-		and c:GetAttackAnnouncedCount()==0 and c:IsAttackable() end
-	Duel.SetTargetCard(c)
-end
-function Kanon.ChainAttackOp(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local ac=Duel.GetAttacker()
-	local atk=c:GetAttack()
-	if atk<1 then return end
-	if ac:IsFaceup() and ac:IsRelateToBattle() and c:IsRelateToEffect(e) then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_CANNOT_ATTACK)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		c:RegisterEffect(e1) 
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-		e2:SetCode(EFFECT_UPDATE_ATTACK)
-		e2:SetRange(LOCATION_MZONE)
-		e2:SetCondition(Kanon.ChainAttackCon)
-		e2:SetValue(atk)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE)
-		ac:RegisterEffect(e2)
-	end
-end
-function Kanon.ChainAttackCon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local ph=Duel.GetCurrentPhase()
-	return (ph==PHASE_DAMAGE or ph==PHASE_DAMAGE_CAL) and c:IsRelateToBattle()  
-end
-------
-end
-
-if cm then
-------
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--xyz summon
 	aux.AddXyzProcedure(c,nil,3,2,nil,nil,99)
@@ -91,5 +36,3 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
 		c:RegisterEffect(e1)
 	end
 end
-------
-end

expansions/script/c20123001.lua

 --难言之隐·星希花音
 local m=20123001
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c20123000") end,function() require("script/c20123000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	aux.AddXyzProcedure(c,nil,6,2,cm.ovfilter,aux.Stringid(m,3),99,cm.xyzop)

expansions/script/c20123002.lua

 --原味奶茶·星希花音
 local m=20123002
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c20123000") end,function() require("script/c20123000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_WARRIOR),2,2)

expansions/script/c20123003.lua

 --凉意渐浓·星希花音
 local m=20123003
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c20123000") end,function() require("script/c20123000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Kanon.Attack(c)
 	--special summon

expansions/script/c20123004.lua

 --天使降临·星希花音
 local m=20123004
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),aux.NonTuner(Card.IsRace,RACE_WARRIOR),1)

expansions/script/c20123005.lua

 --纯真无邪·星希花音
 local m=20123005
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),aux.NonTuner(Card.IsRace,RACE_WARRIOR),1)

expansions/script/c20123006.lua

 --湖畔彩虹·星希花音
 local m=20123006
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Kanon.Attack(c)
 	--special summon

expansions/script/c20123007.lua

 --花之蝴蝶·星希花音
 local m=20123007
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Kanon.Attack(c)
 	--search

expansions/script/c20123008.lua

 --未完之路·星希花音
 local m=20123008
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Kanon.Attack(c)
 	--equip(self)

expansions/script/c20123009.lua

 --该泡面了·星希花音
 local m=20123009
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Kanon.Attack(c)
 	--search

expansions/script/c20123010.lua

 --紫雨之泪
 local m=20123010
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c20123011.lua

 --回忆之美
 local m=20123011
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c20123012.lua

 --女仆之日·星希花音
 local m=20123012
 local cm=_G["c"..m]
-Duel.LoadScript("c20123000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,cm.synfilter,aux.NonTuner(cm.symfilter),1)

expansions/script/c60018000.lua

 --有栖川亚里沙
 local m=60018000
 local cm=_G["c"..m]
-
-if not Arisugawa then
-   Arisugawa=Arisugawa or {}
-------
-function Arisugawa.Arisa(c)
-    local ea=Effect.CreateEffect(c)
-    ea:SetType(EFFECT_TYPE_SINGLE)
-    ea:SetCode(EFFECT_IMMUNE_EFFECT)
-    ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-    ea:SetRange(LOCATION_MZONE)
-    ea:SetCondition(Arisugawa.iscon)
-    ea:SetValue(Arisugawa.esfilter)
-    c:RegisterEffect(ea)
-    local eb=Effect.CreateEffect(c)
-    eb:SetDescription(aux.Stringid(60018000,0))
-    eb:SetType(EFFECT_TYPE_IGNITION)
-    eb:SetProperty(EFFECT_FLAG_CARD_TARGET)
-    eb:SetRange(LOCATION_MZONE)
-    eb:SetCountLimit(1)
-    eb:SetTarget(Arisugawa.mvtg)
-    eb:SetOperation(Arisugawa.mvop)
-    c:RegisterEffect(eb)
-end
-function Arisugawa.iscon(e)
-    local seq=e:GetHandler():GetSequence()
-    return seq==0 or seq==4
-end
-function Arisugawa.esfilter(e,te)
-    return te:GetOwner()~=e:GetOwner()
-end
-function Arisugawa.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) end
-    if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,0,1,nil)
-        and Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)>0 end
-    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(60018000,2))
-    Duel.SelectTarget(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
-end
-function Arisugawa.mvop(e,tp,eg,ep,ev,re,r,rp)
-    local tc=Duel.GetFirstTarget()
-    if not tc:IsRelateToEffect(e) or tc:IsControler(1-tp)
-        or Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)<=0 then return end
-    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
-    local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
-    local nseq=math.log(s,2)
-    Duel.MoveSequence(tc,nseq)
-end
---
-function Arisugawa.ArisaB(c)
-    local ea=Effect.CreateEffect(c)
-    ea:SetType(EFFECT_TYPE_SINGLE)
-    ea:SetCode(EFFECT_IMMUNE_EFFECT)
-    ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-    ea:SetRange(LOCATION_MZONE)
-    ea:SetCondition(Arisugawa.iscon)
-    ea:SetValue(Arisugawa.esfilter)
-    c:RegisterEffect(ea)
-    local eb=Effect.CreateEffect(c)
-    eb:SetDescription(aux.Stringid(60018000,0))
-    eb:SetType(EFFECT_TYPE_QUICK_O)
-    eb:SetCode(EVENT_FREE_CHAIN)
-    eb:SetProperty(EFFECT_FLAG_CARD_TARGET)
-    eb:SetRange(LOCATION_MZONE)
-    eb:SetCountLimit(1)
-    eb:SetTarget(Arisugawa.mvtg)
-    eb:SetOperation(Arisugawa.mvop)
-    c:RegisterEffect(eb)
-end
-------
-end
-
-if cm then
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.ArisaB(c)
 	--xyz summon
@@ -125,5 +55,3 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Destroy(tg,REASON_EFFECT)
 	end
 end
-------
-end
\ No newline at end of file

expansions/script/c60018001.lua

 --早春·有栖川亚里沙
 local m=60018001
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c60018000") end,function() require("script/c60018000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--tohand

expansions/script/c60018002.lua

 --初夏·有栖川亚里沙
 local m=60018002
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c60018000") end,function() require("script/c60018000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--Destroy

expansions/script/c60018003.lua

 --深秋·有栖川亚里沙
 local m=60018003
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c60018000") end,function() require("script/c60018000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--shuffle

expansions/script/c60018004.lua

 --成熟·有栖川亚里沙
 local m=60018004
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--Destroy

expansions/script/c60018005.lua

 --新解·有栖川亚里沙
 local m=60018005
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--shuffle

expansions/script/c60018006.lua

 --招待·有栖川亚里沙
 local m=60018006
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c60018000") end,function() require("script/c60018000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.ArisaB(c)
 	--link summon

expansions/script/c60018007.lua

 --时尚·有栖川亚里沙
 local m=60018007
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.ArisaB(c)
 	--xyz summon

expansions/script/c60018008.lua

 --全力·有栖川亚里沙
 local m=60018008
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c60018000") end,function() require("script/c60018000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--xyz summon
 	c:EnableReviveLimit()

expansions/script/c60018009.lua

 --亚里沙的幻觉
 local m=60018009
 local cm=_G["c"..m]
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c60018010.lua

 --女仆·有栖川亚里沙
 local m=60018010
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--destroy

expansions/script/c60018011.lua

 --回返·有栖川亚里沙
 local m=60018011
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--shuffle

expansions/script/c60018013.lua

 --摄影·有栖川亚里沙
 local m=60018013
 local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c60018000") end,function() require("script/c60018000") end)
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--xyz summon
 	c:EnableReviveLimit()

expansions/script/c60018014.lua

 --知性·有栖川亚里沙
 local m=60018014
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--Destroy

expansions/script/c60018015.lua

 --回忆·有栖川亚里沙
 local m=60018015
 local cm=_G["c"..m]
-Duel.LoadScript("c60018000.lua")
+Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	Arisugawa.Arisa(c)
 	--shuffle

expansions/script/c81000000.lua

@@ -454,3 +454,114 @@ function Tenka.SliverSpcop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
 end
+--Arisa
+function Arisugawa.Arisa(c)
+	local ea=Effect.CreateEffect(c)
+	ea:SetType(EFFECT_TYPE_SINGLE)
+	ea:SetCode(EFFECT_IMMUNE_EFFECT)
+	ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	ea:SetRange(LOCATION_MZONE)
+	ea:SetCondition(Arisugawa.iscon)
+	ea:SetValue(Arisugawa.esfilter)
+	c:RegisterEffect(ea)
+	local eb=Effect.CreateEffect(c)
+	eb:SetDescription(aux.Stringid(60018000,0))
+	eb:SetType(EFFECT_TYPE_IGNITION)
+	eb:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	eb:SetRange(LOCATION_MZONE)
+	eb:SetCountLimit(1)
+	eb:SetTarget(Arisugawa.mvtg)
+	eb:SetOperation(Arisugawa.mvop)
+	c:RegisterEffect(eb)
+end
+function Arisugawa.iscon(e)
+	local seq=e:GetHandler():GetSequence()
+	return seq==0 or seq==4
+end
+function Arisugawa.esfilter(e,te)
+	return te:GetOwner()~=e:GetOwner()
+end
+function Arisugawa.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) end
+	if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,0,1,nil)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)>0 end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(60018000,2))
+	Duel.SelectTarget(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function Arisugawa.mvop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) or tc:IsControler(1-tp)
+		or Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
+	local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
+	local nseq=math.log(s,2)
+	Duel.MoveSequence(tc,nseq)
+end
+function Arisugawa.ArisaB(c)
+	local ea=Effect.CreateEffect(c)
+	ea:SetType(EFFECT_TYPE_SINGLE)
+	ea:SetCode(EFFECT_IMMUNE_EFFECT)
+	ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	ea:SetRange(LOCATION_MZONE)
+	ea:SetCondition(Arisugawa.iscon)
+	ea:SetValue(Arisugawa.esfilter)
+	c:RegisterEffect(ea)
+	local eb=Effect.CreateEffect(c)
+	eb:SetDescription(aux.Stringid(60018000,0))
+	eb:SetType(EFFECT_TYPE_QUICK_O)
+	eb:SetCode(EVENT_FREE_CHAIN)
+	eb:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	eb:SetRange(LOCATION_MZONE)
+	eb:SetCountLimit(1)
+	eb:SetTarget(Arisugawa.mvtg)
+	eb:SetOperation(Arisugawa.mvop)
+	c:RegisterEffect(eb)
+end
+--Kanon
+function Kanon.Attack(c)
+	local ea=Effect.CreateEffect(c)
+	ea:SetDescription(aux.Stringid(20123001,1))
+	ea:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	ea:SetCode(EVENT_BATTLE_START)
+	ea:SetTarget(Kanon.ChainAttackTg)
+	ea:SetRange(LOCATION_MZONE)
+	ea:SetCategory(CATEGORY_ATKCHANGE)
+	ea:SetOperation(Kanon.ChainAttackOp)
+	ea:SetCountLimit(1)
+	c:RegisterEffect(ea)
+end
+function Kanon.ChainAttackTg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local ac=Duel.GetAttacker()
+	if chk==0 then return ac:IsControler(tp) and ac:IsRace(RACE_WARRIOR) and ac~=c 
+		and c:GetAttackAnnouncedCount()==0 and c:IsAttackable() end
+	Duel.SetTargetCard(c)
+end
+function Kanon.ChainAttackOp(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ac=Duel.GetAttacker()
+	local atk=c:GetAttack()
+	if atk<1 then return end
+	if ac:IsFaceup() and ac:IsRelateToBattle() and c:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CANNOT_ATTACK)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1) 
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e2:SetCode(EFFECT_UPDATE_ATTACK)
+		e2:SetRange(LOCATION_MZONE)
+		e2:SetCondition(Kanon.ChainAttackCon)
+		e2:SetValue(atk)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE)
+		ac:RegisterEffect(e2)
+	end
+end
+function Kanon.ChainAttackCon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ph=Duel.GetCurrentPhase()
+	return (ph==PHASE_DAMAGE or ph==PHASE_DAMAGE_CAL) and c:IsRelateToBattle()  
+end