Subversion Repositories wimsdev

!set ans_require=

!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 tt=!itemcnt $(replygood$i)
    !ifval $tt%2=1
      !default reply$i=$(replygood$i[-1])
    !else
      !default reply$i=$[($(replygood$i[1])+$(replygood$i[2]))/2]
    !endif
  !endif
!endif
!if $wims_read_parm!=noprompt
  <tr><td><label for="reply$i">$(replyname$i)</label>&nbsp;=</td><td>
!endif

!read anstype/inputcss.inc

!bound inputsize between integer 1 and 100 default 20
<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