Add files via upload

expansions/script/c17045002.lua

@@ -2,7 +2,7 @@
 local m=17045002
 local cm=_G["c"..m]
 function cm.initial_effect(c)
-	c:EnableCounterPermit(0x57f2)
+	c:EnableCounterPermit(0x17f2)
 	--pendulum summon
 	aux.EnablePendulumAttribute(c)
 	--spsummon
@@ -92,19 +92,19 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if not c:IsRelateToEffect(e) then return end
 	Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
-	if c:IsCanAddCounter(0x57f2,1) then
-		c:AddCounter(0x57f2,1)
+	if c:IsCanAddCounter(0x17f2,1) then
+		c:AddCounter(0x17f2,1)
 	end
 end
 function cm.atkval(e,c)
-	return Duel.GetCounter(0,1,1,0x57f2)*500
+	return Duel.GetCounter(0,1,1,0x17f2)*500
 end
 function cm.indtg(e,c)
-	return c:GetCounter(0x57f2)>0
+	return c:GetCounter(0x17f2)>0
 end
 function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x57f2,1,REASON_COST) end
-	e:GetHandler():RemoveCounter(tp,0x57f2,1,REASON_COST)
+	if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x17f2,1,REASON_COST) end
+	e:GetHandler():RemoveCounter(tp,0x17f2,1,REASON_COST)
 end
 function cm.disop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
@@ -138,8 +138,8 @@ function cm.ctop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,0)
 	if c:IsRelateToEffect(e) then g:AddCard(c) end
 	for tc in aux.Next(g) do
-		if tc:IsCanAddCounter(0x57f2,1) then
-			tc:AddCounter(0x57f2,1)
+		if tc:IsCanAddCounter(0x17f2,1) then
+			tc:AddCounter(0x17f2,1)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c17050001.lua

@@ -2,7 +2,7 @@
 local m=17050001
 local cm=_G["c"..m]
 function cm.initial_effect(c)
-	c:EnableCounterPermit(0x37f2,LOCATION_PZONE+LOCATION_MZONE)
+	c:EnableCounterPermit(0x7f3,LOCATION_PZONE+LOCATION_MZONE)
 	--pendulum summon
 	aux.EnablePendulumAttribute(c)
 	--summon with 3 tribute
@@ -142,11 +142,11 @@ end
 function cm.ctop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:IsRelateToEffect(e) then
-		c:AddCounter(0x37f2,1)
+		c:AddCounter(0x7f3,1)
 	end
 end
 function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():GetCounter(0x37f2)>=e:GetLabel()
+	return e:GetHandler():GetCounter(0x7f3)>=e:GetLabel()
 end
 function cm.efilter(e,te)
 	return te:GetOwner()~=e:GetOwner()

expansions/script/c17060893.lua

@@ -8,7 +8,7 @@ function cm.initial_effect(c)
 	aux.AddContactFusionProcedure(c,Card.IsReleasable,LOCATION_MZONE+LOCATION_PZONE,0,Duel.Release,REASON_COST+REASON_MATERIAL)
 	--remove
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(17060854,0))
+	e1:SetDescription(aux.Stringid(17060893,0))
 	e1:SetCategory(CATEGORY_DESTROY)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
@@ -20,7 +20,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 	--special summon
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(17060864,1))
+	e2:SetDescription(aux.Stringid(17060893,1))
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
@@ -61,32 +61,29 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
 	local tc=g:Select(1-tp,1,1,nil):GetFirst()
 	Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	local c=e:GetHandler()
-	local fid=c:GetFieldID()
-	local e1=Effect.CreateEffect(c)
+	tc:RegisterFlagEffect(17060893,RESET_EVENT+RESETS_STANDARD,0,1)
+	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e1:SetCode(EVENT_PHASE+PHASE_END)
 	e1:SetCountLimit(1)
-	e1:SetLabel(fid)
 	e1:SetLabelObject(tc)
+	e1:SetReset(RESET_PHASE+PHASE_END,2)
 	e1:SetCondition(cm.retcon)
 	e1:SetOperation(cm.retop)
-	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
-	tc:RegisterFlagEffect(17060854,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
 end
 function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()
-	if tc:GetFlagEffectLabel(17060854)==e:GetLabel() then
-		return true
-	else
+	if tc:GetFlagEffect(17060893)==0 then
 		e:Reset()
 		return false
+	else
+		return Duel.GetTurnPlayer()==1-tp
 	end
 end
 function cm.retop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()
-	Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	Duel.SendtoHand(tc,1-tp,REASON_EFFECT)
 end
 function cm.spfilter(c,e,tp)
 	return c:IsCanBeSpecialSummoned(e,0,tp,false,false)

expansions/script/c75646600.lua

@@ -11,7 +11,7 @@ function c75646600.initial_effect(c)
 	c:RegisterEffect(e1)
 end
 function c75646600.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetLP(tp)<=10000
+	return Duel.GetLP(tp)<=500
 end
 function c75646600.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
@@ -20,7 +20,7 @@ function c75646600.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 end
 function c75646600.activate(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLP(tp)>10000 then return end
+	if Duel.GetLP(tp)>500 then return end
 	Duel.Hint(HINT_MUSIC,0,aux.Stringid(75646600,0))
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c75646601.lua

@@ -67,8 +67,8 @@ function c75646601.recost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if not g1:IsExists(Card.IsHasEffect,1,nil,75646628,tp) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
 		local dg=g1:Select(tp,1,1,c)		
-		dg:AddCard(c)
 		if dg:GetFirst():IsCode(75646600) then e:SetLabel(1) end
+		dg:AddCard(c)
 		Duel.SendtoGrave(dg,REASON_DISCARD+REASON_COST)
 	else			
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)

expansions/script/c75646621.lua

@@ -79,6 +79,7 @@ function c75646621.operation(e,tp,eg,ep,ev,re,r,rp)
 				Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
 				ct=ct-1
 			until ct==0
+			Duel.SpecialSummonComplete()
 		end
 	end
 end
@@ -89,7 +90,7 @@ end
 function c75646621.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return eg:IsContains(chkc) and c75646621.cfilter(chkc,e,tp) end
 	if chk==0 then return eg:IsExists(c75646621.cfilter,1,nil,e,tp) and not eg:IsContains(e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
 	local g=eg:FilterSelect(tp,c75646621.cfilter,1,1,nil,e,tp)
 	Duel.SetTargetCard(g)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)