[BACK]Return to simpleproblem.problem CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/simpleproblem.problem between versions 1.2 and 1.6

version 1.2, 2003/07/07 07:32:16 version 1.6, 2003/11/04 16:44:50
Line 1 Line 1
 <problem>  <problem>
 <simpleeditbutton />  <simpleeditbutton />
 <script type="loncapa/perl">  <script type="loncapa/perl">
 $questiontype=&EXT('resource.0.questiontype');  $questiontype=&EXT('resource.0.hiddenparts');
 unless ($questiontype) { $questiontype='radio'; }  
 $max=&EXT('resource.0.maxfoils');  $max=&EXT('resource.0.maxfoils');
 unless ($max) { $max=10; }  unless ($max) { $max=10; }
 $randomize=&EXT('resource.0.randomize');  $randomize=&EXT('resource.0.randomize');
Line 15  for ($i=1;$i<=10;$i++) { Line 14  for ($i=1;$i<=10;$i++) {
     $position[$i]=&EXT('resource.0.position'.$i);      $position[$i]=&EXT('resource.0.position'.$i);
     unless ($position[$i]) { $position[$i]='random'; }      unless ($position[$i]) { $position[$i]='random'; }
 }  }
   $stringanswer=&EXT('resource.0.stringanswer');
   unless ($stringanswer) { $stringanswer=''; }
   $stringtype=&EXT('resource.0.stringtype');
   unless ($stringtype) { $stringtype='cs'; }
 </script>  </script>
   
 <startouttext />&EXT('resource.0.questiontext')<endouttext />  <block condition="!$questiontype"> 
   
 <block condition="&EXT('resource.0.questiontype') eq 'radio'">   <startouttext />
   <h1>Simple Problem Placeholder</h1>
   <endouttext />
   </block>
   
   <block condition="$questiontype"> 
   
   <startouttext />&EXT('resource.0.questiontext')<br /><endouttext />
   
   <part id="radio">
 <radiobuttonresponse max="$max" id="radiosegment" randomize="$randomize">  <radiobuttonresponse max="$max" id="radiosegment" randomize="$randomize">
 <foilgroup>  <foilgroup>
 <foil location="$position[1]" value="$value[1]" name="radiofoil1">  <foil location="$position[1]" value="$value[1]" name="radiofoil1">
Line 40  for ($i=1;$i<=10;$i++) { Line 52  for ($i=1;$i<=10;$i++) {
 <foil location="$position[6]" value="$value[6]" name="radiofoil6">  <foil location="$position[6]" value="$value[6]" name="radiofoil6">
 <startouttext />&EXT('resource.0.text6')<endouttext />  <startouttext />&EXT('resource.0.text6')<endouttext />
 </foil>  </foil>
 </foilgroup>  
 <foil location="$position[7]" value="$value[7]" name="radiofoil7">  <foil location="$position[7]" value="$value[7]" name="radiofoil7">
 <startouttext />&EXT('resource.0.text7')<endouttext />  <startouttext />&EXT('resource.0.text7')<endouttext />
 </foil>  </foil>
Line 53  for ($i=1;$i<=10;$i++) { Line 64  for ($i=1;$i<=10;$i++) {
 <foil location="$position[10]" value="$value[10]" name="radiofoil10">  <foil location="$position[10]" value="$value[10]" name="radiofoil10">
 <startouttext />&EXT('resource.0.text10')<endouttext />  <startouttext />&EXT('resource.0.text10')<endouttext />
 </foil>  </foil>
   </foilgroup>
 <hintgroup>  <hintgroup>
 <startouttext />&EXT('resource.0.hinttext')<endouttext />  <startouttext />&EXT('resource.0.hinttext')<endouttext />
 </hintgroup>  </hintgroup>
 </radiobuttonresponse>  </radiobuttonresponse>
 </block>  </part>
   
 <block condition="&EXT('resource.0.questiontype') eq 'option'">   <part id="option"> 
 <optionresponse max="$max" id="radiosegment" randomize="$randomize">  <optionresponse max="$max" id="optionsegment" randomize="$randomize">
 <foilgroup options="$options">  <foilgroup options="$options">
 <foil location="$position[1]" value="$value[1]" name="optionfoil1">  <foil location="$position[1]" value="$value[1]" name="optionfoil1">
 <startouttext />&EXT('resource.0.text1')<endouttext />  <startouttext />&EXT('resource.0.text1')<endouttext />
Line 80  for ($i=1;$i<=10;$i++) { Line 92  for ($i=1;$i<=10;$i++) {
 <foil location="$position[6]" value="$value[6]" name="optionfoil6">  <foil location="$position[6]" value="$value[6]" name="optionfoil6">
 <startouttext />&EXT('resource.0.text6')<endouttext />  <startouttext />&EXT('resource.0.text6')<endouttext />
 </foil>  </foil>
 </foilgroup>  
 <foil location="$position[7]" value="$value[7]" name="optionfoil7">  <foil location="$position[7]" value="$value[7]" name="optionfoil7">
 <startouttext />&EXT('resource.0.text7')<endouttext />  <startouttext />&EXT('resource.0.text7')<endouttext />
 </foil>  </foil>
Line 93  for ($i=1;$i<=10;$i++) { Line 104  for ($i=1;$i<=10;$i++) {
 <foil location="$position[10]" value="$value[10]" name="optionfoil10">  <foil location="$position[10]" value="$value[10]" name="optionfoil10">
 <startouttext />&EXT('resource.0.text10')<endouttext />  <startouttext />&EXT('resource.0.text10')<endouttext />
 </foil>  </foil>
   </foilgroup>
 <hintgroup>  <hintgroup>
 <startouttext />&EXT('resource.0.hinttext')<endouttext />  <startouttext />&EXT('resource.0.hinttext')<endouttext />
 </hintgroup>  </hintgroup>
 </optionresponse>  </optionresponse>
   </part>
   
   <part id="essay"> 
   <essayresponse id="essaysegment">
   <textfield></textfield>
   </essayresponse>
   </part>
   
   <part id="string"> 
   <stringresponse id="stringsegment" answer="$stringanswer" type="$stringtype">
   <textline>
   </textline>
   <hintgroup>
   <startouttext />&EXT('resource.0.hinttext')<endouttext />
   </hintgroup>
   </stringresponse>
   </part>
   
 </block>  </block>
   
 </problem>  </problem>
Removed from v.1.2  
changed lines
  Added in v.1.6

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