Subversion Repositories wimsdev

Rev

Rev 8823 | Rev 11952 | 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.    !set wims_ref_id=wims_deposit_old0
  70.    !formradio wims_deposit_old list 0 prompt $wims_name_download
  71.    <input type="file" name="wims_deposit" />
  72.    !if $already!=
  73.      $name_already
  74.      !formradio wims_deposit_old list $already
  75.    !endif
  76.   </li><li>
  77.   !default type=0
  78.   !formradio type list 0,1,2,3 prompt $name_0, $name_1,$name_2,$name_3
  79.   </li>
  80. </ul>
  81.   <p class="wimscenter wimsform">
  82.      !set wims_ref_class=wims_button
  83.    <input type="submit" value="$wims_name_send" />
  84.   </p>
  85.   !if $test=noimage
  86.     <span class="wims_warning">$wims_name_warning</span>. $name_noimage
  87.   !endif
  88.   !if $test=bad_image
  89.     <span class="wims_warning">$wims_name_warning</span>. $name_bad_image
  90.   !endif
  91. !endif
  92. !if $step=2
  93. </ol>
  94. !endif
  95. !if $step>=2
  96.  
  97.  !distribute item alt="Click",1,form click into ins_attr,ins_border,ins_tag
  98.  
  99.   <ul><li style="display: inline-block;vertical-align:top;max-width:$[max($(insdraw_size[1])+4,300)]px">
  100.   !if $step>=3
  101.     !if $type iswordof 2 3 and $ext=2
  102.      $(name_point$type$ext)
  103.       !read zone.phtml
  104.   </li></ul>
  105.       !exit
  106.     !endif
  107.        $(name_point$type$ext)
  108.        <br />
  109.        !set insdraw_filebase=!append word $wims_home/sessions/$wims_session/$sesdir to $insdraw_filebase
  110.        !set insdraw_filebase=!listuniq $insdraw_filebase
  111.       !! !set ins_border=4
  112.       !insdraw copy 0,0,-1,-1,-1,-1,$wims_deposit\
  113.      $dessin
  114.      !set imgsrc=$ins_url
  115.   !else
  116.     <input type="image" name="click" src="$imgsrc" border="1" />
  117.   !endif
  118. </li><li style="display: inline-block;vertical-align:top; padding-left:5em;">
  119.   !if $test=nosize and $begin>=1
  120.    <span class="wims_warning">$wims_name_warning</span>. $name_nosize
  121.   !endif
  122.   !reset begin
  123.   !if $step>=3
  124.   !!a modifier
  125.    !if $test iswordof nolegend noclick
  126.       <span class="wims_warning">$wims_name_warning</span>.
  127.       !if $test iswordof nolegend
  128.         $name_nolegend
  129.       !endif
  130.       !if $test=noclick
  131.        $name_noclick
  132.       !endif
  133.    !endif
  134.    !if $ext iswordof 2
  135.       !set readonly=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.    !if $data!=
  146.      <pre style="text-align:left;">$data</pre>
  147.    !endif
  148.   !endif
  149.   </li>
  150. </ul>
  151. !if $type!=2 or $ext=1
  152.  <div class="wimscenter wimsform">
  153.   <input type="submit" value="$wims_name_send" />
  154.   </div>
  155. !endif
  156.  
  157. !endif
  158. !formend
  159.  
  160. !reset test error
  161.