--- loncom/homework/templates/Plot_curve.problem	2007/07/30 21:52:21	1.4
+++ loncom/homework/templates/Plot_curve.problem	2009/07/06 17:12:47	1.6
@@ -1,7 +1,9 @@
 <problem>
 
 <script type="loncapa/perl">
-# Enter computations here
+$amplitude=&random(0.5,3.5,0.5);
+$omega=&random(1,2,0.5);
+$function="$amplitude*sin($omega*x)";
 </script>
 
 <gnuplot width="300" transparent="off" samples="100" grid="on" font="9" bgcolor="xffffff" height="300" align="left" fgcolor="x000000" border="on" plottype="Cartesian" >
@@ -9,19 +11,17 @@
     <xlabel>Label X</xlabel>
     <ylabel>Label Y</ylabel>
     <curve linestyle="linespoints" name="My Plot" pointtype="0" color="x000000">
-        <function>sin(x)</function>
+        <function>$function</function>
     </curve>
 </gnuplot>
 
-<startouttext />Enter Question Text Here.<endouttext />
+<startouttext />
+What is the amplitude of this function?
+<endouttext />
 
-<numericalresponse answer="">
+<numericalresponse answer="$amplitude" format="2s">
     <responseparam name="tol" type="tolerance" description="Numerical Tolerance" default="5%" />
-    <responseparam name="sig" type="int_range,0-16" description="Significant Figures" default="0,15" />
-    <textline />
-<hintgroup>
-<startouttext /><endouttext />
-</hintgroup>
+    <textline readonly="no" />
 </numericalresponse>
-</problem>
 
+</problem>