From mboxrd@z Thu Jan  1 00:00:00 1970
Date: Wed, 20 Sep 1995 04:34:04 -0400
From: Amos Shapir amos@nsof.co.il
Subject: Stars (was: CD-ROM music)
Topicbox-Message-UUID: 259394d2-eac8-11e9-9e20-41e7f4b1d025
Message-ID: <19950920083404._o_iVT9R7fl3gxBVGwIZWaP7UU8gC30tKTTF0PRWTt8@z>

dmr@plan9.ATt.COM writes:

>Speaking of play-value, has anyone gotten themselves far enough
>out of VGA hell to try the sky catalog or the geographic/road
>databases?

Here's a filter to "astro"'s output which uses "plot" to draw a
picture of the sky; now all we need is to add that to "scat"'s output,
or teach "astro" to present current star positions (it does read the
star catalog to check for occultations, but doesn't present position
info).

#!/bin/rc
# << doesn't work inside {}
{
echo 'o
ra -90 -90 90 90
e
ci 0 0 90
li -90 0 90 0
li 0 -90 0 90
m 0 -88
t \CS
m 0 88
t \CN
m -88 0
t \CE
m 88 0
t \CW
'
astro -p $* |
awk 'NR>1{
	if(NF==6) { name=$1; a=$4; e=$5 }
	else { name=$2; a=$5; e=$6 }
	if(e >=0) {
		a = a*3.14159/180
		print "m", (e-90)*sin(a), (90-e)*cos(a)
		print "t *" name
	}
}
END {print "cl"}'
} |
plot
--
	Amos Shapir		Net: amos@nsof.co.il
Paper: nSOF Parallel Software, Ltd.
       Givat-Hashlosha 48800, Israel
Tel: +972 3 9388551   Fax: +972 3 9388552        GEO: 34 55 15 E / 32 05 52 N