Mining 0.6.1 with Ratting 0.1.3a

//    Mining 0.6.1 with Ratting 0.1.3b
//
//    This script mines ore from asteroids.
//    before running this script, make sure to prepare as follows:
//    +enter bookmark for mining site and bookmark for station in the configuration section below.
//    +in the Overview create a preset which includes asteroids and rats and enter the name of that preset in the configuration section below at 'OverviewPreset'. The bot will make sure this preset is loaded when it needs to use the overview.
//    +set Overview to sort by distance with the nearest entry at the top.
//    +in the Inventory select the 'List' view.
//    +set the UI language to english.
//    +use a ship with an ore hold.
//    +put some light drones into your ships' drone bay. The bot will make use of them to attack rats when HP are too low (configurable) or it gets jammed.
//    +enable the info panel 'System info'. The bot will use the button in there to access bookmarks and asteroid belts.
//    +arrange windows to not occlude modules or info panels.
//    +in the ship UI, disable "Display Passive Modules" and disable "Display Empty Slots" and enable "Display Module Tooltips". The bot uses the module tooltips to automatically identify the properties of the modules.
//
//    for optional features (such as warp to safe on hostile in local) see the configuration section below.

using BotSharp.ToScript.Extension;
using Parse = Sanderling.Parse;

//    begin of configuration section ->

//    The bot uses the bookmarks from the menu which is opened from the button in the 'System info' panel.

//    Bookmarks of places to mine. Add additional bookmarks separated by comma.
string[] SetMiningSiteBookmark = new[] {
    "1",
    "2",
    "3",
    "4",
    "5",
    };

//    Bookmark of location where ore should be unloaded.
string[] UnloadBookmark = new[] {
    "HOME",
    "HOME1",
    "HOME2",
    "HOME3",
    };

// Emergency Warpout station name (not bookmark!)
string RetreatStation = "JK-Q77 - Shiva's Grind and Go";

//    Name of the container to unload to as shown in inventory.
string UnloadDestContainerName = "Ice";

// Maximum number of targets you can target at once
int MaxActiveTargets = 5;

//    when this is set to true, the bot will try to unload when undocked.
bool UnloadInSpace = false;

//    Bookmark of place to retreat to to prevent ship loss.
string[] RetreatBookmark = UnloadBookmark;

//    The bot loads this preset to the active tab.
string OverviewPreset = null;

var ActivateHardener = true; // activate shield hardener.
var ActivateBooster = true; // activate shield booster.

//    bot will start fighting (and stop mining) when hitpoints are lower.
var DefenseEnterHitpointThresholdPercent = 50;
var DefenseExitHitpointThresholdPercent = 99;

var EmergencyWarpOutHitpointPercent = 30;

var FightAllRats = false;    //    when this is set to true, the bot will attack rats independent of shield hp.

var EnterOffloadOreHoldFillPercent = 93;    //    percentage of ore hold fill level at which to enter the offload process.

var RetreatOnNeutralOrHostileInLocal = true;   // warp to RetreatBookmark when a neutral or hostile is visible in local.

//    <- end of configuration section


Func<object> BotStopActivity = () => null;

Func<object> NextActivity = MainStep;

for(;;)
{
    MemoryUpdate();

    Host.Log(
        "ore hold fill: " + OreHoldFillPercent + "%" +
        ", mining range: " + MiningRange +
        ", mining modules (inactive): " + SetModuleMiner?.Length + "(" + SetModuleMinerInactive?.Length + ")" +
        ", shield.hp: " + ShieldHpPercent + "%" +
        ", retreat: " + RetreatReason +
        ", JLA: " + JammedLastAge +
        ", overview.rats: " + ListRatOverviewEntry?.Length +
        ", overview.roids: " + ListAsteroidOverviewEntry?.Length +
        ", offload count: " + OffloadCount +
        ", nextAct: " + NextActivity?.Method?.Name);

    CloseModalUIElement();

    if(0 < RetreatReason?.Length && !(Measurement?.IsDocked ?? false))
    {
         EmergencyWarpout();
        InitiateDockToOrWarpToBookmark(RandomElement(RetreatBookmark));
        continue;
    }

    NextActivity = NextActivity?.Invoke() as Func<object>;

    if(BotStopActivity == NextActivity)
        break;

    if(null == NextActivity)
        NextActivity = MainStep;

    Host.Delay(1111);
}

//    seconds since ship was jammed.
long? JammedLastAge => Jammed ? 0 : (Host.GetTimeContinuousMilli() - JammedLastTime) / 1000;

