fix

expansions/script/c11451704.lua

 --抢先体验
-local m=11451704
-local cm=_G["c"..m]
+local cm,m=GetID()
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+0x200)
 	e1:SetCost(cm.cost)
 	e1:SetOperation(cm.activate)
 	c:RegisterEffect(e1)

expansions/script/c11451845.lua

@@ -5,7 +5,7 @@ function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DESTROY)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+0x200)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.activate)

expansions/script/c11451870.lua

@@ -19,7 +19,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return #g>0 end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,0,1-tp,LOCATION_ONFIELD)
 	if cm.condition(e,tp,eg,ep,ev,re,r,rp) then
-		e:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_NEGATE)
+		e:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+0x200)
 	else e:SetProperty(0) end
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c33201454.lua

@@ -9,7 +9,7 @@ function s.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_ATTACK_ANNOUNCE)
 	e1:SetRange(LOCATION_HAND+LOCATION_MZONE)
-	e1:SetCountLimit(1+10000)
+	e1:SetCountLimit(1,id+10000)
 	e1:SetLabel(0)
 	e1:SetCondition(s.condition)
 	e1:SetTarget(s.target)

expansions/script/c33201460.lua

@@ -7,12 +7,11 @@ function s.initial_effect(c)
 	c:EnableReviveLimit()
 	--remove
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_DESTROY)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCost(s.rmcost)
 	e1:SetCondition(s.rmcon)
+	e1:SetCost(s.rmcost)
 	e1:SetTarget(s.rmtg)
 	e1:SetOperation(s.rmop)
 	c:RegisterEffect(e1)
@@ -26,7 +25,6 @@ function s.initial_effect(c)
 	e2:SetOperation(s.tgop)
 	c:RegisterEffect(e2)
 end
-s.VHisc_hdst=true
 
 function s.ovfilter(c)
 	return c:IsFaceup() and VHisc_HDST.nck(c) and not c:IsCode(id)
@@ -41,9 +39,9 @@ function s.rmcon(e,tp,eg,ep,ev,re,r,rp)
 end
 function s.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local rg=e:GetHandler():GetOverlayGroup()
-	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and  Duel.GetMatchingGroupCount(s.exfilter,tp,0,LOCATION_HAND,nil)>0 end
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.GetMatchingGroupCount(s.exfilter,tp,0,LOCATION_HAND,nil)>0 end
 	local hc=Duel.GetMatchingGroupCount(s.exfilter,tp,0,LOCATION_HAND,nil)
-	if rg:GetCount()<hc then hc=rg end
+	if rg:GetCount()<hc then hc=rg:GetCount() end
 	local ct=e:GetHandler():RemoveOverlayCard(tp,1,hc,REASON_COST)
 	e:SetLabel(ct)
 end
@@ -55,8 +53,8 @@ function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function s.rmop(e,tp,eg,ep,ev,re,r,rp)
 	local ct=e:GetLabel()
-	local sg=Duel.GetMatchingGroup(s.exfilter,tp,0,LOCATION_HAND,nil)
-	if sg:GetCount()>0 and ct then
+	local g=Duel.GetMatchingGroup(s.exfilter,tp,0,LOCATION_HAND,nil)
+	if g:GetCount()>0 and ct then
 		local sg=g:RandomSelect(tp,ct)
 		Duel.ConfirmCards(tp,sg)
 		local tc=sg:GetFirst()
@@ -68,12 +66,13 @@ function s.rmop(e,tp,eg,ep,ev,re,r,rp)
 				local fg=Duel.GetMatchingGroup(s.fgfilter,tp,LOCATION_ONFIELD+LOCATION_HAND+LOCATION_GRAVE+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED,LOCATION_ONFIELD+LOCATION_HAND+LOCATION_GRAVE+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED,nil,code)
 				for fc in aux.Next(fg) do
 					if fc:GetFlagEffect(33201450)==0 then
-						fc:RegisterFlagEffect(33201450,nil,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3))
+						fc:RegisterFlagEffect(33201450,nil,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(33201450,3))
 					end
 				end
 			end
 			tc=sg:GetNext()
 		end
+		Duel.ShuffleHand(1-tp)
 	end 
 end
 function s.fgfilter(c,code)

expansions/script/c40006828.lua

@@ -56,11 +56,17 @@ function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 	end
 end
