fix

script/c12744567.lua

@@ -47,11 +47,11 @@ function c12744567.operation(e,tp,eg,ep,ev,re,r,rp)
 end
 function c12744567.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsReason(REASON_DESTROY) and e:GetHandler():GetOverlayCount()>0
-		and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,48739166)
 end
 function c12744567.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
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
+		and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,48739166) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 	local rec=e:GetHandler():GetBaseAttack()
 	Duel.SetTargetPlayer(tp)
@@ -59,6 +59,7 @@ function c12744567.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec)
 end
 function c12744567.spop(e,tp,eg,ep,ev,re,r,rp)
+	if not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,48739166) then return end
 	local c=e:GetHandler()
 	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
 		local e1=Effect.CreateEffect(c)

script/c15552258.lua

@@ -22,6 +22,7 @@ function c15552258.activate(e,tp,eg,ep,ev,re,r,rp)
 	end
 	if opt==1 then
 		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE,1)
+		return
 	end
 	local tc=g:GetFirst()
 	while tc do

script/c24701235.lua

@@ -89,15 +89,15 @@ function c24701235.cfilter(c)
 end
 function c24701235.condition(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_RETURN)
-		and Duel.IsExistingMatchingCard(c24701235.cfilter,tp,LOCATION_MZONE,0,1,nil)
 end
 function c24701235.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	if chk==0 then return Duel.IsExistingMatchingCard(c24701235.cfilter,tp,LOCATION_MZONE,0,1,nil) end
 	Duel.SetTargetPlayer(tp)
 	Duel.SetTargetParam(1)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
 end
 function c24701235.operation(e,tp,eg,ep,ev,re,r,rp)
+	if not Duel.IsExistingMatchingCard(c24701235.cfilter,tp,LOCATION_MZONE,0,1,nil) then return end
 	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
 	Duel.Draw(p,d,REASON_EFFECT)
 end

script/c24861088.lua

@@ -6,6 +6,7 @@ function c24861088.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetCost(c24861088.cost)
 	e1:SetTarget(c24861088.target)
 	e1:SetOperation(c24861088.operation)
 	c:RegisterEffect(e1)
@@ -34,6 +35,10 @@ function c24861088.checkop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.RegisterFlagEffect(rp,24861088,RESET_PHASE+PHASE_END,0,1)
 	end
 end
+function c24861088.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFlagEffect(tp,24861088)==0 end
+	Duel.RegisterFlagEffect(tp,24861088,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
+end
 function c24861088.filter(c)
 	return c:IsSetCard(0x70) and not c:IsCode(24861088) and c:IsAbleToHand()
 end

script/c25700114.lua

@@ -13,7 +13,7 @@ function c25700114.initial_effect(c)
 	e2:SetDescription(aux.Stringid(25700114,0))
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_TO_GRAVE)
 	e2:SetCondition(c25700114.thcon)
 	e2:SetTarget(c25700114.thtg)

script/c26822796.lua

@@ -31,14 +31,14 @@ function c26822796.activate(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 		e1:SetCode(EFFECT_DISABLE)
-		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
+		e1:SetReset(RESET_EVENT+0x1fe0000)
 		tc:RegisterEffect(e1)
 		local e2=Effect.CreateEffect(c)
 		e2:SetType(EFFECT_TYPE_SINGLE)
 		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 		e2:SetCode(EFFECT_DISABLE_EFFECT)
 		e2:SetValue(RESET_TURN_SET)
-		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
+		e2:SetReset(RESET_EVENT+0x1fe0000)
 		tc:RegisterEffect(e2)
 		local e3=Effect.CreateEffect(c)
 		e3:SetType(EFFECT_TYPE_SINGLE)
@@ -46,7 +46,7 @@ function c26822796.activate(e,tp,eg,ep,ev,re,r,rp)
 		e3:SetRange(LOCATION_MZONE)
 		e3:SetCode(EFFECT_IMMUNE_EFFECT)
 		e3:SetValue(1)
-		e3:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		e3:SetReset(RESET_EVENT+0x1fe0000)
 		tc:RegisterEffect(e3)
 	end
 end

script/c2830693.lua

@@ -37,9 +37,9 @@ function c2830693.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	Duel.SetTargetCard(at)
 end
 function c2830693.eqop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
 	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
-	local tc=c:GetBattleTarget()
+	local c=e:GetHandler()
+	local tc=Duel.GetAttacker()
 	if c:IsRelateToEffect(e) and tc:IsFaceup() and tc:IsRelateToBattle() then
 		Duel.Equip(tp,c,tc,true)
 		--Add Equip limit

script/c31467372.lua

@@ -26,7 +26,7 @@ function c31467372.damcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c31467372.filter,1,nil,tp)
 end
 function c31467372.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	if chk==0 then return not e:GetHandler():IsStatus(STATUS_CHAINING) end
 	Duel.SetTargetPlayer(1-tp)
 	Duel.SetTargetParam(800)
 	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800)

