File:  [LON-CAPA] / loncom / homework / simpleproblem.problem
Revision 1.5: download - view: text, annotated - select for diffs
Thu Jul 10 06:17:41 2003 UTC (20 years, 9 months ago) by www
Branches: MAIN
CVS tags: version_1_0_3, version_1_0_2, version_1_0_1, version_1_0_0, version_0_99_5, version_0_99_4, HEAD
Minor cleanup: newline after problem text, and message to users that changes
in the editor might show up delayed in the course.

<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'; }
}
$stringanswer=&EXT('resource.0.stringanswer');
unless ($stringanswer) { $stringanswer=''; }
$stringtype=&EXT('resource.0.stringtype');
unless ($stringtype) { $stringtype='cs'; }
</script>

<startouttext />&EXT('resource.0.questiontext')<br /><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>
<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>
</foilgroup>
<hintgroup>
<startouttext />&EXT('resource.0.hinttext')<endouttext />
</hintgroup>
</radiobuttonresponse>
</block>

<block condition="&EXT('resource.0.questiontype') eq 'option'"> 
<optionresponse max="$max" id="optionsegment" 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>
<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>
</foilgroup>
<hintgroup>
<startouttext />&EXT('resource.0.hinttext')<endouttext />
</hintgroup>
</optionresponse>
</block>

<block condition="&EXT('resource.0.questiontype') eq 'essay'"> 
<essayresponse id="essaysegment">
<textfield></textfield>
</essayresponse>
</block>

<block condition="&EXT('resource.0.questiontype') eq 'string'"> 
<stringresponse id="stringsegment" answer="$stringanswer" type="$stringtype">
<textline>
</textline>
<hintgroup>
<startouttext />&EXT('resource.0.hinttext')<endouttext />
</hintgroup>
</stringresponse>
</block>


</problem>

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>