Subversion Repositories wimsdev

Rev

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