int?    ShieldHpPercent => ShipUi?.HitpointsAndEnergy?.Shield / 10;
int?    ArmorHpPercent => ShipUi?.HitpointsAndEnergy?.Armor / 10;
int?    StructHpPercent => ShipUi?.HitpointsAndEnergy?.Struct / 10;

bool    DefenseExit =>
    (Measurement?.IsDocked ?? false) ||
    (DefenseExitHitpointThresholdPercent < ShieldHpPercent && !(JammedLastAge < 40)) ||
    (OreHoldFilledForOffload);

bool    DefenseEnter =>
    !DefenseExit    ||
    !(DefenseEnterHitpointThresholdPercent < ShieldHpPercent) || JammedLastAge < 10;

bool    ShipRepair => ArmorHpPercent < 99 || StructHpPercent < 99;

bool    OreHoldFilledForOffload => Math.Max(0, Math.Min(100, EnterOffloadOreHoldFillPercent)) <= OreHoldFillPercent;

Int64?    JammedLastTime = null;
string RetreatReasonTemporary = null;
string RetreatReasonPermanent = null;
string RetreatReason => RetreatReasonPermanent ?? RetreatReasonTemporary;
int? LastCheckOreHoldFillPercent = null;

int OffloadCount = 0;

Func<object>    MainStep()
{
    if(Measurement?.IsDocked ?? false)
    {
        InInventoryUnloadItems();

        if (0 < RetreatReasonPermanent?.Length)
            return BotStopActivity;

        if (0 < RetreatReason?.Length)
            return MainStep;

        Undock();
    }

    if(0 < ListRatsOverviewEntry?.Length) {
        Host.Log("ListRatsOverviewEntry?.Length = "+ListRatsOverviewEntry?.Length);
        Ratting();
        }

    if((0 == ListRatsOverviewEntry?.Length)&&(0 < DronesInSpaceCount)) {
        Sanderling.KeyboardPressCombined(new[] {VirtualKeyCode.SHIFT, VirtualKeyCode.VK_R});
    }

    /*
    if(DefenseEnter)
    {
        Host.Log("enter defense");
        DroneEnsureInBay();
        return DefenseStep;
    }

    if(ShipRepair)
    {
        Host.Log("waiting for repairs");
        Host.Delay(4444);
        return MainStep;
    }
    */

    EnsureOverviewTypeSelectionLoaded();

    EnsureWindowInventoryOpenOreHold();

    if(ReadyForManeuver)
    {
        //DroneEnsureInBay();

        if(OreHoldFilledForOffload)
        {

    Sanderling.WindowToForeground();

            if (UnloadInSpace)
            {
                Host.Delay(4444);
                InInventoryUnloadItems();
            } else if (ReadyForManeuver)
            {
                EmergencyWarpout();
                InitiateDockToOrWarpToBookmark(RandomElement(UnloadBookmark));
            }
            return MainStep;
        }

        if(!(0 < ListAsteroidOverviewEntry?.Length))
            InitiateWarpToRandomMiningSite();
    }

    ModuleMeasureAllTooltip();

    if(ActivateHardener)
        ActivateHardenerExecute();

    if(ActivateBooster)
        ActivateBoosterExecute();

    return InBeltMineStep;
}

int RandomInt() => new Random((int)Host.GetTimeContinuousMilli()).Next();

T RandomElement<T>(IEnumerable<T> sequence)
{
    var array = (sequence as T[]) ?? sequence?.ToArray();

    if (!(0 < array?.Length))
        return default(T);

    return array[RandomInt() % array.Length];
}

void CloseModalUIElement()
{
    var    ButtonClose =
        ModalUIElement?.ButtonText?.FirstOrDefault(button => (button?.Text).RegexMatchSuccessIgnoreCase("close|no|ok"));

    Sanderling.MouseClickLeft(ButtonClose);
}

void DroneLaunch()
{
    Host.Log("launch drones.");
    Sanderling.MouseClickRight(DronesInBayListEntry);
    Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("launch", RegexOptions.IgnoreCase));
}

void DroneEnsureInBay()
{
    if(0 == DronesInSpaceCount)
        return;

    DroneReturnToBay();

    Host.Delay(5555);
}

void DroneReturnToBay()
{
    Host.Log("return drones to bay.");
    Sanderling.MouseClickRight(DronesInSpaceListEntry);
    Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("return.*bay", RegexOptions.IgnoreCase));
}

