Push by Appveyor

expansions/script/c22260001.lua

+--过负荷 球磨川禊
+function c22260001.initial_effect(c)
+	--xyzlimit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(c22260001.mlimit)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+	c:RegisterEffect(e4)
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	c:RegisterEffect(e5)
+	local e6=e3:Clone()
+	e6:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+	c:RegisterEffect(e6)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_SPSUMMON_PROC)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(c22260001.spcon)
+	c:RegisterEffect(e1)
+	--token
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260001,0))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c22260001.spcon)
+	e2:SetTarget(c22260001.sptg)
+	e2:SetOperation(c22260001.spop)
+	c:RegisterEffect(e2)
+end
+c22260001.named_with_KuMaKawa=1
+function c22260001.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260001.sumlimit(e,c)
+	return c:GetAttack()~=0
+end
+function c22260001.mlimit(e,c)
+	if not c then return false end
+	return c:GetAttack()~=0
+end
+function c22260001.spfilter(c)
+	return c:IsFacedown() or c:GetBaseAttack()~=0
+end
+function c22260001.spcon(e,c)
+	if c==nil then return true end
+	local tp=e:GetHandler():GetControler()
+	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetMatchingGroupCount(c22260001.spfilter,tp,LOCATION_MZONE,0,nil)==0
+end
+function c22260001.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
+	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
+end
+function c22260001.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	if Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) then
+		local token=Duel.CreateToken(tp,22269999)
+		if Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)>0 then
+		Duel.BreakEffect()
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+		e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		e1:SetTargetRange(1,0)
+		e1:SetLabelObject(e)
+		e1:SetTarget(c22260001.splimit)
+		Duel.RegisterEffect(e1,tp)
+		end
+	end
+end
+function c22260001.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return c:GetBaseAttack()~=0
+end
\ No newline at end of file

expansions/script/c22260002.lua

+--负的集合 球磨川禊
+function c22260002.initial_effect(c)
+	--xyzlimit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(c22260002.mlimit)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+	c:RegisterEffect(e4)
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	c:RegisterEffect(e5)
+	local e6=e3:Clone()
+	e6:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+	c:RegisterEffect(e6)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_SPSUMMON_PROC)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(c22260002.spcon)
+	c:RegisterEffect(e1)
+	--SearchCard
+	local e7=Effect.CreateEffect(c)
+	e7:SetDescription(aux.Stringid(22260002,0))
+	e7:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e7:SetType(EFFECT_TYPE_IGNITION)
+	e7:SetRange(LOCATION_MZONE)
+	e7:SetCountLimit(1)
+	e7:SetCost(c22260002.thcost)
+	e7:SetTarget(c22260002.thtg)
+	e7:SetOperation(c22260002.thop)
+	c:RegisterEffect(e7)
+end
+c22260002.named_with_KuMaKawa=1
+function c22260002.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260002.sumlimit(e,c)
+	return c:GetAttack()~=0
+end
+function c22260002.mlimit(e,c)
+	if not c then return false end
+	return c:GetAttack()~=0
+end
+function c22260002.spfilter(c)
+	return c:IsFacedown() or c:GetBaseAttack()~=0
+end
+function c22260002.spcon(e,c)
+	if c==nil then return true end
+	local tp=e:GetHandler():GetControler()
+	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetMatchingGroupCount(c22260002.spfilter,tp,LOCATION_MZONE,0,nil)==0
+end
+function c22260002.cfilter(c)
+	return c:IsCode(22269999) and c:IsReleasable()
+end
+function c22260002.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,c22260002.cfilter,1,nil) end
+	local g=Duel.SelectReleaseGroup(tp,c22260002.cfilter,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c22260002.thfilter(c)
+	return c:IsCode(22260001,22261001,22261101) and c:IsAbleToHand()
+end
+function c22260002.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22260002.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c22260002.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c22260002.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
\ No newline at end of file

expansions/script/c22260003.lua

+--实力胜负 球磨川禊
+function c22260003.initial_effect(c)
+	--xyzlimit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(c22260003.mlimit)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+	c:RegisterEffect(e4)
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	c:RegisterEffect(e5)
+	local e6=e3:Clone()
+	e6:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+	c:RegisterEffect(e6)
+	--spsummon
+	local e7=Effect.CreateEffect(c)
+	e7:SetDescription(aux.Stringid(22260003,0))
+	e7:SetCategory(CATEGORY_SUMMON+CATEGORY_TOKEN)
+	e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e7:SetProperty(EFFECT_FLAG_DELAY)
+	e7:SetCode(EVENT_SUMMON_SUCCESS)
+	e7:SetTarget(c22260003.sptg)
+	e7:SetOperation(c22260003.spop)
+	c:RegisterEffect(e7)
+	local e8=e7:Clone()
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e8)
+	--Disable
+	local e9=Effect.CreateEffect(c)
+	e9:SetDescription(aux.Stringid(22260003,2))
+	e9:SetCategory(CATEGORY_DISABLE)
+	e9:SetType(EFFECT_TYPE_QUICK_O)
+	e9:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e9:SetCode(EVENT_FREE_CHAIN)
+	e9:SetRange(LOCATION_MZONE)
+	e9:SetCountLimit(1)
+	e9:SetCost(c22260003.discost)
+	e9:SetTarget(c22260003.distg)
+	e9:SetOperation(c22260003.disop)
+	c:RegisterEffect(e9)
+end
+c22260003.named_with_KuMaKawa=1
+function c22260003.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260003.sumlimit(e,c)
+	return c:GetAttack()~=0
+end
+function c22260003.mlimit(e,c)
+	if not c then return false end
+	return c:GetAttack()~=0
+end
+function c22260003.spfilter(c,e,tp)
+	return c:IsLevelBelow(4) and c:GetAttack()==0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c22260003.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c22260003.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c22260003.sptfilter(c)
+	return c:IsFacedown() or c:GetBaseAttack()~=0
+end
+function c22260003.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,c22260003.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetMatchingGroupCount(c22260003.sptfilter,tp,LOCATION_MZONE,0,nil)==0 and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) and Duel.SelectYesNo(tp,aux.Stringid(22260003,1)) then
+				local token=Duel.CreateToken(tp,22269999)
+				Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+			end
+		end
+	end
+end
+function c22260003.cfilter(c)
+	return c:IsCode(22269999) and c:IsReleasable()
+end
+function c22260003.discost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,c22260003.cfilter,1,nil) end
+	local g=Duel.SelectReleaseGroup(tp,c22260003.cfilter,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c22260003.disfilter(c)
+	return c:IsFaceup() and not c:IsDisabled()
+end
+function c22260003.distg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_ONFIELD) and c22260003.disfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c22260003.disfilter,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local g=Duel.SelectTarget(tp,c22260003.disfilter,tp,0,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
+end
+function c22260003.disop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsFaceup() and tc:IsRelateToEffect(e) and not tc:IsDisabled() and tc:IsControler(1-tp) then
+		Duel.NegateRelatedChain(tc,RESET_TURN_SET)
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_DISABLE)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_DISABLE_EFFECT)
+		e2:SetValue(RESET_TURN_SET)
+		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+	end
+end
\ No newline at end of file

