Subversion Repositories wimsdev

Rev

Rev 8045 | Rev 9160 | 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,brokenline
  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.  
  11. !form reply
  12. <ol>
  13. !for a=1 to $[max(min(2,$step-1),1)]
  14.   <li>$(name_help$a)</li>
  15. !next
  16. !if $step=2
  17.       <li class="wims_emph">$(name_help$[min(3,$step)])</li>
  18.       </ol>
  19. !endif
  20.  
  21. !if $step>=3
  22.     !if $type<=1
  23.       <li class="wims_emph">$(name_help$type$ext)</li>
  24.     !else
  25.      !if $ext=2
  26.       <li>$(name_help$type$[$ext-1])</li>
  27.      !endif
  28.       <li class="wims_emph">$(name_help$type$ext)</li>
  29.     !endif
  30.    !endif
  31.   !if $step>=3 and $ext=1
  32.   <li>
  33.   $name_else
  34.    !formcheckbox erase list yes prompt <b>$name_erase</b>
  35.   </li>
  36.    !if $step>=4
  37.    <li>
  38.      $name_end
  39.      !reset tindex
  40.      !for t in $listexo
  41.      !set p=!char 1 of $t
  42.      !if ($type >= $p and $type<=1) or $type=$p
  43.       !set titre=$(name_description$t)
  44.       !set titre=!line 1 of $titre
  45.       !set titre=!replace internal , by &#44; in $titre
  46.      !set tindex=!append item $titre to $tindex
  47.       !set lex=!append item $t to $lex
  48.      !endif
  49.     !next
  50.  !formselect end list 0,$lex prompt choisir,$tindex
  51.    </li>
  52.   !endif
  53. </ol>
  54.   !if $type!=2 or $ext=1
  55.   <p class="wimscenter wimsform">
  56.   <input type="submit" value="$wims_name_send" />
  57.   </p>
  58.   !endif
  59. !endif
  60.  
  61. !if $step>=$limit
  62.   !changeto answer.phtml
  63.   !exit
  64. !endif
  65.  
  66. !if $step=1
  67. </ol>
  68. <ul><li>
  69.    !formradio wims_deposit_old list 0 prompt $wims_name_download
  70.    <input type="file" name="wims_deposit" />
  71.    !if $already!=
  72.      $name_already
  73.      !formradio wims_deposit_old list $already
  74.    !endif
  75.   </li><li>
  76.   !default type=0
  77.   !formradio type list 0,1,2,3 prompt $name_0, $name_1,$name_2,$name_3
  78.   </li>
  79. </ul>
  80.   <p class="wimscenter wimsform">
  81.      !set wims_ref_class=wims_button
  82.    <input type="submit" value="$wims_name_send" />
  83.   </p>
  84.   !if $test=noimage
  85.     <span class="wims_warning">$wims_name_warning</span>. $name_noimage
  86.   !endif
  87.   !if $test=bad_image
  88.     <span class="wims_warning">$wims_name_warning</span>. $name_bad_image
  89.   !endif
  90. !endif
  91. !if $step=2
  92. </ol>
  93. !endif
  94. !if $step>=2
  95.  
  96.  !distribute item alt="Click",1,form click into ins_attr,ins_border,ins_tag
  97.  
  98.   <ul><li style="display: inline-block;vertical-align:top;max-width:$[max($(insdraw_size[1])+4,300)]px">
  99.   !if $step>=3
  100.     !if $type iswordof 2 3 and $ext=2
  101.      $(name_point$type$ext)
  102.       !read zone.phtml
  103.   </li></ul>
  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. </li><li style="display: inline-block;vertical-align:top; padding-left:5em;">
  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.    !if $ext iswordof 2
  134.       !set readonly=readonly="readonly"
  135.    !else
  136.       !reset readonly
  137.    !endif
  138.      <br />
  139.       $name_legend
  140.       <input size="20" $readonly name="legend" value="$legend" />
  141.       !if $type=2 and $ext=1
  142.         !formradio javatype list $list_curve prompt $name_list_curve
  143.       !endif
  144.    !if $data!=
  145.      <pre style="text-align:left;">$data</pre>
  146.    !endif
  147.   !endif
  148.   </li>
  149. </ul>
  150. !if $type!=2 or $ext=1
  151.  <div class="wimscenter wimsform">
  152.   <input type="submit" value="$wims_name_send" />
  153.   </div>
  154. !endif
  155.  
  156. !endif
  157. !formend
  158.  
  159. !reset test error
  160.