--- loncom/homework/simpleproblem.problem	2003/07/06 10:40:35	1.1
+++ loncom/homework/simpleproblem.problem	2003/07/09 10:05:15	1.4
@@ -1,5 +1,5 @@
 <problem>
-
+<simpleeditbutton />
 <script type="loncapa/perl">
 $questiontype=&EXT('resource.0.questiontype');
 unless ($questiontype) { $questiontype='radio'; }
@@ -15,6 +15,10 @@ for ($i=1;$i<=10;$i++) {
     $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')<endouttext />
@@ -40,7 +44,6 @@ for ($i=1;$i<=10;$i++) {
 <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>
@@ -53,6 +56,7 @@ for ($i=1;$i<=10;$i++) {
 <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>
@@ -60,7 +64,7 @@ for ($i=1;$i<=10;$i++) {
 </block>
 
 <block condition="&EXT('resource.0.questiontype') eq 'option'"> 
-<optionresponse max="$max" id="radiosegment" randomize="$randomize">
+<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 />
@@ -80,7 +84,6 @@ for ($i=1;$i<=10;$i++) {
 <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>
@@ -93,10 +96,28 @@ for ($i=1;$i<=10;$i++) {
 <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>