-- --认真的挑战者 克拉莉萨
local cm,m,o=GetID()
function cm.initial_effect(c)
	vgf.VgCard(c)
    -- 【永】【V】：你的回合中，你没有后防者的话，这个单位的力量+5000。
	local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetRange(LOCATION_MZONE)
	e1:SetCondition(cm.con1)
    e1:SetValue(5000)
    c:RegisterEffect(e1)
    -- 【自】：通过在「凛然之志 克拉莉萨」上RIDE的方式将这个单位登场到V时，查看你的牌堆顶的7张卡，选择至多1张等级1以下的含有「诚意真心」的卡，公开后加入手牌，将其余的卡洗切后放置到牌堆底。
    vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_SINGLE,EVENT_SPSUMMON_SUCCESS,cm.operation,nil,cm.con2,nil,1)
end
function cm.con1(e)
	local c=e:GetHandler()
	local tp=e:GetHandlerPlayer()
    local a = Duel.IsExistingMatchingCard(vgf.RMonsterFilter,tp,LOCATION_MZONE,0,1,c)
    if a == true then
        a = flase
    else
        a = true
    end
	return vgf.VMonsterCondition(e) and a and Duel.GetTurnPlayer()==tp
end

function cm.con2(e)
	local c = e:GetHandler()
    local g = c:GetMaterial()
	return vgf.VMonsterCondition(e) and c:IsSummonType(SUMMON_TYPE_RIDE) and g:IsExists(Card.IsCode,1,nil,10501102)
end


function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetDecktopGroup(tp,7)
    Duel.ConfirmCards(tp,g)
	Duel.DisableShuffleCheck()
	local sg=g:FilterSelect(tp,cm.filter,0,1,nil)
    Duel.DisableShuffleCheck()
	if #sg > 0 then
		Duel.SendtoHand(sg,nil,REASON_EFFECT)
		Duel.ConfirmCards(1-tp,sg)
		Duel.ShuffleHand(tp)
		g:RemoveCard(vgf.ReturnCard(sg))
	end
	for i=1,#g do
		local dg=Duel.GetDecktopGroup(tp,1)
		Duel.MoveSequence(dg:GetFirst(),SEQ_DECKBOTTOM)
	end	
	-- Duel.Remove(c:GetMaterial(),POS_FACEUP,REASON_TEMPORARY)
end
function cm.filter(c)
	return c:IsSetCard(0xb6) and c:IsLevelBelow(2) and c:IsAbleToHand()
end





