Subversion Repositories wimsdev

Rev

Rev 12947 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !! on a besoin de databyday
  2. !set dataelse=!line 2 to -1 of $databyday
  3. !if $dataelse=$empty
  4.   !exit
  5. !endif
  6. !set datax=!declosing $(databyday[1;1])
  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])
  11. !set datanew=!declosing $(databyday[1;6])
  12.  
  13. !set nbs=!itemcnt $showsheet_
  14. <h2 class="activity_title">
  15. !if $nbs=1
  16.   $wims_name_Sheet
  17. !else
  18.   $wims_name_Sheets
  19. !endif
  20. !replace internal , by ,$ $ in $showsheet_
  21. </h2>
  22. !read script/draw
  23.  
  24. !if $nbs>1
  25.   !!on regarde chacune des feuilles
  26.   !distribute items $wims_name_Sheet,$wims_name_Sheets into name,names
  27. !else
  28.   !!on regarde chacun des exos
  29.   !distribute items $wims_name_Exercise, $wims_name_sheet_exos $showsheet_ into name,names
  30. !endif
  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;">
  46.   !read script/draw
  47.   <p class="activity_title wimscenter">$name $exo</p>
  48.   </li>
  49. !next
  50.  </ul>
  51.