fix

expansions/script/c33701509.lua

@@ -108,11 +108,8 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
-			cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
+		cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
 	end
 end

expansions/script/c33701510.lua

@@ -93,11 +93,8 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
-			cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
+		cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
 	end
 end

expansions/script/c33701511.lua

@@ -124,11 +124,8 @@ function cm.aclimit(e,re,tp)
 	return re:GetHandler():IsOnField() or re:IsHasType(EFFECT_TYPE_ACTIVATE)
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
-			cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
+		cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
 	end
 end

expansions/script/c33701512.lua

@@ -105,11 +105,8 @@ function cm.atlimit(e,c)
 	return not c:IsCode(33701507)
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
-			cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
+		cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
 	end
 end

expansions/script/c33701513.lua

@@ -113,11 +113,8 @@ function cm.recop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Recover(p,d,REASON_EFFECT)
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
-			cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
+		cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
 	end
 end

expansions/script/c33701514.lua

@@ -124,11 +124,8 @@ function cm.atlimit(e,c)
 	return not c:IsCode(33701507)
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
-			cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) then
+		cm[ep]=bit.bor(cm[ep],0x1<<tc:GetLevel())
 	end
 end

expansions/script/c33701516.lua

@@ -89,11 +89,8 @@ function cm.efilter(e,re)
 	return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
 end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=eg:GetFirst()
-	while tc do
-		if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) and not cm[ep]:IsContains(tc) then
-			cm[ep]:AddCard(tc)
-		end
-		tc=eg:GetNext()
+	local tc=re:GetHandler()
+	if tc:IsLevelAbove(1) and tc:IsSetCard(0x9440) and not cm[ep]:IsContains(tc) then
+		cm[ep]:AddCard(tc)
 	end
 end