/*
Func<object>    DefenseStep()
{
    if(DefenseExit)
    {
        Host.Log("exit defense.");
        return null;
    }

    if (!(0 < DronesInSpaceCount))
      {
        Sanderling.KeyboardPress(VirtualKeyCode.VK_L);
        DroneLaunch();
      }
    EnsureOverviewTypeSelectionLoaded();

    var SetRatName =
        ListRatOverviewEntry?.Select(entry => Regex.Split(entry?.Name ?? "", @"\s+")?.FirstOrDefault())
        ?.Distinct()
        ?.ToArray();

    var SetRatTarget = Measurement?.Target?.Where(target =>
        SetRatName?.Any(ratName => target?.TextRow?.Any(row => row.RegexMatchSuccessIgnoreCase(ratName)) ?? false) ?? false);

    var RatTargetNext = SetRatTarget?.OrderBy(target => target?.DistanceMax ?? int.MaxValue)?.FirstOrDefault();

    if(null == RatTargetNext)
    {
        Host.Log("no rat targeted.");
        ClickMenuEntryQuickTargeting(ListRatOverviewEntry?.FirstOrDefault());
    }
    else
    {
       Host.Log("rat targeted. sending drones.");
       Sanderling.MouseClickLeft(RatTargetNext);
       Sanderling.MouseClickRight(DronesInSpaceListEntry);
       Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("engage", RegexOptions.IgnoreCase));
    }

    return DefenseStep;
}
*/


Func<object> InBeltMineStep()
{
/*
    if (DefenseEnter)
    {
        Host.Log("enter defense.");
        return DefenseStep;
    }
*/

    EnsureWindowInventoryOpenOreHold();

    EnsureOverviewTypeSelectionLoaded();

    if(OreHoldFilledForOffload)
        return null;

    var moduleMinerInactive = SetModuleMinerInactive?.FirstOrDefault();

    if (null == moduleMinerInactive)
    {
        Host.Delay(3333);
        return InBeltMineStep;
    }

    var    setTargetAsteroidInRange    =
        SetTargetAsteroid?.Where(target => target?.DistanceMax <= MiningRange)?.ToArray();

    var setTargetAsteroidInRangeNotAssigned =
        setTargetAsteroidInRange?.Where(target => !(0 < target?.Assigned?.Length))?.ToArray();

    Host.Log("targeted asteroids in range (without assignment): " + setTargetAsteroidInRange?.Length + " (" + setTargetAsteroidInRangeNotAssigned?.Length + ")");

    if(0 < setTargetAsteroidInRangeNotAssigned?.Length)
    {
        var targetAsteroidInputFocus    =
            setTargetAsteroidInRangeNotAssigned?.FirstOrDefault(target => target?.IsSelected ?? false);

        if(null == targetAsteroidInputFocus)
            Sanderling.MouseClickLeft(setTargetAsteroidInRangeNotAssigned?.FirstOrDefault());

    Sanderling.KeyDown(VirtualKeyCode.VK_W);
    Sanderling.MouseClickLeft(targetAsteroidInputFocus);
    Sanderling.KeyUp(VirtualKeyCode.VK_W);

        //ModuleToggle(moduleMinerInactive);
        ActivateHarvesters();

        //Sanderling.KeyboardPress(VirtualKeyCode.VK_L);

        return InBeltMineStep;
    }

    var asteroidOverviewEntryNext = ListAsteroidOverviewEntry?.FirstOrDefault();
    var asteroidOverviewEntryNextNotTargeted = ListAsteroidOverviewEntry?.FirstOrDefault(entry => !((entry?.MeTargeted ?? false) || (entry?.MeTargeting ?? false)));

    Host.Log("next asteroid: (" + asteroidOverviewEntryNext?.Name + " , distance: " + asteroidOverviewEntryNext?.DistanceMax + ")" +
        ", next asteroid not targeted: (" + asteroidOverviewEntryNext?.Name + " , distance: " + asteroidOverviewEntryNext?.DistanceMax + ")");

    if(null == asteroidOverviewEntryNext)
    {
        Host.Log("no asteroid available");
        return null;
    }

    if(null == asteroidOverviewEntryNextNotTargeted)
    {
        Host.Log("all asteroids targeted");
        return null;
    }

    if (!(asteroidOverviewEntryNextNotTargeted.DistanceMax < MiningRange))
    {
        if(!(1111 < asteroidOverviewEntryNext?.DistanceMin))
        {
            Host.Log("distance between asteroids too large");
            return null;
        }

        Host.Log("out of range, approaching");
        ClickMenuEntryOnMenuRoot(asteroidOverviewEntryNext, "approach");
    }
    else
    {
        Host.Log("initiate lock asteroid");
        ClickMenuEntryQuickTargeting(asteroidOverviewEntryNextNotTargeted);
    }

    return InBeltMineStep;
}


