Rev 13308 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
8539 | bpr | 1 | !distribute items 9,9 into bar_scoreexo_limit, exo_bar_quallimit |
10332 | bpr | 2 | !if $wims_theme=default |
3 | !set float= |
||
4 | !else |
||
13308 | bpr | 5 | !set float=float_right |
10332 | bpr | 6 | !endif |
8538 | bpr | 7 | !if $wims_read_parm!=$empty |
8 | !set se=$wims_read_parm |
||
9 | !endif |
||
10 | !!## bar |
||
13308 | bpr | 11 | !set require=!getscorerequire sheet=$se |
12 | !if I0 isin $(f_$se) |
||
13 | !set d_=!getscore sheet=$se |
||
14 | !endif |
||
15 | !if I1 isin $(f_$se) |
||
16 | !set d_=!getscorebest sheet=$se |
||
17 | !endif |
||
18 | !if I2 isin $(f_$se) |
||
19 | !set d_=!getscorelevel sheet=$se |
||
20 | !endif |
||
21 | !set d_qual=!getscoremean sheet=$se |
||
22 | !set nb_exo=!wordcnt $d_ |
||
23 | !set d_=!words2items $d_ |
||
24 | !set d_qual=!words2items $d_qual |
||
25 | !set require=!words2items $require |
||
26 | <div class="wims_score_bar $float"> |
||
27 | <ol> |
||
28 | !for ii=1 to $nb_exo |
||
29 | !set exo_try= !word $ii of $try |
||
30 | !ifval 10*$(d_[$ii])/$(require[$ii]) > $bar_scoreexo_limit |
||
31 | !if $(d_qual[$ii]) > $exo_bar_quallimit |
||
32 | !set exo_class=wims_exo_done wims_congratulation, $wims_name_exo_congratulation |
||
33 | !else |
||
34 | !set exo_class=wims_exo_done,$wims_name_exo_done |
||
8538 | bpr | 35 | !endif |
13308 | bpr | 36 | !else |
37 | !if $exo_try >=1 |
||
38 | !set exo_class=wims_exo_undone,$wims_name_exo_undone |
||
39 | !else |
||
40 | !set exo_class=wims_exo_untry,$wims_name_exo_untry |
||
8538 | bpr | 41 | !endif |
13308 | bpr | 42 | !endif |
43 | !let donexo=!record $ii of wimshome/log/classes/$wims_class/sheets/.sheet$se |
||
15769 | guerimand | 44 | !distribute line $donexo into donm,donv,b,b,b,b,b,b,b,b,indiv |
45 | !if $(indivtechval_$se)=$empty or $(indivtechval_$se) isitemof $indiv |
||
46 | <li class="$(exo_class[1])"> |
||
47 | <a href="wims.cgi?session=$wims_session&+cmd=new&+worksheet=$se&+module=$donm&+$donv" |
||
48 | title="$wims_name_Exercise $ii: $(exo_class[2])"> |
||
49 | $wims_name_Exercise $ii: $(exo_class[2]) |
||
50 | </a> |
||
51 | </li> |
||
52 | !endif |
||
53 | !next ii |
||
13308 | bpr | 54 | </ol> |
55 | </div> |
||
8538 | bpr | 56 | !!## bar end |