expansions/script/c22260004.lua

+--逆境奋起 球磨川禊
+function c22260004.initial_effect(c)
+	c:SetUniqueOnField(1,0,22260004)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260004,0))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e2:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e2:SetCode(EVENT_DESTROYED)
+	e2:SetCountLimit(1,22260004)
+	e2:SetCondition(c22260004.spcon)
+	e2:SetTarget(c22260004.sptg)
+	e2:SetOperation(c22260004.spop)
+	c:RegisterEffect(e2)
+	--atk
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetCode(EFFECT_UPDATE_ATTACK)
+	e2:SetTarget(aux.TargetBoolFunction(c22260004.atkfilter))
+	e2:SetValue(c22260004.atkval)
+	c:RegisterEffect(e2)
+	--spsummontoken
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260004,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BATTLE_DESTROYING)
+	e2:SetCountLimit(1)
+	e2:SetCondition(aux.bdocon)
+	e2:SetTarget(c22260004.spttg)
+	e2:SetOperation(c22260004.sptop)
+	c:RegisterEffect(e2)
+end
+c22260004.named_with_KuMaKawa=1
+function c22260004.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260004.spfilter(c,tp)
+	return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:GetBaseAttack()==0 and c:IsType(TYPE_MONSTER)
+end
+function c22260004.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c22260004.spfilter,1,nil,tp)
+end
+function c22260004.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c22260004.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+end
+function c22260004.atkfilter(c)
+	return c:IsFaceup() and c22260004.IsKuMaKawa(c)
+end
+function c22260004.atkval(e,c)
+	local tp=e:GetHandler():GetControler()
+	local val=Duel.GetLP(1-tp)-Duel.GetLP(tp)
+	return math.max(0,val)
+end
+function c22260004.spttg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
+	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
+end
+function c22260004.sptop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	if Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) then
+		local token=Duel.CreateToken(tp,22269999)
+		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c22260005.lua