Sanderling.Parse.IMemoryMeasurement    Measurement    =>
    Sanderling?.MemoryMeasurementParsed?.Value;

IWindow ModalUIElement =>
    Measurement?.EnumerateReferencedUIElementTransitive()?.OfType<IWindow>()?.Where(window => window?.isModal ?? false)
    ?.OrderByDescending(window => window?.InTreeIndex ?? int.MinValue)
    ?.FirstOrDefault();

IEnumerable<Parse.IMenu> Menu => Measurement?.Menu;

Parse.IShipUi ShipUi => Measurement?.ShipUi;

bool Jammed => ShipUi?.EWarElement?.Any(EwarElement => (EwarElement?.EWarType).RegexMatchSuccess("electronic")) ?? false;

Sanderling.Interface.MemoryStruct.IMenuEntry MenuEntryLockTarget =>
    Menu?.FirstOrDefault()?.Entry?.FirstOrDefault(entry => entry.Text.RegexMatchSuccessIgnoreCase("^lock"));

Sanderling.Parse.IWindowOverview    WindowOverview    =>
    Measurement?.WindowOverview?.FirstOrDefault();

Sanderling.Parse.IWindowInventory    WindowInventory    =>
    Measurement?.WindowInventory?.FirstOrDefault();

IWindowDroneView    WindowDrones    =>
    Measurement?.WindowDroneView?.FirstOrDefault();

ITreeViewEntry InventoryActiveShipOreHold =>
    WindowInventory?.ActiveShipEntry?.TreeEntryFromCargoSpaceType(ShipCargoSpaceTypeEnum.OreHold);

IInventoryCapacityGauge OreHoldCapacityMilli =>
    (InventoryActiveShipOreHold?.IsSelected ?? false) ? WindowInventory?.SelectedRightInventoryCapacityMilli : null;

int? OreHoldFillPercent => (int?)((OreHoldCapacityMilli?.Used * 100) / OreHoldCapacityMilli?.Max);

Tab OverviewPresetTabActive =>
    WindowOverview?.PresetTab
    ?.OrderByDescending(tab => tab?.LabelColorOpacityMilli ?? 0)
    ?.FirstOrDefault();

string OverviewTypeSelectionName =>
    WindowOverview?.Caption?.RegexMatchIfSuccess(@"\(([^\)]*)\)")?.Groups?[1]?.Value;

Parse.IOverviewEntry[] ListRatOverviewEntry => WindowOverview?.ListView?.Entry?.Where(entry =>
        (entry?.MainIconIsRed ?? false)    && (entry?.IsAttackingMe ?? false))
        ?.OrderBy(entry => entry?.CellValueFromColumnHeader("Size").TryParseInt() ?? int.MaxValue)
        ?.ToArray();

Parse.IOverviewEntry[] ListAsteroidOverviewEntry =>
    WindowOverview?.ListView?.Entry
    ?.Where(entry => null != OreTypeFromAsteroidName(entry?.Name))
    ?.OrderBy(entry => entry.DistanceMax ?? int.MaxValue)
    ?.ToArray();


DroneViewEntryGroup DronesInBayListEntry =>
    WindowDrones?.ListView?.Entry?.OfType<DroneViewEntryGroup>()?.FirstOrDefault(Entry => null != Entry?.Caption?.Text?.RegexMatchIfSuccess(@"Drones in bay", RegexOptions.IgnoreCase));

DroneViewEntryGroup DronesInSpaceListEntry =>
    WindowDrones?.ListView?.Entry?.OfType<DroneViewEntryGroup>()?.FirstOrDefault(Entry => null != Entry?.Caption?.Text?.RegexMatchIfSuccess(@"Drones in Local Space", RegexOptions.IgnoreCase));

int?    DronesInSpaceCount => DronesInSpaceListEntry?.Caption?.Text?.AsDroneLabel()?.Status?.TryParseInt();

bool ReadyForManeuverNot =>
    Measurement?.ShipUi?.Indication?.LabelText?.Any(indicationLabel =>
        (indicationLabel?.Text).RegexMatchSuccessIgnoreCase("warp|docking")) ?? false;

