Cruise Tracks

/* This script demonstrates drawing a line between the data points */
/*------------------------------------------------*/
/* Read the data from a file */
/*------------------------------------------------*/
Matrix_Read(cat(HostPath(),"Test Data/TestData.txt"),"xyz",1,1 2 3);
/* The data has now been read into memory */
endtime = time(); print("Elapsed time: ",endtime - starttime);
/* longitude latitude limits of plot */
/* left, right, bottom, top */
Data_Window(-67,-62,41,44.0);
/* position on page of the axis border rectangle */
/* left, right, bottom, top */
Data_Viewport(mm(20),mm(90),mm(190),mm(260));
Data_Projection("MERCATOR"); /* use mercator projection */
Draw_Text(mm(32),mm(192),"Cruise Tracks - Data Line");
/* draw axis, 1 deg labels, 0.5 deg tics, left and bottom edges */
Axis(1,1,0.5,0.5,1,0,1,0,0);
/*------------------------------------------------*/
/* Now plot a line between the data points */
/*------------------------------------------------*/
Data_Line(xyz);
/* draw a section of the Nova Scotia coastline */
Overlay_file(mappath("COAST1"));
Overlay_file(mappath("Depthm200"));