Subversion Repositories wimsdev

!set sizex=65

!set types=!nonempty lines $types

!set typelist=!column 2 of $types

!set typenames=!column 1 of $types

$name_content

<span class="wims_mod_title">$oef_title</span>.

!set wims_ref_class=wims_button

!href cmd=reply&level=1 $name_menuback

!form reply

<input type="hidden" name="level" value="3" />

$name_alea [

!href target=wims_mhelp cmd=help&special_parm=parameters $wims_name_Explanations

 ]<br />

!set o_parms=!reinput $oef_parms

<textarea class="nowrap" rows="6" cols="$sizex" name="oef_parms">$o_parms</textarea>

<div>

$name_statement ($oef_format) : [

!href target=wims_mhelp cmd=help&special_parm=format $wims_name_Explanations

 ]<br />

!set o_statement=!reinput $oef_statement

<textarea class="nowrap" rows="6" cols="$sizex" required="required" name="oef_statement">$o_statement</textarea>

</div>

!if $oef_answercnt>0

$table_header

 <caption>$name_free</caption>

$table_tr<th>$wims_name_name</th><th>$name_goodsol</th><th>$wims_name_Type</b>

 !set wims_ref_class=wims_button_help

 !href target=wims_mhelp cmd=help&special_parm=reply#freestyle $wims_name_help

 </th></tr>

 !for i=1 to $oef_answercnt

  !default anstype$i=default

  !set p_=!reinput $(ansprompt$i)

 $table_tr<td><input size="$[$promptlim-3]" maxlength="$promptlim" name="ansprompt$i" required="required" value="$p_" />

  !set p_=!reinput $(ansgood$i)

  </td><td> <input size="30" name="ansgood$i" value="$p_" /></td>

  <td class="small">

  !formselect anstype$i list $typelist prompt $typenames

  </td></tr>

 !next i

 $table_end

 <p>

 $name_precision:

 !formselect oef_precision list 100,1000,10000,100000,1000000 prompt 1/100,1/1000,1/10 000,1/100 000,1/1 000 000

 <br />$name_function

 (&nbsp;<input size="6" name="oef_rangel" value="$oef_rangel" />,<input size="6" name="oef_ranger" value="$oef_ranger" />&nbsp;).

 </p>

!endif

!if $oef_condcnt>0

 $table_header

 <caption>$name_condition_numeric,</caption>

 $table_tr<th>$name_name_condition</th><th>$name_definition</th></tr>

 !for i=1 to $oef_condcnt

  !set p_=!reinput $(Condname$i)

   $table_tr<td><input size="$promptlim" maxlength="$promptlim" name="Condname$i" value="$p_" /></td>

  !set p_=!reinput $(Condtest$i)

  <td> <input size="40" name="Condtest$i" value="$p_" /></td></tr>

 !next i

$table_end

!endif

!if $oef_choicecnt>0

 $table_header

 <caption>$name_multiple</caption>

  $table_tr<th>$wims_name_name</th><th>$name_goodchoice</th><th>$name_badchoice</th></tr>

 !for i=1 to $oef_choicecnt

  !set p_=!reinput $(choiprompt$i)

 $table_tr<td> <input size="$promptlim" maxlength="$promptlim" name="choiprompt$i" value="$p_" /></td>

  !set p_=!reinput $(choigood$i)

  <td> <input size="10" name="choigood$i" value="$p_" /></td>

  !set p_=!reinput $(choibad$i)

  <td> <input size="30" name="choibad$i" value="$p_" /></td></tr>

 !next i

 $table_end

!endif

<div class="wimscenter">

<input type="submit" value="$name_sendsource" />

</div>

$name_option

<ul><li><label for="oef_hint">$name_indication</label> (html)

!set pp=!reinput $oef_hint

<textarea class="nowrap" rows="3" cols="$[$sizex-10]" name="oef_hint" id="oef_hint">$pp</textarea>

</li><li><label for="oef_solution">$name_solution</label> (html)

!set pp=!reinput $oef_solution

<textarea class="nowrap" rows="3" cols="$[$sizex-10]" name="oef_solution" id="oef_solution">$pp</textarea>

</li></ul>

!formend