bool ReadyForManeuver => !ReadyForManeuverNot && !(Measurement?.IsDocked ?? true);

Sanderling.Parse.IShipUiTarget[] SetTargetAsteroid =>
    Measurement?.Target?.Where(target =>
        target?.TextRow?.Any(textRow => textRow.RegexMatchSuccessIgnoreCase("asteroid")) ?? false)?.ToArray();

Sanderling.Interface.MemoryStruct.IListEntry    WindowInventoryItem    =>
    WindowInventory?.SelectedRightInventory?.ListView?.Entry?.FirstOrDefault();

Sanderling.Accumulation.IShipUiModule[] SetModuleMiner =>
Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.Where(module =>
(module?.TooltipLast?.Value?.IsIceHarvester  ?? false) || (module?.TooltipLast?.Value?.IsMiner ?? false))?.ToArray();

Sanderling.Accumulation.IShipUiModule[] SetModuleMinerInactive     =>
    SetModuleMiner?.Where(module => !(module?.RampActive ?? false))?.ToArray();

int?    MiningRange => SetModuleMiner?.Select(module =>
    module?.TooltipLast?.Value?.RangeOptimal ?? module?.TooltipLast?.Value?.RangeMax ?? module?.TooltipLast?.Value?.RangeWithin ?? 0)?.DefaultIfEmpty(0)?.Min();;

WindowChatChannel chatLocal =>
     Sanderling.MemoryMeasurementParsed?.Value?.WindowChatChannel
     ?.FirstOrDefault(windowChat => windowChat?.Caption?.RegexMatchSuccessIgnoreCase("local") ?? false);

//    assuming that own character is always visible in local
bool hostileOrNeutralsInLocal => 1 != chatLocal?.ParticipantView?.Entry?.Count(IsNeutralOrEnemy);

//    extract the ore type from the name as seen in overview. "Asteroid (Plagioclase)"
string OreTypeFromAsteroidName(string AsteroidName)    =>
    AsteroidName.ValueFromRegexMatchGroupAtIndex(@"Asteroid \(([^\)]+)", 0);

void ClickMenuEntryOnMenuRoot(IUIElement MenuRoot, string MenuEntryRegexPattern)
{
    Sanderling.MouseClickRight(MenuRoot);

    var Menu = Measurement?.Menu?.FirstOrDefault();

    var    MenuEntry = Menu?.EntryFirstMatchingRegexPattern(MenuEntryRegexPattern, RegexOptions.IgnoreCase);

    Sanderling.MouseClickLeft(MenuEntry);
}

//  Haven Rattings v.0.1.3
Parse.IOverviewEntry[] ListRatsOverviewEntry =>
    WindowOverview?.ListView?.Entry
    ?.Where(entry => (entry?.MainIconIsRed ?? true) )
    ?.OrderBy(entry => (entry?.CellValueFromColumnHeader("Size").DistanceParseMin() ?? int.MaxValue) )
    ?.ToArray();

//    Parsing all targeted rats from overview into an array
Parse.IOverviewEntry[] ListTotalRatTargets =>
    WindowOverview?.ListView?.Entry
    ?.Where(entry => (entry?.MeTargeted ?? true)&&(entry?.MainIconIsRed ?? true) )
    ?.OrderBy(entry => (entry?.CellValueFromColumnHeader("Size").DistanceParseMin() ?? int.MaxValue) )
    ?.ToArray();

int TotalTargets = 0;

//    Ratting Workhorse
void Ratting()
{
    var ratOverviewEntryNextNotTargeted = ListRatsOverviewEntry?.FirstOrDefault(entry => ( (entry?.MainIconIsRed ?? false) && !( (entry?.MeTargeted ?? false) || (entry?.MeTargeting ?? false) ) ) );
    var ratOverviewEntryRatTargeted = ListRatsOverviewEntry?.LastOrDefault(entry => !((entry?.MeTargeted ?? false) && (entry?.MeActiveTarget ?? false)) );
    int Smaller = Math.Min(ListRatsOverviewEntry.Length, MaxActiveTargets);

    if((0 < ListRatsOverviewEntry?.Length) && (0 == DronesInSpaceCount)) {
        Sanderling.KeyboardPress(VirtualKeyCode.VK_L);
        Host.Log("Launching drones");
    }

    if((0 < ListTotalRatTargets?.Length)&&(TotalTargets != ListTotalRatTargets.Length)) {
     var target = ListTotalRatTargets?.FirstOrDefault();
        Sanderling.MouseClickLeft(target);
        Host.Delay(111);
        Sanderling.KeyboardPress(VirtualKeyCode.VK_F);
        Host.Log("Attacking: " + target.Name + " (" + target.CellValueFromColumnHeader("Size").DistanceParseMin() + ")" );
        TotalTargets = ListTotalRatTargets.Length;
   }

    if((ListTotalRatTargets?.Length < ListRatsOverviewEntry?.Length) && (7 > TotalTargets)) {
        var target = ratOverviewEntryNextNotTargeted;
        if (null != target) {
            ClickMenuEntryQuickTargeting(target);
            Host.Log("Targeting: " + target.Name + " (" + target.CellValueFromColumnHeader("Size").DistanceParseMin() + ")" );
            }
    }
}

