Subversion Repositories wimsdev

Rev

Rev 13716 | Rev 15044 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
11375 bpr 1
type=question
12168 mquerol 2
textarea="instruction data1 data2 data3 data4 data5 data6 data7 data8 data9 data10"
13716 obado 3
iEdit="instruction"
12168 mquerol 4
asis="data1 data2 data3 data4 data5 data6 data7 data8 data9 data10"
13716 obado 5
 
12168 mquerol 6
:Diverses preguntes consecutives, totes del tipus QCM
3445 bpr 7
 
12168 mquerol 8
<p>Aquest exercici presenta preguntes d'opció múltiple.</p>
9
<p>El nombre de preguntes està limitat a 10. Es pot triar el nombre de preguntes
10
que es presentarà a cada exercici. Aquestes preguntes es realitzaran de forma aleatòria o no.</p>
11
<p>Autor del model : Bernadette Perrin-Riou <bpr@math.u-psud.fr></p>
3445 bpr 12
 
13
:%%%%%%%%%%%%%%%%%      ATTENTION      %%%%%%%%%%%%%%%%%%%%
14
 
15
Enlevez l'en-tête ci-dessus si vous détruisez les balises pour le modèle !
16
(Ce sont les lignes qui commencent par un ':'.)
17
Sinon l'exercice risque de ne pas pouvoir repasser sous Createxo.
18
 
19
:%%%%%%%% Paramètres d'exemples à redéfinir %%%%%%%%%%%%%%%%%
20
 
12168 mquerol 21
:\title{Opció múltiple avançada}
5147 bpr 22
:\author{Bernadette, Perrin-Riou}
3445 bpr 23
:\email{bpr@math.u-psud.fr}
12168 mquerol 24
:\credits{Image de Pfly [CC BY-SA 2.5], via Wikimedia Commons}
13716 obado 25
 
12168 mquerol 26
:Instruccions Globals
27
Escriviu aquí una instrucció comuna a totes les preguntes de l'exercici
9980 obado 28
$embraced_randitem
12168 mquerol 29
\text{instruction=Respondre cada pregunta de la primera sèrie, validar i respondre les preguntes de la segona sèrie.}
3445 bpr 30
 
12168 mquerol 31
:Ordre aleatori
32
Trieu "sí" per activar l'aleatorietat de les preguntes.
33
Trieu "no" per presentar-les en l'ordre en què es van entrar.
34
\text{alea=item(1,sí,no)}
3451 obado 35
 
12168 mquerol 36
:Nombre màxim de preguntes per etapa
37
WIMS dividirà automàticament el vostre exercici en etapes en funció del nombre total de preguntes establertes i del nombre de preguntes per etapa.
38
\text{N=3}
3451 obado 39
 
12168 mquerol 40
:Nombre màxim d'etapes
41
WIMS dividirà automàticament el vostre exercici en etapes en funció del nombre total de preguntes establertes i del nombre de preguntes per etapa.
3445 bpr 42
\text{MAX=2}
3451 obado 43
 
12168 mquerol 44
:Text al costat de la resposta donada un cop l'alumne ha respost.
45
Aquestes paraules intervenen una vegada que les preguntes han estat respostes.
46
És recomanable provar l'exercici de demostració amb
47
respostes correctes i incorrectes per entendre on intervenen aquestes paraules.
48
\text{qcm_prompt1=La vostra resposta:}
3451 obado 49
 
12168 mquerol 50
:Text per al feedback per a "La resposta correcta"
3451 obado 51
 
12168 mquerol 52
\text{qcm_prompt2=La(es) resposta(es) correcta(es) era(en):}
3451 obado 53
 
12168 mquerol 54
:Text per al feedback per a "La resposta correcta"
3451 obado 55
 
12168 mquerol 56
\text{good_answer_text=Resposta correcta!}
3451 obado 57
 
12168 mquerol 58
:Text per al feedback per a "Resposta incorrecta"
3451 obado 59
 
12168 mquerol 60
\text{bad_answer_text=Resposta incorrecta!}
3451 obado 61
 
12168 mquerol 62
:Text per al feedback per a "Resposta incompleta"
3451 obado 63
 
12168 mquerol 64
\text{incomplete_answer_text=Resposta incompleta...}
3451 obado 65
 
12168 mquerol 66
:Estil CSS per a les preguntes
3451 obado 67
 
