vme50

expansions/script/c5013300.lua

@@ -31,7 +31,9 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
 	Duel.Destroy(sg,REASON_EFFECT)
 end
-
+function c5013300.aclimit(e,re,tp)
+	return re:IsActiveType(TYPE_MONSTER)
+end
 function s.regop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:GetMaterialCount()>=2 then
@@ -98,10 +100,9 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp)
 		e6:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 		e6:SetRange(LOCATION_MZONE)
 		e6:SetReset(RESET_EVENT+RESETS_STANDARD)
-		e6:SetTargetRange(0,1)
-		e6:SetValue(1)
+		e6:SetTargetRange(1,1)
+		e6:SetValue(c5013300.aclimit)
 		c:RegisterEffect(e6)
 		c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,4))
 	end
-end	
-	
\ No newline at end of file
+end	
\ No newline at end of file