Set Kweather$Dir <Obey$Dir>

Iconsprites <Kweather$Dir>.!Sprites
Iconsprites <Kweather$Dir>.weather

Set Kweather$Help "<Kweather$Dir>.Documents.index/html"
Set Kweather$Version "1.00  (09-April-2018)"
Set Kweather$Title "Kweather"
Set Kweather$Publisher " <Kevin Wells>"
Set Kweather$Description "Weather Application"
Set Kweather$Web "http://kevsoft.co.uk/"

SET KweatherChoices$Dir <Kweather$Dir>.Default
SET KweatherChoices$Path Choices:Kweather.,<KweatherChoices$Dir>.
SET KweatherChoices$Write <Choices$Write>.Kweather

|IF "<Kweather$Running>"<>"" THEN Error Kweather is already running.

WimpSlot -min 256k -max 256k

Run <Kweather$Dir>.!RunImage %*0
