Subversion Repositories wimsdev

type=imaudio
textarea="data"

:Escribir el nombre que corresponda a la imagen (o texto presentado)
Tenga presente que este modelo solo funcionará bien si carga las imágenes en wims.
<p>
Para construir un ejercicio con este modelo, simplemente escriba la lista de imágenes y
etiquetas correspondientes
</p>
$image_help
<p class="wims_credits">
Autor del modelo: Bernadette Perrin-Riou <bpr@math.u-psud.fr>
</p>
:%%%%%%%%%%%%%%%%%      ATENCIÓN      %%%%%%%%%%%%%%%%%%%%

Elimina la cabecera anterior si borra las etiquetas para el modelo!
(Son las líneas que comienzan con un ':'.)
En caso contrario el ejercicio puede no funcionar bajo Createxo.

:%%%%%%%% Parámetros del ejemplo a redefinir %%%%%%%%%%%%%%%%%

:\title{Reconocer una imagen}
:\author{Bernadette, Perrin-Riou}
:\email{bpr@math.u-psud.fr}
:\credits{}

:Enunciado
\text{instruction=Escriba la palabra correspondiente a la imagen (el ejercicio solo funcionará cuando se carguen las imágenes)
en el ejercicio)}

:Datos
\text{data=amphitheatre.png,l'amphithéâtre
aqueduc.png, l'aqueduc
arcdetriomphe.png,l'arc de triomphe
cirque.png, le cirque
domus.png, la domus
temple.png, le temple
theatre.png, le théâtre
thermes.png, les termes
}

:El tamaño de los cuadros en píxeles
\text{sizeh=40}
:%%%%%%%%%%%%% Maintenant l'énoncé en code html. %%%%%%%%%%%%%%%%%%%%

\text{mot = randrow(\data)}
\text{mot=wims(embraced randitem \mot)}
\text{image=\mot[1]}
\text{ext=item(2,wims(replace internal . by , in wims(lowercase \image)))}
\text{mot =\mot[2]}

\statement{
\instruction
<p class="wimscenter">
\if{\ext isitemof png,gif,jpg,jpeg}{
  \img{\imagedir/\image}
  }
  {\image}</p>

<div class="wimscenter">
\embed{r1,\sizeh
default
autocomplete="off"}
</div>
}
\answer{}{\mot}{type=case}