Rev 12555 | Rev 16148 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 12555 | Rev 15569 | ||
|---|---|---|---|
| Line 23... | Line 23... | ||
| 23 | !reset exam_$jj |
23 | !reset exam_$jj |
| 24 | !endif |
24 | !endif |
| 25 | !! jj correspond to exos in an exam |
25 | !! jj correspond to exos in an exam |
| 26 | !if $(exam$(i)_$jj)!=$empty |
26 | !if $(exam$(i)_$jj)!=$empty |
| 27 | !reset exam$(i)_$jj |
27 | !reset exam$(i)_$jj |
| - | 28 | !endif |
|
| - | 29 | !if $(sess_$jj)!=$empty |
|
| - | 30 | !reset sess_$jj |
|
| 28 | !endif |
31 | !endif |
| 29 | !next |
32 | !next |
| 30 | !next |
33 | !next |
| 31 | 34 | ||
| 32 | sc=!record 0 of wimshome/log/classes/$wims_class/score/$uu.exam |
35 | sc=!record 0 of wimshome/log/classes/$wims_class/score/$uu.exam |
| 33 | !if $sc=$empty |
36 | !if $sc=$empty |
| 34 | !exit |
37 | !exit |
| 35 | !endif |
38 | !endif |
| 36 | nsc=!linecnt $sc |
39 | nsc=!linecnt $sc |
| 37 | - | ||
| 38 | 40 | ||
| 39 | !for i=1 to $nsc |
41 | !for i=1 to $nsc |
| 40 | l=!line $i of $sc |
42 | l=!line $i of $sc |
| 41 | !distribute words $l into e_,s_,t__,T_,i_,S_,t_ |
43 | !distribute words $l into e_,s_,t__,T_,i_,S_,t_ |
| 42 | !if $S_=0 |
44 | !if $S_=0 |
| 43 | !reset jj |
45 | !reset jj |
| 44 | !else |
46 | !else |
| 45 | !set jj=!positionof item $S_ in $checksessions |
47 | !set jj=!positionof item $S_ in $checksessions |
| 46 | !set score$(jj)_$e_=$s_ |
48 | !set score$(jj)_$e_=$s_ |
| 47 | !set exam_$jj=!append item $e_ to $(exam_$jj) |
49 | !set exam_$jj=!append item $e_ to $(exam_$jj) |
| - | 50 | !set sess_$e_=!append item $jj to $(sess_$e_) |
|
| 48 | !set exam_$jj=!listuniq $(exam_$jj) |
51 | !set exam_$jj=!listuniq $(exam_$jj) |
| 49 | !if $s_ issametext 00 |
52 | !if $s_ issametext 00 |
| 50 | start$(jj)_$e_=$t_ |
53 | start$(jj)_$e_=$t_ |
| 51 | dur$(jj)_$e_=$T_ |
54 | dur$(jj)_$e_=$T_ |
| 52 | !endif |
55 | !endif |