fix

expansions/script/c12400131.lua

@@ -71,7 +71,7 @@ function s.initial_effect(c)
 	e8:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e8:SetCode(EVENT_PHASE+PHASE_END)
-	e8:SetRange(LOCATION_MZONE)
+	e8:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
 	e8:SetCountLimit(1)
 	e8:SetCost(s.spcost8)
 	e8:SetTarget(s.sptg8)
@@ -148,7 +148,7 @@ end
 function s.spop(e,tp,eg,ep,ev,re,r,rp)
 	local ss=Duel.GetLocationCount(tp,LOCATION_MZONE)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	if ss>2 then ss=2 end 
+	if ss>3 then ss=2 end 
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
 	local g=Duel.SelectMatchingCard(tp,s.filter,tp,0,LOCATION_MZONE,1,ss,nil)
 		if  Duel.GetControl(g,tp,0,0)~=ss then

expansions/script/c18017216.lua

 --黄金炼成 亚当
 local s,id,o=GetID()
 function s.initial_effect(c)
-	aux.AddSynchroMixProcedure(c,aux.Tuner(nil),nil,nil,aux.TRUE,1,99)
+	aux.AddSynchroMixProcedure(c,aux.TRUE,nil,nil,aux.Tuner(nil),1,99)
 	c:EnableReviveLimit()
 	aux.EnablePendulumAttribute(c)
 	local e1=Effect.CreateEffect(c)

expansions/script/c18700208.lua

@@ -2,7 +2,7 @@
 local cm,m,o=GetID()
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
-	aux.AddXyzProcedure(c,nil,8,2,cm.ovfilter,aux.Stringid(m,0),1,cm.xyzop)	
+	aux.AddXyzProcedure(c,nil,8,2,cm.ovfilter,aux.Stringid(m,0),2,cm.xyzop)	
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,1))
 	e1:SetType(EFFECT_TYPE_QUICK_O)

expansions/script/c18700781.lua

@@ -21,7 +21,6 @@ function cm.initial_effect(c)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1,m+1)
-	e2:SetCost(cm.thcost)
 	e2:SetTarget(cm.thtg)
 	e2:SetOperation(cm.thop)
 	c:RegisterEffect(e2)
@@ -79,13 +78,6 @@ end
 function cm.tfilter(c,tp)
 	return c:IsSetCard(0x829) and c:IsType(TYPE_MONSTER) and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil,c)
 end
-function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(cm.tfilter,tp,LOCATION_HAND,0,1,nil,tp) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
-	local g=Duel.SelectMatchingCard(tp,cm.tfilter,tp,LOCATION_HAND,0,1,1,nil,tp)
-	Duel.ConfirmCards(1-tp,g)
-	e:SetLabelObject(g:GetFirst())
-end
 function cm.thfilter(c,tc)
 	return c:IsSetCard(0x829) and c:IsType(TYPE_MONSTER)
 		and c:IsAbleToHand()
@@ -93,11 +85,15 @@ function cm.thfilter(c,tc)
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.tfilter,tp,LOCATION_HAND,0,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
+	local g=Duel.SelectMatchingCard(tp,cm.tfilter,tp,LOCATION_HAND,0,1,1,nil,tp)
+	Duel.ConfirmCards(1-tp,g)
+	e:SetLabelObject(g:GetFirst())
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local tcode=e:GetLabelObject()
+	local tc=e:GetLabelObject()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local sg=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil,tc)
 	if #sg>0 then

expansions/script/c18700804.lua

@@ -178,7 +178,7 @@ function cm.atkcon5(e,tp,eg,ep,ev,re,r,rp)
 	return (re:GetHandler():GetOriginalCode()==m+2 or re:GetHandler():IsCode(m+2)) and re:GetHandler():IsControler(tp)
 end
 function cm.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,18700807,0,TYPES_TOKEN_MONSTER,2800,2800,8,RACE_WARRIOR,ATTRIBUTE_LIGHT) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,18700807,0,TYPES_TOKEN_MONSTER,2420,2400,8,RACE_WARRIOR,ATTRIBUTE_LIGHT) end
 	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end

expansions/script/c18700866.lua

@@ -6,6 +6,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetCountLimit(1,m)
 	e1:SetTarget(cm.thtg)
 	e1:SetOperation(cm.thop)
@@ -29,6 +30,7 @@ function cm.initial_effect(c)
 	e4:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_REMOVE)
+	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCountLimit(1,m+2)
 	e4:SetTarget(cm.tg3)
 	e4:SetOperation(cm.op3)

expansions/script/c18700900.lua

@@ -6,7 +6,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,o)
+	e1:SetCountLimit(1,m)
 	e1:SetTarget(cm.destg)
 	e1:SetOperation(cm.desop)
 	c:RegisterEffect(e1)
@@ -37,7 +37,7 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local g=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,TYPE_MONSTER)
 	if #g>0 then
-		Duel.Destroy(g,REASON_COST)
+		Duel.Destroy(g,REASON_EFFECT)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
 		local tg=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
 		if #tg==0 then return end

