Subversion Repositories wimsdev

Rev

Rev 4811 | Rev 5958 | 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 style="color:brown;">$(name_help$[min(3,$step)])</li>
  23. !endif
  24.  
  25. !if $step>=3
  26.     !if $type<=1
  27.       <li style="color:brown;">$(name_help$type$ext)</li>
  28.     !else
  29.      !if $ext=2
  30.       <li>$(name_help$type$[$ext-1])</li>
  31.      !endif
  32.       <li style="color:brown;">$(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.   <center>
  60.   <input type="submit" value="$wims_name_send"/>
  61.   </center>
  62.   !endif
  63. !endif
  64.  
  65. !if $step>=$limit
  66.   !changeto answer.phtml
  67.   !exit
  68. !endif
  69.  
  70. !if $step=1
  71. <ul><li>  
  72.    !formradio wims_deposit_old list 0 prompt $wims_name_download
  73.    <input type="file" name="wims_deposit"/>
  74.    !if $already!=
  75.      $name_already
  76.      !formradio wims_deposit_old list $already
  77.    !endif
  78.   </li><li>
  79.   !default type=0
  80.   !formradio type list 0,1,2 prompt $name_0, $name_1,$name_2
  81.   </li>
  82. </ul>
  83.   <center>
  84.      !set wims_ref_class=wims_button
  85.    <input type="submit" value="$wims_name_send"/>
  86.   </center>
  87.   !if $test=noimage
  88.     <span class="wims_warning">$wims_name_warning</span>. $name_noimage
  89.   !endif
  90.   !if $test=bad_image
  91.     <span class="wims_warning">$wims_name_warning</span>. $name_bad_image
  92.   !endif
  93. !endif
  94. !if $step>=2
  95.  !distribute item alt="Click",1,form click into ins_attr,ins_border,ins_tag
  96.  
  97.   <table class="wimsnoborder wimscenter"><tr><td style="width:50px; height-min:50px;text-align:top;">
  98.   !if $step>=3
  99.     !if $type=2 and $ext=2
  100.      $(name_point$type$ext)
  101.       !read zone.phtml
  102.   </td></tr>
  103.   </table>
  104.       !exit
  105.     !endif
  106.        $(name_point$type$ext)
  107.        <br/>
  108.        !set insdraw_filebase=!append word $wims_home/sessions/$wims_session/$sesdir to $insdraw_filebase
  109.        !set insdraw_filebase=!listuniq $insdraw_filebase
  110.        !set ins_border=4
  111.       !insdraw copy 0,0,-1,-1,-1,-1,$wims_deposit\
  112.      $dessin
  113.      !set imgsrc=$ins_url
  114.   !else
  115.     <input type="image" name="click" src="$imgsrc" border="1"/>
  116.   !endif
  117. </td><td>
  118.   !if $test=nosize and $begin>=1
  119.    <span class="wims_warning">$wims_name_warning</span>. $name_nosize
  120.   !endif
  121.   !reset begin
  122.   !if $step>=3
  123.   !!a modifier
  124.    !if $test iswordof nolegend noclick
  125.       <span class="wims_warning">$wims_name_warning</span>.
  126.       !if $test iswordof nolegend
  127.         $name_nolegend
  128.       !endif  
  129.       !if $test=noclick
  130.        $name_noclick
  131.       !endif
  132.    !endif
  133.     <div style="padding:50px;">
  134.    !if $ext iswordof 2
  135.       !set readonly=readonly
  136.    !else
  137.       !reset readonly
  138.    !endif
  139.      <br/>
  140.       $name_legend
  141.       <input size="20" $readonly name="legend" value="$legend"/>
  142.       !if $type=2 and $ext=1
  143.         !formradio javatype list $list_curve prompt $name_list_curve
  144.       !endif
  145.     </div>
  146.    !if $data!=
  147.      <pre style="text-align:left;">$data</pre>
  148.    !endif
  149.   !endif
  150.   </td></tr>
  151. <tr><td colspan="3">
  152. !if $type!=2 or $ext=1
  153.   <input type="submit" value="$wims_name_send"/>
  154. !endif
  155. </td></tr>
  156. </table>
  157. !endif
  158.  
  159.  
  160. !reset test error
  161.