script/c37055344.lua

@@ -4,17 +4,19 @@ function c37055344.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c37055344.target1)
+	e1:SetOperation(c37055344.operation)
 	c:RegisterEffect(e1)
 	--pos
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(37055344,0))
 	e2:SetCategory(CATEGORY_POSITION)
-	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
 	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e2:SetRange(LOCATION_SZONE)
-	e2:SetCountLimit(1)
+	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetCondition(c37055344.condition)
-	e2:SetTarget(c37055344.target)
+	e2:SetTarget(c37055344.target2)
 	e2:SetOperation(c37055344.operation)
 	c:RegisterEffect(e2)
 end
@@ -33,15 +35,50 @@ end
 function c37055344.filter4(c)
 	return c:IsFaceup() and c:IsCanTurnSet()
 end
-function c37055344.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function c37055344.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then
 		if e:GetLabel()==0 then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c37055344.filter1(chkc)
 		else return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c37055344.filter3(chkc) end
 	end
+	if chk==0 then return true end
 	local b1=Duel.IsExistingTarget(c37055344.filter1,tp,LOCATION_MZONE,0,1,nil)
 		and Duel.IsExistingMatchingCard(c37055344.filter2,tp,0,LOCATION_MZONE,1,nil)
 	local b2=Duel.IsExistingTarget(c37055344.filter3,tp,LOCATION_MZONE,0,1,nil)
-	if chk==0 then return b1 or b2 end
+	if Duel.GetCurrentPhase()==PHASE_BATTLE
+		and (b1 or b2) and Duel.SelectYesNo(tp,aux.Stringid(37055344,3)) then
+		local op=0
+		if b1 and b2 then
+			op=Duel.SelectOption(tp,aux.Stringid(37055344,1),aux.Stringid(37055344,2))
+		elseif b1 then
+			op=Duel.SelectOption(tp,aux.Stringid(37055344,1))
+		else
+			op=Duel.SelectOption(tp,aux.Stringid(37055344,2))+1
+		end
+		e:SetLabel(op)
+		if op==0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+			local g=Duel.SelectTarget(tp,c37055344.filter1,tp,LOCATION_MZONE,0,1,1,nil)
+			Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
+		else
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEDOWNDEFENCE)
+			local g=Duel.SelectTarget(tp,c37055344.filter3,tp,LOCATION_MZONE,0,1,1,nil)
+			Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
+		end
+		e:GetHandler():RegisterFlagEffect(37055344,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
+		e:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	else
+		e:SetProperty(0)
+	end
+end
+function c37055344.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then
+		if e:GetLabel()==0 then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c37055344.filter1(chkc)
+		else return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c37055344.filter3(chkc) end
+	end
+	local b1=Duel.IsExistingTarget(c37055344.filter1,tp,LOCATION_MZONE,0,1,nil)
+		and Duel.IsExistingMatchingCard(c37055344.filter2,tp,0,LOCATION_MZONE,1,nil)
+	local b2=Duel.IsExistingTarget(c37055344.filter3,tp,LOCATION_MZONE,0,1,nil)
+	if chk==0 then return (b1 or b2) and e:GetHandler():GetFlagEffect(37055344)==0 end
 	local op=0
 	if b1 and b2 then
 		op=Duel.SelectOption(tp,aux.Stringid(37055344,1),aux.Stringid(37055344,2))
@@ -60,9 +97,10 @@ function c37055344.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 		local g=Duel.SelectTarget(tp,c37055344.filter3,tp,LOCATION_MZONE,0,1,1,nil)
 		Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
 	end
+	e:GetHandler():RegisterFlagEffect(37055344,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
 end
 function c37055344.operation(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
+	if e:GetHandler():GetFlagEffect(37055344)==0 or not e:GetHandler():IsRelateToEffect(e) then return end
 	local tc=Duel.GetFirstTarget()
 	if e:GetLabel()==0 then
 		if not tc:IsRelateToEffect(e) or tc:IsFacedown() then return end

script/c37829468.lua

@@ -10,14 +10,16 @@ function c37829468.initial_effect(c)
 	e1:SetTarget(c37829468.atktg)
 	e1:SetValue(c37829468.atkval)
 	c:RegisterEffect(e1)
-	--lv change
+	--destroy
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(37829468,0))
 	e2:SetCategory(CATEGORY_DESTROY)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1)
 	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_REPEAT)
