Source code for weerlive.ps

```
<#
```
```
.SYNOPSIS
```
```
NL: Toon actuele KNMI weergegevens
```

EN: Show live Dutch weather data from the Dutch KNMI weather institute

```
 
```
```
.DESCRIPTION
```
```
NL:
```
```
 
```

Dit script toont actuele KNMI weergegevens m.b.v. de Weerlive API.

De Weerlive API stelt elke 10 minuten actuele weergegevens beschikbaar.

Alle opgehaalde gegevens worden door dit script in het console venster weergegeven.

Daarnaast wordt de afgeronde waarde van de actuele temperatuur in een pictogram in de "System Tray" getoond.

Door te klikken op dit pictogram, wordt het console venster verborgen of juist weer hersteld.

Om van de Weerlive API gebruik te mogen maken, hebt u een API key nodig (gratis voor persoonlijk en educatief gebruik), die u bij Weerlive.nl kunt aanvragen (zie link).

Deze API key en de lokatie waarvoor de gegevens worden opgevraagd, dient u op te geven op de commandoregel of in te vullen bij na starten van het script of op te slaan in een tekstbestand "weerlive.cfg" dat zich in de zelfde map moet bevinden als dit script.

Het bestand "weerlive.cfg" bevat 2 regels tekst:

```
 
```
```
key=uw_persoonlijke_api_key
```
```
loc=gewenste_lokatie
```
```
 
```

Het script kan netjes afgesloten worden door een willekeurige toetsaanslag in het console venster.

```
 
```
```
EN:
```
```
 
```

This script shows live Dutch weather data from the Dutch KNMI weather institute, using the Weerlive live weather API.

This API makes live weather data available once every 10 minutes.

All data will be displayed in this script's console window.

The rounded actual temperature will also be shown in the System Tray a.k.a. Notification Area.

By clicking the icon in the Notification Area, this script's console window will be hidden or restored again.

Use of the Weerlive API requires an API key (free for personal or educational use), which you can request at Weerlive.nl (see link).

This API key and the location for which the data will be fetched, must either be specified on the command line or entered in a popup window when the script is started or be saved in a plain text file named "weerlive.cfg", located in the script's parent folder.

The file "weerlive,cfg" contains only 2 lines of text:

```
 
```
```
key=your_personal_api_key
```
```
loc=your_location
```
```
 
```

The script can be terminated gracefully by pressing any key in the console window.

```
 
```

Note that a basic knowledge of the Dutch language is required to get this script working with your own API key.

```
 
```
```
.PARAMETER Location
```

NL: De plaatsnaam voor de weersgegevens. Indien zowel op de commandoregel als in een configuratiebestand een lokatie wordt opgegeven, prevaleert de commandoregel. Indien er geen plaatsnaam is opgegeven op de commandoregel en ook niet in een configuratiebestand, dan wordt een invulscherm geopend om deze alsnog in te voeren. Als APIKey en Location beide op de opdrachtregel worden meegegeven, en het configuratiebestand weerlive.cfg bestaat nog niet, dan wordt dit bestand aangemaakt.

EN: De location used for the weather query. If the location is specified both on the command line sa well as in a configuration file, the command line prevails. If no location is specified on the command line and neither in a configuration file, a popup window will appear where the locatien can be specified. If both APIKey and Location are specified on the command line, and the configuration file weerlive.cfg does not exist, it will be created..

```
 
```
```
.PARAMETER APIKey
```

NL: De API key voor het opvragen van de weersgegevens. Indien zowel op de commandoregel als in een configuratiebestand een API key wordt opgegeven, prevaleert de commandoregel. Indien er geen API key is opgegeven op de commandoregel en ook niet in een configuratiebestand, dan wordt een invulscherm geopend om deze alsnog in te voeren. Als APIKey en Location beide op de opdrachtregel worden meegegeven, en het configuratiebestand weerlive.cfg bestaat nog niet, dan wordt dit bestand aangemaakt.

EN: De API key required for the weather query. If an API key is specified both on the command line as well as in a configuration file, the command line prevails. If no API key is specified on the command line and neither in a configuration file, a popup window will appear where an API key can be specified. If both APIKey and Location are specified on the command line, and the configuration file weerlive.cfg does not exist, it will be created.

```
 
```
```
.PARAMETER NoSave
```

NL: Voorkomt dat de waarden van APIKey en Location die op de opdrachtregel worden meegegeven, bij opslaan een bestaand configuratiebestand overschrijven.

