update

dc-srv5555/S3/special-26.2-AllRoadsLeadsToRome.lua

+--村规决斗：殊途同归
+--所有怪兽得到以下效果外文本：
+--这张卡也当作连接2·等级2的怪兽使用。
+--所有额外怪兽得到【巨大喷流卫星闪灵（54498517）】
+--【卫星闪灵·淘气精灵（27381364）】的效果。
+
+local il = Card.IsLevel
+Card.IsLevel = function(c,...)
+	local arg={...}
+	for i,v in ipairs(arg) do
+	  if v==2 then return true end
+	end
+	return il(c,...)
+end
+local ila = Card.IsLevelAbove
+Card.IsLevelAbove = function(c,lv)
+	return lv<=2 or ila(c,lv)
+end
+local ilb = Card.IsLevelBelow
+Card.IsLevelBelow = function(c,lv)
+	return lv>=2 or ilb(c,lv)
+end
+local ilk=Card.IsLink
+Card.IsLink = function(c,...)
+	local arg={...}
+	for i,v in ipairs(arg) do
+	  if v==2 then return true end
+	end
+	return ilk(c,...)
+end
+local ilka=Card.IsLinkAbove
+Card.IsLinkAbove = function(c,lv)
+	return lv<=2 or ilka(c,lv)
+end
+local ilkb=Card.IsLinkBelow
+Card.IsLinkBelow = function(c,lv)
+	return lv>=2 or ilkb(c,lv)
+end
+
+CUNGUI = {}
+
+function Auxiliary.PreloadUds()
+	--adjust
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EVENT_ADJUST)
+	e1:SetCountLimit(1)
+	e1:SetOperation(CUNGUI.AdjustOperation)
+	Duel.RegisterEffect(e1,0)
+end
+
+CUNGUI.RegisteredMonsters = Group.CreateGroup()
+
+function CUNGUI.AdjustOperation(e,tp,eg,ep,ev,re,r,rp)
+	if not CUNGUI.Init then
+		Duel.CreateToken(0,54498517)
+		Duel.CreateToken(0,27381364)
+	end
+	local g = Duel.GetMatchingGroup(Card.IsType,0,LOCATION_EXTRA,LOCATION_EXTRA,nil,TYPE_MONSTER)
+	g:ForEach(CUNGUI.RegisterMonsterSpecialEffects)
+end
+
+function CUNGUI.RegisterMonsterSpecialEffects(c)
+	if CUNGUI.RegisteredMonsters:IsContains(c) then return end
+	CUNGUI.RegisteredMonsters:AddCard(c)
+	if not c:IsExtraDeckMonster() then return end
+	c54498517.initial_effect(c)
+	c27381364.initial_effect(c)
+end

dc-srv5555/S3/special-26.9-MyTurn.lua

+--村规决斗：我的回合
+--怪兽效果在对方的回合无效化。
+
+CUNGUI = {}
+CUNGUI.RuleCardCode=3285551
+
+function Auxiliary.PreloadUds()
+	--disable
+	local e2=Effect.GlobalEffect()
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_DISABLE)
+	e2:SetTargetRange(0x7f,0x7f)
+	e2:SetTarget(CUNGUI.disable)
+	Duel.RegisterEffect(e2,0)
+end
+function CUNGUI.disable(e,c)
+	return (c:IsType(TYPE_EFFECT) or bit.band(c:GetOriginalType(),TYPE_EFFECT)==TYPE_EFFECT) and c:IsControler(1-Duel.GetTurnPlayer())
+end

dc-srv5555/S3/special-26.A-LoopAndLoop.lua

