I'm creating a card game and I want to generate the cards through TeX.
Here's a minimal version of the code:

```
\documentclass[a4paper, landscape, oneside]{article}

%===========================================================================
% Libs
%===========================================================================

\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[italian]{babel}

\usepackage{graphicx}
\usepackage{xcolor}

\usepackage{tikz}
\usetikzlibrary{patterns}
\usetikzlibrary{shadows}
\usetikzlibrary{backgrounds}
\usetikzlibrary{babel}

\usepackage{varwidth}

\usepackage{rotating}
\usepackage{lipsum}
\pagestyle{empty}

%===========================================================================
% Definitions
%===========================================================================
\def\ShapeCardFront{(0.0,0.0) rectangle (6.0,9.7)}
\def\ShapeCardBack{(6.0,0.0) rectangle (12.0,9.7)}
\def\ShapeFrontDescriptionII{(0.2,1.0) rectangle (5.8,7.0)}
\def\ShapeBackDescription{(6.1,0.1) rectangle (11.9,9.6)}

\tikzset{
    CardCorners/.style={
        rounded corners=0.2cm
    },
    ElementCorners/.style={
        rounded corners=0.1cm
    },
}

\newcommand{\CardFrontBorder}{
    \draw[black,CardCorners] \ShapeCardFront;
}

\newcommand{\CardBackBorder}{
    \draw[black,CardCorners] \ShapeCardBack;
}

\newcommand{\CardTypeII}[2]{
    \begin{scope}
        \clip[CardCorners] \ShapeCardFront;
        \fill[ElementCorners, white, opacity=0.95] \ShapeFrontDescriptionII;
        \draw[ElementCorners, color=#1, line width=2] \ShapeFrontDescriptionII;
    \end{scope}
    \node[right] at (0.1,0.5) {\textcolor{white}{\uppercase{\textbf{#2}}}};
    \fill[CardCorners, color=#1] \ShapeCardBack;
    \fill[CardCorners, white] \ShapeBackDescription;
}

\newcommand{\CardContent}[1]{
    \node[below] at (3.0,7.0) {
    \begin{varwidth}{5.4cm}
      \small #1
    \end{varwidth}
    };
}

\newcommand{\CardBackContent}[1]{
    \node[below] at (9.0,9.55) {
    \begin{varwidth}{5.6cm}
      \small #1
    \end{varwidth}
    };
}

\newcommand{\CardTypeCharacter}{\CardTypeII{characterbg}{Monster}}
\definecolor{characterbg}{RGB}{200,050,050}

%===========================================================================
% Document
%===========================================================================

\begin{document}

\begin{tikzpicture}
\CardTypeCharacter
\CardContent{\Huge Block A \\ \scriptsize \lipsum[1]}
\CardBackContent{\Huge Block B}
\CardFrontBorder
\CardBackBorder
\end{tikzpicture}

\end{document}

```

And here's what I obtain:

[![enter image description here](https://i.stack.imgur.com/ioNjv.png)](https://i.stack.imgur.com/ioNjv.png)

Now I wonder if is it possible to split the text into the two red boxes (that I've called respectively block A and block B).
In particular I want to fill the block B when the text exceeds from the block A (without doing it manually).

Thanks in advance for any help