EN: Prevent APIKey and Location values on the command line from overwriting an existing configuration file.

```
 
```
```
.PARAMETER Edit
```

NL: Opent het invulvenster voor API key en plaatsnaam bij opstarten van het script. Dit invulvenster verschijnt ook als API key of plaatsnaam niet opgegeven zijn.

EN: Opens the configuration window to enter an API key and location at startup of this script. This window will also be opened if API key or location aren't specified.

```
 
```
```
.PARAMETER Hide
```

NL: Verberg het console venster direct na opstarten van het script. Klik op het icoon in de "System Tray" om het console venster te herstellen.

EN: Hide this script's console immediately after starting the script. Clicking the icon in the Notification area will restore the console again.

```
 
```
```
.PARAMETER Help
```
```
NL: Toon deze uitleg.
```
```
EN: Show this help text.
```
```
 
```
```
.PARAMETER Version
```

NL: Toon de versie van dit script. Gecombineerd met de -Verbose parameter worden daarnaast ook het volledige pad en de laatste wijzigings- of publikatiedatum van het script getoond.

EN: Show this script's version. If combined with the -Verbose switch, the script's full path and last modified or release date will be shown as well.

```
 
```
```
.PARAMETER Verbose
```

NL: Toon uitgebreidere versie-informatie bij gebruik van de -Version parameter.

EN: Show verbose version information when using the -Version switch.

```
 
```
```
.LINK
```

NL:                                              EN:

```
 
```
```
.LINK
```

Script geschreven door Rob van der Woude:        Script written by Rob van der Woude:

https://www.robvanderwoude.com/                  https://www.robvanderwoude.com/

```
 
```
```
.LINK
```

KNMI Weergegevens via Weerlive.nl API:           Dutch KNMI weather data by Weerlive.nl API:

http://weerlive.nl/delen.php                     http://weerlive.nl/delen.php

```
 
```
```
.LINK
```

Weerlive API key aanvragen:                      Request Weerlive API key:

http://weerlive.nl/api/toegang/index.php         http://weerlive.nl/api/toegang/index.php

```
 
```
```
.LINK
```

Tabel met alle geldige plaatsnamen:              Table of valid location names:

http://weerlive.nl/plaatsnamen.php               http://weerlive.nl/plaatsnamen.php

```
#>
```
```
 
```
```
param (
```
```
	[string]$Location,
```
```
	[string]$APIKey,
```
```
	[switch]$NoSave,
```
```
	[switch]$Edit,
```
```
	[switch]$Hide,
```
```
	[switch]$Help,
```
```
	[switch]$Version,
```
```
	[switch]$Verbose
```
```
)
```
```
 
```
```
$progver = "1.00"
```
```
 
```
```
Add-Type -AssemblyName System.Drawing
```

Add-Type -AssemblyName System.Text.RegularExpressions

Add-Type -AssemblyName System.Windows.Forms