+	e2:SetCondition(c37829468.descon)
 	e2:SetTarget(c37829468.destg)
 	e2:SetOperation(c37829468.desop)
 	c:RegisterEffect(e2)
@@ -28,6 +30,9 @@ end
 function c37829468.atkval(e,c)
 	return Duel.GetMatchingGroupCount(Card.IsAttribute,e:GetHandlerPlayer(),LOCATION_GRAVE,0,nil,ATTRIBUTE_LIGHT)*100
 end
+function c37829468.descon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
 function c37829468.filter(c)
 	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsDestructable()
 end
@@ -40,7 +45,7 @@ function c37829468.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 end
 function c37829468.desop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
-	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
+	if tc and tc:IsFaceup() and tc:IsRelateToEffect(e) then
 		Duel.Destroy(tc,REASON_EFFECT)
 	end
 end

script/c43366227.lua

@@ -39,7 +39,7 @@ function c43366227.initial_effect(c)
 	c:RegisterEffect(e3)
 end
 function c43366227.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	if chk==0 then return not e:GetHandler():IsStatus(STATUS_CHAINING) end
 	Duel.SetTargetPlayer(1-tp)
 	Duel.SetTargetParam(800)
 	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800)

script/c43748308.lua

@@ -5,7 +5,7 @@ function c43748308.initial_effect(c)
 	e1:SetDescription(aux.Stringid(43748308,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_CHAIN_SOLVING)
-	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1)
 	e1:SetCondition(c43748308.setcon)
@@ -34,7 +34,7 @@ function c43748308.filter(c)
 end
 function c43748308.settg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsRelateToEffect(e) and e:GetHandler():IsFaceup()
-		and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and not e:GetHandler():IsStatus(STATUS_CHAINING) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
 		and Duel.IsExistingMatchingCard(c43748308.filter,tp,LOCATION_DECK,0,1,nil) end
 end
 function c43748308.setop(e,tp,eg,ep,ev,re,r,rp)

script/c46772449.lua

@@ -40,7 +40,8 @@ function c46772449.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.RegisterEffect(e1,tp)
 end
 function c46772449.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
+	if chk==0 then return not e:GetHandler():IsStatus(STATUS_CHAINING)
+		and Duel.IsExistingMatchingCard(Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
 	local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler())
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
 end

script/c48115277.lua

@@ -14,7 +14,6 @@ function c48115277.initial_effect(c)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetCost(c48115277.spcost)
 	e2:SetTarget(c48115277.sptg)
 	e2:SetOperation(c48115277.spop)

script/c5037726.lua

@@ -16,23 +16,23 @@ function c5037726.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsAttribute,1,nil,ATTRIBUTE_LIGHT) end
 	local g=Duel.SelectReleaseGroup(tp,Card.IsAttribute,1,1,nil,ATTRIBUTE_LIGHT)
 	Duel.Release(g,REASON_COST)
-	e:SetLabelObject(g:GetFirst())
 end
 function c5037726.filter(c,e,tp)
 	return c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function c5037726.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and c5037726.filter(chkc,e,tp) end
-	if chk==0 then 
+	if chk==0 then
 		if e:GetLabel()==1 then
 			e:SetLabel(0)
 			return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
-			and Duel.IsExistingTarget(c5037726.filter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil,e,tp)
-		else 
+				and Duel.IsExistingTarget(c5037726.filter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil,e,tp)
+		else
 			return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-			and Duel.IsExistingTarget(c5037726.filter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil,e,tp)
+				and Duel.IsExistingTarget(c5037726.filter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil,e,tp)
 		end
 	end
+	e:SetLabel(0)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectTarget(tp,c5037726.filter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,nil,e,tp)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)

script/c50474354.lua

@@ -46,7 +46,7 @@ function c50474354.aclimit(e,re,tp)
 	return not re:GetHandler():IsSetCard(0x88)
 end
 function c50474354.filter(c)
