Rev 16445 | Blame | Compare with Previous | Last modification | View Log | RSS feed
type=select
textarea="data instruction instruction2"
iEdit="instruction instruction2"
:Seleccionar una palabra, luego brindar información sobre esa palabra.
En el primer paso, se pide marcar las palabras; en el segundo paso,
se hace una pregunta sobre estas palabras (texto para responder).
<div class="small">
Este ejercicio se puede transformar fácilmente para incluirlo en un módulo OEF
si quieres poner los datos en un archivo auxiliar. Para eso,
simplemente completa el campo \text{file=} poniendo el nombre del archivo
(una vez que el ejercicio ha sido transferido a un módulo OEF de una cuenta Modtool).
Existe un ejercicio más completo del mismo tipo en Quicktool.
</div>
<p class="wims_credits">
Autor del modelo: <a href="mailto:bernadette.m.riou@orange.fr">Bernadette Perrin-Riou</a></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{Preguntas sobre palabras seleccionadas primero}
:\author{Bernadette, Perrin-Riou}
:\email{bpr@math.u-psud.fr}
:\credits{}
:Enunciado para la primera pregunta
\text{instruction=Selecciona los verbos conjugados.}
:Enunciado para la segunda pregunta
\text{instruction2=¿Cuáles son sus infinitivos?}
:Análisis de las respuestas a la segunda pregunta
Las posibilidades son <span class="tt">case</span>, <span class="tt">nocase</span> (no tiene en cuenta la diferencia mayúsculas/minúsculas ni los acentos).
Si no se pone nada, no hay una segunda pregunta.
\text{format=case}
:Número de líneas de datos
\text{M=3}
:Tamaño de los campos de respuesta de la segunda pregunta
\text{size=15}
:Datos
Un texto por línea. Colocamos entre dobles signos de interrogación la palabra a marcar
seguida del texto para responder la segunda pregunta, separada por el símbolo
<span class="tt wims_code_words">|</span>.
$embraced_randitem
\text{data= El gato ??come|comer?? ratón.
Tú ??{bebiste,bebes}|beber?? {té,café}.
Nosotros ??cambiamos|cambiar?? las páginas del libro una por una.
Los excursionistas ??{harán,hacen}|hacer?? un fuego.
Él ??{se mudó,se muda}|mudado?? durante las vacaciones.
Los barcos ??{dejaron,dejan}|dejar?? el puerto hoy.
Mi perro ??mueve|mover?? {la cola, las orejas}.
Tu ??{preparas,has preparado,prepara}|preparar?? un regalo para tus {padres, abuelos}.
Yo ??he llegado|llegar?? {tarde, temprano} a mi cita.
{Christian,Paul} y yo ??miramos|mirar?? una película de aventuras.
}
:Se acepta texto aleatorio puesto entre llaves
$embraced_randitem
\text{accolade=item(1,1 sí,
2 no)}
:%%%%%%%%%%%%%% Nada que modificar hasta el enunciado %%%%%%%%%%%%%%%%
\text{accolade=wims(word 1 of \accolade)}
\text{file=}
\text{partialscore=split}
\text{first_step=1}
\text{alea=yes}
\css{<style>
.reponse {border-left-color: var(--wims_ref_color)}
.verbe{color:blue;font-size:large;}
</style>}
\text{paste=yes}
\text{pos_rep=outside}
\text{second_step=\format notsametext ? yes:no}
#####################
\text{format0=mark}
\if{\file notsametext}{
\text{file0=randitem(\file)}
\integer{cnt_question= wims(recordcnt \file0)}
\text{battage=\alea issametext yes ? shuffle(\cnt_question):
wims(makelist x for x = 1 to \cnt_question)}
\text{texte=wims(record \battage[1] of \file0)}
}{
\integer{cnt_question=rows(\data)}
\integer{N=min(\cnt_question,\M)}
\integer{N=min(\N,10)}
\text{liste=shuffle(\cnt_question)}
\text{liste=\liste[1..\N]}
\matrix{data=\data}
\text{texte=\data[\liste;]}
\text{texte=wims(replace internal ; by <br> in \texte)}
}
\text{autocompletion=\format iswordof case ? autocomplete="off"}
\integer{first_step=\first_step notwordof 0 ? 1}
\text{option_reaccent=\reaccent!=yes ? noreaccent:}
\text{nopaste=\paste issametext no ? slib(utilities/nopaste )}
\text{size=\format iswordof dragfill clickfill ? \size x 1}
\text{texte=wims(\texte)}
\text{texte=\accolade=1 ?wims(embraced randitem \texte)}
\text{texte=wims(replace internal ??| by ?? | in \texte)}
\text{texte=wims(replace internal ?? | by ?? | in \texte)}
\text{texte = wims(replace internal <br> by <br> _newline_ in \texte)}
\matrix{texte=slib(text/markgroup \texte)}
\matrix{numero=\texte[1..-4;]}
\text{traduction=\texte[-2;]}
\text{traduction=wims(replace internal || by | in \traduction)}
\text{cnt_mot = rows(\numero)}
\text{Numero = wims(rows2lines \numero)}
\text{Numero = wims(lines2items \Numero)}
\text{prem_numero=wims(column 1 of \numero)}
\text{texte = \texte[-3;]}
\text{texte = wims(replace internal _newline_ by in \texte)}
\text{cnt = items(\texte)}
\text{Texte=wims(items2words \texte)}
\text{rep_compose = }
\for{ i = 1 to \cnt_mot}{
\text{nom_compose= \texte[\numero[\i;]]}
\text{nom_compose =wims(items2words \nom_compose)}
\text{rep_compose = \rep_compose,\nom_compose}
}
\text{rep_compose= wims(nonempty items \rep_compose)}
\text{STEP = wims(makelist r x for x = 2 to \cnt_mot+1)}
\text{labels = wims(makelist x for x = 2 to \cnt_mot+1)}
\text{position=}
\integer{a=0}
\for{t = 1 to \cnt}{
\if{\t isitemof \prem_numero}{
\integer{a =\a+1}
\text{position=\position,\a}
}{
\text{position=\position,0}
}
}
\text{position=wims(nonempty items \position)}
\text{STEP1=\first_step=1?r1}
\text{STEP1=\second_step issametext yes ? \STEP1
\STEP
}
\steps{\STEP1}
\integer{reste=\cnt%\coupure}
\integer{quo=(\cnt-\reste)/\coupure}
\integer{quo=\reste=0? \quo-1}
\text{nombre=wims(makelist x for x = 1 to \cnt)}
%%%%%%%%%%%
\statement{
\nopaste <div class="instruction">\instruction</div>
\preliminaire
\if{\reading notsametext }{\special{help reading,[à lire]}}
\if{\image notsametext }{\special{help image,[à regarder]}}
\audio\video
\if{\step=\first_step}{
<div class="wims_question">
\if{\format iswordof flashcard}{
<p> \for{h=1 to \cnt}{\texte[\h] }</p>}
\for{h=1 to \cnt}{
\embed{reply 1,\h}
}
</div>
}
\if{\step >=1+\first_step}{
\if{\pos_rep=outside}{
<div class="wims_question reponse">
\for{s = 1 to \cnt}{
\if{\s notitemof \Numero}{
\texte[\s]
}{
\if{\s isitemof \Numero}{
<span class="verbe">\texte[\s]</span>
}
}
}
</div>
<p>\instruction2</p>
<div class="wims_question">
\for{s= 1 to \cnt_mot}{
<div class="field">
<label for="reply\labels[\s]">\rep_compose[\s] :</label>
\embed{\STEP[\s],\size
\autocompletion}
</div>
}
</div>
}
\if{\pos_rep=inside}{
<p>\instruction2</p>
<div class="wims_question">
\for{s = 1 to \cnt}{
\if{\s notitemof \Numero}{
\texte[\s]
}{
\if{\s isitemof \prem_numero}{
\embed{\STEP[\position[\s]], \size
\autocompletion}
}
<span class="smaller" style="color:blue;">\texte[\s]</span>
}
}
</div>
}
\if{\pos_rep=under}{
<div class="wims_question">
\for{u = 0 to \quo}{
<table style="border:none">
<tr>
\for{ v = 1 to \coupure}{
<td style="text-align:center">
\if{\coupure*\u+\v <= \cnt}{
\if{\nombre[\coupure*\u+\v] isitemof \Numero}{<span style="color:blue;">}
\texte[\coupure*\u+\v]
}{ }
\if{\nombre[\coupure*\u+\v] isitemof \Numero}{</span>}
</td>
}
</tr><tr>
\for{ v = 1 to \coupure}{
<td style="text-align:center">
\if{\nombre[\coupure*\u+\v] isitemof \prem_numero}{
\embed{\STEP[\position[\nombre[\coupure*\u+\v]]], \size
\autocompletion}
}{ }
</td>
}
</tr><tr><td colspan="\coupure"><hr></td></tr>
</table>
}
</div>
}
}
}
\answer{}{\Numero;\texte}{type=\format0}{option=\partialscore \option}
\answer{\rep_compose[1]}{\traduction[1]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[2]}{\traduction[2]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[3]}{\traduction[3]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[4]}{\traduction[4]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[5]}{\traduction[5]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[6]}{\traduction[6]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[7]}{\traduction[7]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[8]}{\traduction[8]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[9]}{\traduction[9]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[10]}{\traduction[10]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[11]}{\traduction[11]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[12]}{\traduction[12]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[13]}{\traduction[13]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[14]}{\traduction[14]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[15]}{\traduction[15]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[16]}{\traduction[16]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[17]}{\traduction[17]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[18]}{\traduction[18]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[19]}{\traduction[19]}{type=\format}{option=\option_reaccent}
\answer{\rep_compose[20]}{\traduction[20]}{type=\format}{option=\option_reaccent}