```
 
```
```
Clear-Host
```
```
 
```
```
if ( $Version ) {
```
```
	if ( $Verbose ) {
```

		$lastmod = ( [System.IO.File]::GetLastWriteTime( $PSCommandPath ) )

		if ( $lastmod.ToString( "h.mm" ) -eq $progver ) {

			"`"{0}`", Version {1}, release date {2}" -f $PSCommandPath, $progver, $lastmod.ToString( "yyyy-MM-dd" )

```
		} else {
```

			# if last modified time is not equal to program version, the script has been tampered with

			"`"{0}`", Version {1}, last modified date {2}" -f $PSCommandPath, $progver, $lastmod.ToString( "yyyy-MM-dd" )

```
		}
```
```
	} else {
```
```
		$progver
```
```
	}
```
```
	exit 0
```
```
}
```
```
 
```

if ( $Help -or ( [System.Environment]::CommandLine -match "[/\?]" ) ) {

```
	Get-Help $PSCommandPath -Full
```
```
	exit 1
```
```
}
```
```
 
```

$configfile = ( Join-Path $PSScriptRoot 'weerlive.cfg' )

$cachefile = ( Join-Path $PSScriptRoot 'weerlive.dat' )

if ( ![string]::IsNullOrWhiteSpace( $APIKey ) -and ![string]::IsNullOrWhiteSpace( $Location ) ) {

```
	Remove-Item -Path $cachefile -Force
```

	# Write command line APIKey and Location values to configuration file if that does not yet exist, unless NoSave switch was used

	if ( !$NoSave -and !( Test-Path -Path $configfile -PathType Leaf ) ) {

		( "key={0}`nloc={1}" -f $APIKey, $Location ) | Out-File -FilePath $configfile -Force -Encoding 'ASCII'

```
	}
```
```
}
```
```
 
```
```
function Get-Locations( ) {
```

	$url = "http://weerlive.nl/plaatsnamen.php"

	$ProgressPreference = 'SilentlyContinue'

	$html = ( Invoke-WebRequest -Uri $url -TimeoutSec 10 ).Content

```
	$ProgressPreference = 'Continue'
```

	$pattern = '<tr><td><b><a href=\"weer.php\?plaatsnaam=([^\"]+)\"'

	$matches = [System.Text.RegularExpressions.Regex]::Matches( $html, $pattern )

	@( $matches | ForEach-Object { $_.Groups[1].Value } )

```
}
```
```
 
```
```
function Read-Config( ) {
```

	if ( Test-Path -Path $configfile -PathType Leaf ) {

		# APIKey and Location from configuration file, if it exists

		$configtext = ( Get-Content -Path $configfile -ErrorAction Stop )

		$Global:APIKey = ( $configtext | Select-String -Pattern 'key=([^\n]+)' ).Matches[0].Groups[1].Value

		$Global:Location = ( $configtext | Select-String -Pattern 'loc=([^\n]+)' ).Matches[0].Groups[1].Value

```
	} else {
```

		# use a popup window to retrieve APIKey and Location interactively

```
		Edit-Config
```
```
	}
```
```
}
```
```
 
```
```
function Edit-Config( ) {
```

	$FormWeerliveConfig = New-Object -TypeName System.Windows.Forms.Form

	[System.Windows.Forms.Label]$labelAPIKey = $null

	[System.Windows.Forms.Label]$labelLocation = $null

	[System.Windows.Forms.ComboBox]$comboboxLocation = $null

	[System.Windows.Forms.TextBox]$textboxAPIKey = $null

	[System.Windows.Forms.Button]$buttonRequestAPIKey = $null

	[System.Windows.Forms.Button]$buttonSave = $null

	[System.Windows.Forms.Button]$buttonCancel = $null

```
 
```

	$labelAPIKey = ( New-Object -TypeName System.Windows.Forms.Label )

	$labelLocation = ( New-Object -TypeName System.Windows.Forms.Label )

	$comboboxLocation = ( New-Object -TypeName System.Windows.Forms.ComboBox )

	$textboxAPIKey = ( New-Object -TypeName System.Windows.Forms.TextBox )

	$buttonRequestAPIKey = ( New-Object -TypeName System.Windows.Forms.Button )

	$buttonSave = ( New-Object -TypeName System.Windows.Forms.Button )

	$buttonCancel = ( New-Object -TypeName System.Windows.Forms.Button )

```
	$FormWeerliveConfig.SuspendLayout( )
```
```
	#
```
```
	#labelAPIKey
```
```
	#
```
```
	$labelAPIKey.AutoSize = $true
```

	$labelAPIKey.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]25, [System.Int32]29 ) )

	$labelAPIKey.Name = [System.String]'labelAPIKey'

	$labelAPIKey.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]114, [System.Int32]17 ) )

	$labelAPIKey.TabIndex = [System.Int32]5

	$labelAPIKey.Text = [System.String]'Weerlive API key'

```
	#
```
```
	#labelLocation
```
```
	#
```
```
	$labelLocation.AutoSize = $true
```

	$labelLocation.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]25, [System.Int32]73 ) )

	$labelLocation.Name = [System.String]'labelLocation'

	$labelLocation.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]82, [System.Int32]17 ) )

	$labelLocation.TabIndex = [System.Int32]6

	$labelLocation.Text = [System.String]'Plaatsnaam'

```
	#
```
```
	#comboboxLocation
```
```
	#
```

	$comboboxLocation.FormattingEnabled = $true

	$comboboxLocation.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]157, [System.Int32]70 ) )

	$comboboxLocation.Name = [System.String]'comboboxLocation'

	$comboboxLocation.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]121, [System.Int32]24 ) )

	$comboboxLocation.TabIndex = [System.Int32]1

	$comboboxLocation.DisplayMember = 'Value'

	$comboboxLocation.ValueMember = 'Value'

	$comboboxLocation.Datasource = ( Get-Locations )

	$comboboxLocation.SelectedValue = $Location

