得得得得得

expansions/script/c16104436.lua

@@ -3,6 +3,7 @@ local m=16104436
 local cm=_G["c"..m]
 Duel.LoadScript("c16199990.lua")
 function cm.initial_effect(c)
+	c:EnableReviveLimit()
 	aux.EnablePendulumAttribute(c) 
 	aux.AddFusionProcFun2(c,cm.fuscheck1,nil,true)
 	--Effect 1

expansions/script/c33300350.lua

 --秘湮伪界 坠星
 local m=33300350
 local cm=_G["c"..m]
-Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--summon proc
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetCode(EFFECT_SUMMON_PROC)
 	e1:SetCondition(cm.sumcon)
@@ -26,4 +25,4 @@ function cm.sumop(e,tp,eg,ep,ev,re,r,rp,c)
 	if sg:GetCount()>0 then
 		Duel.ChangePosition(sg,POS_FACEDOWN_DEFENSE)
 	end
-end
+end
\ No newline at end of file

expansions/script/c47530093.lua

@@ -2,7 +2,7 @@
 function c47530093.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),3)
-	c:EnableReviveLimit()	
+	c:EnableReviveLimit()   
 	--atk
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
@@ -32,7 +32,7 @@ function c47530093.initial_effect(c)
 	e3:SetCategory(CATEGORY_DISABLE+CATEGORY_REMOVE)
 	e3:SetCode(EVENT_CHAINING)
 	e3:SetCountLimit(1)
-	e3:SetCondition(c47530093.discon)
+	e3:SetCondition(c47530093.incon2)
 	e3:SetTarget(c47530093.distg)
 	e3:SetOperation(c47530093.disop)
 	c:RegisterEffect(e3) 
@@ -50,6 +50,7 @@ function c47530093.initial_effect(c)
 	e5:SetRange(LOCATION_MZONE)
 	e5:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_REMOVE)
 	e5:SetCondition(c47530093.incon4)
+	e5:SetCost(c47530093.spcost)
 	e5:SetTarget(c47530093.aitg)
 	e5:SetOperation(c47530093.aiop)
 	c:RegisterEffect(e5)
@@ -62,27 +63,23 @@ function c47530093.incon1(e,c)
 	local c=e:GetHandler()
 	return Duel.GetMatchingGroupCount(Card.IsRace,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,nil,RACE_MACHINE)>=2
 end
+function c47530093.incon2(e,tp,eg,ep,ev,re,r,rp)
+	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp==1-tp and Duel.IsChainDisablable(ev) and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_MZONE,LOCATION_MZONE,nil,RACE_MACHINE)>=3
+end
 function c47530093.incon3(e,c)
 	local c=e:GetHandler()
 	return Duel.GetMatchingGroupCount(Card.IsRace,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,nil,RACE_MACHINE)>=4
 end
-function c47530093.incon4(e,c)
-	local c=e:GetHandler()
-	return Duel.GetMatchingGroupCount(Card.IsRace,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,nil,RACE_MACHINE)>=8
-end
-function c47530093.discon(e,tp,eg,ep,ev,re,r,rp)
-	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp==1-tp and Duel.IsChainDisablable(ev) and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_MZONE,LOCATION_MZONE,nil,RACE_MACHINE)>=3
-end
 function c47530093.distg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
-	local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil)
+	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil,POS_FACEDOWN)
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
 end
 function c47530093.disop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.NegateEffect(ev) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-		local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil)
+		local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil,POS_FACEDOWN)
 		if g:GetCount()>0 then
 			Duel.HintSelection(g)
 			Duel.Remove(g,POS_FACEDOWN,REASON_EFFECT)
@@ -95,13 +92,22 @@ end
 function c47530093.efilter2(e,re)
 	return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
 end
+
+function c47530093.incon4(e,c)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_LINK) and Duel.GetMatchingGroupCount(Card.IsRace,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,nil,RACE_MACHINE)>=8
+end
+function c47530093.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsReleasable() end
+	Duel.Release(e:GetHandler(),REASON_COST)
+end
 function c47530093.hspfilter(c,e,tp)
 	return c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
 end
 function c47530093.aitg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(c47530093.hspfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.IsExistingMatchingCard(c47530093.hspfilter,1-tp,LOCATION_EXTRA,0,1,nil,e,1-tp) end
-	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0x1e,0x1e,e:GetHandler())
+	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0x1e,0x1e,e:GetHandler(),POS_FACEDOWN)
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,1-tp,LOCATION_EXTRA)
@@ -109,18 +115,18 @@ end
 function c47530093.aiop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0x1e,0x1e,nil)
 	if Duel.Remove(g,POS_FACEDOWN,REASON_EFFECT)~=0 then
-		local g=Duel.GetMatchingGroup(c47530093.hspfilter,1-tp,LOCATION_EXTRA,0,nil,e,1-tp)
-		if g:GetCount()>0 and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 then
-			Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
-			local sg=g:Select(1-tp,1,1,nil)
-			Duel.SpecialSummon(sg,0,1-tp,1-tp,true,false,POS_FACEUP)
-		end   
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-		local g1=Duel.GetMatchingGroup(c47530093.hspfilter,tp,LOCATION_EXTRA,0,nil,e,tp)
-		if g1:GetCount()>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-			local sg=g:Select(tp,1,1,nil)
-			Duel.SpecialSummon(sg,0,tp,tp,true,false,POS_FACEUP)
-		end
+	local g=Duel.GetMatchingGroup(c47530093.hspfilter,1-tp,LOCATION_EXTRA,0,nil,e,1-tp)
+	if g:GetCount()>0 and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 then
+		Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
+		local sg=g:Select(1-tp,1,1,nil)
+		Duel.SpecialSummon(sg,0,1-tp,1-tp,true,false,POS_FACEUP)
+	end   
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g1=Duel.GetMatchingGroup(c47530093.hspfilter,tp,LOCATION_EXTRA,0,nil,e,tp)
+	if g1:GetCount()>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sg=g1:Select(tp,1,1,nil)
+		Duel.SpecialSummon(sg,0,tp,tp,true,false,POS_FACEUP)
+	end
 	end
 end
\ No newline at end of file