expansions/script/c18700903.lua

@@ -19,7 +19,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_DESTROYED)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,m+1+EFFECT_COUNT_CODE_CHAIN)
+	e2:SetCountLimit(1,EFFECT_COUNT_CODE_CHAIN)
 	e2:SetCondition(cm.spcon2)
 	e2:SetCost(cm.spcost)
 	e2:SetTarget(cm.sptg2)

expansions/script/c21113900.lua

@@ -54,12 +54,13 @@ function c21113900.check_or_add_new_limit(add_or_not)
 	end
 	local ag = Duel.GetFieldGroup(0,0xff,0xff)
 	for tc in aux.Next(ag) do
-		if tc:IsHasEffect(tp,EFFECT_CANNOT_TRIGGER) then
+		if tc:IsHasEffect(EFFECT_CANNOT_TRIGGER) then
 			local limit_table = {tc:IsHasEffect(EFFECT_CANNOT_TRIGGER)}
+			Debug.Message(aux.GetValueType(limit_table))
 			for _, limit_effect in ipairs(limit_table) do
-				if c21113900.record_doesnot_contain(record_redirect,limit_effect) then
+				if c21113900.record_doesnot_contain(record_limit_trigger,limit_effect) then
 					if add_or_not then
-						table.insert(record_redirect,limit_effect)
+						table.insert(record_limit_trigger,limit_effect)
 						table.insert(resolve_table,limit_effect)
 					end
 					is_new_limit = true
@@ -158,4 +159,15 @@ function c21113900.op(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetTargetRange(1,0)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e2:SetTarget(c21113900.ssplimit)
+	e2:SetReset(RESET_PHASE+PHASE_END)
+	e2:SetTargetRange(1,0)
+	Duel.RegisterEffect(e2,tp)
+end
+function c21113900.ssplimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return not c:IsSetCard(0xc904)
 end
\ No newline at end of file

expansions/script/c23100159.lua

@@ -19,7 +19,7 @@ s.named_with_ZhanShuRenXing=true
 	c:RegisterEffect(e1)
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_EQUIP)
-	e2:SetCode(EFFECT_UPDATE_ATTACK)
+	e2:SetCode(EFFECT_UPDATE_DEFENSE)
 	e2:SetValue(1000)
 	c:RegisterEffect(e2)
  --
@@ -100,6 +100,31 @@ s.named_with_ZhanShuRenXing=true
 	e11:SetCode(EFFECT_EQUIP_LIMIT)
 	e11:SetValue(1)
 	c:RegisterEffect(e11)
+ --negate
+	local e12=Effect.CreateEffect(c)
+	e12:SetDescription(aux.Stringid(id,1))
+	e12:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+	e12:SetType(EFFECT_TYPE_QUICK_O)
+	e12:SetCode(EVENT_CHAINING)
+	e12:SetCountLimit(1,id)
+	e12:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e12:SetRange(LOCATION_SZONE)
+	e12:SetCondition(s.discon2)
+	e12:SetCost(s.discost2)
+	e12:SetTarget(s.distg2)
+	e12:SetOperation(s.disop2)
+	c:RegisterEffect(e12)
+ -- to hand
+	local e13=Effect.CreateEffect(c)
+	e13:SetCategory(CATEGORY_TOHAND)
+	e13:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e13:SetCode(EVENT_TO_GRAVE)
+	e13:SetProperty(EFFECT_FLAG_DELAY)
+	e13:SetCountLimit(1,id+10000)
+	e13:SetCondition(s.thcon)
+	e13:SetTarget(s.thtg)
+	e13:SetOperation(s.thop)
+	c:RegisterEffect(e13)
 end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
@@ -224,8 +249,48 @@ function s.gyop(e,tp,eg,ep,ev,re,r,rp)
 		ec:RegisterEffect(e1)
 	end
 end
+--
 