+--安心院小姐 安心院熏染
+function c22260005.initial_effect(c)
+	c:EnableReviveLimit()
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--splimit
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e2:SetRange(LOCATION_PZONE)
+	e2:SetTargetRange(1,0)
+	e2:SetTarget(c22260005.splimit)
+	c:RegisterEffect(e2)
+	--Draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260005,0))
+	e2:SetCategory(CATEGORY_DRAW+CATEGORY_DESTROY)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e2:SetRange(LOCATION_PZONE)
+	e2:SetCode(EVENT_LEAVE_FIELD)
+	e2:SetCondition(c22260005.drcon)
+	e2:SetTarget(c22260005.drtg)
+	e2:SetOperation(c22260005.drop)
+	c:RegisterEffect(e2)
+	--special summon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	c:RegisterEffect(e1)
+	--special summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_SPSUMMON_PROC)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e2:SetRange(LOCATION_HAND)
+	e2:SetValue(1)
+	e2:SetCondition(c22260005.sprcon)
+	e2:SetOperation(c22260005.sprop)
+	c:RegisterEffect(e2)
+	--extra summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(22260005,1))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e3:SetCondition(c22260005.espcon)
+	e3:SetTarget(c22260005.esptg)
+	e3:SetOperation(c22260005.espop)
+	c:RegisterEffect(e3)
+	--todeck
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(22260005,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_EXTRA)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetCondition(c22260005.tdcon)
+	e3:SetTarget(c22260005.tdtg)
+	e3:SetOperation(c22260005.tdop)
+	c:RegisterEffect(e3)
+end
+function c22260005.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260005.splimit(e,c,tp,sumtp,sumpos)
+	return not c:GetBaseAttack()==0
+end
+function c22260005.drfilter(c,tp)
+	return c22260005.IsKuMaKawa(c) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP)
+end
+function c22260005.drcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c22260005.drfilter,1,nil,tp)
+end
+function c22260005.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) and e:GetHandler():IsDestructable() end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
+end
+function c22260005.drop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	Duel.Draw(tp,1,REASON_EFFECT)
+	Duel.BreakEffect()
+	Duel.Destroy(c,REASON_EFFECT)
+end
+function c22260005.spcfilter(c)
+	return c:IsFaceup() and c:GetBaseAttack()==0 and c:IsReleasable()
+end
+function c22260005.mzfilter(c,tp)
+	return c:GetSequence()<5
+end
+function c22260005.sprcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	local sg=Duel.GetMatchingGroup(c22260005.spcfilter,tp,LOCATION_MZONE,0,nil)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	local ct=-ft+1
+	return ft>-3 and sg:GetCount()>2 and (ft>0 or sg:IsExists(c22260005.mzfilter,ct,nil,tp))
+end
+function c22260005.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+	local sg=Duel.GetMatchingGroup(c22260005.spcfilter,tp,LOCATION_MZONE,0,nil)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	local g=nil
+	if ft>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+		g=sg:Select(tp,3,3,nil)
+	elseif ft>-2 then
+		local ct=-ft+1
+		Duel.Hint(HINT_SELECTMSG,tp,HHINTMSG_RELEASE)
+		g=sg:FilterSelect(tp,c22260005.mzfilter,ct,ct,nil,tp)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+		local g2=sg:Select(tp,3-ct,3-ct,g)
+		g:Merge(g2)
+	else
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+		g=sg:FilterSelect(tp,c22260005.mzfilter,3,3,nil,tp)
+	end
+	Duel.Release(g,REASON_COST)
+end
+function c22260005.espcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
+end
+function c22260005.esptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsType(TYPE_MONSTER) end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,e:GetHandler())
+end
+function c22260005.espop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc and c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) and not tc:IsType(TYPE_TOKEN) then
+		local code=tc:GetOriginalCodeRule()
+		local cid=0
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetCode(EFFECT_CHANGE_CODE)
+		e1:SetValue(code)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+		if not tc:IsType(TYPE_TRAPMONSTER) then
+			cid=c:CopyEffect(code,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,1)
+		end
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e2:SetCode(EVENT_PHASE+PHASE_END)
+		e2:SetCountLimit(1)
+		e2:SetRange(LOCATION_MZONE)
+		e2:SetLabelObject(e1)
+		e2:SetLabel(cid)
+		e2:SetOperation(c22260005.rstop)
+		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e2)
+	end
+end
+function c22260005.rstop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local cid=e:GetLabel()
+	if cid~=0 then c:ResetEffect(cid,RESET_COPY) end
+	local e1=e:GetLabelObject()
+	e1:Reset()
+	Duel.HintSelection(Group.FromCards(c))
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+
+function c22260005.tdcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsFaceup()
+end
+function c22260005.tdfilter(c)
+	return c22260005.IsKuMaKawa(c) and c:IsAbleToDeck() and (c:IsLocation(LOCATION_GRAVE) or (c:IsLocation(LOCATION_REMOVED) and c:IsFaceup()))
+end
+function c22260005.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chkc then return c22260005.tdfilter(chkc) end
+	local c=e:GetHandler()
+	if chk==0 then return Duel.IsExistingTarget(c22260005.tdfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c22260005.tdfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+end
+function c22260005.tdop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	Duel.SendtoDeck(Group.FromCards(e:GetHandler(),tc),nil,0,REASON_EFFECT)
+	Duel.ShuffleDeck(tp)	
+end
\ No newline at end of file

expansions/script/c22260101.lua

+--过负荷「目隐」
+function c22260101.initial_effect(c)
+	--fusion material
+	c:EnableReviveLimit()
+	aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(c22260101.mfilter),2,true)
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(c22260101.splimit)
+	c:RegisterEffect(e1)
+	--special summon rule
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_SPSUMMON_PROC)
+	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	e2:SetRange(LOCATION_EXTRA)
+	e2:SetValue(1)
+	e2:SetCondition(c22260101.sprcon)
+	e2:SetOperation(c22260101.sprop)
+	c:RegisterEffect(e2)
+	--coin
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(22260101,0))
+	e3:SetCategory(CATEGORY_COIN+CATEGORY_REMOVE+CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(c22260101.ccon)
+	e3:SetTarget(c22260101.ctg)
+	e3:SetOperation(c22260101.cop)
+	c:RegisterEffect(e3)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(22260101,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e2:SetCode(EVENT_LEAVE_FIELD)
+	e2:SetTarget(c22260101.sptg)
+	e2:SetOperation(c22260101.spop)
+	c:RegisterEffect(e2)
+end
+function c22260101.mfilter(c)
+	return c:IsAttribute(ATTRIBUTE_DARK) and (c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_REPTILE)) and c:IsCanBeFusionMaterial()
+end
+function c22260101.splimit(e,se,sp,st)
+	return e:GetHandler():GetLocation()~=LOCATION_EXTRA
+end
+function c22260101.spfilter(c)
+	return c:IsAttribute(ATTRIBUTE_DARK) and (c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_REPTILE)) and c:IsCanBeFusionMaterial() and c:IsAbleToDeckOrExtraAsCost()
+end
+function c22260101.spfilter1(c,tp,g)
+	return g:IsExists(c22260101.spfilter2,1,c,tp,c)
+end
+function c22260101.spfilter2(c,tp,mc)
+	return Duel.GetLocationCountFromEx(tp,tp,Group.FromCards(c,mc))>0
+end
+function c22260101.sprcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	local g=Duel.GetMatchingGroup(c22260101.spfilter,tp,LOCATION_GRAVE,0,nil)
+	return g:IsExists(c22260101.spfilter1,1,nil,tp,g)
+end
+function c22260101.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+	local g=Duel.GetMatchingGroup(c22260101.spfilter,tp,LOCATION_GRAVE,0,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g1=g:FilterSelect(tp,c22260101.spfilter1,1,1,nil,tp,g)
+	local mc=g1:GetFirst()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g2=g:FilterSelect(tp,c22260101.spfilter2,1,1,mc,tp,mc)
+	g1:Merge(g2)
+	Duel.Remove(g1,POS_FACEUP,REASON_COST)
+end
+function c22260101.ccon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
+end
+function c22260101.ctg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_HAND,2,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,2,1-tp,LOCATION_HAND)
+	Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
+end
+function c22260101.cop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_HAND,nil)
+	if g:GetCount()<2 then return end
+	local rg=g:RandomSelect(tp,2)
+	Duel.Remove(rg,POS_FACEDOWN,REASON_EFFECT)
+	local coin=Duel.SelectOption(1-tp,60,61)
+	local res=Duel.TossCoin(tp,1)
+	if coin~=res then Duel.SendtoHand(rg,nil,REASON_EFFECT) end
+end
+function c22260101.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return not Duel.IsPlayerAffectedByEffect(tp,59822133)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>1
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
+	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,2,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,0,0)
+end
+function c22260101.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)>1
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) then
+		for i=1,2 do
+			local token=Duel.CreateToken(tp,22269999)
+			Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP)
+		end
+		Duel.SpecialSummonComplete()
+	end
+end
\ No newline at end of file

expansions/script/c22260161.lua

