# Script to download WSPR spot file, unzip it and create a file with spots for only the specified  call.

# By N9RO January 01, 2012

# To run program CD to the script’s directory and type ./download.ps1 year month call in the

# PowerShell window.  New file will appear the the script’s directory.

param($year,$month,$call)

$source = “http://wsprnet.org/archive/wsprspots-$year-$month.csv.zip”

echo “***** Downloading file from: $source *****”

Get-Date -DisplayHint time

$destination = “c:\projects\wspr-adif\wsprspots-$year-$month.csv.zip”

$wc = New-Object System.Net.WebClient

$wc.DownloadFile($source, $destination)

echo “***** File Download Complete *****”

# Now unzip File

echo “***** Unzipping WSPR File *****”

Get-Date -DisplayHint time

$shell_app=new-object -com shell.application

$filename = “wsprspots-$year-$month.csv.zip”

$zip_file = $shell_app.namespace((Get-Location).Path + “\$filename”)

$destination = $shell_app.namespace((Get-Location).Path)

$destination.Copyhere($zip_file.items())

echo “***** Unzip complete *****”

# Create Call file

echo “***** Creating WSPR Call File for $call *****”

Get-Date -DisplayHint time

$csvfile = “C:\projects\wspr-adif\wsprspots-$year-$month.csv”

Select-String -Simple $call $csvfile >> “$call.csv”

echo “***** Call file created for $call *****”

# Delete files not needed

echo “***** Deleting Files Not  Needed *****”

Get-Date -DisplayHint time

Remove-Item “$csvfile”

Remove-Item “$filename”

echo “***** Files deleted *****”

Get-Date -displayhint date

Get-Date -DisplayHint time

echo “========== WSPRDB Program Complete ==========”

Here is what it looks like when I run the program:

PS C:\projects\wspr-adif> ./download.ps1 2011 11 n9ro

***** Downloading file from: http://wsprnet.org/archive/wsprspots-2011-11.csv.zip *****

10:54:23 PM

***** File Download Complete *****

***** Unzipping WSPR File *****

10:55:13 PM

***** Unzip complete *****

***** Creating WSPR Call File for n9ro *****

10:55:16 PM

***** Call file created for n9ro *****

***** Deleting Files Not  Needed *****

10:55:24 PM

***** Files deleted *****

Saturday, December 31, 2011

10:55:24 PM

========== WSPRDB Program Complete ==========

PS C:\projects\wspr-adif>

$waitMinutes = 10
$startTime = get-date
$endTime = $startTime.addMinutes($waitMinutes)
$timeSpan = new-timespan $startTime $endTime
while ($timeSpan.minutes -gt 0 ) {
$port= new-Object System.IO.Ports.SerialPort COM7,9600,None,8,one
$port.open()
$port.WriteLine(“FA00014272000;”)
$port.Close()
Start-Sleep -s 30
$port= new-Object System.IO.Ports.SerialPort COM7,9600,None,8,one
$port.open()
$port.WriteLine(“FA00014313000;”)
$port.Close()
Start-Sleep -s 30
$now = get-date
$timeSpan = new-timespan $now $endTime
}

If you want to check what com ports you have run the following PowerShell
command. Note: This does NOT tell you what is being using only what ports
are configured on the system.

[System.IO.Ports.SerialPort]::getportnames()

Below is what the PowerShell command above produced on my system.
You can sort list if needed.

PS C:\Users\tim> [System.IO.Ports.SerialPort]::getportnames()

COM11
COM12
COM15
COM16
COM1
COM2
COM3
COM4
COM5
COM6
COM7
COM8
COM9
COM10

PS C:\Users\tim>

$webClient = new-object System.Net.WebClient
$webClient.Headers.Add(“user-agent”, “PowerShell Script”)
$interval = 900 #Time in seconds to wait
while (1 -eq 1) {
$output = “”
$startTime = get-date
$output = $webClient.DownloadString(“http://wsprnet.org/olddb.php?mode=html`
&band=15&limit=100&findcall=&findreportern9ro=&sort=date HTTP/1.1″)
$output | out-file -encoding ASCII wspr.html
$endTime = get-date
if ($output -like “*CALLYOUARESEARCHINGFOR*”) {
“Success`t`t” + $startTime.DateTime + “`t`t” + ($endTime – $startTime).`
TotalSeconds + ” seconds”

Send-MailMessage -smtpServer ‘SMTPMAILSERVER’ -from ‘FROMADDRESS’ -to ‘TOADDRESS’ -subject ‘WSPR Spot’ -body “WSPR Data Attached” -attachment wspr.html

} else {
“Fail`t`t” + $startTime.DateTime + “`t`t” + ($endTime – $startTime).TotalSeconds`
+ ” seconds”
}

$nowtime = Get-Date -displayhint time
$next = (Get-Date).AddSeconds($interval)
echo “Current Time is: $nowtime Next Query Is At: $next ”
sleep($interval) #Wait interval then try again
}

If it finds the call you specified it shows success if not Fail. See below:

Below is a sample web page that was mailed during it’s use:

Remember to use .\ to run the script from the scripts directory and make sure you have permissions for running a PowerShell script.