File:  [LON-CAPA] / loncom / homework / simpleproblem.problem
Revision 1.6: download - view: text, annotated - select for diffs
Tue Nov 4 16:44:50 2003 UTC (20 years, 6 months ago) by www
Branches: MAIN
CVS tags: version_1_3_X, version_1_3_3, version_1_3_2, version_1_3_1, version_1_3_0, version_1_2_X, version_1_2_99_1, version_1_2_99_0, version_1_2_1, version_1_2_0, version_1_1_X, version_1_1_99_5, version_1_1_99_4, version_1_1_99_3, version_1_1_99_2, version_1_1_99_1, version_1_1_99_0, version_1_1_3, version_1_1_2, version_1_1_1, version_1_1_0, version_1_0_99_3, version_1_0_99_2, version_1_0_99_1, version_1_0_99, HEAD
Switching simpleproblems over to using the hiddenparts mechanism.

Just saving my work for now. "!radio" does not appear to be respected.

    1: <problem>
    2: <simpleeditbutton />
    3: <script type="loncapa/perl">
    4: $questiontype=&EXT('resource.0.hiddenparts');
    5: $max=&EXT('resource.0.maxfoils');
    6: unless ($max) { $max=10; }
    7: $randomize=&EXT('resource.0.randomize');
    8: unless ($randomize) { $randomize='yes'; }
    9: $options=&EXT('resource.0.options');
   10: unless ($options) { $options='("true","false")'; }
   11: for ($i=1;$i<=10;$i++) {
   12:     $value[$i]=&EXT('resource.0.value'.$i);
   13:     unless ($value[$i]) { $value[$i]='unused'; }
   14:     $position[$i]=&EXT('resource.0.position'.$i);
   15:     unless ($position[$i]) { $position[$i]='random'; }
   16: }
   17: $stringanswer=&EXT('resource.0.stringanswer');
   18: unless ($stringanswer) { $stringanswer=''; }
   19: $stringtype=&EXT('resource.0.stringtype');
   20: unless ($stringtype) { $stringtype='cs'; }
   21: </script>
   22: 
   23: <block condition="!$questiontype"> 
   24: 
   25: <startouttext />
   26: <h1>Simple Problem Placeholder</h1>
   27: <endouttext />
   28: </block>
   29: 
   30: <block condition="$questiontype"> 
   31: 
   32: <startouttext />&EXT('resource.0.questiontext')<br /><endouttext />
   33: 
   34: <part id="radio">
   35: <radiobuttonresponse max="$max" id="radiosegment" randomize="$randomize">
   36: <foilgroup>
   37: <foil location="$position[1]" value="$value[1]" name="radiofoil1">
   38: <startouttext />&EXT('resource.0.text1')<endouttext />
   39: </foil>
   40: <foil location="$position[2]" value="$value[2]" name="radiofoil2">
   41: <startouttext />&EXT('resource.0.text2')<endouttext />
   42: </foil>
   43: <foil location="$position[3]" value="$value[3]" name="radiofoil3">
   44: <startouttext />&EXT('resource.0.text3')<endouttext />
   45: </foil>
   46: <foil location="$position[4]" value="$value[4]" name="radiofoil4">
   47: <startouttext />&EXT('resource.0.text4')<endouttext />
   48: </foil>
   49: <foil location="$position[5]" value="$value[5]" name="radiofoil5">
   50: <startouttext />&EXT('resource.0.text5')<endouttext />
   51: </foil>
   52: <foil location="$position[6]" value="$value[6]" name="radiofoil6">
   53: <startouttext />&EXT('resource.0.text6')<endouttext />
   54: </foil>
   55: <foil location="$position[7]" value="$value[7]" name="radiofoil7">
   56: <startouttext />&EXT('resource.0.text7')<endouttext />
   57: </foil>
   58: <foil location="$position[8]" value="$value[8]" name="radiofoil8">
   59: <startouttext />&EXT('resource.0.text8')<endouttext />
   60: </foil>
   61: <foil location="$position[9]" value="$value[9]" name="radiofoil9">
   62: <startouttext />&EXT('resource.0.text9')<endouttext />
   63: </foil>
   64: <foil location="$position[10]" value="$value[10]" name="radiofoil10">
   65: <startouttext />&EXT('resource.0.text10')<endouttext />
   66: </foil>
   67: </foilgroup>
   68: <hintgroup>
   69: <startouttext />&EXT('resource.0.hinttext')<endouttext />
   70: </hintgroup>
   71: </radiobuttonresponse>
   72: </part>
   73: 
   74: <part id="option"> 
   75: <optionresponse max="$max" id="optionsegment" randomize="$randomize">
   76: <foilgroup options="$options">
   77: <foil location="$position[1]" value="$value[1]" name="optionfoil1">
   78: <startouttext />&EXT('resource.0.text1')<endouttext />
   79: </foil>
   80: <foil location="$position[2]" value="$value[2]" name="optionfoil2">
   81: <startouttext />&EXT('resource.0.text2')<endouttext />
   82: </foil>
   83: <foil location="$position[3]" value="$value[3]" name="optionfoil3">
   84: <startouttext />&EXT('resource.0.text3')<endouttext />
   85: </foil>
   86: <foil location="$position[4]" value="$value[4]" name="optionfoil4">
   87: <startouttext />&EXT('resource.0.text4')<endouttext />
   88: </foil>
   89: <foil location="$position[5]" value="$value[5]" name="optionfoil5">
   90: <startouttext />&EXT('resource.0.text5')<endouttext />
   91: </foil>
   92: <foil location="$position[6]" value="$value[6]" name="optionfoil6">
   93: <startouttext />&EXT('resource.0.text6')<endouttext />
   94: </foil>
   95: <foil location="$position[7]" value="$value[7]" name="optionfoil7">
   96: <startouttext />&EXT('resource.0.text7')<endouttext />
   97: </foil>
   98: <foil location="$position[8]" value="$value[8]" name="optionfoil8">
   99: <startouttext />&EXT('resource.0.text8')<endouttext />
  100: </foil>
  101: <foil location="$position[9]" value="$value[9]" name="optionfoil9">
  102: <startouttext />&EXT('resource.0.text9')<endouttext />
  103: </foil>
  104: <foil location="$position[10]" value="$value[10]" name="optionfoil10">
  105: <startouttext />&EXT('resource.0.text10')<endouttext />
  106: </foil>
  107: </foilgroup>
  108: <hintgroup>
  109: <startouttext />&EXT('resource.0.hinttext')<endouttext />
  110: </hintgroup>
  111: </optionresponse>
  112: </part>
  113: 
  114: <part id="essay"> 
  115: <essayresponse id="essaysegment">
  116: <textfield></textfield>
  117: </essayresponse>
  118: </part>
  119: 
  120: <part id="string"> 
  121: <stringresponse id="stringsegment" answer="$stringanswer" type="$stringtype">
  122: <textline>
  123: </textline>
  124: <hintgroup>
  125: <startouttext />&EXT('resource.0.hinttext')<endouttext />
  126: </hintgroup>
  127: </stringresponse>
  128: </part>
  129: 
  130: </block>
  131: 
  132: </problem>

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