//    Fast targeting: Ctrl+LMB
void ClickMenuEntryQuickTargeting(IUIElement MenuRoot)
{
    Sanderling.KeyDown(VirtualKeyCode.LCONTROL);
    Sanderling.MouseClickLeft(MenuRoot);
    Sanderling.KeyUp(VirtualKeyCode.LCONTROL);
}

void EnsureWindowInventoryOpen()
{
    if (null != WindowInventory)
        return;

    Host.Log("open Inventory.");
    Sanderling.MouseClickLeft(Measurement?.Neocom?.InventoryButton);
}

void EnsureWindowInventoryOpenOreHold()
{
    EnsureWindowInventoryOpen();

    var inventoryActiveShip = WindowInventory?.ActiveShipEntry;

    if(InventoryActiveShipOreHold == null && !(inventoryActiveShip?.IsExpanded ?? false))
        Sanderling.MouseClickLeft(inventoryActiveShip?.ExpandToggleButton);

    if(!(InventoryActiveShipOreHold?.IsSelected ?? false))
        Sanderling.MouseClickLeft(InventoryActiveShipOreHold);
}

//    sample label text: Intensive Reprocessing Array <color=#66FFFFFF>1,123 m</color>
string InventoryContainerLabelRegexPatternFromContainerName(string containerName) =>
    @"^\s*" + Regex.Escape(containerName) + @"\s*($|\<)";

void InInventoryUnloadItems() => InInventoryUnloadItemsTo(UnloadDestContainerName);

void InInventoryUnloadItemsTo(string DestinationContainerName)
{
    Host.Log("unload items to '" + DestinationContainerName + "'.");

    EnsureWindowInventoryOpenOreHold();

    for (;;)
    {
        var oreHoldListItem = WindowInventory?.SelectedRightInventory?.ListView?.Entry?.ToArray();

        var oreHoldItem = oreHoldListItem?.FirstOrDefault();

        if(null == oreHoldItem)
            break;    //    0 items in OreHold

        if(1 < oreHoldListItem?.Length)
            ClickMenuEntryOnMenuRoot(oreHoldItem, @"select\s*all");

        var DestinationContainerLabelRegexPattern =
            InventoryContainerLabelRegexPatternFromContainerName(DestinationContainerName);

        var DestinationContainer =
            WindowInventory?.LeftTreeListEntry?.SelectMany(entry => new[] { entry }.Concat(entry.EnumerateChildNodeTransitive()))
            ?.FirstOrDefault(entry => entry?.Text?.RegexMatchSuccessIgnoreCase(DestinationContainerLabelRegexPattern) ?? false);

        if (null == DestinationContainer)
            Host.Log("error: Inventory entry labeled '" + DestinationContainerName + "' not found");

        Sanderling.MouseDragAndDrop(oreHoldItem, DestinationContainer);
    }
}

bool InitiateWarpToRandomMiningSite()    =>
    InitiateDockToOrWarpToBookmark(RandomElement(SetMiningSiteBookmark));

