fix

script/c101010081.lua

@@ -36,7 +36,7 @@ function c101010081.regop(e,tp,eg,ep,ev,re,r,rp)
 	c:RegisterFlagEffect(101010081,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
 end
 function c101010081.cfilter(c)
-	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsCode(101010081)
 end
 function c101010081.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():GetFlagEffect(101010081)>0

script/c101011008.lua

@@ -50,7 +50,7 @@ function c101011008.atcon(e)
 	return Duel.IsExistingMatchingCard(c101011008.atfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler())
 end
 function c101011008.srfilter(c)
-	return c:IsSetCard(0x237) and c:IsAbleToHand() and not c:IsCode(101011008)
+	return c:IsSetCard(0x237) and c:IsAbleToHand() and not c:IsCode(101011008) and c:IsType(TYPE_MONSTER)
 end
 function c101011008.srcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) end

script/c101011038.lua

@@ -73,8 +73,11 @@ function c101011038.rsop(e,tp,eg,ep,ev,re,r,rp)
 		tc:CompleteProcedure()
 	end
 end
+function c101011038.cfilter(c)
+	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER)
+end
 function c101011038.val(e,c)
 	local g=Duel.GetFieldGroup(e:GetHandlerPlayer(),LOCATION_GRAVE,0)
-	local sg=g:Filter(Card.IsType,nil,TYPE_RITUAL)
+	local sg=g:Filter(c101011038.cfilter,nil)
 	return sg:GetCount()*300
 end

script/c101011039.lua

@@ -74,13 +74,16 @@ function c101011039.rsop(e,tp,eg,ep,ev,re,r,rp)
 		tc:CompleteProcedure()
 	end
 end
+function c101011039.cfilter(c)
+	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER)
+end
 function c101011039.descon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
 end
 function c101011039.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsControler(1-tp) end
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_RITUAL) and Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
-	local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_GRAVE,0,nil,TYPE_RITUAL)
+	if chk==0 then return Duel.IsExistingMatchingCard(c101011039.cfilter,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
+	local g=Duel.GetMatchingGroup(c101011039.cfilter,tp,LOCATION_GRAVE,0,nil)
 	local gc=g:GetClassCount(Card.GetCode)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local sg=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,gc,nil)

script/c101011040.lua

@@ -85,7 +85,7 @@ function c101011040.tfilter(c,tp)
 	return c:IsOnField() and c:IsControler(tp)
 end
 function c101011040.disfilter(c)
-	return c:IsType(TYPE_RITUAL) and c:IsAbleToDeck()
+	return c:IsType(TYPE_RITUAL) and c:IsAbleToDeck() and c:IsType(TYPE_MONSTER)
 end
 function c101011040.discon(e,tp,eg,ep,ev,re,r,rp)
 	if rp==tp or e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) then return false end