Subversion Repositories wimsdev

Rev

Rev 7885 | Rev 8045 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

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