fix

expansions/script/c12816140.lua

@@ -49,7 +49,7 @@ function s.fusfilter2(c)
 	return c:IsSetCard(0xccb) and c:IsFusionType(TYPE_SYNCHRO)
 end
 function s.fusfilter3(c)
-	return cc:IsSetCard(0xccb) and c:IsFusionType(TYPE_XYZ)
+	return c:IsSetCard(0xccb) and c:IsFusionType(TYPE_XYZ)
 end
 function s.fusfilter4(c)
 	return c:IsSetCard(0xccb) and c:IsFusionType(TYPE_PENDULUM)

expansions/script/c16104425.lua

@@ -98,7 +98,7 @@ function cm.seop(e,tp)
 	c:RegisterEffect(e0)
 end
 function cm.efilter(e,te)
-	return te:GetOwner()~=e:GetOwner()
+	return te:GetOwnerPlayer()~=e:GetOwnerPlayer()
 end
 function cm.seop2(e,tp)
 	local c=e:GetHandler()

expansions/script/c16107106.lua

@@ -39,7 +39,7 @@ function cm.initial_effect(c)
 end
 function cm.aclimit(e,re,tp)
 	local rc=re:GetHandler()
-	return (rc:IsStatus(STATUS_BATTLE_DESTROYED) or rc:IsComplexReason(REASON_DESTROY,true,REASON_EFFECT,REASON_BATTLE)) and not rc:IsControler(e:GetHandlerPlayer())
+	return (rc:IsStatus(STATUS_BATTLE_DESTROYED) or rc:IsReason(REASON_DESTROY))
 end
 --e3
 function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c16107110.lua

@@ -25,6 +25,7 @@ function cm.initial_effect(c)
 	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e3:SetRange(LOCATION_SZONE)
+	e3:SetCondition(cm.condition)
 	e3:SetTarget(cm.target)
 	e3:SetOperation(cm.activate)
 	c:RegisterEffect(e3)
@@ -66,31 +67,34 @@ function cm.sumfilter(c,e,tp,att)
 end
 function cm.spmfilter(c,e,tp)
 	local att=c:GetAttribute()
-	return c:GetSummonLocation()~=LOCATION_DECK and Duel.IsExistingMatchingCard(cm.sumfilter,tp,LOCATION_DECK,0,1,nil,e,tp,att) and c:IsSetCard(0x5ccc)
+	return c:IsCanBeEffectTarget(e) and c:GetSummonLocation()~=LOCATION_DECK and Duel.IsExistingMatchingCard(cm.sumfilter,tp,LOCATION_DECK,0,1,nil,e,tp,att) and c:IsSetCard(0x5ccc)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.spmfilter,1,nil,e,tp)
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if not eg then return false end
-	if eg:GetCount()>1 then return false end
-	if not eg:IsExists(cm.spmfilter,1,nil,e,tp) then return false end
-	local tc=eg:GetFirst()
+	if chkc then return chkc==tc end
+	if chk==0 then 
+		return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 
+	end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local tc=eg:FilterSelect(tp,cm.spmfilter,1,1,nil,e,tp):GetFirst()
 	local att=tc:GetAttribute()
 	e:SetLabel(att)
-	if chkc then return chkc==tc end
-	if chk==0 then return tc:IsFaceup() and tc:IsOnField() and tc:IsCanBeEffectTarget(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
-	Duel.SetTargetCard(eg)
+	Duel.SetTargetCard(tc)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,tc,1,0,LOCATION_DECK)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local sc=eg:GetFirst()
+	local sc=Duel.GetFirstTarget()
 	if sc:IsFaceup() and sc:IsRelateToEffect(e) then
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,cm.sumfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,e:GetLabel())
-	local tc=g:GetFirst()
-	Sr_GODback[#Sr_GODback+1]=tc:GetOriginalAttribute()
-	if tc then
-		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-	end
+		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,cm.sumfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,e:GetLabel())
+		local tc=g:GetFirst()
+		Sr_GODback[#Sr_GODback+1]=tc:GetOriginalAttribute()
+		if tc then
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+		end
 	end
 end
\ No newline at end of file

expansions/script/c16107114.lua

@@ -51,7 +51,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 end
 function cm.actcon(e,tp)
-	return Duel.GetMatchingGroupCount(cm.gfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,nil)>0
+	return Duel.GetMatchingGroupCount(cm.gravefilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,nil)>0
 end
 function cm.gfilter(c)
 	return c:IsRankAbove(10) and c:IsType(TYPE_MONSTER) and c:IsFaceup()
@@ -63,9 +63,7 @@ end
 function cm.costop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local te=e:GetLabelObject()
-	local zones=cm.zones(te,tp)
-	Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,false,zones)
-	cm.activate_sequence[te]=c:GetSequence()
+	Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,false)
 	c:CreateEffectRelation(te)
 	local ev0=Duel.GetCurrentChain()+1
 	local e1=Effect.CreateEffect(c)

expansions/script/c16369111.lua

@@ -12,7 +12,7 @@ function c16369111.initial_effect(c)
 	e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
 	e1:SetRange(LOCATION_SZONE)
 	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-	e1:SetTargetRange(LOCATION_MZONE,0)
+	e1:SetTargetRange(LOCATION_ONFIELD,0)
 	e1:SetCondition(c16369111.tgcon)
 	e1:SetTarget(c16369111.tgtg)
 	e1:SetValue(c16369111.tgval)

