Subversion Repositories wimsdev

Rev

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

  1.  
  2. !! menu definition file
  3. !set list_curve=circle,rectangle,polygon
  4. !default step=1
  5. !read lang/names.phtml.fr
  6. $name_intro
  7. $name_exo0
  8. !set wims_ref_class=wims_button_help
  9. !href target=wims_mhelp cmd=help $wims_name_help
  10. !!!set trust=!getdef trusted_modules in wimshome/log/wims.conf
  11. !!<div class="emptyline"></div>
  12. !!!if $module notwordof $trust
  13. !!   <span class="wims_warning">$wims_name_warning</span>. $name_notrust
  14. !!   !exit
  15. !!!endif
  16. !form reply
  17. <ol>
  18. !for a=1 to $[max(min(2,$step-1),1)]
  19.   <li>$(name_help$a)</li>
  20. !next
  21. !if $step=2
  22.       <li class="wims_emph">$(name_help$[min(3,$step)])</li>
  23. !endif
  24.  
  25. !if $step>=3
  26.     !if $type<=1
  27.       <li class="wims_emph">$(name_help$type$ext)</li>
  28.     !else
  29.      !if $ext=2
  30.       <li>$(name_help$type$[$ext-1])</li>
  31.      !endif
  32.       <li class="wims_emph">$(name_help$type$ext)</li>
  33.     !endif
  34.    !endif
  35.   !if $step>=3 and $ext=1
  36.   <li>
  37.   $name_else
  38.    !formcheckbox erase list yes prompt <b>$name_erase</b>
  39.   </li>
  40.    !if $step>=4
  41.    <li>
  42.      $name_end
  43.      !reset tindex
  44.      !for t in $listexo
  45.      !set p=!char 1 of $t
  46.      !if ($type >= $p and $type<=1) or $type=$p
  47.       !set titre=$(name_description$t)
  48.       !set titre=!line 1 of $titre
  49.       !set titre=!replace internal , by &##44; in $titre
  50.      !set tindex=!append item $titre to $tindex
  51.       !set lex=!append item $t to $lex
  52.      !endif
  53.     !next
  54.  !formselect end list 0,$lex prompt choisir,$tindex
  55.   </li>
  56.  !endif
  57. </ol>
  58.   !if $type!=2 or $ext=1
  59.   <p class="wimscenter wimsform">
  60.   <input type="submit" value="$wims_name_send"/>
  61.   </p>
  62.   !endif
  63. !endif
  64.  
  65. !if $step>=$limit
  66.   !changeto answer.phtml
  67.   !exit
  68. !endif
  69.  
  70. !if $step=1
  71. </ol>
  72. <ul><li>  
  73.    !formradio wims_deposit_old list 0 prompt $wims_name_download
  74.    <input type="file" name="wims_deposit"/>
  75.    !if $already!=
  76.      $name_already
  77.      !formradio wims_deposit_old list $already
  78.    !endif
  79.   </li><li>
  80.   !default type=0
  81.   !formradio type list 0,1,2 prompt $name_0, $name_1,$name_2
  82.   </li>
  83. </ul>
  84.   <p class="wimscenter wimsform">
  85.      !set wims_ref_class=wims_button
  86.    <input type="submit" value="$wims_name_send"/>
  87.   </p>
  88.   !if $test=noimage
  89.     <span class="wims_warning">$wims_name_warning</span>. $name_noimage
  90.   !endif
  91.   !if $test=bad_image
  92.     <span class="wims_warning">$wims_name_warning</span>. $name_bad_image
  93.   !endif
  94. !endif
  95. !if $step=2
  96. </ol>
  97. !endif
  98. !if $step>=2
  99.  
  100.  !distribute item alt="Click",1,form click into ins_attr,ins_border,ins_tag
  101.  
  102.   <table class="wimsnoborder wimscenter"><tr><td style="width:50px; height-min:50px;text-align:top;">
  103.   !if $step>=3
  104.     !if $type=2 and $ext=2
  105.      $(name_point$type$ext)
  106.       !read zone.phtml
  107.   </td></tr>
  108.   </table>
  109.       !exit
  110.     !endif
  111.        $(name_point$type$ext)
  112.        <br/>
  113.        !set insdraw_filebase=!append word $wims_home/sessions/$wims_session/$sesdir to $insdraw_filebase
  114.        !set insdraw_filebase=!listuniq $insdraw_filebase
  115.       !! !set ins_border=4
  116.       !insdraw copy 0,0,-1,-1,-1,-1,$wims_deposit\
  117.      $dessin
  118.      !set imgsrc=$ins_url
  119.   !else
  120.     <input type="image" name="click" src="$imgsrc" border="1"/>
  121.   !endif
  122. </td><td>
  123.   !if $test=nosize and $begin>=1
  124.    <span class="wims_warning">$wims_name_warning</span>. $name_nosize
  125.   !endif
  126.   !reset begin
  127.   !if $step>=3
  128.   !!a modifier
  129.    !if $test iswordof nolegend noclick
  130.       <span class="wims_warning">$wims_name_warning</span>.
  131.       !if $test iswordof nolegend
  132.         $name_nolegend
  133.       !endif  
  134.       !if $test=noclick
  135.        $name_noclick
  136.       !endif
  137.    !endif
  138.     <div style="padding:50px;">
  139.    !if $ext iswordof 2
  140.       !set readonly=readonly
  141.    !else
  142.       !reset readonly
  143.    !endif
  144.      <br/>
  145.       $name_legend
  146.       <input size="20" $readonly name="legend" value="$legend"/>
  147.       !if $type=2 and $ext=1
  148.         !formradio javatype list $list_curve prompt $name_list_curve
  149.       !endif
  150.     </div>
  151.    !if $data!=
  152.      <pre style="text-align:left;">$data</pre>
  153.    !endif
  154.   !endif
  155.   </td></tr>
  156.   </table>
  157. !if $type!=2 or $ext=1
  158.  <div class="wimscenter wimsform">
  159.   <input type="submit" value="$wims_name_send"/>
  160.   </div>
  161. !endif
  162.  
  163. !endif
  164. !formend
  165.  
  166. !reset test error
  167.