Subversion Repositories wimsdev

Rev

Rev 13248 | 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 adm/language lang/names.phtml
  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.      <label for="end">$name_end</label>
  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 class="wims_nopuce"><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.   <fieldset>
  79.   <legend>$name_name_type</legend>
  80.   !formradio type list 0,1,2,3 prompt $name_0,$name_1,$name_2,$name_3
  81.   </fieldset>
  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.     <div class="wims_msg warning"><span class="wims_warning">$wims_name_warning</span>. $name_noimage</div>
  90.   !endif
  91.   !if $test=bad_image
  92.     <div class="wims_msg warning"><span class="wims_warning">$wims_name_warning</span>. $name_bad_image</div>
  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.   <ul><li style="display: inline-block;vertical-align:top;max-width:$[max($(insdraw_size[1])+4,300)]px">
  103.   !if $step>=3
  104.     !if $type iswordof 2 3 and $ext=2
  105.      $(name_point$type$ext)
  106.       !read zone.phtml
  107.   </li></ul>
  108.       !exit
  109.     !endif
  110.        $(name_point$type$ext)
  111.        <br>
  112.        !set insdraw_filebase=!append word $wims_home/sessions/$wims_session/$sesdir to $insdraw_filebase
  113.        !set insdraw_filebase=!listuniq $insdraw_filebase
  114.       !! !set ins_border=4
  115.       !insdraw copy 0,0,-1,-1,-1,-1,$wims_deposit\
  116.      $dessin
  117.      !set imgsrc=$ins_url
  118.   !else
  119.     <input type="image" name="click" src="$imgsrc" border="1">
  120.   !endif
  121. </li><li style="display: inline-block;vertical-align:top; padding-left:5em;">
  122.   !if $test=nosize and $begin>=1
  123.    <span class="wims_warning">$wims_name_warning</span>. $name_nosize
  124.   !endif
  125.   !reset begin
  126.   !if $step>=3
  127.   !!a modifier
  128.    !if $test iswordof nolegend noclick
  129.       <span class="wims_warning">$wims_name_warning</span>.
  130.       !if $test iswordof nolegend
  131.         $name_nolegend
  132.       !endif
  133.       !if $test=noclick
  134.        $name_noclick
  135.       !endif
  136.    !endif
  137.    !if $ext iswordof 2
  138.       !set readonly=readonly="readonly"
  139.    !else
  140.       !reset readonly
  141.    !endif
  142.      <br>
  143.       <label for="legend">$name_legend</label>
  144.       <input size="20" $readonly name="legend" id="legend" value="$legend">
  145.       !if $type=2 and $ext=1
  146.         !formradio javatype list $list_curve prompt $name_list_curve
  147.       !endif
  148.    !if $data!=
  149.      <pre style="text-align:left;">$data</pre>
  150.    !endif
  151.   !endif
  152.   </li>
  153. </ul>
  154. !if $type!=2 or $ext=1
  155.  <div class="wimscenter wimsform">
  156.   <input type="submit" value="$wims_name_send">
  157.   </div>
  158. !endif
  159.  
  160. !endif
  161. !formend
  162.  
  163. !reset test error
  164.