-	return c:IsSetCard(0x88) and c:IsAbleToHand()
+	return c:IsSetCard(0x88) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
 function c50474354.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c50474354.filter,tp,LOCATION_DECK,0,1,nil) end

script/c59048135.lua

@@ -43,8 +43,8 @@ function c59048135.checkop(e,tp,eg,ep,ev,re,r,rp)
 		end
 		tc=eg:GetNext()
 	end
-	if p1 then Duel.RegisterFlagEffect(0,64319467,RESET_PHASE+PHASE_END,0,1) end
-	if p2 then Duel.RegisterFlagEffect(1,64319467,RESET_PHASE+PHASE_END,0,1) end
+	if p1 then Duel.RegisterFlagEffect(0,59048135,RESET_PHASE+PHASE_END,0,1) end
+	if p2 then Duel.RegisterFlagEffect(1,59048135,RESET_PHASE+PHASE_END,0,1) end
 end
 function c59048135.etarget(e,c)
 	return c:IsRace(RACE_PSYCHO) and c:IsType(TYPE_XYZ)

script/c59951714.lua

@@ -8,9 +8,8 @@ function c59951714.initial_effect(c)
 	c:RegisterEffect(e1)
 	--spsummon
 	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_SUMMON_SUCCESS)
-	e2:SetRange(LOCATION_GRAVE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_BE_MATERIAL)
 	e2:SetOperation(c59951714.spr)
 	c:RegisterEffect(e2)
 	local e3=Effect.CreateEffect(c)