+--混沌极限 球磨川禊
+function c22260161.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(c22260161.mfilter),2)
+	c:EnableReviveLimit()
+	--xyzlimit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(c22260161.mlimit)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+	c:RegisterEffect(e4)
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	c:RegisterEffect(e5)
+	local e6=e3:Clone()
+	e6:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+	c:RegisterEffect(e6)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(22260161,0))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetTarget(c22260161.thtg)
+	e1:SetOperation(c22260161.thop)
+	c:RegisterEffect(e1)
+	--SpecialSummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260161,2))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCondition(c22260161.spcon)
+	e2:SetTarget(c22260161.sptg)
+	e2:SetOperation(c22260161.spop)
+	c:RegisterEffect(e2)
+end
+c22260161.named_with_KuMaKawa=1
+function c22260161.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260161.mlimit(e,c)
+	if not c then return false end
+	return c:GetAttack()~=0
+end
+function c22260161.mfilter(c,lc)
+	return c:GetBaseAttack()==0 and c:IsCanBeLinkMaterial(lc)
+end
+function c22260161.thfilter(c)
+	return c:IsCode(22261001,22261101) and c:IsAbleToHand() and c:IsFaceup()
+end
+function c22260161.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22260161.thfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
+end
+function c22260161.thop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c22260161.thfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		local p=c:GetControler()
+		local zone=bit.band(c:GetLinkedZone(),0x1f)
+		if Duel.GetLocationCount(p,LOCATION_MZONE,p,LOCATION_REASON_CONTROL,zone)>0
+			and Duel.SelectYesNo(tp,aux.Stringid(22260161,1)) then
+			Duel.BreakEffect()
+			local s=0
+			if c:IsControler(tp) then
+				local flag=bit.bxor(zone,0xff)
+				Duel.Hint(HINT_SELECTMSG,tp,571)
+				s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,flag)
+			else
+				local flag=bit.bxor(zone,0xff)*0x10000
+				Duel.Hint(HINT_SELECTMSG,tp,571)
+				s=Duel.SelectDisableField(tp,1,0,LOCATION_MZONE,flag)/0x10000
+			end
+			local nseq=0
+			if s==1 then nseq=0
+				elseif s==2 then nseq=1
+				elseif s==4 then nseq=2
+				elseif s==8 then nseq=3
+				else nseq=4 
+			end
+			Duel.MoveSequence(c,nseq)
+		end
+	end
+end
+function c22260161.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) and c:IsReason(REASON_BATTLE+REASON_EFFECT)
+end
+function c22260161.spfilter(c)
+	return (c:IsCode(22261001,22261101) or (c:IsType(TYPE_MONSTER) and c:GetAttack()==0)) and c:IsAbleToHand()
+end
+function c22260161.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22260161.spfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c22260161.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tp=c:GetControler()
+	Duel.Hint(HINT_SELECTMSG,1-tp,aux.Stringid(22260161,3))
+	local g=Duel.SelectMatchingCard(1-tp,c22260161.spfilter,tp,LOCATION_GRAVE,0,1,1,c)
+	if g:GetCount()>0 then
+		if Duel.SendtoHand(g,nil,REASON_EFFECT)>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) then
+			Duel.ConfirmCards(1-tp,g)
+			Duel.BreakEffect()
+			Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
+			local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
+			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			e1:SetReset(RESET_EVENT+0xfe0000)
+			e1:SetValue(LOCATION_REMOVED)
+			c:RegisterEffect(e1)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c22260162.lua

