#!/bin/sh
# Copyright (C) 1995 Jeffrey Chilton
#
# Permission is granted to anyone to make or distribute copies of
# this program, in any medium, provided that the copyright notice
# and permission notice are preserved, and that the distributor
# grants the recipient permission for further redistribution as
# permitted by this notice.
#
# Author's E-mail address: jwc@chilton.com
STAGE=0
sigterm()
{
echo "$0: SIGTERM at stage $STAGE" >>/tmp/log/scripts
exit 1
}
trap sigterm 15
LOG_WHO=${REMOTE_HOST:-$REMOTE_ADDR}
#echo $LOG_WHO "$REFERER_URL
" >> /u1/tmp/referers/r8-current.html
RADIO_BIN=/usr/local/bin
STAGE=1
echo Content-type: text/html
echo Pragma: no-cache
echo
/bin/cat << E_O_F
The Original Web-controlled Shortwave Radio
Live audio (10 secs.) | Compressed (60 secs.) | Last 25 frequencies | Tuning controls News & NotesCurrent Receiver Tuning
E_O_F
STAGE=2
FREQUENCY=`printf "RF\n" |$RADIO_BIN/r8`
echo " Frequency: $FREQUENCY"
echo ""
STAGE=3
MODEBITS=`printf "RM\n" |$RADIO_BIN/r8`
MODESUBS=`printf "$MODEBITS\n" |$RADIO_BIN/decode_mode`
/usr/bin/sed -e "$MODESUBS" << E_O_F
Modulation: #Mode
IF Bandwidth: #Bandwidth KHz
Auto. Gain Control: #AGC
Attenuator/Preamp: #RF
Sync. Detector: #Synchro
Noise Blanker: #NoiseBlanker
E_O_F
STAGE=4
/bin/cat << E_O_F
About The StationSince July, 1995 the radio has been tuned by Internet visitors 346,000 times and 475,000 audio samples have been sent to thousands of listeners in 85+ countries. If you want to read about how it works - complete with lots of technical nitty-gritty - I have some notes on the implementation. Want more? Here's a list of other on-line shortwave radios. Check them out and compare reception around the world! Location
Reston Virginia, USA AntennaReceiverDrake R8 Communications Receiver |
|