No Subject

To  tkato@sasun11.kusastro.kyoto-u.ac.jp



Dear Sir,

In Sweden we have since long used a standard format to report
observatons. This format is good for automatic reports. I have
writen a short scipt as a filter to do this.

Pleas write to hanben@saaf.se if you have questions...

Cordially Yours

G Hasse
gh@raditex.se


---<CUT>------------------------------------------------
#!/bin/sh
#
#    VarStarReport       Ver   1.0             1991.07.15
#
#    Goran Hasse, Raditex AB, ALTA, SWEDEN
#    email: gh@raditex.se
#
#    History
#    Revision  94.05.10 - removed blank lines from result file
#
#     This program is implemented as an ordinary filter
#     syntax 'cat datfile1 datafile2 ... | VarStarReport'
#
#
nawk '{ $1 = substr($0,1,8) "#" substr($0,9,7) "#" substr($0,16,1) \
       "#" substr($0,17,4) "#" substr($0,21,3) ; print $1 }' $1 \
| sort -t# +0 -1 +2 -1 \
| grep -v \^[a-z] \
| grep -v \^[A-Z] \
| nawk -F#  'BEGIN { oldname = "foo" ; \
        line = "--------------------------------------" }

      { newname = $1
         if ( newname != oldname ) {
            printf( " \n\n  %-60s\n\n  Star: %10s \n\n ", line, newname )
            i = 1
         }
         if ( newname = oldname )  {
             printf( "%8s %1s%4s %3s ", $2, $3, $4, $5) 
                   i++
	           if ( i >= 5 ) {
                       printf( " \n " )
                       i = 1
                   }
          }
          oldname = $1
       }

END { printf( "\n\n\n\n*** END ***\n\n" ) }'
---<CUT>------------------------------------------------

The data format looks like this...

---<CUT>------------------------------------------------
From: hanben@saaf.se (Hans Bengtsson)
Subject:  saafv.001
Message-ID: <May82@hoge.baba.hajime.jp>
Organization: SAAF, Svensk Amat|rAstronomisk F|rening
Distribution: saaf
Date: Tue, 9 Jan 90 00:27:15 MET