+--GoodLoser 球磨川禊
+function c22260162.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(c22260162.mfilter),1)
+	c:EnableReviveLimit()
+	--xyzlimit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(c22260162.mlimit)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+	c:RegisterEffect(e4)
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	c:RegisterEffect(e5)
+	local e6=e3:Clone()
+	e6:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+	c:RegisterEffect(e6)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(22260162,0))
+	e1:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetTarget(c22260162.sptg)
+	e1:SetOperation(c22260162.spop)
+	c:RegisterEffect(e1)
+	--tohand
+	local e7=Effect.CreateEffect(c)
+	e7:SetDescription(aux.Stringid(22260162,1))
+	e7:SetCategory(CATEGORY_TOHAND)
+	e7:SetType(EFFECT_TYPE_IGNITION)
+	e7:SetRange(LOCATION_MZONE)
+	e7:SetCountLimit(1)
+	e7:SetCost(c22260162.thcost)
+	e7:SetTarget(c22260162.thtg)
+	e7:SetOperation(c22260162.thop)
+	c:RegisterEffect(e7)
+end
+c22260162.named_with_KuMaKawa=1
+function c22260162.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260162.mlimit(e,c)
+	if not c then return false end
+	return c:GetAttack()~=0
+end
+function c22260162.mfilter(c,lc)
+	return c:GetBaseAttack()==0 and c:IsCanBeLinkMaterial(lc)
+end
+function c22260162.filter1(c)
+	return c:IsCode(22261001) and c:IsAbleToRemove()
+end
+function c22260162.filter2(c)
+	return c:IsCode(22261101) and c:IsAbleToRemove()
+end
+function c22260162.filter3(c,e,tp)
+	return c22260162.IsKuMaKawa(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c22260162.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22260162.filter1,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(c22260162.filter2,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(c22260162.filter3,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,2,0,LOCATION_GRAVE)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
+end
+function c22260162.spop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g1=Duel.SelectMatchingCard(tp,c22260162.filter1,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g2=Duel.SelectMatchingCard(tp,c22260162.filter2,tp,LOCATION_GRAVE,0,1,1,nil)
+	g1:Merge(g2)
+	if g1:GetCount()==2 then
+		if Duel.Remove(g1,POS_FACEUP,REASON_EFFECT) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c22260162.filter3,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+			local sg=Duel.SelectMatchingCard(tp,c22260162.filter3,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil,e,tp)
+			Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
+function c22260162.cfilter(c)
+	return c:IsCode(22269999) and c:IsReleasable()
+end
+function c22260162.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,c22260162.cfilter,1,nil) end
+	local g=Duel.SelectReleaseGroup(tp,c22260162.cfilter,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c22260162.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+end
+function c22260162.thop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_GRAVE,0,nil)
+	if g:GetCount()>0 then
+		local sg=g:RandomSelect(tp,1)
+		Duel.SendtoHand(sg,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,sg)
+	end
+end
\ No newline at end of file

expansions/script/c22260163.lua

+--人间最弱 球磨川禊
+function c22260163.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(c22260163.mfilter),2)
+	c:EnableReviveLimit()
+	--xyzlimit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(c22260163.mlimit)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+	c:RegisterEffect(e4)
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	c:RegisterEffect(e5)
+	local e6=e3:Clone()
+	e6:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+	c:RegisterEffect(e6)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(22260163,0))
+	e1:SetCategory(CATEGORY_TOKEN+CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,222601631)
+	e1:SetTarget(c22260163.sptg)
+	e1:SetOperation(c22260163.spop)
+	c:RegisterEffect(e1)
+	--Release
+	local e7=Effect.CreateEffect(c)
+	e7:SetDescription(aux.Stringid(22260163,1))
+	e7:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_ATKCHANGE)
+	e7:SetType(EFFECT_TYPE_IGNITION)
+	e7:SetRange(LOCATION_MZONE)
+	e7:SetCountLimit(1,222601632)
+	e7:SetCost(c22260163.thcost)
+	e7:SetOperation(c22260163.thop)
+	c:RegisterEffect(e7)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260163,3))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e2:SetCode(EVENT_LEAVE_FIELD)
+	e2:SetCountLimit(1,222601633)
+	e2:SetTarget(c22260163.sptg2)
+	e2:SetOperation(c22260163.spop2)
+	c:RegisterEffect(e2)
+end
+c22260163.named_with_KuMaKawa=1
+function c22260163.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22260163.mlimit(e,c)
+	if not c then return false end
+	return c:GetAttack()~=0
+end
+function c22260163.mfilter(c,lc)
+	return c:GetBaseAttack()==0 and c:IsCanBeLinkMaterial(lc)
+end
+function c22260163.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local zone=e:GetHandler():GetLinkedZone(tp)
+	local ft=Duel.GetMZoneCount(tp,g,tp,LOCATION_REASON_TOFIELD,zone)
+	if chk==0 then return ft>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH,zone)end
+	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,0,0,0)
+end 
+function c22260163.spop(e,tp,eg,ep,ev,re,r,rp)
+	local zone=e:GetHandler():GetLinkedZone(tp)
+	local ft=Duel.GetMZoneCount(tp,g,tp,LOCATION_REASON_TOFIELD,zone)
+	if ft<1 then return end
+	if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
+	for i=1,ft do
+		local token=Duel.CreateToken(tp,22269999)
+		Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	Duel.SpecialSummonComplete()
+end
+function c22260163.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local cg=e:GetHandler():GetLinkedGroup():Filter(Card.IsReleasable,nil)
+	if chk==0 then return cg:GetCount()>0 end
+	e:SetLabel(Duel.Release(cg,REASON_COST)*700+cg:FilterCount(c22260163.cfilter,nil)*70+cg:FilterCount(Card.IsCode,nil,22269999))
+end
+function c22260163.thfilter(c)
+	return c:IsCode(22261001,22261101) and c:IsAbleToHand()
+end
+function c22260163.cfilter(c)
+	return c22260163.IsKuMaKawa(c) and c:IsType(TYPE_MONSTER)
+end
+function c22260163.thop(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local g=e:GetLabelObject()
+	local atk=e:GetLabel()-(e:GetLabel()%700)
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(atk)
+		e1:SetReset(RESET_EVENT+0x1ff0000)
+		c:RegisterEffect(e1)
+	end
+	if (e:GetLabel()%700)>(e:GetLabel()%70) and c:IsFaceup() and c:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(atk)
+		e1:SetReset(RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+	if e:GetLabel()%70>0 and Duel.IsExistingMatchingCard(c22260163.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(22260163,2)) then
+		local tg=Duel.SelectMatchingCard(tp,c22260163.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,e:GetLabel()%70,nil)
+		if tg:GetCount()>0 then
+			Duel.SendtoHand(tg,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tg)
+		end
+	end
+end
+function c22260163.spfilter(c,e,tp)
+	return c22260163.IsKuMaKawa(c) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and not c:IsCode(22260163)
+end
+function c22260163.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and Duel.IsExistingMatchingCard(c22260163.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,0,0,0)
+end
+function c22260163.spop2(e,tp,eg,ep,ev,re,r,rp)
+	local ct=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if ct<1 then return end
+	if Duel.IsPlayerAffectedByEffect(tp,59822133) then ct=1 end
+	local g=Duel.SelectMatchingCard(tp,c22260163.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	if ct>1 then 
+		local sg=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_GRAVE,0,nil,g:GetFirst():GetCode()):RandomSelect(tp,ct-1)
+		g:Merge(sg)
+	end
+	Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+end
\ No newline at end of file

expansions/script/c22261001.lua

+--剧本制作
+function c22261001.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(22261001,0))
+	e1:SetCategory(CATEGORY_REMOVE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(c22261001.con)
+	e1:SetTarget(c22261001.target1)
+	e1:SetOperation(c22261001.activate1)
+	c:RegisterEffect(e1)
+	--
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22261001,1))
+	e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE)
+	e2:SetType(EFFECT_TYPE_ACTIVATE)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetCondition(c22261001.con)
+	e2:SetTarget(c22261001.target2)
+	e2:SetOperation(c22261001.activate2)
+	c:RegisterEffect(e2)
+	--tohand
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(22261001,2))
+	e3:SetCategory(CATEGORY_REMOVE+CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCost(c22261001.cost)
+	e3:SetTarget(c22261001.tg)
+	e3:SetOperation(c22261001.op)
+	c:RegisterEffect(e3)
+end
+function c22261001.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22261001.cfilter(c)
+	return c:IsFacedown() or c:GetBaseAttack()~=0
+end
+function c22261001.con(e,c)
+	return not Duel.IsExistingMatchingCard(c22261001.cfilter,tp,LOCATION_MZONE,0,1,nil)
+end
+function c22261001.rmfilter(c,p)
+	return Duel.IsPlayerCanRemove(p,c) and not c:IsType(TYPE_TOKEN)
+end
+function c22261001.kfilter(c)
+	return c:IsFaceup() and c22261001.IsKuMaKawa(c)
+end
+function c22261001.target1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetFieldGroup(tp,0,LOCATION_MZONE)
+	local ct=g:GetCount()-Duel.GetMatchingGroupCount(c22261001.kfilter,tp,LOCATION_MZONE,0,nil)
+	if chk==0 then return not Duel.IsPlayerAffectedByEffect(1-tp,30459350) and ct>0 and g:IsExists(c22261001.rmfilter,1,nil,1-tp) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,ct,0,0)
+end
+function c22261001.activate1(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.IsPlayerAffectedByEffect(1-tp,30459350) then return end
+	local g=Duel.GetFieldGroup(tp,0,LOCATION_MZONE)
+	local ct=g:GetCount()-Duel.GetMatchingGroupCount(c22261001.kfilter,tp,LOCATION_MZONE,0,nil)
+	if ct>0 then
+		Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
+		local sg=g:FilterSelect(1-tp,c22261001.rmfilter,ct,ct,nil,1-tp)
+		Duel.Remove(sg,POS_FACEUP,REASON_RULE)
+	end
+end
+function c22261001.target2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
+end
+function c22261001.atkfilter(c)
+	return c:IsFaceup() and c22261001.IsKuMaKawa(c)
+end
+function c22261001.activate2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+	local ag=Duel.GetMatchingGroup(c22261001.atkfilter,tp,LOCATION_MZONE,0,nil)
+	local sum=ag:GetSum(Card.GetAttack)
+	local tc=g:GetFirst()
+	while tc do
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_DISABLE)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_DISABLE_EFFECT)
+		e2:SetValue(RESET_TURN_SET)
+		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		e1:SetValue(sum)
+		tc:RegisterEffect(e1)
+		tc=g:GetNext()
+	end
+end
+function c22261001.cfilter(c)
+	return c:IsCode(22269999) and c:IsReleasable()
+end
+function c22261001.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,c22261001.cfilter,1,nil) end
+	local g=Duel.SelectReleaseGroup(tp,c22261001.cfilter,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c22261001.filter(c)
+	return c:IsCode(22261101) and c:IsAbleToHand()
+end
+function c22261001.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22261001.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) and e:GetHandler():IsAbleToRemove() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,0,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
+end
+function c22261001.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c22261001.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		Duel.BreakEffect()
+		Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c22261002.lua

