Black Square

expansions/script/c65020150.lua

@@ -70,11 +70,11 @@ end
 function c65020150.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return false end
 	if chk==0 then return Duel.IsExistingTarget( c65020150.tgfil,tp,LOCATION_MZONE,0,1,e:GetHandler())
-		and Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
+		and Duel.IsExistingTarget(Card.IsCanTurnSet,tp,0,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
 	local g1=Duel.SelectTarget(tp,c65020150.tgfil,tp,LOCATION_MZONE,0,1,1,e:GetHandler())
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
-	local g2=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
+	local g2=Duel.SelectTarget(tp,Card.IsCanTurnSet,tp,0,LOCATION_MZONE,1,1,nil)
 	g1:Merge(g2)
 	Duel.SetOperationInfo(0,CATEGORY_POSITION,g1,2,0,0)
 end
@@ -83,7 +83,7 @@ function c65020150.op(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
 	local tc1=g:Filter(Card.IsControler,nil,tp):GetFirst()
 	local tc2=g:Filter(Card.IsControler,nil,1-tp):GetFirst()
-	if (tc1 and tc1:IsPosition(POS_FACEDOWN)) and Duel.ChangePosition(tc1,POS_FACEUP_DEFENSE)~=0 and (tc2 and tc2:IsPosition(POS_FACEUP)) then
+	if (tc1 and tc1:IsPosition(POS_FACEDOWN)) and Duel.ChangePosition(tc1,POS_FACEUP_DEFENSE)~=0 and (tc2 and tc2:IsCanTurnSet()) then
 		Duel.BreakEffect()
 		Duel.ChangePosition(tc2,POS_FACEDOWN_DEFENSE)
 	end

expansions/script/c65071004.lua

@@ -108,6 +108,16 @@ function c65071004.operation(e,tp,eg,ep,ev,re,r,rp)
 		e5:SetCode(EFFECT_ATTACK_ALL)
 		e5:SetValue(1)
 		c:RegisterEffect(e5)
+		--become effect
+		local e6=Effect.CreateEffect(c)
+		e6:SetType(EFFECT_TYPE_EQUIP)
+		e6:SetCode(EFFECT_ADD_TYPE)
+		e6:SetValue(TYPE_EFFECT)
+		c:RegisterEffect(e6)
+		 local e7=e6:Clone()
+	e7:SetCode(EFFECT_REMOVE_TYPE)
+	e7:SetValue(TYPE_NORMAL)
+	c:RegisterEffect(e7)
 		--destroy
 		local e8=Effect.CreateEffect(c)
 		e8:SetDescription(aux.Stringid(65071004,2))

expansions/script/c65071042.lua

@@ -44,7 +44,7 @@ function c65071042.atkop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetValue(-atk)
 		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
 		mc:RegisterEffect(e1)
-		if mc:GetAttack()==0 then dg:AddCard(mc) end
+		if mc:IsAttack(0) and mc:IsFaceup() then dg:AddCard(mc) end
 		mc=g:GetNext()
 	end
 	Duel.Destroy(dg,REASON_EFFECT)

expansions/script/c65071064.lua

@@ -96,6 +96,16 @@ function c65071064.operation(e,tp,eg,ep,ev,re,r,rp)
 		e4:SetReset(RESET_EVENT+0x1fe0000)
 		e4:SetValue(1)
 		c:RegisterEffect(e4)
+		--become effect
+		local e5=Effect.CreateEffect(c)
+		e5:SetType(EFFECT_TYPE_EQUIP)
+		e5:SetCode(EFFECT_ADD_TYPE)
+		e5:SetValue(TYPE_EFFECT)
+		c:RegisterEffect(e5)
+		 local e0=e5:Clone()
+	e0:SetCode(EFFECT_REMOVE_TYPE)
+	e0:SetValue(TYPE_NORMAL)
+	c:RegisterEffect(e0)
 		 --destroy
 		local e6=Effect.CreateEffect(c)
 		e6:SetDescription(aux.Stringid(65071064,2))

expansions/script/c65071073.lua

@@ -107,6 +107,16 @@ function c65071073.operation(e,tp,eg,ep,ev,re,r,rp)
 		e4:SetReset(RESET_EVENT+0x1fe0000)
 		e4:SetValue(1)
 		c:RegisterEffect(e4)
+		--become effect
+		local e20=Effect.CreateEffect(c)
+		e20:SetType(EFFECT_TYPE_EQUIP)
+		e20:SetCode(EFFECT_ADD_TYPE)
+		e20:SetValue(TYPE_EFFECT)
+		c:RegisterEffect(e20)
+		 local e21=e20:Clone()
+	e21:SetCode(EFFECT_REMOVE_TYPE)
+	e21:SetValue(TYPE_NORMAL)
+	c:RegisterEffect(e21)
 		--give effect
 		local e5=Effect.CreateEffect(c)
 		e5:SetCategory(CATEGORY_COUNTER)