Subversion Repositories wimsdev

Rev

Rev 12488 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
9355 bpr 1
!! on a besoin de databyday
9405 bpr 2
!set dataelse=!line 2 to -1 of $databyday
3
!if $dataelse=$empty
12488 bpr 4
  !exit
9405 bpr 5
!endif
9355 bpr 6
!set datax=!declosing $(databyday[1;1])
9365 bpr 7
!set day=!declosing $(databyday[1;2])
8
!set datay=!declosing $(databyday[1;3])
9
!set dataz=!declosing $(databyday[1;4])
10
!set datagood=!declosing $(databyday[1;5])
9405 bpr 11
!set datanew=!declosing $(databyday[1;6])
9363 bpr 12
 
9355 bpr 13
!set nbs=!itemcnt $showsheet_
9363 bpr 14
<h2 class="activity_title">
9355 bpr 15
!if $nbs=1
16
  $wims_name_Sheet
17
!else
18
  $wims_name_Sheets
19
!endif
20
!replace internal , by ,$ $ in $showsheet_
9363 bpr 21
</h2>
12947 guerimand 22
!read script/draw
9355 bpr 23
 
24
!if $nbs>1
12488 bpr 25
  !!on regarde chacune des feuilles
26
  !distribute items $wims_name_Sheet,$wims_name_Sheets into name,names
9355 bpr 27
!else
12488 bpr 28
  !!on regarde chacun des exos
9369 bpr 29
  !distribute items $wims_name_Exercise, $wims_name_sheet_exos $showsheet_ into name,names
9355 bpr 30
!endif
12488 bpr 31
!set linecnt=!linecnt $dataelse
32
<hr />
33
 <h2 class="activity_title">$names</h2>
34
<ul class="inline">
35
!for nn=1 to $linecnt
36
  !set line=!line $nn of $dataelse
37
  !set exo=$(line[1])
38
  !set datay=!declosing $(line[3])
39
  !if $datay=$empty
40
    !break
41
  !endif
42
  !set dataz=!declosing $(line[4])
43
  !set datagood=!declosing $(line[5])
44
  !set datanew=!declosing $(line[6])
45
  <li style="vertical-align:bottom;">
12947 guerimand 46
  !read script/draw
12488 bpr 47
  <p class="activity_title wimscenter">$name $exo</p>
48
  </li>
49
!next
50
 </ul>