fix

expansions/script/c50218101.lua

@@ -57,7 +57,7 @@ function c50218101.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218101.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218102.lua

@@ -58,7 +58,7 @@ function c50218102.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218102.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218104.lua

@@ -57,7 +57,7 @@ function c50218104.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218104.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218105.lua

@@ -52,13 +52,12 @@ function c50218105.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function c50218105.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
-		and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
+	if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 		local g=Duel.SelectMatchingCard(tp,c50218105.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218107.lua

@@ -46,7 +46,7 @@ function c50218107.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218107.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218108.lua

@@ -56,7 +56,7 @@ function c50218108.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218108.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218110.lua

@@ -55,7 +55,7 @@ function c50218110.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218110.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218111.lua

@@ -37,7 +37,7 @@ function c50218111.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218111.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218113.lua

@@ -112,7 +112,7 @@ function c50218113.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218113.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218114.lua

@@ -60,7 +60,7 @@ function c50218114.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218114.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218115.lua

@@ -13,7 +13,7 @@ function c50218115.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
 	e1:SetCondition(c50218115.atcon)
-	e1:SetValue(1)
+	e1:SetValue(aux.imval1)
 	c:RegisterEffect(e1)
 	--control
 	local e2=Effect.CreateEffect(c)

expansions/script/c50218116.lua

@@ -78,7 +78,7 @@ function c50218116.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218116.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218117.lua

@@ -62,7 +62,7 @@ function c50218117.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218117.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218119.lua

@@ -50,7 +50,7 @@ function c50218119.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218119.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218120.lua

@@ -61,7 +61,7 @@ function c50218120.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218120.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218121.lua

@@ -41,7 +41,7 @@ end
 c50218121.lvup={50218120}
 c50218121.lvdn={50218120,50218119}
 function c50218121.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
 	Duel.SetTargetPlayer(tp)
 	Duel.SetTargetParam(1)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)

expansions/script/c50218122.lua

@@ -52,7 +52,7 @@ function c50218122.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218122.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c50218123.lua

@@ -73,7 +73,7 @@ function c50218123.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c50218123.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
 			tc:CompleteProcedure()
 		end
 	end

expansions/script/c50218135.lua

@@ -32,11 +32,12 @@ function c50218135.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE)
 	e4:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
 	e4:SetCondition(c50218135.atcon)
-	e4:SetValue(1)
+	e4:SetValue(aux.imval1)
 	c:RegisterEffect(e4)
 	--can not be target
 	local e5=e4:Clone()
 	e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)	
+	e5:SetValue(aux.tgoval)
 	c:RegisterEffect(e5)
 	--control
 	local e6=Effect.CreateEffect(c)

expansions/script/c50218137.lua

@@ -85,7 +85,7 @@ function c50218137.spop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c50218137.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
 	Duel.SetTargetPlayer(tp)
 	Duel.SetTargetParam(1)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)

expansions/script/c50218221.lua

@@ -31,7 +31,7 @@ function c50218221.initial_effect(c)
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_DESTROYED)
-	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
 	e3:SetCondition(c50218221.con3)
 	e3:SetTarget(c50218221.tg3)
 	e3:SetOperation(c50218221.op3)
@@ -55,7 +55,8 @@ function c50218221.op1(e,tp,eg,ep,ev,re,r,rp)
 end
 function c50218221.tg2f(c,e,tp)
 	return c:IsSetCard(0xcb2) and c:GetPreviousControler()==tp and c:IsReason(REASON_BATTLE+REASON_EFFECT)
-		and c:IsLocation(LOCATION_GRAVE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,c:GetPreviousPosition())
+		and c:IsLocation(LOCATION_GRAVE) and c:IsPreviousLocation(LOCATION_MZONE)
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false,c:GetPreviousPosition())
 end
 function c50218221.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and eg:IsExists(c50218221.tg2f,1,nil,e,tp) end

expansions/script/c50218223.lua

@@ -22,12 +22,12 @@ function c50218223.initial_effect(c)
 	c:RegisterEffect(e1)
 	--spsummon
 	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(50218223,1))
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetDescription(aux.Stringid(50218223,1))
 	e2:SetType(EFFECT_TYPE_QUICK_O)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_SZONE)
-	e2:SetHintTiming(0,TIMING_ATTACK)
+	e2:SetHintTiming(0,TIMING_ATTACK+TIMING_END_PHASE)
 	e2:SetCountLimit(1,50218223)
 	e2:SetCost(c50218223.cost2)
 	e2:SetCondition(c50218223.con2)
@@ -69,22 +69,30 @@ function c50218223.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
 end
 function c50218223.con2(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
+	return Duel.GetTurnPlayer()==1-tp and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
 end
 function c50218223.tg2f(c,e,tp)
 	return c:IsSetCard(0xcb2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
-function c50218223.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function c50218223.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingTarget(c50218223.tg2f,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c50218223.tg2f,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end
 function c50218223.op2(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(c50218223.tg2f),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
-	if g:GetCount()>0 then
-		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+		e1:SetValue(1)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		g:GetFirst():RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+		g:GetFirst():RegisterEffect(e2)
 	end
 end
 function c50218223.con3(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c50223155.lua

@@ -41,8 +41,6 @@ function c50223155.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 		end
 	end
 	if chk==0 then return ct>0 and Duel.IsPlayerCanDraw(tp,ct) end
-	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(ct)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,ct)
 	Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,0,tp,ct)
 end
@@ -53,15 +51,14 @@ function c50223155.drop(e,tp,eg,ep,ev,re,r,rp)
 			ct=ct+1
 		end
 	end
-	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	if Duel.Draw(p,d,REASON_EFFECT)==ct then
-		local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,p,LOCATION_HAND,0,nil)
+	if Duel.Draw(tp,ct,REASON_EFFECT)~=0 then
+		local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
 		if g:GetCount()<ct then return end
-		Duel.ShuffleHand(p)
+		Duel.ShuffleHand(tp)
 		Duel.BreakEffect()
 		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_TODECK)
-		local sg=g:Select(p,ct,ct,nil)
-		aux.PlaceCardsOnDeckBottom(p,sg)
+		local sg=g:Select(tp,ct,ct,nil)
+		aux.PlaceCardsOnDeckBottom(tp,sg)
 	end
 end
 function c50223155.spcon(e,tp,eg,ep,ev,re,r,rp)