+--你的幸福就是我的心愿
+function c22261002.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(c22261002.condition)
+	e1:SetCountLimit(1,22261002+EFFECT_COUNT_CODE_OATH)
+	e1:SetTarget(c22261002.target)
+	e1:SetOperation(c22261002.activate)
+	c:RegisterEffect(e1)
+	--SpecialSummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22260006,0))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_REMOVE)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCode(EVENT_LEAVE_FIELD)
+	e2:SetCondition(c22261002.spcon)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c22261002.sptg)
+	e2:SetOperation(c22261002.spop)
+	c:RegisterEffect(e2)
+end
+function c22261002.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22261002.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
+end
+function c22261002.thfilter1(c)
+	return c22261002.IsKuMaKawa(c) and c:IsAbleToHand()
+end
+function c22261002.thfilter2(c)
+	return c:IsCode(22260005) and c:IsAbleToHand()
+end
+function c22261002.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22261002.thfilter1,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingMatchingCard(c22261002.thfilter2,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
+end
+function c22261002.activate(e,tp,eg,ep,ev,re,r,rp)
+	if not (Duel.IsExistingMatchingCard(c22261002.thfilter1,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingMatchingCard(c22261002.thfilter2,tp,LOCATION_DECK,0,1,nil)) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g1=Duel.SelectMatchingCard(tp,c22261002.thfilter1,tp,LOCATION_DECK,0,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g2=Duel.SelectMatchingCard(tp,c22261002.thfilter2,tp,LOCATION_DECK,0,1,1,nil)
+	g1:Merge(g2)
+	if g1:GetCount()>0 then
+		Duel.SendtoHand(g1,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g1)
+	end
+end
+function c22261002.spcfilter(c,tp)
+	return c:IsCode(22260005) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP)
+end
+function c22261002.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c22261002.spcfilter,1,nil,tp)
+end
+function c22261002.filter(c,e,tp)
+	return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c22261002.IsKuMaKawa(c)
+end
+function c22261002.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c22261002.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c22261002.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c22261002.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c22261002.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c22261101.lua

+--弥天大谎
+function c22261101.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(22261101,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(c22261101.cost)
+	e1:SetTarget(c22261101.target1)
+	e1:SetOperation(c22261101.activate1)
+	c:RegisterEffect(e1)
+	--
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22261101,1))
+	e2:SetCategory(CATEGORY_REMOVE)
+	e2:SetType(EFFECT_TYPE_ACTIVATE)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetCost(c22261101.cost)
+	e2:SetTarget(c22261101.target2)
+	e2:SetOperation(c22261101.activate2)
+	c:RegisterEffect(e2)
+	--tohand
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(22261101,2))
+	e3:SetCategory(CATEGORY_REMOVE+CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCost(c22261101.cost)
+	e3:SetTarget(c22261101.tg)
+	e3:SetOperation(c22261101.op)
+	c:RegisterEffect(e3)
+end
+function c22261101.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22261101.cfilter(c)
+	return c:IsCode(22269999) and c:IsReleasable()
+end
+function c22261101.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,c22261101.cfilter,1,nil) end
+	local g=Duel.SelectReleaseGroup(tp,c22261101.cfilter,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c22261101.filter1(c,e,tp)
+	return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c22261101.IsKuMaKawa(c)
+end
+function c22261101.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
+		and Duel.IsExistingMatchingCard(c22261101.filter1,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,0,1,0,0)
+end
+function c22261101.activate1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c22261101.filter1,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function c22261101.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,0,1,0,0)
+end
+function c22261101.activate2(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+	end
+end
+function c22261101.filter(c)
+	return c:IsCode(22261001) and c:IsAbleToHand()
+end
+function c22261101.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22261101.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) and e:GetHandler():IsAbleToRemove() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,0,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
+end
+function c22261101.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c22261101.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		Duel.BreakEffect()
+		Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c22261102.lua

+--安心版·弥天大谎
+function c22261102.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON+CATEGORY_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,22261102+EFFECT_COUNT_CODE_OATH)
+	e1:SetTarget(c22261102.target)
+	e1:SetOperation(c22261102.activate)
+	c:RegisterEffect(e1)
+end
+function c22261102.sfilter(c,tp)
+	return c:IsLocation(LOCATION_DECK) and c:IsControler(tp)
+end
+function c22261102.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsAbleToDeck() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToDeck,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,Card.IsAbleToDeck,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
+end
+function c22261102.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=1 then return end
+	Duel.SendtoDeck(tg,nil,0,REASON_EFFECT)
+	local g=Duel.GetOperatedGroup()
+	if g:IsExists(c22261102.sfilter,1,nil,tp) then Duel.ShuffleDeck(tp) end
+	if g:IsExists(c22261102.sfilter,1,nil,1-tp) then Duel.ShuffleDeck(1-tp) end
+	local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
+	if ct==1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,22269999,nil,0x4011,0,0,1,RACE_MACHINE,ATTRIBUTE_EARTH) then
+		Duel.BreakEffect()
+		local token=Duel.CreateToken(tp,22269999)
+		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+	end
+end

expansions/script/c22261103.lua

+--全弹发射！
+function c22261103.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,22261103+EFFECT_COUNT_CODE_OATH)
+	e1:SetCost(c22261103.cost)
+	c:RegisterEffect(e1)
+	--remain field
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_REMAIN_FIELD)
+	c:RegisterEffect(e3)
+	--disable field
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetRange(LOCATION_SZONE)
+	e1:SetCode(EFFECT_DISABLE_FIELD)
+	e1:SetOperation(c22261103.disop)
+	c:RegisterEffect(e1)
+end
+function c22261103.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,22269999) end
+	local g=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,22269999)
+	Duel.Release(g,REASON_COST)
+end
+function c22261103.disop(e,tp)
+	local c=Duel.GetLocationCount(1-tp,LOCATION_MZONE,PLAYER_NONE,0)
+	if c==0 then return end
+	local dis1=Duel.SelectDisableField(tp,1,0,LOCATION_MZONE,0)
+	return dis1
+end
\ No newline at end of file

expansions/script/c22261201.lua

