APSF
//##################################################################################################################################
// Name    : AP2SNP (AstroPlanner To StarryNightPro)
// Purpose : Pass currently selected object RA/Dec values to SNP via Scope.Simulator
// Requires: AP 1.5.5
// Author  : Robin Lauryssen-Mitchell
// Date    : 13Mar2007
// Version : 1.0
// Status  : Beta
// History : 0.1 - Initial beta release
//           1.0 - Initial production release
// Notes   : - Small, but to me annoying, delay before Scope.Simulator starts responding.
//             Possibly due to internal ASCOM stuff and therefore outside my control!
//             OTOH it does give user time to switch apps without scripting a call to minimize AP :)
//           - Not using my usual copious quantities of constant and variable declarations.  Trying for speed optimisation.
//           - Change AP2SNP.exe to AP2SNP.vbs to use the script version of the 'helper'
//           - Might want to put in a call to minimize AP before the Shell call. If done the Bleep call would be less useful.
//           - Timeout value of 10000 works well for me.  Have NOT played to find optimal value.  May be local system dependent.
//##################################################################################################################################

//==================================================================================================================================
// Main Code
//==================================================================================================================================

if SelectedObject = -1 then
  print "Error: No object selected"
else
  Call Shell(""""+left(ScriptFilePath, instr(ScriptFilePath, ScriptName)-1)+"AP2SNP.exe"+"""", _
       FormatRA(Obj(SelectedObject).RA, True, "h") _
       + " " +_
       FormatDec(Obj(SelectedObject).Dec, True, "d"), _
       10000)
end if