Subversion Repositories wimsdev

Rev

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