-
+function s.discon2(e,tp,eg,ep,ev,re,r,rp)
+	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
+end
+function s.cfilter2(c)
+	if c:IsLocation(LOCATION_ONFIELD) then return c:IsFaceup() and c:IsAbleToGraveAsCost() end
+	return c:IsAbleToRemoveAsCost() and c:IsHasEffect(75646911,tp)
+end
+function s.discost2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+		Duel.SendtoGrave(e:GetHandler(),REASON_COST)   
+end
+function s.distg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+	end
+end
+function s.disop2(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Destroy(eg,REASON_EFFECT)
+	end
+end
+--
+function s.cfilter3(c)
+	return c:IsFaceup() and c:IsCode(23100157)  
+end
+function s.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(s.cfilter3,tp,LOCATION_MZONE,0,1,nil)
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return  e:GetHandler():IsAbleToHand() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		Duel.SendtoHand(c,nil,REASON_EFFECT)
+	end
+end
 
 
 

expansions/script/c30008803.lua

@@ -17,6 +17,7 @@ function cm.initial_effect(c)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
 	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(cm.sprcon)
+	e1:SetTarget(cm.sprtg)
 	e1:SetOperation(cm.sprop)
 	c:RegisterEffect(e1)
 	--search
@@ -48,12 +49,20 @@ end
 function cm.sprcon(e,c)
 	if c==nil then return true end
 	local tp=c:GetControler()
-	return Duel.CheckReleaseGroup(REASON_COST,tp,cm.cfilter,1,nil,tp)
+	return Duel.CheckReleaseGroupEx(tp,cm.cfilter,1,REASON_SPSUMMON,false,nil,tp)
 end
-function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+function cm.sprtg(e,tp,eg,ep,ev,re,r,rp,chk,c)
+	local g=Duel.GetReleaseGroup(tp,false,REASON_SPSUMMON):Filter(cm.cfilter,nil,tp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-	local g=Duel.SelectReleaseGroup(REASON_COST,tp,cm.cfilter,1,1,nil,tp)
-	Duel.Release(g,REASON_COST)
+	local tc=g:SelectUnselect(nil,tp,false,true,1,1)
+	if tc then
+		e:SetLabelObject(tc)
+		return true
+	else return false end
+end
+function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+	local g=e:GetLabelObject()
+	Duel.Release(g,REASON_SPSUMMON)
 end
 function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()

expansions/script/c30008808.lua

@@ -65,12 +65,12 @@ function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	local l=e:GetLabel()==1
 	if chk==0 then
 		e:SetLabel(0)
-		return l and Duel.CheckReleaseGroupEx(REASON_COST,tp,cm.cfilter,1,nil,tp)
+		return l and Duel.CheckReleaseGroupEx(tp,cm.cfilter,1,REASON_COST,true,nil,tp)
 	end
 	if l then
 		e:SetLabel(0)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-		local sg=Duel.SelectReleaseGroupEx(REASON_COST,tp,cm.cfilter,1,1,nil,tp)
+		local sg=Duel.SelectReleaseGroupEx(tp,cm.cfilter,1,1,REASON_COST,true,nil,tp)
 		Duel.Release(sg,REASON_COST)
 	end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)

expansions/script/c60010107.lua

@@ -228,8 +228,8 @@ function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
 		local rg=Duel.GetMatchingGroup(cm.rmfil,tp,LOCATION_EXTRA,0,nil,xlv):Select(tp,1,1,nil)
 		if rg and Duel.Remove(rg,POS_FACEUP,REASON_EFFECT) then
 			local rmvg=Duel.GetOperatedGroup()
-			rmvg:KeepAlive()
 			e:SetLabelObject(rmvg)
+			rmvg:KeepAlive()
 			local code=rmvg:GetFirst():GetCode()
 			local e1=Effect.CreateEffect(c)
 			e1:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c64831002.lua

@@ -7,6 +7,7 @@ function c64831002.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BE_MATERIAL)
 	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,64841002)
 	e1:SetCondition(c64831002.drcon)
 	e1:SetTarget(c64831002.drtg)
 	e1:SetOperation(c64831002.drop)

expansions/script/c75027016.lua

 --耀眼的光龙神 传承神威
 local s,id,o=GetID()
 function s.initial_effect(c)
+	--link summon
 	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,nil,2,2,s.lcheck)
-	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0x75f),2,2)
+	--code
+	aux.EnableChangeCode(c,75027001,LOCATION_MZONE+LOCATION_GRAVE)
 	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e1:SetCode(EFFECT_ADD_CODE)
-	e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
-	e1:SetValue(75027001)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetTarget(s.sptg)
+	e1:SetOperation(s.spop)
 	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1)
-	e2:SetTarget(s.sptg)
-	e2:SetOperation(s.spop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_QUICK_O)
-	e3:SetCode(EVENT_FREE_CHAIN)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,)
-	e3:SetTarget(s.atktg)
-	e3:SetOperation(s.atkop)
-	c:RegisterEffect(e3)
-end
-function s.lcheck(g)
-	return g:IsExists(Card.IsLinkSetCard,1,nil,0x75f)
+	--to hand
 end
-function s.spfilter(c,e,tp)
-	return c:IsCode(75027001) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+function s.spfilter(c,e,tp,zone)
+	return c:IsCode(75027001) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.spfilter(chkc,e,tp) end
+	local zone=bit.band(e:GetHandler():GetLinkedZone(tp),0x1f)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.spfilter(chkc,e,tp,zone) end
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+		and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,zone) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp,zone)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
 end
 function s.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,e:GetHandler():GetLinkedZone(tp))
-	end
-end
-function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsFaceup() end
-	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
-	local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
-end
-function s.atkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) and tc:IsFaceup() then
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
-		e1:SetValue(tc:GetAttack()//2)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
-		e2:SetValue(tc:GetDefense()//2)
-		tc:RegisterEffect(e2)
+	local zone=bit.band(e:GetHandler():GetLinkedZone(tp),0x1f)
+	if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and zone~=0 then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,zone)
 	end
 end
\ No newline at end of file