+--村规决斗：循环往复
+--所有怪兽得到以下效果：
+--以下的①②效果使用后，原本卡名与这张卡的原本卡名相同的卡当回合不能使用类似效果。
+--①自己场上有等级·阶级·连接数与这张卡的等级相同，或属性·种族与这张卡相同的卡的场合才能发动。这张卡从手卡特殊召唤。
+--②这张卡特殊召唤的场合才能发动。从卡组把1只和这张卡等级·阶级·连接数相同的怪兽加入手卡。这个回合，自己不能把这个效果加入手卡的卡以及那些同名卡的效果发动。
+--③这张卡被送去墓地的场合发动。这张卡返回卡组。
+--后攻多抽2张。
+
+CUNGUI = {}
+
+function Auxiliary.PreloadUds()
+	--adjust
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EVENT_ADJUST)
+	e1:SetCountLimit(1)
+	e1:SetOperation(CUNGUI.AdjustOperation)
+	Duel.RegisterEffect(e1,0)
+end
+
+CUNGUI.RegisteredMonsters = Group.CreateGroup()
+CUNGUI.Used={}
+CUNGUI.Used[0]={}
+CUNGUI.Used[1]={}
+CUNGUI.Used2={}
+CUNGUI.Used2[0]={}
+CUNGUI.Used2[1]={}
+
+function CUNGUI.AdjustOperation(e,tp,eg,ep,ev,re,r,rp)
+	local g = Duel.GetMatchingGroup(Card.IsType,0,0x7f,0x7f,nil,TYPE_MONSTER)
+	g:ForEach(CUNGUI.RegisterMonsterSpecialEffects)
+	CUNGUI.Used[0]={}
+	CUNGUI.Used[1]={}
+	CUNGUI.Used2[0]={}
+	CUNGUI.Used2[1]={}
+	if not CUNGUI.Init then
+		CUNGUI.Init = true
+		Duel.Draw(1,2,REASON_RULE)
+	end
+end
+
+function CUNGUI.RegisterMonsterSpecialEffects(c)
+	if CUNGUI.RegisteredMonsters:IsContains(c) then return end
+	CUNGUI.RegisteredMonsters:AddCard(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(1764972,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(CUNGUI.spcon)
+	e1:SetTarget(CUNGUI.sptg)
+	e1:SetOperation(CUNGUI.spop)
+	c:RegisterEffect(e1)
+	--search
+	e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(123709,2))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCondition(CUNGUI.thcon)
+	e1:SetTarget(CUNGUI.thtg)
+	e1:SetOperation(CUNGUI.thop)
+	c:RegisterEffect(e1)
+	e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(11868731,0))
+	e1:SetCategory(CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetTarget(CUNGUI.rettg)
+	e1:SetOperation(CUNGUI.retop)
+	c:RegisterEffect(e1)
+end
+
+function CUNGUI.spfilter(c,sc)
+	local x=sc:GetLevel()
+	local y=sc:GetAttribute()
+	local z=sc:GetRace()
+	return c:IsFaceup() and c:IsType(TYPE_MONSTER) and (c:IsLevel(x) or c:IsRank(x) or c:IsLink(x) or c:IsAttribute(y) or c:IsRace(z))
+end
+
+function CUNGUI.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(CUNGUI.spfilter,tp,LOCATION_MZONE,0,1,nil,e:GetHandler())
+		and not CUNGUI.Used[tp][e:GetHandler():GetOriginalCode()]
+end
+function CUNGUI.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
+	CUNGUI.Used[tp][e:GetHandler():GetOriginalCode()]=true
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function CUNGUI.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+
+function CUNGUI.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return not CUNGUI.Used2[tp][e:GetHandler():GetOriginalCode()]
+end
+function CUNGUI.thfilter(c,sc)
+	if not c:IsType(TYPE_MONSTER) then return false end
+	local i=sc:GetLevel()
+	local j=sc:GetRank()
+	local k=sc:GetLink()
+	local y=sc:GetAttribute()
+	local z=sc:GetRace()
+	return (c:IsLevel(x) or c:IsLevel(j) or c:IsLevel(k) or c:IsAttribute(y) or c:IsRace(z))
+end
+function CUNGUI.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(CUNGUI.thfilter,tp,LOCATION_DECK,0,1,nil,e:GetHandler()) end
+	CUNGUI.Used2[tp][e:GetHandler():GetOriginalCode()]=true
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function CUNGUI.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,CUNGUI.thfilter,tp,LOCATION_DECK,0,1,1,nil,e:GetHandler())
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		local tc=g:GetFirst()
+		if tc:IsLocation(LOCATION_HAND) then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_FIELD)
+			e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+			e1:SetCode(EFFECT_CANNOT_ACTIVATE)
+			e1:SetTargetRange(1,0)
+			e1:SetValue(CUNGUI.aclimit)
+			e1:SetLabel(tc:GetCode())
+			e1:SetReset(RESET_PHASE+PHASE_END)
+			Duel.RegisterEffect(e1,tp)
+		end
+	end
+end
+function CUNGUI.aclimit(e,re,tp)
+	return re:GetHandler():IsCode(e:GetLabel())
+end
+function CUNGUI.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
+end
+function CUNGUI.retop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e) then
+		Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
+	end
+end
\ No newline at end of file

dc-srv5555/S3/special-秽土转生（未完成）.lua

