From 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 Mon Sep 17 00:00:00 2001 From: Joe Hunkeler Date: Tue, 11 Aug 2015 16:51:37 -0400 Subject: Repatch (from linux) of OSX IRAF --- vo/votools/aladin.cl | 43 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) create mode 100644 vo/votools/aladin.cl (limited to 'vo/votools/aladin.cl') diff --git a/vo/votools/aladin.cl b/vo/votools/aladin.cl new file mode 100644 index 00000000..5b4299bc --- /dev/null +++ b/vo/votools/aladin.cl @@ -0,0 +1,43 @@ +#{ ALADIN -- Start or stop the ALADIN app. + +procedure aladin (cmd) + +string cmd { prompt = "Command" } +bool bkg = yes { prompt = "Run in background?" } +bool verbose = no { prompt = "Print actions?" } + +begin + string action, command, ch + bool verb + + + if ($nargs > 0) + action = cmd + else + action = "start" + verb = verbose + command = "!" // osfn ("vo$java/app.aladin") + + + if (action == "stop" || action == "off") { + if (verb) + printf ("Stopping Aladin .... ") + command = command // " -kill" + print (command) | cl(, >& "dev$null") + + + } else if (action == "status") { + command = command // " -status" + print (command) | cl() + + } else { + # Default is to start the app + if (verb) + printf ("Starting Aladin .... ") + command = command // " -bg" + print (command) | cl(, >& "dev$null") + } + + if (verb) + printf ("\n") +end -- cgit