@@ -48,7 +47,7 @@ function c59951714.checkop(e,tp,eg,ep,ev,re,r,rp)
 end
 function c59951714.spr(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsReason(REASON_SUMMON) and c:GetReasonCard()==eg:GetFirst() then
+	if r==REASON_SUMMON then
 		c:RegisterFlagEffect(59951714,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,0,1)
 	end
 end

script/c62188962.lua

@@ -45,7 +45,7 @@ function c62188962.filter(c)
 end
 function c62188962.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and c62188962.filter(chkc) end
-	if chk==0 then return e:GetHandler():IsRelateToEffect(e) end
+	if chk==0 then return e:GetHandler():IsRelateToEffect(e) and not e:GetHandler():IsStatus(STATUS_CHAINING) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local g=Duel.SelectTarget(tp,c62188962.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND+LOCATION_DECK)

script/c63049052.lua

@@ -42,7 +42,8 @@ function c63049052.operation(e,tp,eg,ep,ev,re,r,rp)
 		--material
 		local e2=Effect.CreateEffect(c)
 		e2:SetDescription(aux.Stringid(63049052,0))
-		e2:SetType(EFFECT_TYPE_IGNITION)
+		e2:SetType(EFFECT_TYPE_QUICK_O)
+		e2:SetCode(EVENT_FREE_CHAIN)
 		e2:SetRange(LOCATION_SZONE)
 		e2:SetCountLimit(1)
 		e2:SetTarget(c63049052.mattg)

script/c63257623.lua

@@ -69,7 +69,8 @@ function c63257623.filter(c,e,tp)
 end
 function c63257623.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c63257623.filter(chkc,e,tp) end
-	if chk==0 then return Duel.IsExistingTarget(c63257623.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c63257623.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectTarget(tp,c63257623.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)

script/c64161630.lua

@@ -20,44 +20,41 @@ function c64161630.filter(c,rk,rc,e,tp)
 		and c:GetRank()==rk and c:IsRace(rc) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function c64161630.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	e:SetLabel(1)
+	e:SetLabel(100)
 	if chk==0 then return Duel.CheckReleaseGroup(tp,c64161630.cfilter,1,nil,e,tp) end
 	local g=Duel.SelectReleaseGroup(tp,c64161630.cfilter,1,1,nil,e,tp)
+	e:SetLabel(g:GetFirst():GetRank())
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetLabel(g:GetFirst():GetRace())
+	Duel.RegisterEffect(e1,tp)
+	e:SetLabelObject(e1)
 	Duel.Release(g,REASON_COST)
-	e:SetLabelObject(g:GetFirst())
 end
 function c64161630.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then
-		if e:GetLabel()~=1 then return false end
+		if e:GetLabel()~=100 then return false end
 		e:SetLabel(0)
 		return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
 	end
-	e:SetLabel(0)
 end
 function c64161630.activate(e,tp,eg,ep,ev,re,r,rp)
-	local tc=e:GetLabelObject()
 	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetDescription(aux.Stringid(64161630,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
 	e1:SetCountLimit(1)
-	e1:SetTarget(c64161630.sptg)
 	e1:SetOperation(c64161630.spop)
-	e1:SetLabelObject(tc)
 	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetLabel(e:GetLabel())
+	e1:SetLabelObject(e:GetLabelObject())
 	Duel.RegisterEffect(e1,tp)
-	tc:CreateEffectRelation(e1)
-end
-function c64161630.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 end
 function c64161630.spop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,0,64161630)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	local tc=e:GetLabelObject()
-	if not tc:IsRelateToEffect(e) then return end
+	local rk=e:GetLabel()
+	local rc=e:GetLabelObject():GetLabel()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c64161630.filter,tp,LOCATION_EXTRA,0,1,1,nil,tc:GetRace()-1,tc:GetRace(),e,tp)
+	local g=Duel.SelectMatchingCard(tp,c64161630.filter,tp,LOCATION_EXTRA,0,1,1,nil,rk-1,rc,e,tp)
 	Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 end

script/c65384188.lua

@@ -24,7 +24,23 @@ end
 function c65384188.activate(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local tc1,tc2=Duel.GetFirstTarget()
-	if tc1:IsRelateToEffect(e) and tc2:IsRelateToEffect(e) then
+	if tc1:IsRelateToEffect(e) and tc1:IsFaceup() and tc2:IsRelateToEffect(e) and tc2:IsFaceup() then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_DISABLE)
+		e1:SetReset(RESET_EVENT+0x1fe0000)
+		tc1:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_DISABLE_EFFECT)
+		e2:SetReset(RESET_EVENT+0x1fe0000)
+		tc1:RegisterEffect(e2)
+		local e3=e1:Clone()
+		tc2:RegisterEffect(e3)
+		local e4=e2:Clone()
+		tc2:RegisterEffect(e4)
+		if tc1:IsDefencePos() or tc2:IsDefencePos() then return end
+		Duel.BreakEffect()
 		c65384188.reg(c,tc1,tc2)
 		c65384188.reg(c,tc2,tc1)
 	end

script/c73289035.lua

@@ -44,8 +44,10 @@ function c73289035.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function c73289035.operation(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
-	Duel.SendtoGrave(g,REASON_EFFECT)
-	Duel.Draw(tp,2,REASON_EFFECT)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+		Duel.Draw(tp,2,REASON_EFFECT)
+	end
 end
 function c73289035.checkop(e,tp,eg,ep,ev,re,r,rp)
 	local ct=e:GetHandler():GetOverlayCount()

script/c7617062.lua

@@ -41,25 +41,13 @@ function c7617062.operation(e,tp,eg,ep,ev,re,r,rp)
 	local tc=eg:GetFirst()
 	if tc:IsRelateToBattle() and tc:IsFaceup() and tc:IsCanTurnSet() then
 		local e1=Effect.CreateEffect(c)
-		e1:SetDescription(aux.Stringid(7617062,0))
-		e1:SetCategory(CATEGORY_POSITION)
-		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+		e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
 		e1:SetCode(EVENT_DAMAGE_STEP_END)
-		e1:SetRange(LOCATION_SZONE)
-		e1:SetTarget(c7617062.postg)
 		e1:SetOperation(c7617062.posop)
-		e1:SetLabelObject(tc)
 		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_DAMAGE)
-		c:RegisterEffect(e1)
+		tc:RegisterEffect(e1)
 	end
 end
-function c7617062.postg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetLabelObject():IsRelateToBattle() end
-end
 function c7617062.posop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	local tc=e:GetLabelObject()
-	if tc:IsRelateToBattle() and tc:IsFaceup() then
-		Duel.ChangePosition(tc,POS_FACEDOWN_DEFENCE)
-	end
+	Duel.ChangePosition(e:GetHandler(),POS_FACEDOWN_DEFENCE)
 end

script/c83715234.lua

@@ -11,7 +11,7 @@ function c83715234.initial_effect(c)
 	e2:SetCategory(CATEGORY_DESTROY)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_CHANGE_POS)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1)
 	e2:SetCondition(c83715234.descon)
@@ -32,7 +32,7 @@ function c83715234.desfilter(c)
 end
 function c83715234.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and c83715234.desfilter(chkc) end
