Accueil › Forums › Programmation WIMS › Programmation d’exercices OEF › Modules d’exercices OEF › type=mark très casse-pieds › Répondre à : type=mark très casse-pieds
6 février 2014 à 23:45
#1995
Participant
::
Ca ne fonctionne toujours pas.
Mon exercice fonctionne avec le mark.input du serveur wims.unice.fr (à part le problème de défilement)
Il ne fonctionne pas avec celui que je mets moi-même.
J’obtiens un truc comme ça :
CLIQUEZ SUR LES ATOMES DU GROUPE
1 - Sélectionner le ou les groupements carboxyle de la molécule suivante :
!set anstype=yes [pas de groupe]
!set anstype=yes H !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes OH !set anstype=yes !set anstype=yes NH !set anstype=yes = !set anstype=yes C !set anstype=yes — !set anstype=yes OH !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes
!set anstype=yes !set anstype=yes \ !set anstype=yes !set anstype=yes !set anstype=yes | !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes | !set anstype=yes !set anstype=yes !set anstype=yes !set anstype=yes
Et ce n’est qu’un petit bout de la page générée.
J’ai le fichier suivant pour mark.input (l’avant-dernier):
!set anstype=yes
!set anstyle=mc
!set ans_require=
!if $wims_read_parm=def
!exit
!endif
!set input_rg=!rows2lines $(replygood$i)
!set input_rg=!line 2 to -1 of $input_rg
!set input_rg2=!replace internal \( by \\( in $input_rg
!set input_icnt=!itemcnt $input_rg
!if $input_icnt<2
!exit
!endif
!if $wims_read_parm!=noprompt
<tr><td>$(replyname$i)</td><td>
!endif
!if $(mark_js_$i)!=yes
!set zeroarray=!makelist 0 for x=1 to $input_icnt
!set rg2=!replace internal \ by \\ in $input_rg
!set rg2=!replace internal " by \" in $rg2
!set rg2=!replace internal ' by \' in $rg2
!set rg2=!translate internal $\
$ to $ $ in $rg2
!set rg2 = !makelist x for x=1 to $input_icnt
!set rg2=!items2lines $rg2
!set rg2=!replace internal $\
$ by ',' in '$rg2'
<input type="hidden" id="reply$i" name="reply$i" value="" />
<script type="text/javascript">
/*<![CDATA[*/
replist$i=new Array($zeroarray);
repval$i=new Array($rg2);
function mark_bg_$i(k,tag) {
var st = document.getElementById(tag).style;
var vv='';
var i;
replist$i[k-1]^=1;
if(replist$i[k-1] == 0) st.backgroundColor = 'transparent';
else st.backgroundColor = '#FF7878';
for(i=0;i<$input_icnt;i++) {
if(replist$i!=0) {
if(vv=='') vv=repval$i; else vv=vv+','+repval$i;
}
}
document.forms['replyform'].reply$i.value=vv;
}
/*]]>*/
</script>
<style type="text/css">
.mark_label{
background-color:none;
color:#000090;
text-decoration:none;
cursor:pointer;
}
</style>
!set mark_js_$i=yes
!endif
!bound inputsize between integer 1 and 1000 default $
!if $inputsize!=$empty and $inputsize<=$input_icnt
!set mark_start=$inputsize
!set mark_end=$inputsize
!else
!set mark_start=1
!set mark_end=$input_icnt
!endif
!for k=$mark_start to $mark_end
!set id=mark_$(i)_$k
!default prompt_=!item $k of $input_rg
<span onclick="mark_bg_$i($k,'$id')" class="mark_label" id="$id">$prompt_</span>
!reset prompt_
!next k
!reset inputsize
!if $wims_read_parm!=noprompt
</td></tr>
!endif
J’ai aussi essayé avec le dernier, et j’ai le même genre d’erreur.
J’envoie mon .oef à Bernadette comme demandé.
A+
-
Cette réponse a été modifiée le il y a 9 années et 9 mois par
david bergeon.