```
	#
```
```
	#textboxAPIKey
```
```
	#
```

	$textboxAPIKey.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]157, [System.Int32]29 ) )

	$textboxAPIKey.Name = [System.String]'textboxAPIKey'

	$textboxAPIKey.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]121, [System.Int32]23 ) )

	$textboxAPIKey.TabIndex = [System.Int32]0

```
	$textboxAPIKey.Text = $APIKey
```
```
	#
```
```
	#buttonRequestAPIKey
```
```
	#
```

	$buttonRequestAPIKey.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]303, [System.Int32]25 ) )

	$buttonRequestAPIKey.Name = [System.String]'buttonRequestAPIKey'

	$buttonRequestAPIKey.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]140, [System.Int32]30 ) )

	$buttonRequestAPIKey.TabIndex = [System.Int32]4

	$buttonRequestAPIKey.Text = [System.String]'Nieuwe aanvragen'

	$buttonRequestAPIKey.UseVisualStyleBackColor = $true

	$buttonRequestAPIKey.add_Click( $buttonRequestAPIKey_Click )

```
	#
```
```
	#buttonSave
```
```
	#
```

	$buttonSave.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]28, [System.Int32]131 ) )

	$buttonSave.Name = [System.String]'buttonSave'

	$buttonSave.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]140, [System.Int32]30 ) )

```
	$buttonSave.TabIndex = [System.Int32]2
```

	$buttonSave.Text = [System.String]'Opslaan'

	$buttonSave.DialogResult = [System.Windows.Forms.DialogResult]::OK

	$buttonSave.UseVisualStyleBackColor = $true

	$buttonSave.add_Click( $buttonSave_Click )

```
	#
```
```
	#buttonCancel
```
```
	#
```

	$buttonCancel.Location = ( New-Object -TypeName System.Drawing.Point -ArgumentList @( [System.Int32]303, [System.Int32]131 ) )

	$buttonCancel.Name = [System.String]'buttonCancel'

	$buttonCancel.Size = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]140, [System.Int32]30 ) )

	$buttonCancel.TabIndex = [System.Int32]3

	$buttonCancel.Text = [System.String]'Annuleren'

	$buttonCancel.DialogResult = [System.Windows.Forms.DialogResult]::Cancel

	$buttonCancel.UseVisualStyleBackColor = $true

	$buttonCancel.add_Click( $buttonCancel_Click )

```
	#
```
```
	#FormWeerliveConfig
```
```
	#
```

	$FormWeerliveConfig.ClientSize = ( New-Object -TypeName System.Drawing.Size -ArgumentList @( [System.Int32]485, [System.Int32]200 ) )

	$FormWeerliveConfig.Controls.Add( $buttonCancel )

	$FormWeerliveConfig.Controls.Add( $buttonSave )

	$FormWeerliveConfig.Controls.Add( $buttonRequestAPIKey )

	$FormWeerliveConfig.Controls.Add( $textboxAPIKey )

	$FormWeerliveConfig.Controls.Add( $comboboxLocation )

	$FormWeerliveConfig.Controls.Add( $labelLocation )

	$FormWeerliveConfig.Controls.Add( $labelAPIKey )

	$FormWeerliveConfig.Font = ( New-Object -TypeName System.Drawing.Font -ArgumentList @( [System.String]'Microsoft Sans Serif', [System.Single]10, [System.Drawing.FontStyle]::Regular, [System.Drawing.GraphicsUnit]::Point,([System.Byte][System.Byte]0 ) ) )

	$FormWeerliveConfig.Name = [System.String]'FormWeerliveConfig'

	$FormWeerliveConfig.Text = [System.String]'Weerlive configuratie'

	$FormWeerliveConfig.AcceptButton = $buttonSave

	$FormWeerliveConfig.CancelButton = $buttonCancel

	$FormWeerliveConfig.add_KeyUp( $FormWeerliveConfig_KeyUp )

	#$FormWeerliveConfig.add_Shown( $FormWeerliveConfig_Shown )

	$FormWeerliveConfig.add_Shown( { $comboboxLocation.SelectedItem = "$Location" } )

	$FormWeerliveConfig.ResumeLayout( $false )

```
	$FormWeerliveConfig.PerformLayout( )
```

	Add-Member -InputObject $FormWeerliveConfig -Name base -Value $base -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name labelAPIKey -Value $labelAPIKey -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name labelLocation -Value $labelLocation -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name comboboxLocation -Value $comboboxLocation -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name textboxAPIKey -Value $textboxAPIKey -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name buttonRequestAPIKey -Value $buttonRequestAPIKey -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name buttonSave -Value $buttonSave -MemberType NoteProperty

	Add-Member -InputObject $FormWeerliveConfig -Name buttonCancel -Value $buttonCancel -MemberType NoteProperty

