mirror of
https://github.com/thetechprepper/emcomm-tools-os-community.git
synced 2026-09-17 15:41:44 -04:00
voacap - Initial ported of VOACAP script from unreleased version of EmComm Tools R2.
This commit is contained in:
@@ -0,0 +1,140 @@
|
||||
#!/bin/bash
|
||||
#
|
||||
# Author : Gaston Gonzalez
|
||||
# Date : 23 May 2023
|
||||
# Updated : 16 August 2025
|
||||
# Purpose : Offline HF prediction using voacapl
|
||||
|
||||
if [[ $# -ne 4 ]]; then
|
||||
echo "Usage $(basename $0) <callsign1> <callsign2> <power> <mode>"
|
||||
echo " <callsign1> Callsign of transmitting station"
|
||||
echo " <callsign2> Callsign of receiving station"
|
||||
echo " <power> Output power [5|100|500|1500]"
|
||||
echo " <mode> Mode [AM|CW|FT8|SSB]"
|
||||
exit 1
|
||||
fi
|
||||
|
||||
ET_SSN="${HOME}/.local/share/emcomm-tools/voacap/ssn.txt"
|
||||
if [[ ! -e ${ET_SSN} ]]; then
|
||||
"Sunspot numbers not available: ${ET_SSN}. Exiting"
|
||||
exit 1
|
||||
fi
|
||||
|
||||
ET_VOA_WORKING_DIR=$HOME/itshfbc/run
|
||||
ET_VOA_REPORT=${ET_VOA_WORKING_DIR}/voacapl.txt
|
||||
INP=${ET_VOA_WORKING_DIR}/voacapx.dat
|
||||
OUT=${ET_VOA_WORKING_DIR}/voacapx.out
|
||||
|
||||
# Year = 2023
|
||||
YEAR=$(echo $(date '+%Y'))
|
||||
|
||||
# Month (May) = 5.00
|
||||
MONTH=$(date +'%m')
|
||||
MONTH_FMT=$(date +'%-m.00')
|
||||
|
||||
#######################################################################
|
||||
# TX Antenna
|
||||
#######################################################################
|
||||
|
||||
TX_STATION=$1
|
||||
TX_JSON=tx-station.json
|
||||
curl -f -s http://localhost:1981/api/license?callsign=$TX_STATION > $TX_JSON
|
||||
TL=$(cat $TX_JSON | jq .lat)
|
||||
TK=$(cat $TX_JSON | jq .lon)
|
||||
|
||||
TL1=$( awk -v n1=$TL -v n2=90 -v n3=-90 'BEGIN {if (n1<n3 || n1>n2) printf ("%s", "a"); else printf ("%.2f", n1);}' )
|
||||
|
||||
# add North or South (N/S)
|
||||
TLA=$( awk -v n1=$TL1 -v n2=0 'BEGIN {if (n1<n2) { n1=substr(n1,2); printf ("%6sS", n1); } else printf ("%6sN", n1);}' )
|
||||
|
||||
TK1=$( awk -v n1=$TK -v n2=180 -v n3=-180 'BEGIN {if (n1<n3 || n1>n2) printf ("%s", "a"); else printf ("%.2f", n1);}' )
|
||||
|
||||
# add East or West (E/W)
|
||||
TLO=$( awk -v n1=$TK1 -v n2=0 'BEGIN {if (n1<n2) { n1=substr(n1,2); printf ("%7sW", n1); } else printf ("%7sE", n1);}' )
|
||||
|
||||
|
||||
#######################################################################
|
||||
# RX Antenna
|
||||
#######################################################################
|
||||
|
||||
RX_STATION=$2
|
||||
RX_JSON=rx-station.json
|
||||
curl -f -s http://localhost:1981/api/license?callsign=$RX_STATION > $RX_JSON
|
||||
RL=$(cat $RX_JSON | jq .lat)
|
||||
RK=$(cat $RX_JSON | jq .lon)
|
||||
|
||||
echo "RX ($RX_STATION): $RL,$RK"
|
||||
RL1=$( awk -v n1=$RL -v n2=90 -v n3=-90 'BEGIN {if (n1<n3 || n1>n2) printf ("%s", "a"); else printf ("%.2f", n1);}' )
|
||||
|
||||
# add North or South
|
||||
RLA=$( awk -v n1=$RL1 -v n2=0 'BEGIN {if (n1<n2) { n1=substr(n1,2); printf ("%6sS", n1); } else printf ("%6sN", n1);}' )
|
||||
|
||||
RK1=$( awk -v n1=$RK -v n2=180 -v n3=-180 'BEGIN {if (n1<n3 || n1>n2) printf ("%s", "a"); else printf ("%.2f", n1);}' )
|
||||
|
||||
# add East or West
|
||||
RLO=$( awk -v n1=$RK1 -v n2=0 'BEGIN {if (n1<n2) { n1=substr(n1,2); printf ("%7sW", n1); } else printf ("%7sE", n1);}' )
|
||||
|
||||
# Power settings
|
||||
PWR=$3
|
||||
PW="0.0800"
|
||||
echo "TX Power: ${PWR} watts"
|
||||
if [ "$PWR" = "5" ]; then
|
||||
PW="0.0040"
|
||||
elif [ "$PWR" = "100" ]; then
|
||||
PW="0.0800"
|
||||
elif [ "$PWR" = "500" ]; then
|
||||
PW="0.4000"
|
||||
elif [ "$PWR" = "1500" ]; then
|
||||
PW="1.2000"
|
||||
fi
|
||||
|
||||
# Mode
|
||||
MODE=$4
|
||||
MD="24.0"
|
||||
echo "Mode: ${MODE}"
|
||||
if [ "$MODE" = "FT8" ]; then
|
||||
MD="13.0"
|
||||
elif [ "$MODE" = "CW" ]; then
|
||||
MD="24.0"
|
||||
elif [ "$MODE" = "SSB" ]; then
|
||||
MD="38.0"
|
||||
elif [ "$opt" = "AM" ]; then
|
||||
MD="49.0"
|
||||
fi
|
||||
|
||||
# Format for 117
|
||||
# NOTE: The card requires <SSN>. (117.)
|
||||
ssn=`grep "$YEAR $MONTH" ${ET_SSN} | awk '{print $5}' | cut -d"." -f1`
|
||||
|
||||
# read more about fine-tuning your input file:
|
||||
# http://www.voacap.com/voacapw.html
|
||||
# http://www.voacap.com/frequency.html
|
||||
|
||||
echo -e "\n"
|
||||
|
||||
cat << END | tee $INP
|
||||
LINEMAX 999 number of lines-per-page
|
||||
COEFFS CCIR
|
||||
TIME 1 24 1 1
|
||||
MONTH $YEAR $MONTH_FMT
|
||||
SUNSPOT $ssn.
|
||||
LABEL $TX$RX
|
||||
CIRCUIT $TLA $TLO $RLA $RLO S 0
|
||||
SYSTEM 1. 155. 3.00 90. $MD 3.00 0.10
|
||||
FPROB 1.00 1.00 1.00 0.00
|
||||
ANTENNA 1 1 2 30 0.000[samples/sample.00 ] 0.0 $PW
|
||||
ANTENNA 2 2 2 30 0.000[samples/sample.00 ] 0.0 0.0000
|
||||
FREQUENCY 3.60 5.30 7.1010.1014.1018.1021.1024.9028.20 0.00 0.00
|
||||
METHOD 30 0
|
||||
BOTLINES 8 12 21
|
||||
TOPLINES 1 2 3 4 6
|
||||
EXECUTE
|
||||
QUIT
|
||||
|
||||
END
|
||||
|
||||
voacapl -s ~/itshfbc
|
||||
echo "voacapl exited with $? using in=$INP and out=$OUT"
|
||||
|
||||
(tail -n +27 $OUT | head -n 5 && grep -e'- REL' $OUT && grep -e'- S DBW' $OUT) | ./rel.pl > ${ET_VOA_REPORT}
|
||||
cat ${ET_VOA_REPORT}
|
||||
Reference in New Issue
Block a user