// Temp datasets to hold line dx and dy
dataset dsDX, dsDY;

string str2$="MyLine";
icount=0;
// Loop over all graph objects
doc -e G
{ 
  string str1$ = %B;
  // If object is named MyLine...
  if(1 == find(str1$,str2$))
  {
     // Store dx, dy values
     icount++;
     dsDX[icount]=%B.dx;
     dsDY[icount]=%B.dy;

  }
}

// Loop over all dx, dy pairs
for (int ii=1; ii<=icount; ii+=2)
{
    // Calculate major and minor axis length
    double da = sqrt(dsDX[ii]^2+dsDY[ii]^2);
    double db = sqrt(dsDX[ii+1]^2+dsDY[ii+1]^2);
    double darea = pi*da*db;
    type Ellipse#: $((ii+1)/2), a: $(da, .3), b: $(db, .3), area: $(darea, .3);
}