Rev 16510 | Rev 17468 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 16510 | Rev 17410 | ||
---|---|---|---|
Line 21... | Line 21... | ||
21 | start_ip=!sh awk '{if ($$6=="$wims_session" && $$2=="00") print $$5;}' $wims_home/log/classes/$wims_class/score/$wims_user.exam |
21 | start_ip=!sh awk '{if ($$6=="$wims_session" && $$2=="00") print $$5;}' $wims_home/log/classes/$wims_class/score/$wims_user.exam |
22 | !endif |
22 | !endif |
23 | 23 | ||
24 | replycnt=0 |
24 | replycnt=0 |
25 | !reset scorereducedbyip |
25 | !reset scorereducedbyip |
- | 26 | progressbar=!values -1 for v=1 to $exocnt |
|
26 | !for i=1 to $p |
27 | !for i=1 to $p |
27 | l=!record $i of wimshome/$wims_sesdir/examscore.$exam |
28 | l=!record $i of wimshome/$wims_sesdir/examscore.$exam |
28 | !distribute words $l into a_,b_,c_,d_,e_,f_,g_,i_ |
29 | !distribute words $l into a_,b_,c_,d_,e_,f_,g_,i_ |
29 | !if $c_=score and $(replied$b_)=0 |
30 | !if $c_=score and $(replied$b_)=0 |
30 | got$b_=$d_ |
31 | got$b_=$d_ |
Line 35... | Line 36... | ||
35 | !else |
36 | !else |
36 | gotip$b_=$d_ |
37 | gotip$b_=$d_ |
37 | !endif |
38 | !endif |
38 | replied$b_=1 |
39 | replied$b_=1 |
39 | !advance replycnt |
40 | !advance replycnt |
- | 41 | !let pos_=!positionof item $b_ in $(wims_exrandomlist[1;]) |
|
- | 42 | progressbar=!replace item number $pos_ by $d_ in $progressbar |
|
40 | !endif |
43 | !endif |
41 | !next i |
44 | !next i |
42 | 45 | ||
43 | totgot=0 |
46 | totgot=0 |
44 | totgotip=0 |
47 | totgotip=0 |