1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
!set anstype=yes
!set anstyle=symtext
!set ans_require=
!set ans_reaccent=yes
!if $wims_read_parm=def
!exit
!endif
!if debug iswordof $m_oefenv and ?analyze notin $(replygood$i)
!set replydefaulted=yes
!if $oef_default=yes
!set r_=!line 1 of $(replygood$i)
!set r_=!row 1 of $r_
!set r_=!translate | to $\
$ in $r_
!default reply$i=!line 1 of $r_
!endif
!endif
!if $wims_read_parm!=noprompt
<tr><td><label for="reply$i">$(replyname$i)</label></td><td>
!endif
!read anstype/inputcss.inc
!bound inputsize between integer 1 and 100 default 40
<input list="emptylist" id="reply$i" size="$inputsize" name="reply$i" value="$(reply$i)" autocapitalize="none" $inputoption>
!if symbols isin $(replyoption$i)
!read anstype/symbols.inc
!endif
!if $wims_read_parm!=noprompt
</td></tr>
!endif
!reset inputsize inputoption option
|