12168 mquerol 68
\text{style_question=background-color: #F2F9FC;}
3451 obado 69
 
12168 mquerol 70
:Estil CSS per a les  respostes
3451 obado 71
 
12168 mquerol 72
\text{style_reponse=background-color: #FFCC99;}
3451 obado 73
 
12168 mquerol 74
:Percentatge d'èxit necessari per passar a la següent etapa (si el nombre màxim d'etapes > 1)
3451 obado 75
 
3445 bpr 76
\text{percent=0}
3451 obado 77
 
12168 mquerol 78
:S'accepta text aleatori posat entre claus
6132 bpr 79
$embraced_randitem
12168 mquerol 80
\text{accolade=item(2, sí, no)}
6132 bpr 81
 
12168 mquerol 82
:Mostrar les respostes correctes
83
Si poseu sí, les respostes correctes es mostraran una vegada l'alumne respongui les preguntes.
84
\text{answer_given=item(1, sí, no)}
9980 obado 85
 
12168 mquerol 86
:Pregunta
87
<p>Introduïu aquí la pregunta que voleu fer, d'acord amb el següent format:</p>
88
<ol>
89
<li>La primera línia conté l'enunciat de la pregunta.</li>
90
<li> La segona línia representa un feedback, que es mostrarà després de la validació de les respostes
91
 (es pot deixar en blanc).</li>
92
<li>Introduïu a la tercera línia la llista dels números de les respostes correctes, separats per comes. (Els números representen l'ordre en què s'escriuen les propostes a continuació)</li>
93
<li>Cada línia següent representa les diferents propostes de resposta.</li></ol>
94
<div style="border-left:2px solid orange;width:45em;background-color:white;padding:1em .5em;">Exemple: <br/>
95
<pre>Enunciat de la Pregunta 1
96
Explicació (feedback) que s'ha de mostrar en cas de resposta incorrecta a la pregunta
97
Números que indiquen el lloc de les respostes correctes
98
Proposta 1
99
Proposta 2
100
Proposta 3</pre></div>
101
<p class="oef_indbad"><strong>Atenció :</strong>aquí estan prohibits els punt i coma.</p>
102
<hr/>
103
<p><em>Opcional:</em> podeu afegir opcionalment una primera línia que contindrà variables per inserir un títol, una imatge, un so. (nb: ha d'estar en una classe o mòdul per transferir aquests fitxers). En aquest cas, serà la 2a línia (i no la 1a) que representi l'enunciat, la 3a línia el feedback, etc.</p>
104
Les possibles variables són:
3452 obado 105
<ul>
12168 mquerol 106
  <li><code>Qtitle</code> : mostra un títol al principi de la pregunta. (per exemple, per indicar el tema)</li>
107
  <li><code>Qimage</code> : si s'especifica un fitxer d'imatge, aquesta es mostrarà al principi de la pregunta (només funciona en un mòdul o classe).</li>
108
  <li><code>Qaudio</code> : si s'indica un fitxer de so, es mostrarà al principi de la pregunta (només funciona en un mòdul o una classe. Bugs coneguts amb Safari).</li>
109
  </ul>
110
<div style="border-left:2px solid orange;width:45em;background-color:white;padding:1em .5em;">Exemple : <br/>
111
<pre>Qtitle="Títol de la pregunta 2" Qimage="image.jpg" Qaudio="son.mp3"
112
Enunciat de la pregunta 2
113
Explicació (feedback) que s'ha de mostrar en cas de resposta incorrecta a la pregunta 2
114
Número(s) que indiquin el lloc de les respostes correctes
115
Proposta 1
116
Proposta 2
117
Proposta 3</pre></div>
118
\text{data1=asis(En quelle année eut lieu la bataille de Marignan ?
3452 obado 119
Marignan fut la première victoire du jeune roi François Ier, la première année de son règne.
3445 bpr 120
1
121
1515
122
1414
123
1313
12168 mquerol 124
1616)}
3445 bpr 125
 
12168 mquerol 126
:Pregunta 2
3451 obado 127
 
12168 mquerol 128
\text{data2=asis(En 2014, quelle est la ville la plus peuplée au monde ?
129
C'est Tokyo, la capitale du Japon (37,7 millions d'habitants), loin devant les autres (qui ont entre 20 et 24 millions d'habitants). <p class="right">Source <a href="http://www.populationdata.net/index2.php?option=palmares&rid=4&nom=grandes-villes-du-monde" target="_blank">populationdata.net</a></p>
130
7
131
Beijing
132
Karachi
133
Manille
3451 obado 134
Mexico
135
New York
12168 mquerol 136
Shanghaï
137
Tokyo)}
3451 obado 138
 
12168 mquerol 139
:Pregunta 3
3451 obado 140
 
12168 mquerol 141
\text{data3=asis(Quel est le nom de ce fleuve : <img src="http://upload.wikimedia.org/wikipedia/commons/e/e4/Mekong_River_watershed.png"/>
3459 bpr 142
Environ 70 millions d'habitants vivent directement dans le bassin versant du Mékong.
3451 obado 143
1
144
Le Mékong
145
Le Yangzi Jiang
146
La Volga
12168 mquerol 147
Le Danube)}
3451 obado 148
 
12168 mquerol 149
:Pregunta 4
3451 obado 150
 
12168 mquerol 151
\text{data4=asis(Qtitle="En Peinture"
152
Parmi ces différents peintres, lesquels font partie du mouvement impressionniste ?
3452 obado 153
Ingres est associé au courant Romantique, et Raphaël à la Renaissance.
154
1,3
155
Edgar Degas
156
Dominique Ingres
157
Claude Monet
12168 mquerol 158
Raphaël)}
3451 obado 159
 
12168 mquerol 160
:Pregunta 5
3451 obado 161
 
12168 mquerol 162
\text{data5=asis(Qtitle=ANIMAUX
163
Quel est le cri du chameau ?
3452 obado 164
Le brairement est le cri de l'âne, le bêlement : celui des moutons et des chèvres.
3451 obado 165
1
166
Le blatèrement
167
Le brairement
12168 mquerol 168
Le bêlement)}
3451 obado 169
 
12168 mquerol 170
:Pregunta 6
3451 obado 171
 
12168 mquerol 172
\text{data6=asis(Qtitle=Chimie
173
Quelle est la formule chimique de la testostérone ?
174
C<sub>8</sub>H<sub>10</sub>N<sub>4</sub>O<sub>2</sub> correspond à la caféine, C<sub>3</sub>H<sub>5</sub>N<sub>3</sub>O<sub>9</sub> à la nitroglycérine, et C<sub>17</sub>H<sub>19</sub>NO<sub>3</sub> la morphine
3451 obado 175
4
176
C<sub>8</sub>H<sub>10</sub>N<sub>4</sub>O<sub>2</sub>
177
C<sub>3</sub>H<sub>5</sub>N<sub>3</sub>O<sub>9</sub>
178
C<sub>17</sub>H<sub>19</sub>NO<sub>3</sub>
12168 mquerol 179
C<sub>19</sub>H<sub>28</sub>O<sub>2</sub>)}
3451 obado 180
 
12168 mquerol 181
:Pregunta 7
3451 obado 182
 
12168 mquerol 183
\text{data7=asis(À partir de quel jour le beaujolais nouveau est-il disponible en vente ?
3459 bpr 184
Le beaujolais nouveau est un vin de primeur, c'est-à-dire un vin de l'année même, dont la commercialisation est autorisée immédiatement après la fin de la vinification.
3451 obado 185
3
186
le premier jeudi de Novembre
187
le deuxième jeudi de Novembre
188
le troisième jeudi de Novembre
12168 mquerol 189
le quatrième jeudi de Novembre)}
3451 obado 190
 
12168 mquerol 191
:Pregunta 8
3451 obado 192
 
12168 mquerol 193
\text{data8=asis(Dans le film <i>"Rain Man"</i>, quel acteur a un frère autiste surdoué ?
3452 obado 194
<i>Rain Man</i> est un film américain réalisé par Barry Levinson, sorti en 1989 en France.
3451 obado 195
2
196
Bruce Willis
197
Tom Cruise
12168 mquerol 198
Woody Allen)}
3451 obado 199
 
12168 mquerol 200
:Pregunta 9
3451 obado 201
 
12168 mquerol 202
\text{data9=asis(Le ski nautique est une discipline olympique depuis 1976.
3452 obado 203
L'apparition du ski nautique aux jeux olympiques ne date que de 2004. Toutefois, il avait été sport de démonstration en 1972.
3451 obado 204
2
205
Vrai
12168 mquerol 206
Faux)}
3451 obado 207
 
12168 mquerol 208
:Pregunta 10
3451 obado 209
 
12168 mquerol 210
\text{data10=asis(Qtitle=Musique
211
Quel est le premier ballet écrit par Tchaïkovski ?
3452 obado 212
Le Lac des cygnes a été écrit en 1875 et Casse-noisette en 1891.
3451 obado 213
1
214
Le Lac des cygnes
12168 mquerol 215
Casse-noisette)}
3451 obado 216
 
12168 mquerol 217
:Tipus de respostes
218
El tipus "checkbox" (botons quadrats) permet diverses respostes per pregunta. <br/>
219
Mentre que el tipus "radio" (botons rodons) només permet una resposta per pregunta.
220
\text{format=item(1, checkbox, radio)}
221
 
3459 bpr 222
:
12168 mquerol 223
\language{ca}
3445 bpr 224
\computeanswer{no}
225
\format{html}
226
 
12168 mquerol 227
\text{paste=yes}
3445 bpr 228
 
229
\text{option=}
230
 
9980 obado 231
:%%%%%%%%%%%%%% Rien à modifier jusqu'à l'énoncé %%%%%%%%%%%%%%%%
232
 
3445 bpr 233
\text{data_q=\data1!= ? 1:}
234
\text{data_q=\data2!= ? wims(append item 2 to \data_q)}
235
\text{data_q=\data3!= ? wims(append item 3 to \data_q)}
236
\text{data_q=\data4!= ? wims(append item 4 to \data_q)}
237
\text{data_q=\data5!= ? wims(append item 5 to \data_q)}
238
\text{data_q=\data6!= ? wims(append item 6 to \data_q)}
239
\text{data_q=\data7!= ? wims(append item 7 to \data_q)}
240
\text{data_q=\data8!= ? wims(append item 8 to \data_q)}
241
\text{data_q=\data9!= ? wims(append item 9 to \data_q)}
3451 obado 242
\text{data_q=\data10!= ? wims(append item 10 to \data_q)}
3445 bpr 243
 
12168 mquerol 244
\text{instruction=\accolade issametext sí ? wims(embraced randitem \instruction):\instruction}
3445 bpr 245
 
246
\integer{cnt_question=items(\data_q)}
247
 
248
\text{nopaste=\paste issametext no ? slib(utilities/nopaste )}
249
 
13716 obado 250
\text{style = <style>
3452 obado 251
 .enonce{margin-bottom:0}
12168 mquerol 252
 .qcm_prompt2{margin-top:.5em}
253
 img{vertical-align:middle;}
254
 .q_num, .panel .wims_title{
255
 font-size:150%;font-family:Impact, Charcoal, sans-serif;
256
 color:#777;
257
 }
3452 obado 258
 .feedback{border:1px dashed grey;padding:0.5em;margin:0;}
12168 mquerol 259
 .reponse {
260
   margin: 0 1em;
261
   padding: .5em;
262
   border-radius:5px;
263
   \style_reponse
264
 }
265
 .panel{
266
    padding:.5em 1em .5em 1em;
267
    margin:.5em 0;
268
    border:1px solid #d8d8d8;
269
    border-radius:5px;
270
    background-color: #f2f2f2;
271
 }
272
 .panel.callout{
273
    border-color:#c5e5f3;
274
    border-width:2px;
275
    \style_question
276
 }
277
 .callout .q_num, .callout .wims_title{color:black;}
9925 obado 278
 
12168 mquerol 279
 .panel .wims_title, .panel .wimscenter{margin-top:-1.2em;}
280
 ol li{margin-bottom: .5em;list-style: upper-alpha;}
281
 input[type='checkbox'] { font-size:150%; }
282
 .strike{text-decoration:line-through;}
283
 .oef_indpartial{color:navy;}
3445 bpr 284
 </style>
12168 mquerol 285
}
3445 bpr 286
 
287
\integer{N = min(\cnt_question,\N)}
288
\integer{MAX=min(\N*\MAX,\cnt_question)}
12168 mquerol 289
\text{battage=\alea issametext sí ? shuffle(\data_q,,) :\data_q}
3445 bpr 290
\text{battage=wims(nonempty items \battage)}
9925 obado 291
 
3445 bpr 292
\text{option=\option noanalyzeprint}
293
\matrix{question=}
12168 mquerol 294
\matrix{explication=xxx}
3445 bpr 295
\matrix{rep=}
296
\text{CNT_choix= }
297
\matrix{CHOIX=}
298
\text{PRELIMINAIRE=}
12168 mquerol 299
 
3445 bpr 300
\for{i= 1 to \MAX}{
12168 mquerol 301
 \matrix{QUEST=\battage[\i]=1? \data1}
302
 \matrix{QUEST=\battage[\i]=2? \data2}
303
 \matrix{QUEST=\battage[\i]=3? \data3}
304
 \matrix{QUEST=\battage[\i]=4? \data4}
305
 \matrix{QUEST=\battage[\i]=5? \data5}
306
 \matrix{QUEST=\battage[\i]=6? \data6}
307
 \matrix{QUEST=\battage[\i]=7? \data7}
308
 \matrix{QUEST=\battage[\i]=8? \data8}
309
 \matrix{QUEST=\battage[\i]=9? \data9}
310
 \matrix{QUEST=\battage[\i]=10? \data10}
9925 obado 311
 
3445 bpr 312
 \text{preliminaire_test=\QUEST}
313
 \text{preliminaire_test=row(1,\preliminaire_test)}
12168 mquerol 314
 \text{inst_audio=wims(getopt Qaudio in \preliminaire_test)}
315
 \text{inst_image=wims(getopt Qimage in \preliminaire_test)}
316
 \text{inst_title=wims(getopt Qtitle in \preliminaire_test)}
317
 
3445 bpr 318
 \text{rab_inst=}
12168 mquerol 319
 \text{rab_inst=\inst_title notsametext ?\rab_inst <h2 class="wims_title">\inst_title</h2>}
320
 \text{rab_inst=\inst_image notsametext ?\rab_inst <div class="wimscenter"><img src="\imagedir/\inst_image" alt="" /></div>}
3445 bpr 321
 \if{\inst_audio notsametext }{
12168 mquerol 322
     \text{rab_inst1= . isin \inst_audio ?
323
       <audio controls>
324
        <source src="\imagedir/\inst_audio" type="audio/mpeg">
325
        Désolé, votre navigateur est incompatible avec la lecture de fichiers audio.
326
       </audio>}
327
     \text{rab_inst=\rab_inst <div class="wimscenter audio">\rab_inst1[1;1]</div>}
328
 }
329
 
330
 \integer{test_inst=\inst_audio\inst_image\inst_title notsametext ? 1 : 0}
331
 \text{preliminaire=\test_inst=1 ? \rab_inst:&nbsp;}
332
 \matrix{QUEST=\test_inst=1 ? \QUEST[2..-1;]}
333
 \matrix{QUEST=\accolade issametext oui ?wims(embraced randitem \QUEST):\QUEST}
334
 \matrix{question = \question
335
\QUEST[1;]}
336
 \matrix{PRELIMINAIRE=\PRELIMINAIRE
337
\preliminaire}
338
 
339
 \text{expl=\QUEST[2;]}
340
 \text{ligne=wims(upper \expl)}
341
 \text{ligne=wims(text select ABCDEFGHIJKLMNOPQRSTUVWXYZ in \ligne)}
342
 \if{\ligne issametext and \expl notsametext }{
343
  \matrix{explication = \explication;}
3445 bpr 344
  \integer{debut = 2}
345
 }
346
 \if{\ligne issametext and \expl issametext }{
12168 mquerol 347
  \matrix{explication = \explication;}
3445 bpr 348
  \integer{debut = 3}
349
  }
350
  \if{\ligne notsametext}{
12168 mquerol 351
     \matrix{explication = \explication;\expl}
3445 bpr 352
  \integer{debut = 3}
353
 }
354
  \integer{cnt_choix=rows(\QUEST)-\debut}
355
  \text{CNT_choix=\CNT_choix,\cnt_choix}
356
   \text{Choix=}
357
   \text{mix=shuffle(\cnt_choix)}
358
   \for{ j=\debut+1 to \cnt_choix + \debut+1}{
359
     \text{choix= \QUEST[\j;]}
360
     \text{choix=wims(replace internal , by  &#44; in \choix)}
361
     \matrix{Choix = \Choix, \choix[1;]}
362
   }
363
   \text{Choix=wims(nonempty items \Choix)}
364
   \text{Choix= \Choix[\mix]}
365
   \matrix{CHOIX=\CHOIX
366
     \Choix}
367
   \text{H = wims(nospace \QUEST[\debut;])}
368
   \text{cnt_c=items(\H)}
369
   \text{Rep = }
9925 obado 370
   \for{ k = 1 to \cnt_c}{
3445 bpr 371
     \text{Rep = \Rep, position(\H[\k],\mix)}
372
   }
373
   \text{Rep = wims(sort items wims(nonempty items \Rep))}
374
   \matrix{rep = \rep
375
    \Rep}
376
}
377
 
378
\text{CNT_choix=wims(nonempty items \CNT_choix)}
379
 
380
\text{U = pari(divrem(\MAX,\N)~)}
381
\integer{cnt_step = \U[1] + 1}
382
\matrix{STEPS = }
383
\matrix{CNT = }
384
\text{CONDSTEP=}
385
\for{ u = 1 to \cnt_step -1}{
386
   \matrix{STEPS =\STEPS
387
wims(makelist r x for x = \N*\u -\N+1 to \N*\u)}
388
   \matrix{CNT =\CNT
389
wims(makelist x for x = \N*\u -\N+1 to \N*\u)}
390
   \text{condstep= wims(values \u+1 for x = (\u-1)*\N +1 to \u*\N)}
391
   \text{CONDSTEP= wims(append item \condstep to \CONDSTEP)}
392
}
393
 \matrix{STEPS = \STEPS
12168 mquerol 394
 wims(makelist r x for x = \N*\cnt_step-\N+1 to \MAX)
3445 bpr 395
}
396
\matrix{CNT = \CNT
12168 mquerol 397
 wims(makelist x for x = \N*\cnt_step-\N+1 to \MAX)
3445 bpr 398
}
12168 mquerol 399
\text{CONDSTEP=\CONDSTEP, wims(values \cnt_step+1 for x = \N*\cnt_step-\N+1 to \MAX)}
3445 bpr 400
 
401
\text{nstep=\STEPS[1;]}
402
\text{TEST=}
12168 mquerol 403
\text{explication=\explication[2..-1;]}
404
 
3445 bpr 405
text{testexp=wims(rows2lines \explication)}
406
text{testexp=wims(lines2items \testexp)}
407
text{testexp=wims(items2words \testexp)}
408
text{testexp=wims(nospace \testexp)}
409
\nextstep{\nstep}
410
\text{REP=}
411
\text{etape=wims(values x * \N for x = 1 to \cnt_step+1)}
412
\text{CONDITION = wims(makelist x for x = 1 to 2*\MAX)}
413
\text{CONDITION =wims(items2words \CONDITION)}
414
\conditions{\CONDITION}
415
\integer{cnt_juste=0}
416
\real{v = 10}
12168 mquerol 417
 
3445 bpr 418
\statement{\nopaste
12168 mquerol 419
  \style
420
  <div class="instructions">\instruction</div>
421
 
422
  \for{h=1 to \etape[\step]}{
423
 
424
   \if{\question[\h;] notsametext }{
425
     \if{\h <= \etape[\step] - \N}
426
       {<div class="panel">}
427
       {<div class="panel callout">}
428
    }
429
 
3445 bpr 430
   \if{(\h <= \etape[\step] - \N or r \h isitemof \nstep) and \question[\h;] notsametext }{
6946 bpr 431
     <div class="enonce">
12168 mquerol 432
       \if{\cnt_step > 1 and \MAX > 1}{<span class="q_num">\h :</span>}
13382 bpr 433
       <div class="preliminaire">\PRELIMINAIRE[\h;]</div>
12168 mquerol 434
       <span class="question">\question[\h;]</span>
435
     </div>
3445 bpr 436
   }
12168 mquerol 437
 
3445 bpr 438
   \if{\h <= \etape[\step] - \N and \question[\h;] notsametext}{
439
    <div class="reponse">
12168 mquerol 440
      <span class="qcm_prompt1">\qcm_prompt1</span>
3445 bpr 441
       \for{ a in \REP[\h;]}{
12168 mquerol 442
         \if{ \a isitemof \CHOIX[\h;\rep[\h;]]}{
3445 bpr 443
           \if{\TEST[\h;2]>0 and \TEST[\h;3]=0}{
12168 mquerol 444
           <span class="oef_indpartial">\a</span>}
445
           {<span class="oef_indgood">\a</span>}
3445 bpr 446
           }
447
         {
12168 mquerol 448
         <span class="oef_indbad strike">\a</span>} - }
449
         \if{\TEST[\h;2]>0 and \TEST[\h;3]=0}
450
           {<span class="oef_indpartial">\incomplete_answer_text</span>}
451
         \if{\TEST[\h;3]>0}
452
           {<span class="oef_indbad">\bad_answer_text</span>}
453
         \if{\TEST[\h;3]=0 and \TEST[\h;2]=0}
454
           {<span class="oef_indgood">\good_answer_text</span>}
455
         \if{\answer_given issametext sí}{
456
           <p class="qcm_prompt2"> \qcm_prompt2</p>
457
           <ul class="oef_indgood">
4576 obado 458
             \for{s=1 to \CNT_choix[\h]}{
9925 obado 459
               \if{\s isitemof \rep[\h;]}{ <li>\CHOIX[\h;\s]</li>}
12168 mquerol 460
             }
461
           </ul>
4576 obado 462
         }
12168 mquerol 463
         \if{\explication[\h;] notsametext }{<div class="feedback">\explication[\h;]</div>}
3445 bpr 464
     </div>
465
   }
466
   { \if{ r \h isitemof \nstep}{
467
      <div class="question">
9925 obado 468
        <ol>
469
          \for{s=1 to \CNT_choix[\h]}{ <li>\embed{reply \h , \s}</li> }
470
        </ol>
3445 bpr 471
      </div>
472
      }
473
   }
12168 mquerol 474
 
475
   \if{\question[\h;] notsametext }{</div>}
3445 bpr 476
  }
477
 }
478
\answer{}{\REP1;\CHOIX[1;]}{type=\format}{option=\option}
479
\answer{}{\REP2;\CHOIX[2;]}{type=\format}{option=\option}
480
\answer{}{\REP3;\CHOIX[3;]}{type=\format}{option=\option}
481
\answer{}{\REP4;\CHOIX[4;]}{type=\format}{option=\option}
482
\answer{}{\REP5;\CHOIX[5;]}{type=\format}{option=\option}
483
\answer{}{\REP6;\CHOIX[6;]}{type=\format}{option=\option}
484
\answer{}{\REP7;\CHOIX[7;]}{type=\format}{option=\option}
485
\answer{}{\REP8;\CHOIX[8;]}{type=\format}{option=\option}
486
\answer{}{\REP9;\CHOIX[9;]}{type=\format}{option=\option}
487
\answer{}{\REP10;\CHOIX[10;]}{type=\format}{option=\option}
488
 
489
\matrix{REP = \REP1
490
\REP2
491
\REP3
492
\REP4
493
\REP5
494
\REP6
495
\REP7
496
\REP8
497
\REP9
498
\REP10}
499
\if{\format=radio}{
12168 mquerol 500
 \text{REP=wims(replace internal , by &#44; in \REP)}
3445 bpr 501
}
502
\matrix{explication2 = \explication2}
503
 
504
\for{u = 1 to \N}{
505
   \text{H = \CNT[\step-1;\u]}
506
   \text{test1 = wims(listuniq \REP[\H;],\CHOIX[\H;\rep[\H;]])}
507
   \integer{test1 = items(\test1)-items(\CHOIX[\H;\rep[\H;]])}
508
   \text{test2 = wims(listcomplement \REP[\H;] in \CHOIX[\H;\rep[\H;]])}
509
   \text{test3 = wims(listcomplement \CHOIX[\H;\rep[\H;]] in \REP[\H;])}
510
  %%% \integer{test4=items(\REP[\H;]) - items(\CHOIX[\H;])}
9925 obado 511
   \text{test_cnt=\test1, items(\test2),items(\test3)}
3445 bpr 512
   \integer{cnt_juste= \test_cnt[1]+\test_cnt[2]+\test_cnt[3] =0 ? \cnt_juste + 1}
513
   \matrix{TEST=\TEST
514
   \test_cnt}
515
}
516
 
517
test1 = 0 rep < juste
12168 mquerol 518
test2 nombre de réponses dites justes et en fait fausses
519
test3 nombre de réponses dites fausses et en fait justes
3445 bpr 520
 
521
totalement justes : test1=0, test2=0 test3=0
9925 obado 522
partiellement justes :
3445 bpr 523
 
524
\real{v=\cnt_juste/\CNT[\step-1;\N]}
525
 
526
\text{nstep = \v >= \percent ? \STEPS[\step;]:}
527
 
528
\condition{Question 1 : \REP1}{\TEST[1;3]=0}{option=hide}
529
\condition{Question 1 : \REP1}{\TEST[1;1]=0 and \TEST[1;2]=0 and \TEST[1;3]=0}{option=hide}
530
\condition{Question 2 : \REP2}{\TEST[2;3]=0 and \step >=\CONDSTEP[2]}{option=hide}
531
\condition{Question 2 : \REP2}{\TEST[2;1]=0 and \TEST[2;2]=0 and \TEST[2;3]=0 and \step >=\CONDSTEP[2]}{option=hide}
532
\condition{Question 3 : \REP3}{\TEST[3;3]=0 and \step >=\CONDSTEP[3]}{option=hide}
533
\condition{Question 3 : \REP3}{\TEST[3;1]=0 and \TEST[3;2]=0 and \TEST[3;3]=0 and \step >=\CONDSTEP[3]}{option=hide}
534
\condition{Question 4 : \REP4}{\TEST[4;3]=0 and \step >=\CONDSTEP[4]}{option=hide}
535
\condition{Question 4 : \REP4}{\TEST[4;1]=0 and \TEST[4;2]=0 and \TEST[4;3]=0 and \step >=\CONDSTEP[4]}{option=hide}
536
\condition{Question 5 : \REP5}{\TEST[5;3]=0 and \step >=\CONDSTEP[5]}{option=hide}
537
\condition{Question 5 : \REP5}{\TEST[5;1]=0 and \TEST[5;2]=0 and \TEST[5;3]=0 and \step >=\CONDSTEP[5]}{option=hide}
538
\condition{Question 6 : \REP6}{\TEST[6;3]=0 and \step >=\CONDSTEP[6]}{option=hide}
539
\condition{Question 6 : \REP6}{\TEST[6;1]=0 and \TEST[6;2]=0 and \TEST[6;3]=0 and \step >=\CONDSTEP[6]}{option=hide}
540
\condition{Question 7 : \REP7}{\TEST[7;3]=0 and \step >=\CONDSTEP[7]}{option=hide}
541
\condition{Question 7 : \REP7}{\TEST[7;1]=0 and \TEST[7;2]=0 and \TEST[7;3]=0 and \step >=\CONDSTEP[7]}{option=hide}
542
\condition{Question 8 : \REP8}{\TEST[8;3]=0 and \step >=\CONDSTEP[8]}{option=hide}
543
\condition{Question 8 : \REP8}{\TEST[8;1]=0 and \TEST[8;2]=0 and \TEST[8;3]=0 and \step >=\CONDSTEP[8]}{option=hide}
544
\condition{Question 9 : \REP9}{\TEST[9;3]=0 and \step >=\CONDSTEP[9]}{option=hide}
545
\condition{Question 9 : \REP9}{\TEST[9;1]=0 and \TEST[9;2]=0 and \TEST[9;3]=0 and \step >=\CONDSTEP[9]}{option=hide}
546
\condition{Question 10 : \REP10}{\TEST[10;3]=0 and \step >=\CONDSTEP[10]}{option=hide}
547
\condition{Question 10 : \REP10}{\TEST[10;1]=0 and \TEST[10;2]=0 and \TEST[10;3]=0 and \step >=\CONDSTEP[10]}{option=hide}
548
 
549
 
550
 
551
\text{test=wims(rows2lines \explication)}
552
\text{test=wims(lines2items \test)}
553
\text{test=wims(items2words \test)}
554
\text{test=wims(nospace \test)}
9925 obado 555
feedback{1=1}{\explication
3445 bpr 556
   \if{\test notsametext}{
557
     <div class="reponse"><ol>
558
      \for{w = 1 to \MAX}{
559
        \if{\explication[\w;] notsametext }
7097 bpr 560
         {<li style="list-style:decimal;" value="\w">\explication[\w;] </li>}
3445 bpr 561
     }
562
     </ol>
563
    </div>
564
  }
565
}
566
{<ol>
567
  \for{ t = 1 to \N}{
568
    \if{\CNT[\step;\t] != }{
7097 bpr 569
  <li style="list-style:decimal;" value="\CNT[\step;\t]"> <b>\question[\N*(\step-1) + \t;]</b>
3445 bpr 570
  <div class="question"><ol>
571
   \for{s=1 to \CNT_choix[\N*(\step-1) + \t]}{
572
   <li>\embed{\STEPS[\step;\t] , \s }</li>
573
    }
574
   </ol>
575
   </div>
576
   </li>}
577
 }
578
</ol>
13382 bpr 579
}