-	if chk==0 then return e:GetHandler():IsRelateToEffect(e)
+	if chk==0 then return e:GetHandler():IsRelateToEffect(e) and not e:GetHandler():IsStatus(STATUS_CHAINING)
 		and Duel.IsExistingTarget(c83715234.desfilter,tp,0,LOCATION_ONFIELD,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local g=Duel.SelectTarget(tp,c83715234.desfilter,tp,0,LOCATION_ONFIELD,1,1,nil)

script/c84401683.lua

@@ -9,10 +9,12 @@ function c84401683.initial_effect(c)
 	e1:SetCategory(CATEGORY_DISABLE)
 	e1:SetType(EFFECT_TYPE_QUICK_O)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetHintTiming(0,0x1c0)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1)
+	e1:SetHintTiming(TIMING_DAMAGE_STEP)
+	e1:SetCondition(c84401683.negcon)
 	e1:SetCost(c84401683.negcost)
 	e1:SetTarget(c84401683.negtg)
 	e1:SetOperation(c84401683.negop)
@@ -29,6 +31,9 @@ function c84401683.initial_effect(c)
 	e2:SetOperation(c84401683.desop)
 	c:RegisterEffect(e2)
 end
+function c84401683.negcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()~=PHASE_DAMAGE or not Duel.IsDamageCalculated()
+end
 function c84401683.negcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)

script/c86062400.lua

@@ -25,7 +25,7 @@ end
 function c86062400.tgcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local bc=c:GetBattleTarget()
-	return c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE) and rp~=tp
+	return c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE)
 		and bc:IsFaceup() and bc:IsRelateToBattle() and bc:IsType(TYPE_XYZ)
 end
 function c86062400.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)

script/c8632967.lua

@@ -11,14 +11,12 @@ function c8632967.initial_effect(c)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetOperation(c8632967.sucop)
-	e2:SetReset(RESET_PHASE+PHASE_END)
 	c:RegisterEffect(e2)
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e3:SetRange(LOCATION_SZONE)
 	e3:SetCode(EVENT_CHAIN_END)
 	e3:SetOperation(c8632967.cedop)
-	e3:SetReset(RESET_PHASE+PHASE_END)
 	e3:SetLabelObject(e2)
 	c:RegisterEffect(e3)
 end
@@ -27,7 +25,7 @@ function c8632967.chainlm(e,rp,tp)
 end
 function c8632967.sucfilter(c)
 	local st=c:GetSummonType()
-	return c:IsSetCard(0x604e) and st>=(SUMMON_TYPE_SPECIAL+150) and st<(SUMMON_TYPE_SPECIAL+180)
+	return c:IsSetCard(0x304e) and st>=(SUMMON_TYPE_SPECIAL+150) and st<(SUMMON_TYPE_SPECIAL+180)
 end
 function c8632967.sucop(e,tp,eg,ep,ev,re,r,rp)
 	if eg:IsExists(c8632967.sucfilter,1,nil) then

script/c91650245.lua

@@ -35,14 +35,10 @@ function c91650245.activate(e,tp,eg,ep,ev,re,r,rp)
 		if sc then
 			Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
 			local e1=Effect.CreateEffect(e:GetHandler())
-			e1:SetDescription(aux.Stringid(91650245,2))
-			e1:SetCategory(CATEGORY_TOGRAVE)
-			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 			e1:SetRange(LOCATION_MZONE)
-			e1:SetProperty(EFFECT_FLAG_REPEAT)
 			e1:SetCountLimit(1)
 			e1:SetCode(EVENT_PHASE+PHASE_END)
-			e1:SetTarget(c91650245.tdtg)
 			e1:SetOperation(c91650245.tdop)
 			e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
 			sc:RegisterEffect(e1)
@@ -57,18 +53,12 @@ function c91650245.activate(e,tp,eg,ep,ev,re,r,rp)
 		end
 	end
 end
-function c91650245.tdtg(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 c91650245.tdop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) then
-		if c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
-			or Duel.SelectOption(tp,aux.Stringid(91650245,0),aux.Stringid(91650245,1))==0 then
-			Duel.SendtoDeck(c,nil,0,REASON_EFFECT)
-		else
-			Duel.SendtoDeck(c,nil,1,REASON_EFFECT)
-		end
+	if c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
+		or Duel.SelectOption(tp,aux.Stringid(91650245,0),aux.Stringid(91650245,1))==0 then
+		Duel.SendtoDeck(c,nil,0,REASON_EFFECT)
+	else
+		Duel.SendtoDeck(c,nil,1,REASON_EFFECT)
 	end
 end