Based on Mike William's code at
http://news.povray.org/povray.binaries.scene-files/33750/
With my modification, all I had to type in was this:
#declare
pointlist=array[4]{<0,0,0>,<1,0,0>,<1+3*clock,-clock*3*sin(6*pi*clock),0>,<1
+6*clock,clock*3*sin(4*pi*clock),0>}