bool InitiateDockToOrWarpToBookmark(string bookmarkOrFolder)
{
    Host.Log("dock to or warp to bookmark or random bookmark in folder: '" + bookmarkOrFolder + "'");

    Sanderling.WindowToForeground();

    var listSurroundingsButton = Measurement?.InfoPanelCurrentSystem?.ListSurroundingsButton;

    Sanderling.MouseClickRight(listSurroundingsButton);

    var bookmarkMenuEntry = Measurement?.Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("^" + bookmarkOrFolder + "$", RegexOptions.IgnoreCase);

    if(null == bookmarkMenuEntry)
    {
        Host.Log("menu entry not found for bookmark or folder: '" + bookmarkOrFolder + "'");
        return true;
    }

    var currentLevelMenuEntry = bookmarkMenuEntry;

    for (var menuLevel = 1; ; ++menuLevel)
    {
        Sanderling.MouseClickLeft(currentLevelMenuEntry);

        var menu = Measurement?.Menu?.ElementAtOrDefault(menuLevel);
        var dockMenuEntry = menu?.EntryFirstMatchingRegexPattern("dock", RegexOptions.IgnoreCase);
        var warpMenuEntry = menu?.EntryFirstMatchingRegexPattern(@"warp.*within\s*0", RegexOptions.IgnoreCase);
        var approachEntry = menu?.EntryFirstMatchingRegexPattern(@"approach", RegexOptions.IgnoreCase);

        var maneuverMenuEntry = dockMenuEntry ?? warpMenuEntry;

        if (null != maneuverMenuEntry)
        {
            Host.Log("initiating '" + maneuverMenuEntry.Text + "' on entry '" + currentLevelMenuEntry?.Text + "'");
            Sanderling.MouseClickLeft(maneuverMenuEntry);
            return false;
        }

        if (null != approachEntry)
        {
            Host.Log("found menu entry '" + approachEntry.Text + "'. Assuming we are already there.");
            return false;
        }

        var setBookmarkOrFolderMenuEntry =
            menu?.Entry;    //    assume that each entry on the current menu level is a bookmark or a bookmark folder.

        var nextLevelMenuEntry = RandomElement(setBookmarkOrFolderMenuEntry);

        if(null == nextLevelMenuEntry)
        {
            Host.Log("no suitable menu entry found");
            return true;
        }

        currentLevelMenuEntry = nextLevelMenuEntry;
    }
}

void Undock()
{
    while(Measurement?.IsDocked ?? true)
    {
        Sanderling.MouseClickLeft(Measurement?.WindowStation?.FirstOrDefault()?.UndockButton);
        Host.Log("waiting for undocking to complete.");
        Host.Delay(8000);
    }

    Host.Delay(4444);
    Sanderling.InvalidateMeasurement();
}

void ModuleMeasureAllTooltip()
{
    Host.Log("measure tooltips of all modules.");

    for (;;)
    {
        var NextModule = Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.FirstOrDefault(m => null == m?.TooltipLast);

        if(null == NextModule)
            break;

        Host.Log("measure module.");
        //    take multiple measurements of module tooltip to reduce risk to keep bad read tooltip.
        Sanderling.MouseMove(NextModule);
        Sanderling.WaitForMeasurement();
        Sanderling.MouseMove(NextModule);
    }
}

void ActivateHardenerExecute()
{
    var    SubsetModuleHardener =
        Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule
        ?.Where(module => module?.TooltipLast?.Value?.IsHardener ?? false);

    var    SubsetModuleToToggle =
        SubsetModuleHardener
        ?.Where(module => !(module?.RampActive ?? false));

    foreach (var Module in SubsetModuleToToggle.EmptyIfNull())
        ModuleToggle(Module);
}

void ActivateBoosterExecute()
{
    var    SubsetModuleBooster =
        Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule
        ?.Where(module => module?.TooltipLast?.Value?.IsShieldBooster?? false);

    var    SubsetModuleToToggle =
        SubsetModuleBooster
        ?.Where(module => !(module?.RampActive ?? false));

    foreach (var Module in SubsetModuleToToggle.EmptyIfNull())
        ModuleToggle(Module);
}

void ActivateHarvesters()
{
    Sanderling.KeyboardPressCombined(new[]{ VirtualKeyCode.F1, VirtualKeyCode.F2, VirtualKeyCode.F3});
}

void ModuleToggle(Sanderling.Accumulation.IShipUiModule Module)
{
    var ToggleKey = Module?.TooltipLast?.Value?.ToggleKey;

    Host.Log("toggle module using " + (null == ToggleKey ? "mouse" : Module?.TooltipLast?.Value?.ToggleKeyTextLabel?.Text));

    if(null == ToggleKey)
        Sanderling.MouseClickLeft(Module);
    else
        Sanderling.KeyboardPressCombined(ToggleKey);
}

