--- loncom/homework/templates/StringResponse.problem	2001/10/09 19:18:55	1.1
+++ loncom/homework/templates/StringResponse.problem	2001/12/19 15:13:34	1.2
@@ -1,14 +1,13 @@
-<problem><startouttext />The 3 types of string answers are: <br />
-cs:  Case Sensitive <br />
-ci:  Case Insensitive <br />
-mc:  Case Insensitive, Order of characters unchecked.
-<br /> <br />
-The answer is NaCl and it is case sensitive.<endouttext />
-<stringresponse answer="NaCl" type="cs">
+<problem>
+<script type="loncapa/perl">#Enter script here
+$choice = &random(1,2,1);
+$chemString = &choose($choice,"Sodium Chloride","Potassium Chloride");
+$chemFormula = &choose($choice,"NaCl","KCl");</script>
+<startouttext />Enter question text here.  <br />
+What is the chemical formula for $chemString?<endouttext />
+<stringresponse answer="$chemFormula" type="cs">
 <textline>
 </textline>
-    
-    
     <hintgroup><startouttext />Add hint text here.<endouttext />
     </hintgroup>
 </stringresponse>