(sharing) In[137]:=

pts = GetPointsAsList[frame]

Out[137]=

{{49, 94, 134, 175, 200}, {88, 46, 34, 58, 103}}

Converted by Mathematica  (July 17, 2003)