+--啊啊 又没有赢啊
+function c22261201.initial_effect(c)
+	--draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetOperation(c22261201.activate)
+	c:RegisterEffect(e1)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCode(EVENT_DESTROYED)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c22261201.drcon)
+	e2:SetTarget(c22261201.drtg)
+	e2:SetOperation(c22261201.drop)
+	c:RegisterEffect(e2)
+end
+function c22261201.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22261201.filter(c)
+	return (c22261201.IsKuMaKawa(c) and c:IsType(TYPE_MONSTER)) or c:IsCode(22261001) or c:IsCode(22261101)
+end
+function c22261201.activate(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	if Duel.GetFlagEffect(tp,22261201)==0 and Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingMatchingCard(c22261201.filter,tp,LOCATION_GRAVE,0,1,nil) then
+		if Duel.Draw(tp,1,REASON_EFFECT)>0 then
+			Duel.RegisterFlagEffect(tp,22261201,0,0,0)
+		end
+	end
+end
+function c22261201.cfilter(c,tp)
+	return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsPreviousLocation(LOCATION_MZONE) and c:GetPreviousControler()==tp and c22261201.IsKuMaKawa(c)
+end
+function c22261201.drcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c22261201.cfilter,1,nil,tp)
+end
+function c22261201.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(1)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c22261201.drop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Draw(p,d,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c22261501.lua

+--掌心孵化
+function c22261501.initial_effect(c)
+	--draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW+CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_HANDES)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c22261501.target)
+	e1:SetOperation(c22261501.activate)
+	c:RegisterEffect(e1)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetCountLimit(1)
+	e1:SetCost(c22261501.cost)
+	e1:SetOperation(c22261501.op)
+	c:RegisterEffect(e1)
+end
+function c22261501.filter(c)
+	return c:IsCode(22260005) and c:IsAbleToHand()
+end
+function c22261501.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22261501.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c22261501.activate(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local g=Duel.SelectMatchingCard(tp,c22261501.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		if Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,2,nil) and Duel.SelectYesNo(tp,aux.Stringid(22261501,0)) then
+			Duel.BreakEffect()
+			Duel.DiscardHand(tp,Card.IsDiscardable,2,2,REASON_EFFECT,nil)
+			Duel.Draw(tp,1,REASON_EFFECT)
+		end
+	end
+end
+function c22261501.cfilter(c)
+	local a=Duel.IsExistingMatchingCard(c22261501.filter1,tp,LOCATION_DECK,0,1,nil)
+	local b=Duel.IsExistingMatchingCard(c22261501.filter2,tp,LOCATION_DECK,0,1,nil)
+	if a and b then
+		return c:IsCode(22261001,22261101) and c:IsAbleToDeckAsCost() and ((c:IsLocation(LOCATION_REMOVED) and c:IsFaceup()) or c:IsLocation(LOCATION_HAND))
+	elseif a and not b then
+		return c:IsCode(22261001) and c:IsAbleToDeckAsCost() and ((c:IsLocation(LOCATION_REMOVED) and c:IsFaceup()) or c:IsLocation(LOCATION_HAND))
+	elseif b and not a then
+		return c:IsCode(22261101) and c:IsAbleToDeckAsCost() and ((c:IsLocation(LOCATION_REMOVED) and c:IsFaceup()) or c:IsLocation(LOCATION_HAND))
+	end
+end
+function c22261501.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c22261501.cfilter,tp,LOCATION_HAND+LOCATION_REMOVED,0,1,nil) end
+	local g=Duel.SelectMatchingCard(tp,c22261501.cfilter,tp,LOCATION_HAND+LOCATION_REMOVED,0,1,1,nil)
+	local tc=g:GetFirst()
+	e:SetLabel(tc:GetCode())
+	Duel.SendtoDeck(tc,nil,1,REASON_COST)
+end
+function c22261501.filter1(c)
+	return c:IsCode(22261101) and c:IsAbleToHand()
+end
+function c22261501.filter2(c)
+	return c:IsCode(22261001) and c:IsAbleToHand()
+end
+function c22261501.op(e,tp,eg,ep,ev,re,r,rp,chk)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	if e:GetLabel()==22261001 then
+		local tc=Duel.GetFirstMatchingCard(c22261501.filter1,tp,LOCATION_DECK,0,nil)
+		if tc then
+			Duel.SendtoHand(tc,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		end
+	elseif e:GetLabel()==22261101 then
+		local tc=Duel.GetFirstMatchingCard(c22261501.filter2,tp,LOCATION_DECK,0,nil)
+		if tc then
+			Duel.SendtoHand(tc,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c22262001.lua

+--来吧，笑一个
+function c22262001.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(c22262001.condition)
+	e1:SetTarget(c22262001.target)
+	e1:SetOperation(c22262001.activate)
+	c:RegisterEffect(e1)
+end
+function c22262001.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22262001.condition(e)
+	local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,0)
+	local tp=e:GetHandler():GetControler()
+	local val=Duel.GetLP(1-tp)-Duel.GetLP(tp)
+	return g:GetCount()==1 and c22262001.IsKuMaKawa(g:GetFirst()) and g:GetFirst():IsFaceup() and val>3000
+end
+function c22262001.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
+		Duel.SetChainLimit(aux.FALSE)
+	end
+end
+function c22262001.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)~=1 then return end
+	local tc=Duel.GetFieldGroup(tp,LOCATION_MZONE,0):GetFirst()
+	if tc:IsFaceup() and tc:IsLocation(LOCATION_MZONE) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetReset(RESET_EVENT+0x1fe0000)
+		e1:SetValue(2500)
+		tc:RegisterEffect(e1,true)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		tc:RegisterEffect(e2,true)
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_FIELD)
+		e3:SetCode(EFFECT_CHANGE_DAMAGE)
+		e3:SetRange(LOCATION_MZONE)
+		e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_AVAILABLE_BD+EFFECT_FLAG_CANNOT_DISABLE)
+		e3:SetReset(RESET_EVENT+0x1fe0000)
+		e3:SetTargetRange(1,0)
+		e3:SetCondition(c22262001.con)
+		e3:SetValue(0)
+		tc:RegisterEffect(e3,true)
+		local e4=e3:Clone()
+		e4:SetCode(EFFECT_NO_EFFECT_DAMAGE)
+		tc:RegisterEffect(e4,true)
+		local e5=Effect.CreateEffect(c)
+		e5:SetType(EFFECT_TYPE_SINGLE)
+		e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e5:SetRange(LOCATION_MZONE)
+		e5:SetCode(EFFECT_IMMUNE_EFFECT)
+		e5:SetReset(RESET_EVENT+0x1fe0000)
+		e5:SetValue(c22262001.efilter)
+		tc:RegisterEffect(e5)
+		local e6=Effect.CreateEffect(c)
+		e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+		e6:SetCode(EVENT_LEAVE_FIELD)
+		e6:SetOperation(c22262001.leaveop)
+		e6:SetReset(RESET_EVENT+0xc020000)
+		tc:RegisterEffect(e6,true)
+	end
+end
+function c22262001.con(e)
+	return e:GetHandlerPlayer()==e:GetOwnerPlayer()
+end
+function c22262001.efilter(e,te)
+	return te:GetOwner()~=e:GetOwner()
+end
+function c22262001.leaveop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SetLP(tp,100)
+end
\ No newline at end of file