+function cm.cfilter(c,ft,tp)
+	return c:IsType(TYPE_TUNER)
+		and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
+end
 function cm.spcost2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckReleaseGroup(REASON_COST,tp,Card.IsType,1,nil,TYPE_TUNER) end
-	local g=Duel.SelectReleaseGroup(REASON_COST,tp,Card.IsType,1,1,nil,TYPE_TUNER)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if chk==0 then return ft>-1 and Duel.CheckReleaseGroup(tp,cm.cfilter,1,nil,ft,tp) end
+	local g=Duel.SelectReleaseGroup(tp,cm.cfilter,1,1,nil,ft,tp)
 	Duel.Release(g,REASON_COST)
 end
+
 function cm.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) end

expansions/script/c40006830.lua

@@ -84,7 +84,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.RegisterEffect(e1,tp)
 end
 function cm.splimit1(e,c)
-	return not c:IsLevelAbove(1) and c:IsLocation(LOCATION_EXTRA)
+	return c:IsLevelAbove(1) and c:IsLocation(LOCATION_EXTRA)
 end
 function cm.btfilter(c)
 	return c:IsFaceup() and c:IsType(TYPE_XYZ)

expansions/script/c40011064.lua

@@ -116,6 +116,7 @@ function cm.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 end
 function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local tc=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
 	if not tc then return end

expansions/script/c40011525.lua

@@ -35,7 +35,7 @@ function c40011525.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetType(EFFECT_TYPE_FIELD)
 	e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-	e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e5:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_IMMUNE)
 	e5:SetRange(LOCATION_FZONE)
 	e5:SetTargetRange(LOCATION_SZONE,0)
 	e5:SetTarget(function(e,c)

expansions/script/c57300017.lua

@@ -39,8 +39,8 @@ if not s.global_check then
 	e3:SetCategory(CATEGORY_REMOVE)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_REMOVE)
+	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e3:SetCost(s.cost)  
-	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetTarget(s.rmtg)
 	e3:SetOperation(s.rmop)
 	c:RegisterEffect(e3)

expansions/script/c71401015.lua

@@ -91,14 +91,15 @@ function c71401015.con3(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():GetType()==TYPE_TRAP+TYPE_CONTINUOUS
 end
 function c71401015.filter3(c)
-	return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_XYZ) and Duel.IsExistingMatchingCard(c71401015.filter3a,tp,LOCATION_ONFIELD,0,1,c)
+	return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_XYZ)
 end
 function c71401015.filter3a(c)
 	return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and c:IsRace(RACE_SPELLCASTER) and c:IsCanOverlay() and not c:IsForbidden()
 end
 function c71401015.tg3(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c71401015.filter3(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c71401015.filter3,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	if chk==0 then return Duel.IsExistingTarget(c71401015.filter3,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
+		and Duel.IsExistingMatchingCard(c71401015.filter3a,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
 	Duel.SelectTarget(tp,c71401015.filter3,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
 end
@@ -106,7 +107,7 @@ function c71401015.op3(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
-		mg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c71401015.filter3a),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,tc)
+		mg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c71401015.filter3a),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
 		Duel.Overlay(tc,mg)
 	end
 end
\ No newline at end of file

expansions/script/c89390007.lua

@@ -88,24 +88,35 @@ function cm.sretop(e,tp,eg,ep,ev,re,r,rp)
             if g:GetCount()>0 then
                 Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
                 local tc=g:Select(tp,1,1,nil):GetFirst()
+                local fid=c:GetFieldID()
                 Duel.Remove(tc,POS_FACEUP,REASON_EFFECT+REASON_TEMPORARY)
-                tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
+                tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
                 local e1=Effect.CreateEffect(c)
                 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)
+                e1:SetCondition(cm.retcon)
                 e1:SetOperation(cm.retop)
                 Duel.RegisterEffect(e1,tp)
-                Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
             end
         end
     end
 end
+function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
+    local tc=e:GetLabelObject()
+    if tc:GetFlagEffectLabel(m)==e:GetLabel() then
+        return true
+    else
+        e:Reset()
+        return false
+    end
+end
 function cm.retop(e,tp,eg,ep,ev,re,r,rp)
     local tc=e:GetLabelObject()
-    Duel.SendtoHand(tc,tc:GetOwner(),REASON_EFFECT)
+    Duel.SendtoHand(tc,nil,REASON_EFFECT)
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
     local rc=re:GetHandler()