Type ALS_Point
 GPS_time As Double  ' 8
 Xl As Double        ' 8
 Yl As Double        ' 8
 Zl As Single        ' 4
 omega As Single     ' 4
 phi As Single       ' 4
 kappa As Single     ' 4
 Scan_angle As Single ' 4
 Xf As Double         ' 8
 Yf As Double         ' 8
 Zf As Single         ' 4
 Intf As Single       ' 4
 Rangef As Single     ' 4
 Xs As Double         ' 8
 Ys As Double         ' 8
 Zs As Single         ' 4
 Ints As Single       ' 4
 Rangel As Single     ' 4
End Type ' 100 bytes per pulse

Rem Computing the coordinates of the 1-ha *.BIN file 
FN1 = Format$(Int((Xs - 2514000) / 100), "000")
FN2 = Format$(Int((Ys - 6855000) / 100), "000")