pour chaque mot.
\~english
\brief $mot string each word parsed by function strtok
\details We build a string with a string \ for each word.
*/
$mot = strtok($texte, " \n\t' ");
/**
\~french
\brief $inputs string contenant le code html de l' \ de chaque mot
\details Tous les input on pour nom mots[]: ce tableau est transformé en chaine avant l'enregistrement dans la BDD.
\~english
\brief $inputs string: html code of the \ of each word.
\details All input are named mots[]:tjhis array is transformed to string before saving into the BDD.
*/
$inputs = "";
/**
\~french
\brief $longueur_ligne integer longueur en pixels de la ligne d'inputs
\~english
\brief $longueur_ligne integer length in pixels of a line of inputs
*/
$longueur_ligne = 0;
while ($mot !== false) //___________________________________________________________________tant qu on trouve un mot
{
$mot = str_replace("$","'", $mot); //on remplace l'apostrophe par l'entité (si on le fait avant, strtok fonctionne mal
$mot = str_replace("_","…", $mot); //on remplace le _ par l'entité ...
/**
$nombre_col integer nombre de colonnes nécessaire pour que l'input affiche le mot avec un minimum d'espaces en trop
*/
if (trim($mot) != "")//______________________________si le mot n'est pas vide
{
if (strpos($mot, "--") == true)
{
print "il faut redécouper $mot";
}
$nombre_col = colonnes_de_texte($mot,12);
$longueur_ligne += $nombre_col;
if ($longueur_ligne >= 60)//___estimation
{
if (in_array($mot, $ponctuations) === false)
{
$saut = " ";
$longueur_ligne = 0 ;
}
else
{
$saut = "";
}
}
else
{
$saut = "";
}
$inputs .= "$saut";
}
$mot = strtok(" \n\t ");
}
$le_texte = str_replace("$","'", $le_texte);
/**
\~french
\brief $le_texte string le texte de la dictée simplement passé par HTMLENTITIES
\~english
\brief $le_texte string text of the dictation after HTMLENTITIES
*/
$le_texte = htmlentities ($le_texte, ENT_QUOTES, "utf-8");
/**
\~french
\brief $chaine string
\details La chaine contenant l'affichage de la page.
\~english
\brief $chaine string
\details String containing all that will be displayed.
*/
$chaine = "
$Titres[10]