1544+28 7365.47  6.7KGA 1988 JUL 22.97 R CRB
1544+28 7366.41  6.8KGA 1988 JUL 23.91 R CRB
1544+28 7373.44  7.6KGA 1988 JUL 30.94 R CRB
1544+28 7374.44  7.8KGA 1988 JUL 31.94 R CRB
1555+26 7374.47 10.0KGA 1988 JUL 31.97 T CRB
1544+28 7375.46  8.3KGA 1988 AUG  1.96 R CRB
1544+28 7377.44  8.8KGA 1988 AUG  3.94 R CRB
1544+28 7380.42 10.1KGA 1988 AUG  6.92 R CRB
1544+28 7381.42 10.3KGA 1988 AUG  7.92 R CRB
1544+28 7382.42 10.4KGA 1988 AUG  8.92 R CRB
1544+28 7386.43 10.6KGA 1988 AUG 12.93 R CRB
1544+28 7392.44 10.8KGA 1988 AUG 18.94 R CRB
1544+28 7395.41 10.9KGA 1988 AUG 21.91 R CRB
1544+28 7399.41 10.1KGA 1988 AUG 25.91 R CRB
1544+28 7401.35 10.3KGA 1988 AUG 27.85 R CRB
1544+28 7403.37 10.4KGA 1988 AUG 29.87 R CRB
1544+28 7404.39 10.6KGA 1988 AUG 30.89 R CRB
1555+26 7380.43 10.1KGA 1988 AUG  6.93 T CRB
1555+26 7381.44 10.0KGA 1988 AUG  7.94 T CRB
1555+26 7382.43 10.1KGA 1988 AUG  8.93 T CRB
1555+26 7386.44 10.2KGA 1988 AUG 12.94 T CRB
1555+26 7392.45 10.1KGA 1988 AUG 18.95 T CRB
1555+26 7395.41 10.3KGA 1988 AUG 21.91 T CRB
1555+26 7401.36 10.4KGA 1988 AUG 27.86 T CRB
1555+26 7403.38 10.3KGA 1988 AUG 29.88 T CRB
1555+26 7404.40 10.1KGA 1988 AUG 30.90 T CRB
1544+28 7409.37 11.0KGA 1988 SEP  4.87 R CRB
1544+28 7410.38 11.2KGA 1988 SEP  5.88 R CRB
1544+28 7411.35 11.0KGA 1988 SEP  6.85 R CRB
1544+28 7412.39 10.8KGA 1988 SEP  7.89 R CRB
1544+28 7413.38 10.7KGA 1988 SEP  8.88 R CRB
1544+28 7415.37 10.8KGA 1988 SEP 10.87 R CRB
1544+28 7419.36 11.5KGA 1988 SEP 14.86 R CRB
1544+28 7421.35 11.3KGA 1988 SEP 16.85 R CRB
1544+28 7422.31 11.3KGA 1988 SEP 17.81 R CRB
1544+28 7424.37 10.8KGA 1988 SEP 19.87 R CRB
1544+28 7426.35 11.3KGA 1988 SEP 21.85 R CRB
1544+28 7430.33 11.2KGA 1988 SEP 25.83 R CRB
1544+28 7432.28 11.3KGA 1988 SEP 27.78 R CRB
1544+28 7435.33 10.4KGA 1988 SEP 30.83 R CRB
1555+26 7409.38 10.2KGA 1988 SEP  4.88 T CRB
1555+26 7410.39 10.2KGA 1988 SEP  5.89 T CRB
1555+26 7411.36 10.3KGA 1988 SEP  6.86 T CRB
1555+26 7412.40 10.1KGA 1988 SEP  7.90 T CRB
1555+26 7413.39 10.0KGA 1988 SEP  8.89 T CRB
1555+26 7419.36 10.4KGA 1988 SEP 14.86 T CRB
1555+26 7421.35 10.1KGA 1988 SEP 16.85 T CRB
1555+26 7422.32 10.3KGA 1988 SEP 17.82 T CRB
1555+26 7426.36 10.3KGA 1988 SEP 21.86 T CRB
1555+26 7430.34 10.0KGA 1988 SEP 25.84 T CRB
1555+26 7432.28 10.1KGA 1988 SEP 27.78 T CRB
1555+26 7435.34 10.1KGA 1988 SEP 30.84 T CRB
1544+28 7438.26 10.3KGA 1988 OCT  3.76 R CRB
1544+28 7440.26 10.4KGA 1988 OCT  5.76 R CRB
1544+28 7446.23 10.3KGA 1988 OCT 11.73 R CRB
1544+28 7450.26 10.0KGA 1988 OCT 15.76 R CRB
1544+28 7451.26  9.9KGA 1988 OCT 16.76 R CRB
1544+28 7455.24  9.9KGA 1988 OCT 20.74 R CRB
1544+28 7458.24  9.8KGA 1988 OCT 23.74 R CRB
1544+28 7459.24  9.6KGA 1988 OCT 24.74 R CRB
1544+28 7460.24  9.7KGA 1988 OCT 25.74 R CRB
1544+28 7466.24  9.5KGA 1988 OCT 31.74 R CRB
1555+26 7438.27 10.0KGA 1988 OCT  3.77 T CRB
1555+26 7440.28 10.1KGA 1988 OCT  5.78 T CRB
1555+26 7446.24 10.3KGA 1988 OCT 11.74 T CRB
1555+26 7450.26 10.0KGA 1988 OCT 15.76 T CRB
1555+26 7451.27 10.0KGA 1988 OCT 16.77 T CRB
1555+26 7455.28 10.0KGA 1988 OCT 20.78 T CRB
1555+26 7458.24  9.9KGA 1988 OCT 23.74 T CRB
1555+26 7459.25 10.0KGA 1988 OCT 24.75 T CRB
1555+26 7460.24 10.1KGA 1988 OCT 25.74 T CRB
1555+26 7466.25 10.0KGA 1988 OCT 31.75 T CRB
0959+68 7451.42<14.0KGA 1988 OCT 16.92 CH UMA
0814+73 7451.39 13.0KGA 1988 OCT 16.89 Z CAM
0058+40 7451.44 13.3KGA 1988 OCT 16.94 RX AND
0058+40 7455.47 10.8KGA 1988 OCT 20.97 RX AND
0058+40 7459.44 10.7KGA 1988 OCT 24.94 RX AND
0605+47 7455.49<13.3KGA 1988 OCT 20.99 SS AUR
1544+28 7472.24  9.9KGA 1988 NOV  6.74 R CRB
1544+28 7474.32 10.0KGA 1988 NOV  8.82 R CRB
1544+28 7481.22 10.0KGA 1988 NOV 15.72 R CRB
1544+28 7484.20 10.2KGA 1988 NOV 18.70 R CRB
1544+28 7485.24  9.8KGA 1988 NOV 19.74 R CRB
1544+28 7492.17  9.6KGA 1988 NOV 26.67 R CRB
1544+28 7493.21  9.6KGA 1988 NOV 27.71 R CRB
1555+26 7472.24 10.0KGA 1988 NOV  6.74 T CRB
1555+26 7474.32 10.0KGA 1988 NOV  8.82 T CRB
1555+26 7481.23 10.0KGA 1988 NOV 15.73 T CRB
1555+26 7484.21 10.0KGA 1988 NOV 18.71 T CRB
1555+26 7485.23 10.0KGA 1988 NOV 19.73 T CRB
---<CUT>------------------------------------------------