Annotation of loncom/homework/simpleproblem.problem, revision 1.1
1.1 ! www 1: <problem>
! 2:
! 3: <script type="loncapa/perl">
! 4: $questiontype=&EXT('resource.0.questiontype');
! 5: unless ($questiontype) { $questiontype='radio'; }
! 6: $max=&EXT('resource.0.maxfoils');
! 7: unless ($max) { $max=10; }
! 8: $randomize=&EXT('resource.0.randomize');
! 9: unless ($randomize) { $randomize='yes'; }
! 10: $options=&EXT('resource.0.options');
! 11: unless ($options) { $options='("true","false")'; }
! 12: for ($i=1;$i<=10;$i++) {
! 13: $value[$i]=&EXT('resource.0.value'.$i);
! 14: unless ($value[$i]) { $value[$i]='unused'; }
! 15: $position[$i]=&EXT('resource.0.position'.$i);
! 16: unless ($position[$i]) { $position[$i]='random'; }
! 17: }
! 18: </script>
! 19:
! 20: <startouttext />&EXT('resource.0.questiontext')<endouttext />
! 21:
! 22: <block condition="&EXT('resource.0.questiontype') eq 'radio'">
! 23: <radiobuttonresponse max="$max" id="radiosegment" randomize="$randomize">
! 24: <foilgroup>
! 25: <foil location="$position[1]" value="$value[1]" name="radiofoil1">
! 26: <startouttext />&EXT('resource.0.text1')<endouttext />
! 27: </foil>
! 28: <foil location="$position[2]" value="$value[2]" name="radiofoil2">
! 29: <startouttext />&EXT('resource.0.text2')<endouttext />
! 30: </foil>
! 31: <foil location="$position[3]" value="$value[3]" name="radiofoil3">
! 32: <startouttext />&EXT('resource.0.text3')<endouttext />
! 33: </foil>
! 34: <foil location="$position[4]" value="$value[4]" name="radiofoil4">
! 35: <startouttext />&EXT('resource.0.text4')<endouttext />
! 36: </foil>
! 37: <foil location="$position[5]" value="$value[5]" name="radiofoil5">
! 38: <startouttext />&EXT('resource.0.text5')<endouttext />
! 39: </foil>
! 40: <foil location="$position[6]" value="$value[6]" name="radiofoil6">
! 41: <startouttext />&EXT('resource.0.text6')<endouttext />
! 42: </foil>
! 43: </foilgroup>
! 44: <foil location="$position[7]" value="$value[7]" name="radiofoil7">
! 45: <startouttext />&EXT('resource.0.text7')<endouttext />
! 46: </foil>
! 47: <foil location="$position[8]" value="$value[8]" name="radiofoil8">
! 48: <startouttext />&EXT('resource.0.text8')<endouttext />
! 49: </foil>
! 50: <foil location="$position[9]" value="$value[9]" name="radiofoil9">
! 51: <startouttext />&EXT('resource.0.text9')<endouttext />
! 52: </foil>
! 53: <foil location="$position[10]" value="$value[10]" name="radiofoil10">
! 54: <startouttext />&EXT('resource.0.text10')<endouttext />
! 55: </foil>
! 56: <hintgroup>
! 57: <startouttext />&EXT('resource.0.hinttext')<endouttext />
! 58: </hintgroup>
! 59: </radiobuttonresponse>
! 60: </block>
! 61:
! 62: <block condition="&EXT('resource.0.questiontype') eq 'option'">
! 63: <optionresponse max="$max" id="radiosegment" randomize="$randomize">
! 64: <foilgroup options="$options">
! 65: <foil location="$position[1]" value="$value[1]" name="optionfoil1">
! 66: <startouttext />&EXT('resource.0.text1')<endouttext />
! 67: </foil>
! 68: <foil location="$position[2]" value="$value[2]" name="optionfoil2">
! 69: <startouttext />&EXT('resource.0.text2')<endouttext />
! 70: </foil>
! 71: <foil location="$position[3]" value="$value[3]" name="optionfoil3">
! 72: <startouttext />&EXT('resource.0.text3')<endouttext />
! 73: </foil>
! 74: <foil location="$position[4]" value="$value[4]" name="optionfoil4">
! 75: <startouttext />&EXT('resource.0.text4')<endouttext />
! 76: </foil>
! 77: <foil location="$position[5]" value="$value[5]" name="optionfoil5">
! 78: <startouttext />&EXT('resource.0.text5')<endouttext />
! 79: </foil>
! 80: <foil location="$position[6]" value="$value[6]" name="optionfoil6">
! 81: <startouttext />&EXT('resource.0.text6')<endouttext />
! 82: </foil>
! 83: </foilgroup>
! 84: <foil location="$position[7]" value="$value[7]" name="optionfoil7">
! 85: <startouttext />&EXT('resource.0.text7')<endouttext />
! 86: </foil>
! 87: <foil location="$position[8]" value="$value[8]" name="optionfoil8">
! 88: <startouttext />&EXT('resource.0.text8')<endouttext />
! 89: </foil>
! 90: <foil location="$position[9]" value="$value[9]" name="optionfoil9">
! 91: <startouttext />&EXT('resource.0.text9')<endouttext />
! 92: </foil>
! 93: <foil location="$position[10]" value="$value[10]" name="optionfoil10">
! 94: <startouttext />&EXT('resource.0.text10')<endouttext />
! 95: </foil>
! 96: <hintgroup>
! 97: <startouttext />&EXT('resource.0.hinttext')<endouttext />
! 98: </hintgroup>
! 99: </optionresponse>
! 100: </block>
! 101:
! 102: </problem>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>