expansions/script/c22262101.lua

+--寄付于混沌的过负荷
+function c22262101.initial_effect(c)
+	--Activate1
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_BE_BATTLE_TARGET)
+	e1:SetCondition(c22262101.condition)
+	e1:SetTarget(c22262101.target)
+	e1:SetOperation(c22262101.activate)
+	c:RegisterEffect(e1)
+	--Activate1
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DISABLE+CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetCondition(c22262101.negcon)
+	e1:SetTarget(c22262101.negtg)
+	e1:SetOperation(c22262101.negop)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c22262101.thtg)
+	e2:SetOperation(c22262101.thop)
+	c:RegisterEffect(e2)
+
+end
+function c22262101.IsKuMaKawa(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.named_with_KuMaKawa
+end
+function c22262101.condition(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	return tc:IsControler(tp) and tc:IsFaceup() and tc:GetBaseAttack()==0
+end
+function c22262101.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c22262101.activate(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() and Duel.IsExistingMatchingCard(c22262101.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(22262101,0)) then
+		local sg=Duel.SelectMatchingCard(tp,c22262101.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+		if sg:GetCount()>0 then
+			Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
+function c22262101.spfilter(c,e,tp)
+	return c22262101.IsKuMaKawa(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c22262101.tfilter(c,tp)
+	return c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsFaceup() and c:GetBaseAttack()==0
+end
+function c22262101.negcon(e,tp,eg,ep,ev,re,r,rp)
+	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end
+	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+	return g and g:IsExists(c22262101.tfilter,1,nil,tp) and Duel.IsChainDisablable(ev)
+end
+function c22262101.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c22262101.negop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateEffect(ev) and Duel.IsExistingMatchingCard(c22262101.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(22262101,0)) then
+		local sg=Duel.SelectMatchingCard(tp,c22262101.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+		if sg:GetCount()>0 then
+			Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
+
+function c22262101.tgfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and c22262101.IsKuMaKawa(c)
+end
+function c22262101.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c22262101.tgfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c22262101.tgfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local sg=Duel.SelectTarget(tp,c22262101.tgfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,sg,sg:GetCount(),0,0)
+end
+function c22262101.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c22270161.lua

+--链接设计者
+function c22270161.initial_effect(c)
+	--link summon
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,c22270161.matfilter,1,1)
+	--change link arrow
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(22270161,8))
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,222701611)
+	e1:SetTarget(c22270161.tg)
+	e1:SetOperation(c22270161.op)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(22270161,9))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,222701612)
+	e2:SetCost(c22270161.cost)
+	e2:SetTarget(c22270161.sptg)
+	e2:SetOperation(c22270161.spop)
+	c:RegisterEffect(e2)
+end
+function c22270161.matfilter(c)
+	return c:IsRace(RACE_MACHINE)
+end
+function c22270161.tg(e,c)
+	return e:GetHandler():GetLinkedGroup():IsContains(c) and c:IsRace(RACE_MACHINE) and c:IsType(TYPE_LINK)
+end
+function c22270161.valcheck(e,c)
+	local g=c:GetMaterial()
+	local atk=g:GetFirst():GetTextAttack()
+	e:SetLabel(atk)
+end
+function c22270161.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local la=Duel.SelectOption(tp,aux.Stringid(22270161,0),aux.Stringid(22270161,1),aux.Stringid(22270161,2),aux.Stringid(22270161,3),aux.Stringid(22270161,4),aux.Stringid(22270161,5),aux.Stringid(22270161,6),aux.Stringid(22270161,7))
+	e:SetLabel(la)
+end
+function c22270161.op(e,tp,eg,ep,ev,re,r,rp)
+	local la=0
+	if e:GetLabel()==0 then la=0x040
+	elseif e:GetLabel()==1 then la=0x080
+	elseif e:GetLabel()==2 then la=0x100
+	elseif e:GetLabel()==3 then la=0x020
+	elseif e:GetLabel()==4 then la=0x004
+	elseif e:GetLabel()==5 then la=0x002
+	elseif e:GetLabel()==6 then la=0x001
+	elseif e:GetLabel()==7 then la=0x008
+	end
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(710253)
+	e1:SetReset(RESET_EVENT+0x47e0000)
+	e1:SetValue(la)
+	c:RegisterEffect(e1,true)
+end
+function c22270161.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=e:GetHandler():GetMutualLinkedGroup():Filter(Card.IsDestructable,nil)
+	if chk==0 then return g:GetCount()>0 end
+	Duel.Destroy(g,REASON_COST)
+end
+function c22270161.filter(c,e,tp)
+	return c:IsRace(RACE_MACHINE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c22270161.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c22270161.filter,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_HAND)
+end
+function c22270161.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c22270161.filter),tp,LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/strings.conf

@@ -7,7 +7,7 @@
 
 #鲶 5 0xfa0-0xfaf
 
-#凶
+#狂
 !setname 0xffac Lapin
 !setname 0xffad Doe
 
@@ -183,6 +183,8 @@
 #named_with_Solid Solid
 #纸
 #named_with_Riviera Riviera
+#强
+#named_with_KuMaKawa 球磨川禊
 
 #Nemoma 337 0x440-0x44f
 

lflist.conf

@@ -37,18 +37,19 @@
 #132
 #141
 14140013 1 --广有射怪鸟事
+14140018 0 --悲哀·布洛妮娅
 14140019 1 --圣少女的牲祭
 #150
 
 #170
-17060884 0 --华恋型多莫维依
+17060884 1 --华恋型多莫维依
 #214
 
 #222
-
+22261001 1 --剧本制作
 #337
 33700081 2 --动物朋友 鲸头鹳
-33700082 2 --动物朋友 东之青龙
+#动物朋友 东之青龙
 33700085 1 --动物朋友 西之白虎
 33700103 1 --加帕里公园 - 神圣之山
 33700181 2 --动物朋友 狞猫
@@ -78,7 +79,7 @@
 50000054 1 --电光石火
 
 #573
-57300027 0 --库拉丽丝-牡丹
+#库拉丽丝-牡丹
 #601
 60151704 0 --天空的水晶部队 狡猾的女仆贼