expansions/script/c31710067.lua

@@ -101,7 +101,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 		local tc=pg:GetFirst()
 			
 		if tc then
-			g:RemoveCard(tc)
+			pg:RemoveCard(tc)
 			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
 			local e1=Effect.CreateEffect(e:GetHandler())
 			e1:SetCode(EFFECT_CHANGE_TYPE)

expansions/script/c31710120.lua

@@ -16,6 +16,7 @@ function s.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,id+o)
 	e3:SetTarget(s.settg)
 	e3:SetOperation(s.setop)
 	c:RegisterEffect(e3)
@@ -51,21 +52,18 @@ function s.thcheck(c,sc,tp)
 	local typ=sc:GetType()&0x7
 	return c:IsType(typ) and c:IsFaceupEx() and c:IsSetCard(0x690) and c:IsAbleToHand(tp)
 end
-function s.tgcheck(c,sc,tp)
+function s.tgcheck(c)
 	return c:IsSetCard(0x690) and c:IsAbleToGrave()
 end
 function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetCode(EFFECT_CANNOT_INACTIVATE)
+	e2:SetCode(EFFECT_CANNOT_DISEFFECT)
 	e2:SetTargetRange(LOCATION_MZONE,0)
 	e2:SetReset(RESET_PHASE+PHASE_END)
 	e2:SetValue(s.efilter)
 	Duel.RegisterEffect(e2,tp)
-	local e3=e2:Clone()
-	e3:SetCode(EFFECT_CANNOT_DISEFFECT)
-	Duel.RegisterEffect(e3,tp)
 	local ct=e:GetLabel()
 	if (ct==0) and Duel.IsExistingMatchingCard(s.tgcheck,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
 		Duel.BreakEffect()
@@ -88,7 +86,7 @@ end
 function s.efilter(e,ct)
 	local p=e:GetHandlerPlayer()
 	local te,tp,loc=Duel.GetChainInfo(ct,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER,CHAININFO_TRIGGERING_LOCATION)
-	return p==tp and te:IsActiveType(TYPE_MONSTER) and te:GetHandler():IsSetCard(0x690)
+	return p==tp and te:IsActiveType(TYPE_MONSTER) and te:GetHandler():IsSetCard(0x690) and te:GetHandler():IsLink(1)
 end
 function s.setfilter(c)
 	return c:IsSetCard(0x690) and c:IsType(TYPE_MONSTER) and not c:IsForbidden()

expansions/script/c60001506.lua

@@ -47,7 +47,14 @@ function cm.getlv(c)
 	end
 end
 function cm.gcheck(g,sg)
-	local lvsum=g:GetSum(cm.getlv)
+	local lvsum=0
+	for tc in aux.Next(g) do
+		if tc:IsLevelAbove(1) then
+			lvsum=lvsum+tc:GetLevel()
+		else
+			lvsum=lvsum+1
+		end
+	end
 	if lvsum==1 then
 		return sg:IsExists(Card.IsCode,1,nil,60001508)
 	elseif lvsum==2 then
@@ -70,11 +77,20 @@ function cm.op2(e,tp,eg,ep,ev,re,r,rp)
 	local sug=g:SelectSubGroup(tp,cm.gcheck,false,1,#g,sg)
 	sug:AddCard(c)
 	if Duel.SendtoGrave(sug,REASON_EFFECT)>0 then
-		Duel.AdjustAll()
 		local og=Duel.GetOperatedGroup()
+		Duel.AdjustAll()
 		og:RemoveCard(c)
 		local ag=Group.CreateGroup()
-		local lvsum=og:GetSum(cm.getlv)
+		local lvsum=0
+		for tc in aux.Next(og) do
+			if tc:IsLevelAbove(1) then
+				lvsum=lvsum+tc:GetLevel()
+			else
+				lvsum=lvsum+1
+			end
+		end
+		Debug.Message(#og)
+		Debug.Message(lvsum)
 		if lvsum==1 then
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 			ag=sg:FilterSelect(tp,Card.IsCode,1,1,nil,60001508)

expansions/script/c60001507.lua

@@ -62,8 +62,8 @@ function cm.op2(e,tp,eg,ep,ev,re,r,rp)
 	local sug=g:SelectSubGroup(tp,cm.gcheck,false,1,#g,sg)
 	sug:AddCard(c)
 	if Duel.SendtoGrave(sug,REASON_EFFECT)>0 then
-		Duel.AdjustAll()
 		local og=Duel.GetOperatedGroup()
+		Duel.AdjustAll()
 		og:RemoveCard(c)
 		local ag=Group.CreateGroup()
 		local lvsum=og:GetSum(cm.getlv)

expansions/script/c60001523.lua

@@ -11,7 +11,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 end
 function cm.filter(c,e,tp)
-	return c:IsSetCard(0x3310) and c:IsCanBeSpecialSummoned(e,0,tp,true,true) and c:IsLevelBelow(5)
+	return c:IsSetCard(0x5622) and c:IsCanBeSpecialSummoned(e,0,tp,true,true) and c:IsLevelBelow(5)
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
@@ -23,7 +23,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)==1 or Duel.IsPlayerAffectedByEffect(tp,59822133) then ct=1 end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,ct,nil,e,tp)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,ct,nil,e,tp)
 	if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)~=0 then
 		local sg=Duel.GetOperatedGroup()
 		for tc in aux.Next(sg) do