public MapStationDlg(LocationDesignator ld)
{
StationLocation = ld;
InitializeComponent();
// set initial settings for user details
GMap.NET.MapProviders.GMapProvider.UserAgent = "AirScout";
gm_Callsign.MapProvider = GMap.NET.MapProviders.GMapProviders.Find(Properties.Settings.Default.Map_Provider);
gm_Callsign.IgnoreMarkerOnMouseWheel = true;
gm_Callsign.MinZoom = 0;
gm_Callsign.MaxZoom = 20;
gm_Callsign.Zoom = 1;
gm_Callsign.DragButton = System.Windows.Forms.MouseButtons.Left;
gm_Callsign.CanDragMap = true;
gm_Callsign.ScalePen = new Pen(Color.Black, 3);
gm_Callsign.HelperLinePen = null;
gm_Callsign.SelectionPen = null;
gm_Callsign.MapScaleInfoEnabled = true;
gm_Callsign.Overlays.Add(Callsignpolygons);
gm_Callsign.Overlays.Add(Callsignspositions);
Callsignspositions.Markers.Add(UserPos);
// initially set textboxes
tb_Callsign.SilentText = StationLocation.Call;
tb_Latitude.SilentValue = StationLocation.Lat;
tb_Longitude.SilentValue = StationLocation.Lon;
tb_Locator.SilentText = MaidenheadLocator.LocFromLatLon(StationLocation.Lat, StationLocation.Lon, Properties.Settings.Default.Locator_SmallLettersForSubsquares, (int)Properties.Settings.Default.Locator_MaxLength / 2, Properties.Settings.Default.Locator_AutoLength);
tb_Elevation.SilentValue = GetElevation(StationLocation.Lat, StationLocation.Lon);
ValidateDetails();
// show initial zoom level in text box
gm_Callsign_OnMapZoomChanged();
}
public LocationDesignator LocationFind(string call, string loc = "")
{
// check all parameters
if (!Callsign.Check(call))
{
return(null);
}
if (!String.IsNullOrEmpty(loc) && !MaidenheadLocator.Check(loc))
{
return(null);
}
// get location info
LocationDesignator ld = (String.IsNullOrEmpty(loc)) ? StationData.Database.LocationFind(call) : StationData.Database.LocationFind(call, loc);
// return null if not found
if (ld == null)
{
return(null);
}
// get elevation
ld.Elevation = GetElevation(ld.Lat, ld.Lon);
ld.BestCaseElevation = false;
// modify location in case of best case elevation is selected --> but do not store in database or settings!
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(ld.Lat, ld.Lon, 3))
{
ElvMinMaxInfo maxinfo = GetMinMaxElevationLoc(ld.Loc);
if (maxinfo != null)
{
ld.Lat = maxinfo.MaxLat;
ld.Lon = maxinfo.MaxLon;
ld.Elevation = maxinfo.MaxElv;
ld.BestCaseElevation = true;
}
}
}
return(ld);
}
private string DeliverNearestPlanes(string paramstr, List <PlaneInfo> allplanes)
{
string json = "";
// set default values
string mycallstr = "";
string mylocstr = "";
string dxcallstr = "";
string dxlocstr = "";
string bandstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
mycallstr = pars.Get("MYCALL");
mylocstr = pars.Get("MYLOC");
dxcallstr = pars.Get("DXCALL");
dxlocstr = pars.Get("DXLOC");
bandstr = pars.Get("BAND");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(mycallstr))
{
return("Error: " + mycallstr + " is not a valid callsign!");
}
if (!Callsign.Check(dxcallstr))
{
return("Error: " + dxcallstr + " is not a valid callsign!");
}
if (!String.IsNullOrEmpty(mylocstr) && !MaidenheadLocator.Check(mylocstr))
{
return("Error: " + mylocstr + " is not a valid Maidenhead locator!");
}
if (!String.IsNullOrEmpty(dxlocstr) && !MaidenheadLocator.Check(dxlocstr))
{
return("Error: " + dxlocstr + " is not a valid Maidenhead locator!");
}
// set band to currently selected if empty
if (string.IsNullOrEmpty(bandstr))
{
band = Properties.Settings.Default.Band;
}
else
{
band = Bands.ParseStringValue(bandstr);
}
if (band == BAND.BNONE)
{
return("Error: " + bandstr + " is not a valid band value!");
}
// search call in station database, return empty string if not found
LocationDesignator myloc = LocationFind(mycallstr, mylocstr);
if (myloc == null)
{
return("Error: MyLocation not found in database!");
}
LocationDesignator dxloc = LocationFind(dxcallstr, dxlocstr);
if (dxloc == null)
{
return("Error: DXLocation not found in database!");
}
// get qrv info or create default
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(myloc.Call, myloc.Loc, band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get qrv info or create default
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxloc.Call, dxloc.Loc, band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// find local obstruction, if any
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(myloc.Lat, myloc.Lon, Properties.Settings.Default.ElevationModel);
double mybearing = LatLon.Bearing(myloc.Lat, myloc.Lon, dxloc.Lat, dxloc.Lon);
double myobstr = (o != null) ? o.GetObstruction(myqrv.AntennaHeight, mybearing) : double.MinValue;
// get or calculate propagation path
PropagationPathDesignator ppath = PropagationData.Database.PropagationPathFindOrCreateFromLatLon(
this,
myloc.Lat,
myloc.Lon,
GetElevation(myloc.Lat, myloc.Lon) + myqrv.AntennaHeight,
dxloc.Lat,
dxloc.Lon,
GetElevation(dxloc.Lat, dxloc.Lon) + dxqrv.AntennaHeight,
Bands.ToGHz(band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel,
myobstr);
if (ppath == null)
{
return(json);
}
// add additional info to ppath
ppath.Location1 = myloc;
ppath.Location2 = dxloc;
ppath.QRV1 = myqrv;
ppath.QRV2 = dxqrv;
/*
* // estimate positions according to time
* DateTime time = DateTime.UtcNow;
* foreach(PlaneInfo plane in allplanes.Planes)
* {
* // change speed to km/h
* double speed = plane.Speed_kmh;
* // calculate distance after timespan
* double dist = speed * (time - allplanes.At).TotalHours;
* LatLon.GPoint newpos = LatLon.DestinationPoint(plane.Lat, plane.Lon, plane.Track, dist);
* plane.Lat = newpos.Lat;
* plane.Lon = newpos.Lon;
* plane.Time = time;
* }
*/
// get nearest planes
List <PlaneInfo> nearestplanes = AircraftData.Database.GetNearestPlanes(DateTime.UtcNow, ppath, allplanes, Properties.Settings.Default.Planes_Filter_Max_Circumcircle, Properties.Settings.Default.Path_Band_Settings[band].MaxDistance, Properties.Settings.Default.Planes_MaxAlt);
// convert nearestplanes to json
JsonSerializerSettings settings = new JsonSerializerSettings();
settings.DateTimeZoneHandling = DateTimeZoneHandling.Utc;
settings.FloatFormatHandling = FloatFormatHandling.String;
settings.Formatting = Newtonsoft.Json.Formatting.Indented;
json = JsonConvert.SerializeObject(nearestplanes, settings);
return(json);
}
private string DeliverPropagationPath(string paramstr)
{
string json = "";
// set default values
string mycallstr = "";
string mylocstr = "";
string dxcallstr = "";
string dxlocstr = "";
string bandstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
mycallstr = pars.Get("MYCALL");
mylocstr = pars.Get("MYLOC");
dxcallstr = pars.Get("DXCALL");
dxlocstr = pars.Get("DXLOC");
bandstr = pars.Get("BAND");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(mycallstr))
{
return("Error: " + mycallstr + " is not a valid callsign!");
}
if (!Callsign.Check(dxcallstr))
{
return("Error: " + dxcallstr + " is not a valid callsign!");
}
if (!String.IsNullOrEmpty(mylocstr) && !MaidenheadLocator.Check(mylocstr))
{
return("Error: " + mylocstr + " is not a valid Maidenhead locator!");
}
if (!String.IsNullOrEmpty(dxlocstr) && !MaidenheadLocator.Check(dxlocstr))
{
return("Error: " + dxlocstr + " is not a valid Maidenhead locator!");
}
// set band to currently selected if empty
if (string.IsNullOrEmpty(bandstr))
{
band = Properties.Settings.Default.Band;
}
else
{
band = Bands.ParseStringValue(bandstr);
}
if (band == BAND.BNONE)
{
return("Error: " + bandstr + " is not a valid band value!");
}
// search call in station database, return empty string if not found
LocationDesignator myloc = LocationFind(mycallstr, mylocstr);
if (myloc == null)
{
return("Error: MyLocation not found in database!");
}
LocationDesignator dxloc = LocationFind(dxcallstr, dxlocstr);
if (dxloc == null)
{
return("Error: DXLocation not found in database!");
}
// get qrv info or create default
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(myloc.Call, myloc.Loc, band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get qrv info or create default
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxloc.Call, dxloc.Loc, band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// find local obstruction, if any
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(myloc.Lat, myloc.Lon, Properties.Settings.Default.ElevationModel);
double mybearing = LatLon.Bearing(myloc.Lat, myloc.Lon, dxloc.Lat, dxloc.Lon);
double myobstr = (o != null) ? o.GetObstruction(myqrv.AntennaHeight, mybearing) : double.MinValue;
// get or calculate propagation path
PropagationPathDesignator ppath = PropagationData.Database.PropagationPathFindOrCreateFromLatLon(
this,
myloc.Lat,
myloc.Lon,
GetElevation(myloc.Lat, myloc.Lon) + myqrv.AntennaHeight,
dxloc.Lat,
dxloc.Lon,
GetElevation(dxloc.Lat, dxloc.Lon) + dxqrv.AntennaHeight,
Bands.ToGHz(band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel,
myobstr);
if (ppath == null)
{
return(json);
}
// add additional info to ppath
ppath.Location1 = myloc;
ppath.Location2 = dxloc;
ppath.QRV1 = myqrv;
ppath.QRV2 = dxqrv;
// convert path to json
json = ppath.ToJSON();
return(json);
}
private string DeliverElevationPath(string paramstr)
{
string json = "";
// set default values
string mycallstr = "";
string mylocstr = "";
string dxcallstr = "";
string dxlocstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
mycallstr = pars.Get("MYCALL");
mylocstr = pars.Get("MYLOC");
dxcallstr = pars.Get("DXCALL");
dxlocstr = pars.Get("DXLOC");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(mycallstr))
{
return("Error: " + mycallstr + " is not a valid callsign!");
}
if (!Callsign.Check(dxcallstr))
{
return("Error: " + dxcallstr + " is not a valid callsign!");
}
if (!String.IsNullOrEmpty(mylocstr) && !MaidenheadLocator.Check(mylocstr))
{
return("Error: " + mylocstr + " is not a valid Maidenhead locator!");
}
if (!String.IsNullOrEmpty(dxlocstr) && !MaidenheadLocator.Check(dxlocstr))
{
return("Error: " + dxlocstr + " is not a valid Maidenhead locator!");
}
// search call in station database, return empty string if not found
LocationDesignator myloc = LocationFind(mycallstr, mylocstr);
if (myloc == null)
{
return("Error: MyLocation not found in database!");
}
LocationDesignator dxloc = LocationFind(dxcallstr, dxlocstr);
if (dxloc == null)
{
return("Error: DXLocation not found in database!");
}
// get qrv info or create default
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(myloc.Call, myloc.Loc, band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get qrv info or create default
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxloc.Call, dxloc.Loc, band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get or calculate elevation path
ElevationPathDesignator epath = ElevationData.Database.ElevationPathFindOrCreateFromLatLon(
this,
myloc.Lat,
myloc.Lon,
dxloc.Lat,
dxloc.Lon,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel);
if (epath == null)
{
return(json);
}
// add additional info to ppath
epath.Location1 = myloc;
epath.Location2 = dxloc;
epath.QRV1 = myqrv;
epath.QRV2 = dxqrv;
// convert path to json
json = epath.ToJSON();
return(json);
}
private string DeliverLocation(string paramstr)
{
string json = "";
// set default values
string callstr = "";
string locstr = "";
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
callstr = pars.Get("CALL");
locstr = pars.Get("LOC");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(callstr))
{
return("Error: " + callstr + " is not a valid callsign!");
}
LocationDesignator ld = null;
// locstr == null or empty --> return last recent location
if (String.IsNullOrEmpty(locstr))
{
ld = LocationFind(callstr);
if (ld == null)
{
return("Error: Location not found in database!");
}
json = ld.ToJSON();
return(json);
}
if (locstr == "ALL")
{
List <LocationDesignator> l = LocationFindAll(callstr);
if (l == null)
{
return("Error: Location not found in database!");
}
JsonSerializerSettings settings = new JsonSerializerSettings();
settings.DateTimeZoneHandling = DateTimeZoneHandling.Utc;
settings.FloatFormatHandling = FloatFormatHandling.String;
settings.Formatting = Newtonsoft.Json.Formatting.Indented;
settings.Culture = CultureInfo.InvariantCulture;
json = JsonConvert.SerializeObject(l, settings);
return(json);
}
if (!MaidenheadLocator.Check(locstr))
{
return("Error: " + locstr + " is not a valid Maidenhead locator!");
}
// search call in station database, return empty string if not found
ld = LocationFind(callstr, locstr);
if (ld == null)
{
return("Error: Location not found in database!");
}
json = ld.ToJSON();
return(json);
}
public HorizonDlg(string call, double lat, double lon, LocalObstructionDesignator localobstruction)
{
InitializeComponent();
Location = StationData.Database.LocationFindOrCreate(call, MaidenheadLocator.LocFromLatLon(lat, lon, false, 3));
QRV = StationData.Database.QRVFindOrCreateDefault(call, MaidenheadLocator.LocFromLatLon(lat, lon, false, 3), Properties.Settings.Default.Band);
LocalObstruction = localobstruction;
Elevation = ElevationData.Database[Location.Lat, Location.Lon, Properties.Settings.Default.ElevationModel];
AntennaHeight = (QRV.AntennaHeight != 0) ? QRV.AntennaHeight : StationData.Database.QRVGetDefaultAntennaHeight(Properties.Settings.Default.Band);
NumberFormatInfo provider = new NumberFormatInfo();
provider.NumberDecimalSeparator = ".";
provider.NumberGroupSeparator = ",";
tb_Horizon_Lat.Text = Location.Lat.ToString("F8", provider);
tb_Horizon_Lon.Text = Location.Lon.ToString("F8", provider);
tb_Horizon_Elevation.Text = ElevationData.Database[Location.Lat, Location.Lon, Properties.Settings.Default.ElevationModel].ToString("F0", provider);
tb_Horizon_Height.Text = AntennaHeight.ToString("F0", provider);
tb_Horizon_K_Factor.Text = Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].K_Factor.ToString("F2", provider);
tb_Horizon_QRG.Text = Bands.GetStringValue(Properties.Settings.Default.Band);
tb_Horizon_F1_Clearance.Text = Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].F1_Clearance.ToString("F2", provider);
tb_Horizon_ElevationModel.Text = Properties.Settings.Default.ElevationModel.ToString();
// setting User Agent to fix Open Street Map issue 2016-09-20
GMap.NET.MapProviders.GMapProvider.UserAgent = "AirScout";
// clearing referrer URL issue 2019-12-14
gm_Horizon.MapProvider.RefererUrl = "";
// set initial settings for main map
gm_Horizon.MapProvider = GMapProviders.Find(Properties.Settings.Default.Map_Provider);
gm_Horizon.IgnoreMarkerOnMouseWheel = true;
gm_Horizon.MinZoom = 0;
gm_Horizon.MaxZoom = 20;
gm_Horizon.Zoom = 8;
gm_Horizon.DragButton = System.Windows.Forms.MouseButtons.Left;
gm_Horizon.CanDragMap = true;
gm_Horizon.ScalePen = new Pen(Color.Black, 3);
gm_Horizon.MapScaleInfoEnabled = true;
gm_Horizon.Overlays.Add(horizons);
GMarkerGoogle gm = new GMarkerGoogle(new PointLatLng(Location.Lat, Location.Lon), GMarkerGoogleType.red_dot);
gm.ToolTipText = Location.Call;
horizons.Markers.Add(gm);
horizon.Stroke = new Pen(Color.Red, 3);
horizons.Routes.Add(horizon);
this.Text = "Radio Horizon of " + Location.Call;
// initialize charts
InitializeCharts();
// activate Polar if nothing checked
if (!Properties.Settings.Default.Horizon_Plot_Polar && !Properties.Settings.Default.Horizon_Plot_Cartesian && !Properties.Settings.Default.Horizon_Plot_Map)
{
Properties.Settings.Default.Horizon_Plot_Polar = true;
}
// show according child windows
UpdateCharts();
// create ToolTip on this window
TT = new ToolTip();
OwnerWin = gm_Horizon;
HorizonDlg_SizeChanged(this, null);
// set map bounds
Map_Left = Location.Lon;
Map_Right = Location.Lon;
Map_Top = Location.Lat;
Map_Bottom = Location.Lat;
}
private void bw_History_DoWork(object sender, DoWorkEventArgs e)
{
// check that Stepwidth ist positive in any case
if (Properties.Settings.Default.Path_History_StepWidth <= 0)
{
Properties.Settings.Default.Path_History_StepWidth = 1;
}
bw_History.ReportProgress(0, "Calculating Path....");
LocationDesignator mycall = StationData.Database.LocationFindOrCreate(Properties.Settings.Default.MyCall, MaidenheadLocator.LocFromLatLon(Properties.Settings.Default.MyLat, Properties.Settings.Default.MyLon, false, 3));
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(mycall.Call, mycall.Loc, Properties.Settings.Default.Band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(Properties.Settings.Default.Band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(Properties.Settings.Default.Band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(Properties.Settings.Default.Band);
}
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(mycall.Lat, mycall.Lon, 3))
{
ElvMinMaxInfo maxinfo = ElevationData.Database.ElevationTileFindMinMaxInfo(mycall.Loc, Properties.Settings.Default.ElevationModel);
if (maxinfo != null)
{
mycall.Lat = maxinfo.MaxLat;
mycall.Lon = maxinfo.MaxLon;
}
}
}
LocationDesignator dxcall = StationData.Database.LocationFindOrCreate(Properties.Settings.Default.DXCall, MaidenheadLocator.LocFromLatLon(Properties.Settings.Default.DXLat, Properties.Settings.Default.DXLon, false, 3));
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxcall.Call, dxcall.Loc, Properties.Settings.Default.Band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(Properties.Settings.Default.Band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(Properties.Settings.Default.Band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(Properties.Settings.Default.Band);
}
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(dxcall.Lat, dxcall.Lon, 3))
{
ElvMinMaxInfo maxinfo = ElevationData.Database.ElevationTileFindMinMaxInfo(dxcall.Loc, Properties.Settings.Default.ElevationModel);
if (maxinfo != null)
{
dxcall.Lat = maxinfo.MaxLat;
dxcall.Lon = maxinfo.MaxLon;
}
}
}
// find local obstruction, if any
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(mycall.Lat, mycall.Lon, Properties.Settings.Default.ElevationModel);
double mybearing = LatLon.Bearing(mycall.Lat, mycall.Lon, dxcall.Lat, dxcall.Lon);
double myobstr = (o != null) ? o.GetObstruction(myqrv.AntennaHeight, mybearing) : double.MinValue;
// try to find propagation path in database or create new one and store
PPath = PropagationData.Database.PropagationPathFindOrCreateFromLatLon(
bw_History,
mycall.Lat,
mycall.Lon,
ElevationData.Database[mycall.Lat, mycall.Lon, Properties.Settings.Default.ElevationModel] + myqrv.AntennaHeight,
dxcall.Lat,
dxcall.Lon,
ElevationData.Database[dxcall.Lat, dxcall.Lon, Properties.Settings.Default.ElevationModel] + dxqrv.AntennaHeight,
Bands.ToGHz(Properties.Settings.Default.Band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel,
myobstr);
DateTime time = From;
lock (Crossings)
{
Crossings.Clear();
}
lock (NearestPositions)
{
NearestPositions.Clear();
}
// pre-select nearest positions only
bw_History.ReportProgress(0, "Pre-selecting nearest positions...");
LatLon.GPoint midpoint = PPath.GetMidPoint();
double maxdist = PPath.Distance / 2;
foreach (AircraftPositionDesignator ap in AllPositions)
{
if ((ap.LastUpdated >= From) && (ap.LastUpdated <= To) && (LatLon.Distance(ap.Lat, ap.Lon, midpoint.Lat, midpoint.Lon) <= maxdist))
{
AircraftDesignator ac = null;
AircraftTypeDesignator at = null;
ac = AircraftData.Database.AircraftFindByHex(ap.Hex);
if (ac != null)
{
at = AircraftData.Database.AircraftTypeFindByICAO(ac.TypeCode);
}
PlaneInfo plane = new PlaneInfo(ap.LastUpdated, ap.Call, ((ac != null) && (!String.IsNullOrEmpty(ac.TypeCode)))? ac.Reg : "[unknown]", ap.Hex, ap.Lat, ap.Lon, ap.Track, ap.Alt, ap.Speed, (ac != null) && (!String.IsNullOrEmpty(ac.TypeCode)) ? ac.TypeCode : "[unkomwn]", ((at != null) && (!String.IsNullOrEmpty(at.Manufacturer))) ? at.Manufacturer : "[unknown]", ((at != null) && (!String.IsNullOrEmpty(at.Model))) ? at.Model : "[unknown]", (at != null) ? at.Category : PLANECATEGORY.NONE);
lock (NearestPositions)
{
NearestPositions.Add(plane);
}
if (NearestPositions.Count % 1000 == 0)
{
bw_History.ReportProgress(0, "Pre-selecting nearest positions..." + "[" + NearestPositions.Count.ToString() + "]");
}
}
if (bw_History.CancellationPending)
{
break;
}
}
bw_History.ReportProgress(0, "Pre-selecting nearest positions finished, " + NearestPositions.Count.ToString() + " positions.");
// return if no positions left over
if (NearestPositions.Count == 0)
{
return;
}
int startindex = 0;
// set timeline to first reported position
time = NearestPositions[0].Time;
while ((!bw_History.CancellationPending) && (time <= To))
{
if (Crossings.Count % 1000 == 0)
{
bw_History.ReportProgress(0, "Calculating at " + time.ToString("yyyy-MM-dd HH:mm:ss") + ", " + Crossings.Count.ToString() + " crossings so far.");
}
// calculate from timestamp
DateTime from = time.AddMinutes(-Properties.Settings.Default.Planes_Position_TTL);
// fill plane position cache
PlaneInfoCache ac = new PlaneInfoCache();
int i = startindex;
startindex = -1;
while ((!bw_History.CancellationPending) && (i < NearestPositions.Count))
{
// update ap in cache if relevant
if (NearestPositions[i].Time >= from)
{
// store first index as startindex for next iteration
if (startindex == -1)
{
startindex = i;
}
lock (ac)
{
ac.InsertOrUpdateIfNewer(NearestPositions[i]);
}
}
// stop if position is newer than current time
if (NearestPositions[i].Time > time)
{
break;
}
i++;
}
List <PlaneInfo> allplanes = ac.GetAll(time, Properties.Settings.Default.Planes_Position_TTL);
// get nearest planes
List <PlaneInfo> nearestplanes = AircraftData.Database.GetNearestPlanes(time, PPath, allplanes, Properties.Settings.Default.Planes_Filter_Max_Circumcircle, Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].MaxDistance, Properties.Settings.Default.Planes_MaxAlt);
if ((nearestplanes != null) && (nearestplanes.Count() > 0))
{
// get all planes crossing the path
foreach (PlaneInfo plane in nearestplanes)
{
if (plane.IntQRB <= Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].MaxDistance)
{
// check if level value is available
SignalLevelDesignator ad = SignalData.Database.SignalLevelFind(plane.Time);
if (ad != null)
{
plane.SignalStrength = ad.Level;
}
else
{
plane.SignalStrength = double.MinValue;
}
lock (Crossings)
{
if (!Properties.Settings.Default.Analysis_CrossingHistory_WithSignalLevel || (ad != null))
{
Crossings.Add(plane);
}
}
}
bw_History.ReportProgress(0, "Calculating at " + time.ToString("yyyy-MM-dd HH:mm:ss") + ", " + Crossings.Count.ToString() + " crossings so far.");
}
}
time = time.AddSeconds(Stepwidth);
}
bw_History.ReportProgress(100, "Calculation done.");
}
