fix Frederica

expansions/script/c12043010.lua

@@ -28,7 +28,7 @@ end
 function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil) end
 	local cc=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,nil)
-	Duel.SendtoGrave(cc,REASON_COST)
+	Duel.SendtoGrave(cc,REASON_COST+REASON_RETURN)
 end
 function cm.thfilter(c)
 	return c:IsSetCard(0xafaa) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()

expansions/script/c12043021.lua

@@ -52,7 +52,7 @@ end
 function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil) end
 	local cc=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,nil)
-	Duel.SendtoGrave(cc,REASON_COST)
+	Duel.SendtoGrave(cc,REASON_COST+REASON_RETURN)
 end
 function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsAbleToRemove() end

expansions/script/c12043030.lua

@@ -37,10 +37,10 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function cm.mfiter(c)
-	return c:IsSetCard(0xafaa)
+	return c:IsSetCard(0xafaa) and c:IsType(TYPE_MONSTER)
 end
 function cm.mfiter1(c)
-	return c:IsSetCard(0xcfaa)
+	return c:IsSetCard(0xcfaa) and c:IsType(TYPE_MONSTER)
 end
 function cm.splimit(e,se,sp,st)
 	return not e:GetHandler():IsLocation(LOCATION_EXTRA)