Subversion Repositories wimsdev

Rev

Rev 14558 | Rev 17176 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !nocache
  2. !set wims_html_header=!append line $oefcss to $wims_html_header
  3. !header1
  4. !set module_title=!module title_$lang $module
  5. !default module_title=!module title $module
  6. <h1 class="wimscenter">
  7. !href module=$module&cmd=intro WIMS
  8.  $module_title<br />
  9. <span class="smaller">--- $name_print ---</span></h1>
  10.  
  11. !if $error!=$empty
  12.   !changeto oef/msg.phtml
  13. !endif
  14.  
  15. !if ($wims_developer!= or $wims_user=supervisor) and $latex_exists=1
  16.   <div class="wimscenter">
  17.   !read oef/latex.proc print
  18.   </div>
  19. !endif
  20. <h2 class="wimscenter">$wims_name_Exercices</h2>
  21. !for iii=1 to $n
  22.   <h3>
  23.   !href target=wims_light module=$module&exo=$(name_$iii)&cmd=new <span class="bold">$name_exo</span> $iii.
  24.   <span id="title_$iii">$(title_$iii)</span>
  25.   </h3>
  26.   !if $(question_$iii)=$empty
  27.     ($name_noprint)
  28.   !else
  29.     !set wims_parm_detag=label
  30.     !if __EXECUTED_ isin $(question_$iii) and _EXERCISE__ isin $(question_$iii)
  31.       !set thisexo=$(name_$iii)
  32.       !!!!FIXME 5
  33.       !readproc oef/imagedir.proc
  34.       !for k=1 to $(varcnt_$iii)+5
  35.         !set val$k=!line $k of $(var_$iii)
  36.       !next k
  37.       <div id="exo_$iii">
  38.       !read $(class_header)def/$(name_$iii).def question
  39.       </div>
  40.     !else
  41.       <div id="exo_$iii">
  42.       $(question_$iii)
  43.       </div>
  44.     !endif
  45.     !if $(chce_$iii)!=$empty
  46.       <div class="wims_answer">$(chce_$iii)</div>
  47.     !endif
  48.     !reset wims_parm_detag
  49.   !endif
  50.   <br class="clearall" />
  51.   !if $i__>=$(cnt_$iii) and $prompt___!=$empty
  52.     <div class="spacer">$prompt___</div>
  53.     !reset prompt___
  54.   !endif
  55.   !if $(embedcnt$iii)=0 or $(embedcnt$iii)=$empty
  56.     !set tmp_cnt=!itemcnt $(Replyname$iii)
  57.     <ul>
  58.     !for k=1 to $tmp_cnt-1
  59.       <li>
  60.       !set tmp=!item $k of $(Replyname$iii)
  61.       !if $tmp!=$empty
  62.         <em>$tmp</em>:
  63.       !endif
  64.       !set tmp=!line $k of $(Rg$iii)
  65.       !set tmp=!nonempty items $tmp
  66.       !if $((Replytype$iii)[$k]) iswordof dragfill clickfill reorder compose
  67.         !replace internal , by </div>$ $<div class="drag_label" style="display:inline-block;"> \
  68. in <div class="drag_label" style="display:inline-block;">$tmp</div>
  69.       !else
  70.         !if $((Replytype$iii)[$k]) iswordof radio menu checkbox
  71.           !replace internal , by </li><li> in <ul><li>$tmp</li></ul>
  72.         !else
  73.           $tmp
  74.         !endif
  75.       !endif
  76.       !reset tmp
  77.       </li>
  78.     !next
  79.     </ul>
  80.   !endif
  81. !next
  82.  
  83. !if $wims_user!=$empty and $wims_user!=supervisor
  84.   !goto noans
  85. !endif
  86.  
  87. !if $test_print=1
  88.   <div class="wims_solution">
  89.   <h2 class="wimscenter">$name_answers</h2>
  90.   !for iii=1 to $n
  91.     !set t=!linecnt $(ans_$iii)
  92.     !if $t>0
  93.       <div id="answer_$iii">
  94.       <h3>$name_answer_i $iii.</h3>
  95.       !if $t>1
  96.         <ol style="list-style-type:square;">
  97.       !endif
  98.       !for k=1 to $t
  99.         !if $(Replytype$iii[$k]) iswordof coord clock jsxgraphcurve jsxgraph draw
  100.           !break
  101.         !endif
  102.         !set l__=!line $k of $(ans_$iii)
  103.         !if $l__ !=
  104.           !if $t>1
  105.             <li style="counter-reset:$k">
  106.           !endif
  107.             $l__
  108.           !if $t>1
  109.             </li>
  110.           !endif
  111.           !reset l__
  112.         !endif
  113.       !next k
  114.       !if $t>1
  115.         </ol>
  116.       !endif
  117.       </div>
  118.     !endif
  119.   !next iii
  120.   </div><!--end of wims_solution-->
  121. !endif
  122.  
  123. :noans
  124.  
  125. !set wims_menu_items=!append line renew,1,cmd=reply&print=yes\
  126.   to $wims_menu_items
  127. !if $wims_user=$empty
  128.   !set wims_menu_items=!append line back2,1,module=$module&cmd=intro\
  129.     to $wims_menu_items
  130. !endif
  131. !tail
  132.