MacroName Drift
shot = Focus
interval = 19
times = 10
crit = 1
SuppressReports

#####################
#
$shot
Delay $interval
Loop $times index
   $shot
   AlignTo B
   ReportAlignShift
   ClearAlignment
   dx = $reportedValue3
   dy = $reportedValue4
   dist = sqrt $dx * $dx + $dy * $dy
   #echo Distance = $dist  nm
   drift = $dist / 2
   echo Drift Rate = $drift Ans/sec
   if $drift < $crit
      echo Drift is low enough after shot $index
      R
      S
      #Call FilmShot
      break
   endif
   if $index < $times
      Delay $interval
   else
      #Pause Drift never got below $crit: Continue anyway?
      echo   Drift never got below $crit
      Continue
  endif
EndLoop
#Record