void EnsureOverviewTypeSelectionLoaded()
{
    if(null == OverviewPresetTabActive || null == WindowOverview || null == OverviewPreset)
        return;

    if(string.Equals(OverviewTypeSelectionName, OverviewPreset, StringComparison.OrdinalIgnoreCase))
        return;

    Host.Log("loading preset '" + OverviewPreset + "' to overview (current selection is '" + OverviewTypeSelectionName + "').");
    Sanderling.MouseClickRight(OverviewPresetTabActive);
    Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("load.*preset", RegexOptions.IgnoreCase));
    var PresetMenuEntry = Menu?.ElementAtOrDefault(1)?.EntryFirstMatchingRegexPattern(@"^\s*" + Regex.Escape(OverviewPreset) + @"\s*$", RegexOptions.IgnoreCase);

    if(null == PresetMenuEntry)
    {
        Host.Log("error: menu entry '" + OverviewPreset + "' not found");
        return;
    }

    Sanderling.MouseClickLeft(PresetMenuEntry);
}

void MemoryUpdate()
{
    RetreatUpdate();
    JammedLastTimeUpdate();
    OffloadCountUpdate();
}

void JammedLastTimeUpdate()
{
    if(Jammed)
        JammedLastTime    = Host.GetTimeContinuousMilli();
}

bool MeasurementEmergencyWarpOutEnter =>
    !(Measurement?.IsDocked ?? false) && !(EmergencyWarpOutHitpointPercent < ShieldHpPercent);

void RetreatUpdate()
{

    if(hostileOrNeutralsInLocal)
    {
        System.Media.SoundPlayer simpleSound = new System.Media.SoundPlayer(@"C:\Windows\Media\tada.wav");
         simpleSound.Play();
    }
    RetreatReasonTemporary = (RetreatOnNeutralOrHostileInLocal && hostileOrNeutralsInLocal)    ? "hostile or neutral in local" : null;

    if (!MeasurementEmergencyWarpOutEnter)
        return;

    //    measure multiple times to avoid being scared off by noise from a single measurement.
    Sanderling.InvalidateMeasurement();

    if (!MeasurementEmergencyWarpOutEnter)
        return;

    RetreatReasonTemporary = "shield hp";

}

void OffloadCountUpdate()
{
    var    OreHoldFillPercentSynced    = OreHoldFillPercent;

    if(!OreHoldFillPercentSynced.HasValue)
        return;

    if(0 == OreHoldFillPercentSynced && OreHoldFillPercentSynced < LastCheckOreHoldFillPercent)
        ++OffloadCount;

    LastCheckOreHoldFillPercent = OreHoldFillPercentSynced;
}

bool IsNeutralOrEnemy(IChatParticipantEntry participantEntry) =>
   !(participantEntry?.FlagIcon?.Any(flagIcon =>
     new[] { "good standing", "excellent standing", "Pilot is in your (fleet|corporation|alliance)", }
     .Any(goodStandingText =>
        flagIcon?.HintText?.RegexMatchSuccessIgnoreCase(goodStandingText) ?? false)) ?? false);

// Emergency Warpout v.0.1
void EmergencyWarpout()
{
        var OverviewRetreatStation = WindowOverview?.ListView?.Entry?.Where(entry => entry.Name == RetreatStation);
        var OverviewResortDistance = WindowOverview?.ListView?.ColumnHeader?.Where(entry => entry.Text == "Distance");
        if (null != OverviewRetreatStation?.FirstOrDefault())
        {
        Sanderling.KeyboardPressCombined(new[]{ VirtualKeyCode.SHIFT, VirtualKeyCode.VK_R });
            Sanderling.MouseClickLeft(OverviewRetreatStation?.FirstOrDefault());
            Host.Log(OverviewRetreatStation?.FirstOrDefault()?.Name);
            Sanderling.KeyboardPress(VirtualKeyCode.VK_D);
        }
        else
        {
            Sanderling.KeyboardPressCombined(new[]{ VirtualKeyCode.SHIFT, VirtualKeyCode.VK_R });
            Sanderling.MouseClickLeft(OverviewResortDistance?.FirstOrDefault());
            Sanderling.MouseClickLeft(OverviewRetreatStation?.FirstOrDefault());
            Host.Log(OverviewRetreatStation?.FirstOrDefault()?.Name);
            Sanderling.KeyboardPress(VirtualKeyCode.VK_D);
            Sanderling.MouseClickLeft(OverviewResortDistance?.FirstOrDefault());
        }
        Sanderling.KeyboardPress(VirtualKeyCode.VK_D);
Host.Delay(222);
Sanderling.MouseClickLeft(OverviewResortDistance?.FirstOrDefault());
}