---村规决斗：秽土转生
---所有【这个卡名1回合只能使用……/这个卡名的效果决斗中只能使用……/这个卡名的效果在场上只能使用……】的效果，变为【1回合……】的效果。
---开局时，把双方额外卡组的所有卡复制1份，加入各自的额外卡组。
---双方将1张转生炎兽的圣域（1295111）从卡组外表侧表示除外。
---这场决斗中这张卡不是表侧表示除外的场合，这张卡表侧表示除外。
---这张卡得到以下效果。这些效果的发动和效果不会被无效化。
---主要阶段才能发动。只用自己场上1只连接怪兽为素材，从额外卡组把1张同名卡连接召唤。
---主要阶段才能发动。只用自己场上1只超量怪兽为素材，从额外卡组把1张同名卡超量召唤。
---主要阶段才能发动。只用自己场上1只融合怪兽为素材，从额外卡组把1张同名卡融合召唤。
---主要阶段才能发动。只用自己场上1只同调怪兽为素材，从额外卡组把1张同名卡同调召唤。
-
-CUNGUI = {}
-CUNGUI.RuleCardCode=1295111
-
-EFFECT_FLAG_NO_TURN_RESET = 0
-EFFECT_COUNT_CODE_DUEL = 0
-local scl = Effect.SetCountLimit
-Effect.SetCountLimit = function(e,limit)
-	return scl(e,limit)
-end
-
-function Auxiliary.PreloadUds()
-	--adjust
-	local e1=Effect.GlobalEffect()
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-	e1:SetCode(EVENT_ADJUST)
-	e1:SetOperation(CUNGUI.AdjustOperation)
-	Duel.RegisterEffect(e1,0)
-end
-function CUNGUI.AdjustOperation()
-	if not CUNGUI.RandomSeedInit then
-		CUNGUI.RandomSeedInit = true
-		Duel.LoadScript("random.lua")
-		math.randomseed(_G.RANDOMSEED)
-		for i=1,10 do math.random(1000) end
-	end
-	if not CUNGUI.RuleCardInit then
-		CUNGUI.RuleCardInit = true
-		CUNGUI.RegisterCardRule(0)
-		CUNGUI.RegisterCardRule(1)
-	end
-	if CUNGUI.RuleCard[0] and (not CUNGUI.RuleCard[0]:IsLocation(LOCATION_REMOVED) or not CUNGUI.RuleCard[0]:IsFaceup()) then
-		Duel.Remove(CUNGUI.RuleCard[0],POS_FACEUP,REASON_RULE)
-	end
-	if CUNGUI.RuleCard[1] and (not CUNGUI.RuleCard[1]:IsLocation(LOCATION_REMOVED) or not CUNGUI.RuleCard[1]:IsFaceup()) then
-		Duel.Remove(CUNGUI.RuleCard[1],POS_FACEUP,REASON_RULE)
-	end
-	if CUNGUI.RuleCard[0] and not CUNGUI.RuleCard[0]:IsFaceup() then
-		Duel.ChangePosition(CUNGUI.RuleCard[0],POS_FACEUP)
-	end
-	if CUNGUI.RuleCard[1] and not CUNGUI.RuleCard[1]:IsFaceup() then
-		Duel.ChangePosition(CUNGUI.RuleCard[1],POS_FACEUP)
-	end
-end
-
-CUNGUI.RuleCard={}
-
-function CUNGUI.RegisterCardRule(tp)
-	local g=Duel.GetFieldGroup(tp,LOCATION_EXTRA,0)
-	for mc in aux.Next(g) do
-		local nc=Duel.CreateToken(tp,mc:GetOriginalCode())
-		Duel.SendtoDeck(nc,nil,0,REASON_RULE)
-	end
-	local c=Duel.CreateToken(tp,CUNGUI.RuleCardCode)
-	Duel.Remove(c,POS_FACEUP,REASON_RULE)
-	CUNGUI.RuleCard[tp]=c
-	--synchro
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(50091196,1)) --同调召唤
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_NEGATE+EFFECT_FLAG_CANNOT_DISABLE)
-	e1:SetRange(LOCATION_REMOVED)
-	e1:SetTarget(CUNGUI.ruletg_synchro)
-	e1:SetOperation(CUNGUI.ruleop_synchro)
-	c:RegisterEffect(e1)
-	e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(5352328,1)) --超量召唤
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_NEGATE+EFFECT_FLAG_CANNOT_DISABLE)
-	e1:SetRange(LOCATION_REMOVED)
-	e1:SetTarget(CUNGUI.ruletg_xyz)
-	e1:SetOperation(CUNGUI.ruleop_xyz)
-	c:RegisterEffect(e1)
-	e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(65741786,0)) --连接召唤
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_NEGATE+EFFECT_FLAG_CANNOT_DISABLE)
-	e1:SetRange(LOCATION_REMOVED)
-	e1:SetTarget(CUNGUI.ruletg_link)
-	e1:SetOperation(CUNGUI.ruleop_link)
-	c:RegisterEffect(e1)
-	e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(1264319,0))--融合召唤
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_NEGATE+EFFECT_FLAG_CANNOT_DISABLE)
-	e1:SetRange(LOCATION_REMOVED)
-	e1:SetTarget(CUNGUI.ruletg_fusion)
-	e1:SetOperation(CUNGUI.ruleop_fusion)
-end
-function CUNGUI.rule_syncfilter2(c,cc,tp)
-	return c:IsCanBeSynchroMaterial(cc) and Duel.GetLocationCountFromEx(tp,tp,c,cc)
-end
-
-function CUNGUI.rule_syncfilter(c,e,tp)
-	return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
-		and Duel.IsExistingMatchingCard(CUNGUI.rule_syncfilter2,tp,LOCATION_MZONE,0,1,nil,c,tp)
-end
-
-function CUNGUI.ruletg_synchro(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(CUNGUI.rule_syncfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function CUNGUI.ruleop_synchro(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(CUNGUI.rule_syncfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
-	if #g>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local tc=g:Select(tp,1,1,nil):GetFirst()
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL)
-		local sg2=Duel.SelectMatchingCard(tp,CUNGUI.rule_syncfilter2,tp,LOCATION_MZONE,0,1,1,nil,tc,tp)
-		Duel.SynchroSummon(tp,tc,nil,sg2)
-	end
-end
-function CUNGUI.rule_xyzfilter2(c,cc,tp)
-	return c:IsCanBeXyzMaterial(cc) and Duel.GetLocationCountFromEx(tp,tp,c,cc)
-end
-
-function CUNGUI.rule_xyzfilter(c,e,tp)
-	return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false)
-		and Duel.IsExistingMatchingCard(CUNGUI.rule_xyzfilter2,tp,LOCATION_MZONE,0,1,nil,c,tp)
-end
-
-function CUNGUI.ruletg_xyz(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(CUNGUI.rule_xyzfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function CUNGUI.ruleop_xyz(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(CUNGUI.rule_xyzfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
-	if #g>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local tc=g:Select(tp,1,1,nil):GetFirst()
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
-		local sg2=Duel.SelectMatchingCard(tp,CUNGUI.rule_xyzfilter2,tp,LOCATION_MZONE,0,1,1,nil,tc,tp)
-		Duel.XyzSummon(tp,tc,sg2)
-	end
-end
-function CUNGUI.rule_linkfilter2(c,cc,tp)
-	return c:IsCanBeLinkMaterial(cc) and Duel.GetLocationCountFromEx(tp,tp,c,cc)
-end
-function CUNGUI.rule_linkfilter(c,e,tp)
-	return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_LINK,tp,false,false)
-		and Duel.IsExistingMatchingCard(CUNGUI.rule_linkfilter2,tp,LOCATION_MZONE,0,1,nil,c,tp)
-end
-function CUNGUI.ruletg_link(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(CUNGUI.rule_linkfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function CUNGUI.ruleop_link(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(CUNGUI.rule_linkfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
-	if #g>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local tc=g:Select(tp,1,1,nil):GetFirst()
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_LMATERIAL)
-		local sg2=Duel.SelectMatchingCard(tp,CUNGUI.rule_linkfilter2,tp,LOCATION_MZONE,0,1,1,nil,tc,tp)
-		Duel.LinkSummon(tp,tc,sg2)
-	end
-end
-function CUNGUI.rule_fusionfilter2(c,cc,tp)
-	return c:IsCanBeLinkMaterial(cc) and Duel.GetLocationCountFromEx(tp,tp,c,cc)
-end
-function CUNGUI.rule_fusionfilter(c,e,tp)
-	return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false)
-		and Duel.IsExistingMatchingCard(CUNGUI.rule_fusionfilter2,tp,LOCATION_MZONE,0,1,nil,c,tp)
-end
-function CUNGUI.ruletg_fusion(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(CUNGUI.rule_fusionfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function CUNGUI.ruleop_fusion(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(CUNGUI.rule_fusionfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
-	if #g>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local tc=g:Select(tp,1,1,nil):GetFirst()
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_LMATERIAL)
-		local sg2=Duel.SelectMatchingCard(tp,CUNGUI.rule_fusionfilter2,tp,LOCATION_MZONE,0,1,1,nil,tc,tp)
-		Duel.SendtoGrave(sg2,REASON_EFFECT)
-		Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
-	end
-end
\ No newline at end of file