Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
23 reyssat 1
!!! fichier de présentation de l'étape 3 !!!
11157 bpr 2
  <span class="color:darkcyan" size=+1> Etape $etape: <u>saisie des bonnes réponses</u> </span>
6235 bpr 3
  <br />
11157 bpr 4
<table class="wimscenter">
23 reyssat 5
  <tr>
6
    <td bgcolor=lightblue>
11157 bpr 7
      Indiquez pour la question ci-dessous, la liste des
8
      réponses valides (c-à-d considérées comme justes) pour cette question, en
9
      cochant les bonnes cases.
10
    </td>
23 reyssat 11
  </tr>
12
</table>
11157 bpr 13
 
23 reyssat 14
!set obtemp=!line $[$chronobs+1] of $obsrecord
15
!set obtemp=!trim $obtemp
16
!set obtemp=!char 2 to -2 of $obtemp
17
 
18
!set L=!line $[$chronobs+1] of $propsrepList
19
!for i=1 to $[$propsnb+1]
20
  !set prop=!line $i of $propsrecord
21
  !set prop=!trim $prop
22
  !if ; isin $prop
23
    !set p$(i)=!char 2 to -2 of $prop
24
   !else
25
    !set p$(i)=$prop
11157 bpr 26
  !endif
23 reyssat 27
!next i
28
 
29
!set indictemp=!trim $(indicList[$[$chronobs+1];])
30
!set com=!char 4 to -2 of $indictemp
31
!set indictemp=!trim $com
32
 
11157 bpr 33
  <table class="wimscenter wimsborder">
23 reyssat 34
    <tr>
11157 bpr 35
      <th style="background-color:lightblue">
23 reyssat 36
       Question
37
      </th>
11157 bpr 38
      <th bgcolor=wheat>
23 reyssat 39
       Réponses
40
      </th>
41
    </tr>
42
    <tr>
1005 bpr 43
      <td bgcolor=lightblue width="30%">
23 reyssat 44
	  <table>
45
	    <tr>
46
	      <td bgcolor=white>
11157 bpr 47
	        $obtemp
23 reyssat 48
	      </td>
49
	    </tr>
50
	  </table>
51
      </td>
11157 bpr 52
      <td bgcolor=darkcyan>
23 reyssat 53
        <table cellpadding=4>
54
	 !for i=1 to $rowsnb
55
	 !set bg$(i)=$(coulors[$[((2*$i-1)%3)+1];])
56
         !set bg2$(i)=$(coulors[$[((2*$i)%3)+1];])
57
	  <tr>
1123 bpr 58
	    <td bgcolor="$(bg$(i))">
6063 bpr 59
	      <input type="checkbox" name="propsrep" value="$i"
23 reyssat 60
	        !if $i isitemof $L
61
		  checked
62
		!endif
5734 bpr 63
	      />
23 reyssat 64
	    </td>
1123 bpr 65
	    <td bgcolor="$(bg$(i))">
23 reyssat 66
	      $(p$(i))
67
	    </td>
68
	    <td>
69
	      &nbsp;
70
	    </td>
1123 bpr 71
	    <td bgcolor="$(bg2$(i))">
6063 bpr 72
	      <input type="checkbox" name="propsrep" value="$[$i+$rowsnb]"
23 reyssat 73
	        !if $[$i+$rowsnb] isitemof $L
74
		  checked
75
		!endif
5734 bpr 76
	      />
23 reyssat 77
	    </td>
1123 bpr 78
	    <td bgcolor="$(bg2$(i))">
23 reyssat 79
	      $(p$[$i+$rowsnb])
80
	    </td>
81
	  </tr>
82
	 !next i
83
	 !if $extrarow!=0
84
	  <tr>
11157 bpr 85
	    <td bgcolor="$(coulors[$[($propsnb+1)%3+1];])" colspan="5">
6063 bpr 86
	      <input type="checkbox" name="propsrep" value="$[$propsnb+1]"
23 reyssat 87
	        !if [$propsnb+1] isitemof $L
88
		  checked
89
		!endif
5734 bpr 90
	      />
23 reyssat 91
		  &nbsp; $(p$[$propsnb+1])
92
	    </td>
93
	  </tr>
94
	 !endif
95
	</table>
96
      </td>
97
    </tr>
98
    <tr>
6063 bpr 99
      <td colspan="2" bgcolor="white">
6235 bpr 100
        <hr />
23 reyssat 101
        Saisir ici si besoin, une indication pour cette question:
6235 bpr 102
	<br />
23 reyssat 103
	  !set wims_backslash_insmath=no
104
	  !set indictemp=!reinput $indictemp
3049 bpr 105
	  <textarea name="exo_indic" rows=5 cols=60>$indictemp</textarea>
23 reyssat 106
	  !set wims_backslash_insmath=yes
11157 bpr 107
	</td>
23 reyssat 108
    </tr>
109
  </table>
110
 
111
!read comsDir/valideb