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 |