Return to simpleproblem.problem CVS log

Up to [LON-CAPA] / loncom / homework

Continued work on DOCS homework.

<problem>
<simpleeditbutton />
<script type="loncapa/perl">
$questiontype=&EXT('resource.0.questiontype');
unless ($questiontype) { $questiontype='radio'; }
$max=&EXT('resource.0.maxfoils');
unless ($max) { $max=10; }
$randomize=&EXT('resource.0.randomize');
unless ($randomize) { $randomize='yes'; }
$options=&EXT('resource.0.options');
unless ($options) { $options='("true","false")'; }
for ($i=1;$i<=10;$i++) {
    $value[$i]=&EXT('resource.0.value'.$i);
    unless ($value[$i]) { $value[$i]='unused'; }
    $position[$i]=&EXT('resource.0.position'.$i);
    unless ($position[$i]) { $position[$i]='random'; }
}
</script>

<startouttext />&EXT('resource.0.questiontext')<endouttext />

<block condition="&EXT('resource.0.questiontype') eq 'radio'"> 
<radiobuttonresponse max="$max" id="radiosegment" randomize="$randomize">
<foilgroup>
<foil location="$position[1]" value="$value[1]" name="radiofoil1">
<startouttext />&EXT('resource.0.text1')<endouttext />
</foil>
<foil location="$position[2]" value="$value[2]" name="radiofoil2">
<startouttext />&EXT('resource.0.text2')<endouttext />
</foil>
<foil location="$position[3]" value="$value[3]" name="radiofoil3">
<startouttext />&EXT('resource.0.text3')<endouttext />
</foil>
<foil location="$position[4]" value="$value[4]" name="radiofoil4">
<startouttext />&EXT('resource.0.text4')<endouttext />
</foil>
<foil location="$position[5]" value="$value[5]" name="radiofoil5">
<startouttext />&EXT('resource.0.text5')<endouttext />
</foil>
<foil location="$position[6]" value="$value[6]" name="radiofoil6">
<startouttext />&EXT('resource.0.text6')<endouttext />
</foil>
</foilgroup>
<foil location="$position[7]" value="$value[7]" name="radiofoil7">
<startouttext />&EXT('resource.0.text7')<endouttext />
</foil>
<foil location="$position[8]" value="$value[8]" name="radiofoil8">
<startouttext />&EXT('resource.0.text8')<endouttext />
</foil>
<foil location="$position[9]" value="$value[9]" name="radiofoil9">
<startouttext />&EXT('resource.0.text9')<endouttext />
</foil>
<foil location="$position[10]" value="$value[10]" name="radiofoil10">
<startouttext />&EXT('resource.0.text10')<endouttext />
</foil>
<hintgroup>
<startouttext />&EXT('resource.0.hinttext')<endouttext />
</hintgroup>
</radiobuttonresponse>
</block>

<block condition="&EXT('resource.0.questiontype') eq 'option'"> 
<optionresponse max="$max" id="radiosegment" randomize="$randomize">
<foilgroup options="$options">
<foil location="$position[1]" value="$value[1]" name="optionfoil1">
<startouttext />&EXT('resource.0.text1')<endouttext />
</foil>
<foil location="$position[2]" value="$value[2]" name="optionfoil2">
<startouttext />&EXT('resource.0.text2')<endouttext />
</foil>
<foil location="$position[3]" value="$value[3]" name="optionfoil3">
<startouttext />&EXT('resource.0.text3')<endouttext />
</foil>
<foil location="$position[4]" value="$value[4]" name="optionfoil4">
<startouttext />&EXT('resource.0.text4')<endouttext />
</foil>
<foil location="$position[5]" value="$value[5]" name="optionfoil5">
<startouttext />&EXT('resource.0.text5')<endouttext />
</foil>
<foil location="$position[6]" value="$value[6]" name="optionfoil6">
<startouttext />&EXT('resource.0.text6')<endouttext />
</foil>
</foilgroup>
<foil location="$position[7]" value="$value[7]" name="optionfoil7">
<startouttext />&EXT('resource.0.text7')<endouttext />
</foil>
<foil location="$position[8]" value="$value[8]" name="optionfoil8">
<startouttext />&EXT('resource.0.text8')<endouttext />
</foil>
<foil location="$position[9]" value="$value[9]" name="optionfoil9">
<startouttext />&EXT('resource.0.text9')<endouttext />
</foil>
<foil location="$position[10]" value="$value[10]" name="optionfoil10">
<startouttext />&EXT('resource.0.text10')<endouttext />
</foil>
<hintgroup>
<startouttext />&EXT('resource.0.hinttext')<endouttext />
</hintgroup>
</optionresponse>
</block>

</problem>