```
 
```

	[void] $FormWeerliveConfig.ShowDialog( )

```
}
```
```
 
```

if ( $Edit -or !$APIKey -or !$Location ) {

```
	Read-Config
```
```
}
```
```
 
```
```
if ( $Edit ) {
```
```
	$locations = ( Get-Locations )
```
```
	Edit-Config
```
```
}
```
```
 
```
```
$Global:consolestatus = 1
```
```
 
```
```
#######################################
```
```
# Hide console window                 #
```
```
# by Anthony on StackOverflow.com     #
```
```
# http://stackoverflow.com/a/15079092 #
```
```
#######################################
```
```
 
```
```
$signature1 = @'
```

public static void ShowConsoleWindow( int state )

```
{
```
```
	var handle = GetConsoleWindow( );
```
```
	ShowWindow( handle, state );
```
```
}
```
```
 
```

[System.Runtime.InteropServices.DllImport( "kernel32.dll" )]

static extern IntPtr GetConsoleWindow( );

```
 
```

[System.Runtime.InteropServices.DllImport( "user32.dll" )]

static extern bool ShowWindow( IntPtr hWnd, int nCmdShow );

```
'@
```
```
 
```
```
# Hide console if requested
```
```
if ( $Hide ) {
```

	$hideconsole = Add-Type -MemberDefinition $signature1 -Name Hide -Namespace HideConsole -ReferencedAssemblies System.Runtime.InteropServices -PassThru

```
	$Global:consolestatus = 0
```

	$hideconsole::ShowConsoleWindow( $Global:consolestatus )

```
}
```
```
 
```
```
#######################
```
```
# End of Hide console #
```
```
#######################
```
```
 
```
```
##################
```
```
# Event Handlers #
```
```
##################
```
```
 
```
```
$buttonRequestAPIKey_Click = {
```

	$url = "http://weerlive.nl/api/toegang/index.php"

```
	Start-Process $url
```
```
}
```
```
 
```
```
$buttonSave_Click = {
```

	if ( Test-Path -Path $configfile -PathType Leaf ) {

		# Backup current configuration file if it exists

```
		$backupcfg = "$configfile.bak"
```

		Get-Content -Path $configfile -ErrorAction SilentlyContinue | Out-File -FilePath $backupcfg -Encoding ASCII -Force

```
	}
```

	( "key={0}`nloc={1}`n" -f $textboxAPIKey.Text, $comboboxLocation.SelectedItem ) | Out-File -FilePath $configfile -Encoding ASCII -Force

```
	Start-Sleep -Seconds 1
```
```
	$FormWeerliveConfig.Close( )
```
```
}
```
```
 
```
```
$buttonCancel_Click = {
```
```
	$FormWeerliveConfig.Close( )
```
```
}
```
```
 
```
```
$Icon_Click = {
```
```
	if ( $Global:consolestatus -eq 0 ) {
```
```
		# Restore the hidden console window
```
```
		$Global:consolestatus = 9
```

		$hideconsole::ShowConsoleWindow( $Global:consolestatus )

```
	} else {
```
```
		# Hide console window
```
```
		$Global:consolestatus = 0
```

		$hideconsole::ShowConsoleWindow( $Global:consolestatus )

```
	}
```
```
}
```
```
 
```
```
#########################
```
```
# End of Event Handlers #
```
```
#########################
```
```
 
```
```
function Fetch-WeerData( ) {
```

	$url = ( 'http://weerlive.nl/api/json-data-10min.php?key={0}&locatie={1}' -f $APIKey, $Location )

	if ( ( Test-Path -Path $cachefile -PathType 'Leaf' ) -and ( ( Get-Item -Path $cachefile ).LastWriteTime -gt ( Get-Date ).AddMinutes( -10 ) ) ) {

		$cacheage = ( [System.Math]::Round( ( ( Get-Date ) - ( Get-Item -Path $cachefile ).LastWriteTime ).TotalMinutes ) )

```
		# Fetch cached JSON weather data
```

		$json = ( Get-Content -Path $cachefile )

```
	} else {
```

		$ProgressPreference = 'SilentlyContinue'

		# Fetch live JSON weather data from Weerlive.nl

		$json = ( Invoke-WebRequest -Uri $url -TimeoutSec 10 ).Content

```
		$ProgressPreference = 'Continue'
```

		# Cache the weather data, to prevent exceeding the maximum daily allowance of live requests

		$json | Out-File -FilePath $cachefile -Force

```
	}
```
```
	$json
```
```
}
```
```
 
```

# Define properties for System Tray icon

$Global:fontfamily = [System.Drawing.FontFamily]::GenericSansSerif

$Global:fontstyle = [System.Drawing.FontStyle]::Bold

$Global:font = [System.Drawing.Font]::new( $fontfamily, 7, $fontstyle )

$Global:blackbrush = [System.Drawing.Brushes]::Black

$Global:bluebrush = [System.Drawing.Brushes]::LightBlue

$Global:brightgreenbrush = [System.Drawing.Brushes]::LightGreen

$Global:greenbrush = [System.Drawing.Brushes]::Green

$Global:orangebrush = [System.Drawing.Brushes]::Orange

$Global:redbrush = [System.Drawing.Brushes]::Red

$Global:whitebrush = [System.Drawing.Brushes]::White

$Global:yellowbrush = [System.Drawing.Brushes]::Yellow

$Global:stringformat = [System.Drawing.StringFormat]::GenericDefault

```
 
```
```
function Create-Icon( ) {
```
```
	param (
```
```
		[Parameter(Mandatory)]$degrees
```
```
	)
```
```
	$bgbrush = $Global:yellowbrush
```
```
	$fgbrush = $Global:blackbrush
```
```
	[int]$temperature = -273
```

	if ( [System.Int32]::TryParse( $degrees, [ref] $temperature ) ) {

```
	 	if ( $temperature -le 0 ) {
```
```
			$bgbrush = $Global:bluebrush
```
```
			$fgbrush = $Global:blackbrush
```
```
		}
```

		if ( ( $temperature -gt 0 ) -and ( $temperature -lt 15 ) ) {

```
			$bgbrush = $Global:greenbrush
```
```
			$fgbrush = $Global:whitebrush
```
```
		}
```

		if ( ( $temperature -ge 15 ) -and ( $temperature -le 20 ) ) {

```
			$bgbrush = $Global:brightgreenbrush
```
```
			$fgbrush = $Global:blackbrush
```
```
		}
```

		if ( ( $temperature -gt 20 ) -and ( $temperature -lt 25 ) ) {

```
			$bgbrush = $Global:yellowbrush
```
```
			$fgbrush = $Global:blackbrush
```
```
		}
```

		if ( ( $temperature -ge 25 ) -and ( $temperature -lt 30 ) ) {

```
			$bgbrush = $Global:orangebrush
```
```
			$fgbrush = $Global:blackbrush
```
```
		}
```
```
		if ( $temperature -ge 30 ) {
```
```
			$bgbrush = $Global:redbrush
```
```
			$fgbrush = $Global:whitebrush
```
```
		}
```
```
	}
```

	$bitmap = [System.Drawing.Bitmap]::new( 16, 16 )

	$graphic = [System.Drawing.Graphics]::FromImage( $bitmap )

	$graphic.FillEllipse( $bgbrush, 0, 0, 16, 16 )

	$textsize = $graphic.MeasureString( $degrees, $Global:font )

```
	if ( $textsize.Width -gt 14 ) {
```

		$font = [System.Drawing.Font]::new( $Global:fontfamily, $Global:font.Size * 0.8, $Global:fontstyle )

		$textsize = $graphic.MeasureString( $text, $Global:font )

```
	}
```
```
	if ( $textsize.Width -lt 11.2 ) {
```

		$font = [System.Drawing.Font]::new( $Global:fontfamily, $Global:font.Size * 1.25, $Global:fontstyle )

		$textsize = $graphic.MeasureString( $degrees, $Global:font )

```
	}
```

	$x = [Math]::Max( 0, [Math]::Floor( ( $bitmap.Width - $textsize.Width ) / 2 ) )

	$y = [Math]::Max( 0, [Math]::Ceiling( ( $bitmap.Height - $textsize.Height ) / 2 ) )

	$graphic.DrawString( $degrees, $Global:font, $fgbrush, $x, $y, $Global:stringformat )

	$icon = [System.Drawing.Icon]::FromHandle( $bitmap.GetHicon( ) )

```
	$graphic.Dispose( )
```
```
	$bitmap.Dispose( )
```
```
	$icon
```
```
}
```
```
 
```
```
function Format-Text( ) {
```
```
	param (
```
```
		[Parameter(Mandatory = $true)]
```
```
		[string]$unformatedText
```
```
	)
```

	$unformatedText = $unformatedText.Trim( )

	$consoleWidth = [System.Console]::WindowWidth

	$pattern = ( "^([^\s].{{1,{0}}})(\s(.*)|$)" -f ( $consoleWidth - 2 ) )

```
	$formatedText = ""
```
```
	do {
```

		if ( [System.Text.RegularExpressions.Regex]::IsMatch( $unformatedText, $pattern ) ) {

			$matches = [System.Text.RegularExpressions.Regex]::Matches( $unformatedText, $pattern )

```
			$line = $matches[0].Groups[1].Value
```
```
			$formatedText += $line + "`n"
```

			$unformatedText = $matches[0].Groups[3].Value.Trim( )

```
		} else {
```
```
			$line = ""
```
```
		}
```
```
	} while ( $line )
```
```
	$formatedText
```
```
}
```
```
 
```
```
# Create new System Tray icon
```

$notifyIcon = New-Object System.Windows.Forms.NotifyIcon

```
$notifyIcon.Visible = $true
```

# Add Click event handler (hides/restores console window)

```
$notifyIcon.Add_Click( $Icon_Click )
```
```
$abort = $false
```
```
do {
```
```
	Clear-Host
```

	$data = ( Fetch-WeerData | ConvertFrom-Json -ErrorAction Stop )

	# [char]176 is the degrees symbol in codepage 437

	Write-Host ( "`n[{0}]" -f ( Get-Date ).ToString( "yyyy-MM-dd HH:mm:ss" ) ) -ForegroundColor White

	Write-Host ( "Locatie                        : {0}" -f $data.liveweer.plaats ) -ForegroundColor DarkGray

	Write-Host ( "Actuele temperatuur            : {0} {1}C" -f $data.liveweer.temp,[char]176 ) -ForegroundColor White

	Write-Host ( "Gevoelstemperatuur             : {0} {1}C" -f $data.liveweer.gtemp,[char]176 ) -ForegroundColor DarkGray

	Write-Host ( "Weersgesteldheid               : {0}" -f $data.liveweer.samenv ) -ForegroundColor White

	Write-Host ( "Relatieve luchtvochtigheid     : {0} %" -f $data.liveweer.lv ) -ForegroundColor DarkGray

	Write-Host ( "Windrichting                   : {0}" -f $data.liveweer.windr ) -ForegroundColor White

	Write-Host ( "Windsnelheid                   : {0} m/s" -f $data.liveweer.windms ) -ForegroundColor DarkGray

	Write-Host ( "Windkracht                     : {0} Bft" -f $data.liveweer.winds ) -ForegroundColor White

	Write-Host ( "Windsnelheid                   : {0} knopen" -f $data.liveweer.windk ) -ForegroundColor DarkGray

	Write-Host ( "Windsnelheid                   : {0} km/h" -f $data.liveweer.windkmh ) -ForegroundColor White

	Write-Host ( "Luchtdruk                      : {0} hPa" -f $data.liveweer.luchtd ) -ForegroundColor DarkGray

	Write-Host ( "Luchtdruk                      : {0} mm Hg" -f $data.liveweer.ldmmhg ) -ForegroundColor White

	Write-Host ( "Dauwpunt                       : {0} {1}C" -f $data.liveweer.dauwp,[char]176 ) -ForegroundColor DarkGray

	Write-Host ( "Zicht                          : {0} km" -f $data.liveweer.zicht ) -ForegroundColor White

	Write-Host ( "Korte dagverwachting           : {0}" -f $data.liveweer.verw ) -ForegroundColor DarkGray

	Write-Host ( "zon op                         : {0}" -f $data.liveweer.sup ) -ForegroundColor White

	Write-Host ( "zon onder                      : {0}" -f $data.liveweer.sunder ) -ForegroundColor DarkGray

	#Write-Host ( "afbeeldingsnaam: {0}" -f $data.liveweer.image )

	#Write-Host ( "Weericoon vandaag: {0}" -f $data.liveweer.d0weer )

	Write-Host ( "Max temp vandaag               : {0} {1}C" -f $data.liveweer.d0tmax,[char]176 ) -ForegroundColor White

	Write-Host ( "Min temp vandaag               : {0} {1}C" -f $data.liveweer.d0tmin,[char]176 ) -ForegroundColor DarkGray

	Write-Host ( "Windkracht vandaag             : {0} Bft" -f $data.liveweer.d0windk ) -ForegroundColor White

	Write-Host ( "Windrichting vandaag           : {0}" -f $data.liveweer.d0windr ) -ForegroundColor DarkGray

	Write-Host ( "Neerslagkans vandaag           : {0} %" -f $data.liveweer.d0neerslag ) -ForegroundColor White

	Write-Host ( "Zonkans vandaag                : {0} %" -f $data.liveweer.d0zon ) -ForegroundColor DarkGray

	#Write-Host ( "Weericoon morgen: {0}" -f $data.liveweer.d1weer )

	Write-Host ( "Max temp morgen                : {0} {1}C" -f $data.liveweer.d1tmax,[char]176 ) -ForegroundColor White

	Write-Host ( "Min temp morgen                : {0} {1}C" -f $data.liveweer.d1tmin,[char]176 ) -ForegroundColor DarkGray

	Write-Host ( "Windkracht morgen              : {0} Bft" -f $data.liveweer.d1windk ) -ForegroundColor White

	Write-Host ( "Windrichting morgen            : {0}" -f $data.liveweer.d1windr ) -ForegroundColor DarkGray

	Write-Host ( "Neerslagkans morgen            : {0} %" -f $data.liveweer.d1neerslag ) -ForegroundColor White

	Write-Host ( "Zonkans morgen                 : {0} %" -f $data.liveweer.d1zon ) -ForegroundColor DarkGray

	Write-Host ( "Max temp overmorgen            : {0} {1}C" -f $data.liveweer.d2tmax,[char]176 ) -ForegroundColor White

	Write-Host ( "Min temp overmorgen              : {0} {1}C" -f $data.liveweer.d2tmin,[char]176 ) -ForegroundColor DarkGray

	#Write-Host ( "Weericoon overmorgen: {0}" -f $data.liveweer.d2weer )

	Write-Host ( "Windkracht overmorgen          : {0} Bft" -f $data.liveweer.d2windk ) -ForegroundColor White

	Write-Host ( "Windrichting overmorgen        : {0}" -f $data.liveweer.d2windr ) -ForegroundColor DarkGray

	Write-Host ( "Neerslagkans overmorgen        : {0} %" -f $data.liveweer.d2neerslag ) -ForegroundColor White

	Write-Host ( "Zonkans overmorgen             : {0} %" -f $data.liveweer.d2zon ) -ForegroundColor DarkGray

```
	if ( $data.liveweer.alarm -eq 0 ) {
```

		Write-Host ( Format-Text "Weerwaarschuwing voor de regio : Nee" ) -ForegroundColor Green

```
	} else {
```

		Write-Host ( Format-Text ( "Weerwaarschuwing voor de regio : {0}" -f $data.liveweer.alarmtxt ) ) -ForegroundColor Red

```
	}
```
```
 
```

	$temp = [System.Math]::Round( $data.liveweer.temp )

	$notifyIcon.Icon = ( Create-Icon ( $temp ) )

	# Tooltip text cannot exceed 64 characters, hence the Substring

	$tooltiptext = ( "Temperatuur: {0}`nGevoelstemp: {1}`n`nKlik: toon/verberg details" -f $data.liveweer.temp, $data.liveweer.gtemp )

	$notifyIcon.Text = $tooltiptext.Substring( 0, [System.Math]::Min( 63, $tooltiptext.Length ) )

```
 
```

	Write-Host "`n`nKlik op het icoon in de `"System Tray`" om dit venster te verbergen of weer te herstellen."

	# Show how to break free from the endless loop

	Write-Host "`nDruk op een willekeurige toets om de temperatuurweergave te stoppen . . .  " -NoNewline

```
 
```

	# Loop until a key is pressed in this console

```
	$loopcount = 0
```
```
	:WaitForKey while ( $true ) {
```
```
		$loopcount += 1
```
```
		if ( $Host.UI.RawUI.KeyAvailable ) {
```
```
			$abort = $true
```
```
			break WaitForKey
```
```
		} else {
```
```
			if ( $loopcount -gt 299 ) {
```
```
				break WaitForKey
```
```
			} else {
```
```
				Start-Sleep -Seconds 1
```
```
			}
```
```
		}
```
```
	}
```
```
} until ( $abort )
```
```
 
```

# Remove the key from the keyboard buffer . . .

```
[void] $Host.UI.RawUI.ReadKey( )
```
```
# . . .  and wipe it from the screen
```
```
Write-Host "`b `n"
```
```
 
```
```
# Cleanup
```
```
$notifyIcon.Visible = $False
```
```
$notifyIcon.Dispose( )
```
```
 
```