API tools faq
paste
Guest User

Untitled

a guest
Aug 11th, 2016
721
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C# 40.75 KB | None | 0 0
raw download clone embed print report
  1. // This script mines ore from asteroids.
  2. // before running this script, make sure to prepare as follows:
  3. // +Vous devez créer au moins un dossier avec des bookmarks dedans;
  4. // +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.
  5. // +set Overview to sort by distance with the nearest entry at the top.
  6. // +in the Inventory select the 'List' view.
  7. // +set the UI language to english.
  8. // +use a ship with an ore hold.
  9. // +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.
  10. // +enable the info panel 'System info'. The bot will use the button in there to access bookmarks and asteroid belts.
  11. // +arrange windows to not occlude modules or info panels.
  12. // +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.
  13. // PS. Le nom des bookmarks n'est pas important.
  14. // +Put the attack drones in a group.
  15. // +if you want to use mining drones put them also in a group.
  16.  
  17. using BotSharp.ToScript.Extension;
  18. using Parse = Sanderling.Parse;
  19. using System.Timers;
  20.  
  21. // begin of configuration section ->
  22.  
  23. int SetMinerYield = 0;
  24.  
  25. double SetMinerDuration = 0;
  26.  
  27. // Mettre les noms des dossiers qui contien les bookmarks que vous voulez aller miner dedans. Add additional folders separated by comma.
  28. string[] SetMiningFolderBookmark = {""};
  29.  
  30. // Bookmark of location where ore should be unloaded.
  31. string UnloadBookmark = "";
  32.  
  33. // Name of the container to unload to as shown in inventory.
  34. string UnloadDestContainerName = "";
  35.  
  36. // Bookmark of place to retreat to to prevent ship loss.
  37. string RetreatBookmark = UnloadBookmark;
  38.  
  39. bool UseMiningDrones = false;
  40.  
  41. bool UseSurveyScanView = false;
  42.  
  43. // The name of the label that you place the attack drones
  44. string LabelNameAttackDrones = "";
  45.  
  46. // The name of the label that you place the mining drones
  47. string LabelNameMiningDrones = null;
  48.  
  49. // The bot loads this preset to the active tab.
  50. string OverviewPreset = "";
  51.  
  52. var ActivateHardener = true;
  53.  
  54. // bot will start fighting (and stop mining) when hitpoints are lower.
  55. var DefenseEnterHitpointThresholdPercent = 85;
  56. var DefenseExitHitpointThresholdPercent = 90;
  57.  
  58. var EmergencyWarpOutHitpointPercent = 60;
  59.  
  60. var FightAllRats = true; // when this is set to true, the bot will attack rats independent of shield hp.
  61.  
  62. var RetreatOnNeutralOrHostileInLocal = false;   // warp to RetreatBookmark when a neutral or hostile is visible in local.
  63.  
  64. // <- end of configuration section
  65.  
  66. Dictionary<string, double> asteroidUnitsPerM3 = new Dictionary<string, double>();
  67.  
  68. System.Timers.Timer aTimer = new System.Timers.Timer(1);    // Module miner 1 timer
  69. System.Timers.Timer bTimer = new System.Timers.Timer(1);    // Module miner 2 timer
  70. System.Timers.Timer cTimer = new System.Timers.Timer(1);    // Module miner 3 timer
  71.  
  72. asteroidUnitsPerM3["Veldspar"] = asteroidUnitsPerM3["Concentrated Veldspar"] = asteroidUnitsPerM3["Dense Veldspar"] = 0.1;
  73. asteroidUnitsPerM3["Scordite"] = asteroidUnitsPerM3["Condensed Scordite"] = asteroidUnitsPerM3["Massive Scordite"] = 0.15;
  74. asteroidUnitsPerM3["Pyroxeres"] = asteroidUnitsPerM3["Solid Pyroxeres"] = asteroidUnitsPerM3["Viscous Pyroxeres"] = 0.3;
  75.  
  76. Func<object> BotStopActivity = () => new object();
  77.  
  78. Func<object> NextActivity = MainStep;
  79.  
  80. int It => UseMiningDrones ? 1 : 0;
  81.  
  82. ModuleMeasureAllTooltipAfterStop();
  83.  
  84. for(;;)
  85. {
  86.     MemoryUpdate();
  87.  
  88.     Host.Log(
  89.         "ore hold fill: " + OreHoldFillPercent + "%" +
  90.         ", mining range: " + MiningRange +
  91.         ", mining modules (inactive): " + SetModuleMiner?.Length + "(" + SetModuleMinerInactive?.Length + ")" +
  92.         ", shield.hp: " + ShieldHpPercent + "%" +
  93.         ", EWO: " + EmergencyWarpOutEnabled.ToString() +
  94.         ", JLA: " + JammedLastAge +
  95.         ", overview.rats: " + ListRatOverviewEntry?.Length +
  96.         ", overview.roids: " + ListAsteroidOverviewEntry?.Length +
  97.         ", offload count: " + OffloadCount +
  98.         ", nextAct: " + NextActivity?.Method?.Name);
  99.  
  100.     CloseModalUIElement();
  101.    
  102.     if(EmergencyWarpOutEnabled)
  103.         if(!(Measurement?.IsDocked ?? false))
  104.         {
  105.             InitiateDockToOrWarpToBookmark(RetreatBookmark);
  106.             continue;
  107.         }
  108.    
  109.     NextActivity = NextActivity?.Invoke() as Func<object>;
  110.  
  111.     if(BotStopActivity == NextActivity)
  112.         break;
  113.    
  114.     if(null == NextActivity)
  115.         NextActivity = MainStep;
  116.    
  117.     Host.Delay(1111);
  118. }
  119.  
  120. //  seconds since ship was jammed.
  121. long? JammedLastAge => Jammed ? 0 : (Host.GetTimeContinuousMilli() - JammedLastTime) / 1000;
  122.  
  123. int? ShieldHpPercent => ShipUi?.HitpointsAndEnergy?.Shield / 10;
  124.  
  125. bool DefenseExit => (Measurement?.IsDocked ?? false) || !(0 < ListRatOverviewEntry?.Length) || (DefenseExitHitpointThresholdPercent < ShieldHpPercent && !(JammedLastAge < 40) && !(FightAllRats && 0 < ListRatOverviewEntry?.Length));
  126.  
  127. bool DefenseEnter => !DefenseExit || !(DefenseEnterHitpointThresholdPercent < ShieldHpPercent) || JammedLastAge < 10;
  128.  
  129. bool OreHoldFilledForOffload => 97 < OreHoldFillPercent;
  130.  
  131. Int64? JammedLastTime = null;
  132. string RetreatReasonTemporary = null;
  133. string RetreatReasonPermanent = null;
  134. string RetreatReason => RetreatReasonPermanent ?? RetreatReasonTemporary;
  135. bool EmergencyWarpOutEnabled = false;
  136. int? LastCheckOreHoldFillPercent = null;
  137.  
  138. int OffloadCount = 0;
  139.  
  140. void DropToSpace()
  141. {
  142.     EnsureWindowInventoryOpenOreHold();
  143.     var OreHoldItem = WindowInventory?.SelectedRightInventory?.ListView?.Entry?.FirstOrDefault();
  144.     ClickMenuEntryOnMenuRoot(OreHoldItem, "Select All");
  145.     ClickMenuEntryOnMenuRoot(OreHoldItem, "^Jettison");
  146.     var ConfirmWindow = Measurement?.WindowOther?.FirstOrDefault(w => (w?.LabelText?.FirstOrDefault()?.Text?.RegexMatchSuccessIgnoreCase("Jettison") ?? false) && (w?.isModal ?? false));
  147.     if(ConfirmWindow != null)
  148.         Sanderling.MouseClickLeft(ConfirmWindow.ButtonText?.FirstOrDefault(text => text.Text.RegexMatchSuccessIgnoreCase("Yes") ));
  149. }
  150.  
  151.  Func<object> MainStep()
  152. {
  153.     if(Measurement?.IsDocked ?? false)
  154.     {
  155.         if(ReadyForManeuver)
  156.             InInventoryUnloadItems();
  157.  
  158.         if (EmergencyWarpOutEnabled)
  159.             return BotStopActivity;
  160.  
  161.         Undock();
  162.     }
  163.    
  164.     if(DestinationContainer())
  165.     {
  166.         if(ReadyForManeuver)
  167.         InInventoryUnloadItems();
  168.        
  169.         if (EmergencyWarpOutEnabled)
  170.             return BotStopActivity;
  171.     }
  172.    
  173.     if(DefenseEnter)
  174.     {
  175.         Host.Log("enter defense.");
  176.         return DefenseStep;
  177.     }
  178.  
  179.     EnsureOverviewTypeSelectionLoaded();
  180.  
  181.     EnsureWindowInventoryOpenOreHold();
  182.  
  183.     if(ReadyForManeuver)
  184.     {
  185.        
  186.  
  187.         if(OreHoldFilledForOffload)
  188.         {
  189.             if(ReadyForManeuver)
  190.             {
  191.                 DroneEnsureInBay();
  192.                 InitiateDockToOrWarpToBookmark(UnloadBookmark);
  193.             }
  194.             return MainStep;
  195.         }
  196.        
  197.         if(!(0 < ListAsteroidOverviewEntry?.Length))
  198.         {
  199.             if(UseSurveyScanView)
  200.             {
  201.                 if(Measurement?.WindowSurveyScanView != null)
  202.                 {
  203.                     if((0 < ListAsteroidSurveyEntry?.Length))
  204.                     {
  205.                         ModuleMeasureAllTooltip();
  206.                         return InBeltMineStepSurveyScanView;
  207.                     }
  208.                     else
  209.                     {
  210.                         if(ReadyForManeuver && !DestinationContainer())
  211.                         {
  212.                             ModuleToggle( SetModuleSurveyScanner);
  213.                             Host.Delay(7777);
  214.                         }
  215.                        
  216.                         if(!(0 < ListAsteroidSurveyEntry?.Length))
  217.                         {
  218.                             DroneEnsureInBay();
  219.                             InitiateWarpToRandomMiningSite();
  220.                         }
  221.                     }
  222.                 }
  223.             }
  224.             else
  225.             {
  226.                 DroneEnsureInBay();
  227.                 InitiateWarpToRandomMiningSite();
  228.             }
  229.         }
  230.     }
  231.  
  232.     ModuleMeasureAllTooltip();
  233.  
  234.     if(ActivateHardener)
  235.         ActivateHardenerExecute();
  236.     if(!UseSurveyScanView)
  237.         return InBeltMineStep;
  238.     else
  239.         return InBeltMineStepSurveyScanView;
  240. }
  241.  
  242. void CloseModalUIElement()
  243. {
  244.     var ButtonClose =
  245.         ModalUIElement?.ButtonText?.FirstOrDefault(button => (button?.Text).RegexMatchSuccessIgnoreCase("close|no|ok"));
  246.        
  247.     Sanderling.MouseClickLeft(ButtonClose);
  248. }
  249.  
  250. void DroneEnsureInBay()
  251. {
  252.     if(0 == DronesInSpaceCount)
  253.         return;
  254.    
  255.     while(DronesInSpaceCount != 0){
  256.         DroneReturnToBay();
  257.         Host.Delay(4444);
  258.     }
  259.  
  260. }
  261.  
  262. void DroneReturnToBay()
  263. {
  264.     Host.Log("return drones to bay.");
  265.     Sanderling.MouseClickRight(DronesInSpaceListEntry);
  266.     Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("return.*bay", RegexOptions.IgnoreCase));
  267. }
  268.  
  269. Func<object> DefenseStep()
  270. {
  271.     if(DefenseExit)
  272.     {
  273.         Host.Log("exit defense.");
  274.         return null;
  275.     }
  276.     if(UseMiningDrones){
  277.         if (!(0 < DronesInSpaceCount) || !IsDronesLaunch(LabelNameAttackDrones))
  278.         {
  279.             if(IsDronesLaunch(LabelNameMiningDrones)) ReturnDronesByLabelName(LabelNameMiningDrones);
  280.             LaunchDronesByLabelName(LabelNameAttackDrones);
  281.         }
  282.     }
  283.     else
  284.     {
  285.         if( !(0 < DronesInSpaceCount) )
  286.             LaunchDronesByLabelName(LabelNameAttackDrones);
  287.     }
  288.  
  289.     EnsureOverviewTypeSelectionLoaded();
  290.    
  291.     UnTarget();
  292.  
  293.     var SetRatName = ListRatOverviewEntry?.Select(entry => Regex.Split(entry?.Name ?? "", @"\s+")?.FirstOrDefault())?.Distinct()?.ToArray();
  294.    
  295.     var SetRatTarget = Measurement?.Target?.Where(target => SetRatName?.Any(ratName => target?.TextRow?.Any(row => row.RegexMatchSuccessIgnoreCase(ratName)) ?? false) ?? false);
  296.    
  297.     var RatTargetNext = SetRatTarget?.OrderBy(target => target?.DistanceMax ?? int.MaxValue)?.FirstOrDefault();
  298.    
  299.     if(null == RatTargetNext)
  300.     {
  301.         Host.Log("no rat targeted.");
  302.         Sanderling.MouseClickRight(ListRatOverviewEntry?.FirstOrDefault());
  303.         if(ListRatOverviewEntry?.FirstOrDefault(i => i?.IsSelected ?? true) != null)
  304.             Sanderling.MouseClickLeft(MenuEntryLockTarget);
  305.         else
  306.             DefenseStep();
  307.     }
  308.     else
  309.     {
  310.         Host.Log("rat targeted. sending drones.");
  311.         Sanderling.MouseClickLeft(RatTargetNext);
  312.         Sanderling.MouseClickRight(DronesInSpaceListEntry);
  313.         Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("engage", RegexOptions.IgnoreCase));
  314.     }
  315.    
  316.     return DefenseStep;
  317. }
  318.  
  319. bool IsDronesLaunch(string LabelDrone)
  320. {
  321.     Expander("Drones in Local Space");
  322.     int? LabelDronesInLocalSpacePosition = Measurement?.WindowDroneView?.FirstOrDefault()?.LabelText?.FirstIndexOrNull(w => w?.Text?.RegexMatchSuccessIgnoreCase("^Drones in local Space") ?? false);
  323.     int? LabelDronePosition = Measurement?.WindowDroneView?.FirstOrDefault()?.LabelText?.FirstIndexOrNull(w => w?.Text?.RegexMatchSuccessIgnoreCase("^" + LabelDrone) ?? false);
  324.     int? LabelDronePositionLast = Measurement?.WindowDroneView?.FirstOrDefault()?.LabelText?.LastIndexOrNull(w => w?.Text?.RegexMatchSuccessIgnoreCase("^" + LabelDrone) ?? false);
  325.     if(LabelDronePosition > LabelDronesInLocalSpacePosition && LabelDronePositionLast !=  LabelDronePosition) return true;
  326.     else return false;
  327. }
  328.  
  329. void Expander(string Label)
  330. {
  331.     var Element = Measurement?.WindowDroneView?.FirstOrDefault()?.ListView?.Entry?.FirstOrDefault(w => w?.LabelText?.FirstOrDefault()?.Text?.RegexMatchSuccessIgnoreCase("^" + Label) ?? false);
  332.     bool IsExpanded = Element?.IsExpanded ?? true;
  333.     if(!IsExpanded) ClickMenuEntryOnMenuRoot(Element,"Expand");
  334. }
  335.  
  336. void LaunchDronesByLabelName(string LabelName)
  337. {
  338.     Expander("Drones in Bay");
  339.     var Label = Measurement?.WindowDroneView?.FirstOrDefault()?.LabelText?.FirstOrDefault(w => w.Text.RegexMatchSuccessIgnoreCase("^" + LabelName) );
  340.     if(ReadyForManeuver)
  341.     ClickMenuEntryOnMenuRoot(Label, "^Launch Drones");
  342. }
  343.  
  344. void ReturnDronesByLabelName(string LabelName)
  345. {
  346.     Expander("Drones in Local Space");
  347.     var Label = Measurement?.WindowDroneView?.FirstOrDefault()?.LabelText?.FirstOrDefault(w => w.Text.RegexMatchSuccessIgnoreCase("^" + LabelName) );
  348.     ClickMenuEntryOnMenuRoot(Label, "^Return to Drone Bay");
  349. }
  350.  
  351. void MineTarget()
  352. {
  353.     Expander("Drones in Local Space");
  354.     if(IsDronesLaunch(LabelNameMiningDrones))
  355.     {
  356.         var Label = Measurement?.WindowDroneView?.FirstOrDefault()?.LabelText?.FirstOrDefault(w => w.Text.RegexMatchSuccessIgnoreCase("^" + LabelNameMiningDrones) );
  357.         ClickMenuEntryOnMenuRoot(Label, "^Mine Repeatedly");
  358.     }
  359. }
  360.  
  361. int TargetRoidCount => Sanderling?.MemoryMeasurementParsed?.Value?.Target?.Count(target => string.Join(" ", (target?.TextRow).EmptyIfNull())?.RegexMatchSuccessIgnoreCase(@"Asteroid\s*\(") ?? false) ?? 0;
  362.  
  363. void UnTarget()
  364. {
  365.     Sanderling.Parse.IShipUiTarget[] ListTarget = SetTargetAsteroid;
  366.    
  367.     var TargetOversizeRange = ListTarget?.FirstOrDefault(d => d?.DistanceMax > MiningRange);
  368.    
  369.     if(TargetOversizeRange != null)
  370.         Host.Log("Au moin une target dépasse le mining range");
  371.    
  372.     while((TargetRoidCount > (SetModuleMiner?.Count() + It)) || (TargetOversizeRange != null))
  373.     {
  374.         for(int i = 0; i < ListTarget?.Count()/* && (TargetRoidCount > SetModuleMiner?.Count())*/; ++i)
  375.         {
  376.             if( !(ListTarget?.ElementAtOrDefault(i)?.Assigned?.Count() > 0) )
  377.             {
  378.                 ClickMenuEntryOnMenuRoot(ListTarget?.ElementAtOrDefault(i), "Unlock Target");
  379.             }
  380.            
  381.             if(ListTarget?.ElementAtOrDefault(i)?.DistanceMax > MiningRange)
  382.             {
  383.                 ClickMenuEntryOnMenuRoot(ListTarget?.ElementAtOrDefault(i), "Unlock Target");
  384.             }
  385.         }
  386.     }
  387. }
  388.  
  389. Func<object> InBeltMineStep()
  390. {
  391.     if (DefenseEnter)
  392.     {
  393.         Host.Log("enter defense.");
  394.         return DefenseStep;
  395.     }
  396.  
  397.     EnsureWindowInventoryOpenOreHold();
  398.  
  399.     EnsureOverviewTypeSelectionLoaded();
  400.  
  401.     if(OreHoldFilledForOffload)
  402.         return null;
  403.    
  404.     var AsteroidOverviewEntry = ListAsteroidOverviewEntry?.FirstOrDefault();
  405.    
  406.     if(null == AsteroidOverviewEntry)
  407.     {
  408.         Host.Log("no asteroid available");
  409.         return null;
  410.     }
  411.    
  412.     if(UseMiningDrones){
  413.         if(((DronesInSpaceCount == 0) || IsDronesLaunch(LabelNameAttackDrones))  && (AsteroidOverviewEntry != null))
  414.         {
  415.             if(IsDronesLaunch(LabelNameAttackDrones)) ReturnDronesByLabelName(LabelNameAttackDrones);
  416.             if(DronesInSpaceCount == 0) LaunchDronesByLabelName(LabelNameMiningDrones);
  417.         }
  418.     }
  419.     else
  420.     {
  421.         if( !(DronesInSpaceCount != 0) && (AsteroidOverviewEntry != null) )
  422.         {
  423.             LaunchDronesByLabelName(LabelNameAttackDrones);
  424.         }
  425.     }
  426.  
  427.     if(!(SetModuleMinerInactive?.Length > 0) && !(SetTargetAsteroid?.FirstOrDefault(w => !(w?.Assigned?.Count() > 0) ) != null) && !(TargetRoidCount < (SetModuleMiner?.Count() + It)))
  428.     {
  429.         Host.Delay(7777);
  430.         return InBeltMineStep;
  431.     }
  432.    
  433.     if(ReadyForManeuver)
  434.     {
  435.         var ListAsteroidOverviewInRangeEntry = ListAsteroidOverviewEntry?.Where(target => target?.DistanceMax <= MiningRange)?.ToArray();
  436.         var AsteroidOverviewInRangeEntry = RandomElement(ListAsteroidOverviewInRangeEntry);
  437.        
  438.         Host.Log("Distance : " + AsteroidOverviewInRangeEntry?.DistanceMax +
  439.         "m, Type : " + AsteroidOverviewInRangeEntry?.Type);
  440.        
  441.         Host.Log("Module de minage : " + SetModuleMiner?.Count());
  442.         Host.Log("Nombre de taget : " + TargetRoidCount);
  443.        
  444.         if((TargetRoidCount < (SetModuleMiner?.Count() + It)) && (AsteroidOverviewInRangeEntry != null))
  445.         {
  446.             ClickMenuEntryOnMenuRoot(AsteroidOverviewInRangeEntry, "^lock");
  447.         }
  448.    
  449.         var TargetOversizeRange = SetTargetAsteroid?.FirstOrDefault(d => d?.DistanceMax > MiningRange);
  450.        
  451.         if(TargetOversizeRange != null)
  452.             Host.Log("Au moin une target dépasse le mining range");
  453.        
  454.         while((TargetRoidCount > (SetModuleMiner?.Count() + It)) || (TargetOversizeRange != null))
  455.         {
  456.             for(int i = 0; i < SetTargetAsteroid?.Count()/* && (TargetRoidCount > SetModuleMiner?.Count())*/; ++i)
  457.             {
  458.                 if( !(SetTargetAsteroid?.ElementAtOrDefault(i)?.Assigned?.Count() > 0) )
  459.                 {
  460.                     ClickMenuEntryOnMenuRoot(SetTargetAsteroid?.ElementAtOrDefault(i), "Unlock Target");
  461.                 }
  462.                
  463.                 if(SetTargetAsteroid?.ElementAtOrDefault(i)?.DistanceMax > MiningRange)
  464.                 {
  465.                     ClickMenuEntryOnMenuRoot(SetTargetAsteroid?.ElementAtOrDefault(i), "Unlock Target");
  466.                 }
  467.             }
  468.         }
  469.        
  470.         var InactiveModule = SetModuleMinerInactive?.FirstOrDefault();
  471.         AsteroidOverviewInRangeEntry = RandomElement(ListAsteroidOverviewInRangeEntry);
  472.    
  473.         if( !(TargetRoidCount < (SetModuleMiner?.Count() + It)) && (AsteroidOverviewInRangeEntry != null) )
  474.         {
  475.             for(int i = 0; i < (SetModuleMiner?.Count() + It) && (SetTargetAsteroid != null); ++i)
  476.             {
  477.                 InactiveModule = SetModuleMinerInactive?.FirstOrDefault();
  478.                 if( !(SetTargetAsteroid?.ElementAtOrDefault(i)?.Assigned?.Count() > 0) && (SetModuleMinerInactive?.Count() > 0))
  479.                 {
  480.                     Sanderling.MouseClickLeft(SetTargetAsteroid?.ElementAtOrDefault(i));
  481.                     ModuleToggle(InactiveModule);
  482.                 }
  483.                 else if( !(SetTargetAsteroid?.ElementAtOrDefault(i)?.Assigned?.Count() > 0) && !(SetModuleMinerInactive?.Count() > 0))
  484.                 {
  485.                     if(UseMiningDrones)
  486.                     {
  487.                         Sanderling.MouseClickLeft(SetTargetAsteroid?.ElementAtOrDefault(i));
  488.                         MineTarget();
  489.                     }
  490.                 }
  491.             }
  492.         }
  493.        
  494.         float Speed = (Sanderling?.MemoryMeasurementParsed?.Value?.ShipUi?.SpeedMilli ?? 0) / 1000f;
  495.  
  496.         var ButtonSpeed0 = Measurement?.ShipUi?.ButtonSpeed0;
  497.        
  498.         if(Speed > 12 && ListAsteroidOverviewEntry?.ElementAtOrDefault(0)?.DistanceMax < MiningRange)
  499.             Sanderling.MouseClickLeft(ButtonSpeed0);
  500.            
  501.         if(ListAsteroidOverviewEntry?.ElementAtOrDefault(0)?.DistanceMax > MiningRange)
  502.         {
  503.             ClickMenuEntryOnMenuRoot(ListAsteroidOverviewEntry?.ElementAtOrDefault(0), "approach");
  504.         }
  505.     }
  506.    
  507.    
  508.     return InBeltMineStep;
  509. }
  510.  
  511. void OnTimedEventA(object source, ElapsedEventArgs e)
  512.  {
  513.     if(SetModuleMiner?.ElementAtOrDefault(0)?.RampActive ?? false)
  514.         ModuleToggle(SetModuleMiner?.ElementAtOrDefault(0));
  515.  }
  516.  
  517.  void OnTimedEventB(object source, ElapsedEventArgs e)
  518.  {
  519.     if(SetModuleMiner?.ElementAtOrDefault(1)?.RampActive ?? false)
  520.         ModuleToggle(SetModuleMiner?.ElementAtOrDefault(1));
  521.  }
  522.  
  523.  void OnTimedEventC(object source, ElapsedEventArgs e)
  524.  {
  525.     if(SetModuleMiner?.ElementAtOrDefault(2)?.RampActive ?? false)
  526.         ModuleToggle(SetModuleMiner?.ElementAtOrDefault(2));
  527.  }
  528.  
  529. void SetTimer(int interval, System.Timers.Timer timer, Action<object, ElapsedEventArgs> qwerty)
  530. {
  531.     timer.Elapsed += new ElapsedEventHandler(qwerty);
  532.     if(interval > 0)
  533.         timer.Interval = interval;
  534.     timer.Enabled = true;
  535.     timer.AutoReset = false;
  536. }
  537.  
  538. Func<object> InBeltMineStepSurveyScanView()
  539. {
  540.     if (DefenseEnter)
  541.     {
  542.         Host.Log("enter defense.");
  543.         return DefenseStep;
  544.     }
  545.    
  546.     if(Measurement?.WindowSurveyScanView == null)
  547.     {
  548.         ModuleToggle( SetModuleSurveyScanner );
  549.         return null;
  550.     }
  551.    
  552.     /*var windowStackWithOverview = Measurement?.WindowStack?.FirstOrDefault(val => val?.Caption?.RegexMatchSuccessIgnoreCase("Overview") ?? false) ;
  553.     var windowStackSurveyScanResultsTab = windowStackWithOverview?.Tab?.FirstOrDefault( val => val?.Label?.Text?.RegexMatchSuccessIgnoreCase("Survey Scan Results") ?? false);
  554.    
  555.     if(windowStackWithOverview?.TabSelectedWindow?.Caption != "Survey Scan Results")
  556.     {
  557.         Sanderling.MouseClickLeft(windowStackSurveyScanResultsTab);
  558.     }*/
  559.    
  560.     EnsureWindowInventoryOpenOreHold();
  561.  
  562.     EnsureOverviewTypeSelectionLoaded();
  563.  
  564.     if(OreHoldFilledForOffload)
  565.         return null;
  566.    
  567.     var AsteroidSurveyEntry = ListAsteroidSurveyEntry?.FirstOrDefault();
  568.    
  569.     if(null == AsteroidSurveyEntry)
  570.     {
  571.         Host.Log("no asteroid available");
  572.         if(ReadyForManeuver && !DestinationContainer())
  573.         {
  574.             ModuleToggle( SetModuleSurveyScanner );
  575.             Host.Delay(7777);
  576.         }
  577.         return null;
  578.     }
  579.    
  580.     if( !(ListAsteroidSurveyEntryTargeted?.Count() != 0) )
  581.     {
  582.         ModuleToggle( SetModuleSurveyScanner );
  583.         Host.Delay(7777);
  584.     }
  585.    
  586.     if(UseMiningDrones){
  587.         if(((DronesInSpaceCount == 0) || IsDronesLaunch(LabelNameAttackDrones))  && (AsteroidSurveyEntry != null))
  588.         {
  589.             if(IsDronesLaunch(LabelNameAttackDrones)) ReturnDronesByLabelName(LabelNameAttackDrones);
  590.             if(DronesInSpaceCount == 0) LaunchDronesByLabelName(LabelNameMiningDrones);
  591.         }
  592.     }
  593.     else
  594.     {
  595.         if( !(DronesInSpaceCount != 0) && (AsteroidSurveyEntry != null) )
  596.         {
  597.             LaunchDronesByLabelName(LabelNameAttackDrones);
  598.         }
  599.     }
  600.    
  601.     double? RampRotationMilliModule1 = SetModuleMiner?.ElementAtOrDefault(0)?.RampRotationMilli ?? 0;
  602.     double? RampRotationMilliModule2 = SetModuleMiner?.ElementAtOrDefault(1)?.RampRotationMilli ?? 0;
  603.     double? RampRotationMilliModule3 = SetModuleMiner?.ElementAtOrDefault(2)?.RampRotationMilli ?? 0;
  604.    
  605.     Host.Log("Ramp Rotation Module Miner 1 : " + RampRotationMilliModule1 / 10 +
  606.     " %, Ramp Rotation Module Miner 2 : " + RampRotationMilliModule2 / 10 +
  607.     " %, Ramp Rotation Module Miner 3 : " + RampRotationMilliModule3 / 10 + " %" );
  608.    
  609.     double? VolumeInMiner1 = ((RampRotationMilliModule1 / 1000) * SetMinerYield) ?? 0;
  610.     double? VolumeInMiner2 = ((RampRotationMilliModule2 / 1000) * SetMinerYield) ?? 0;
  611.     double? VolumeInMiner3 = ((RampRotationMilliModule3 / 1000) * SetMinerYield) ?? 0;
  612.    
  613.     double? VolumeOreHoldAvailable = ((int?)(OreHoldCapacityMilli?.Max - OreHoldCapacityMilli?.Used) / 1000) ?? int.MaxValue;
  614.    
  615.     Host.Log("Volume Ore Hold Available : " + VolumeOreHoldAvailable +
  616.     " m3, Volume In Module Miner 1 : " +    VolumeInMiner1 +
  617.     " m3, Volume In Module Miner 2 : " +    VolumeInMiner2 +
  618.     " m3, Volume In Module Miner 3 : " +    VolumeInMiner3 +
  619.     " m3, Volume In Module Miner (1 + 2 + 3) : " + (VolumeInMiner1 + VolumeInMiner2 + VolumeInMiner3) + " m3" );
  620.    
  621.     if( (VolumeInMiner1 + VolumeInMiner2 + VolumeInMiner3) >= VolumeOreHoldAvailable)
  622.     {
  623.         foreach( var Module in SetModuleMiner?.Where(module => module?.RampActive ?? false) )
  624.         {
  625.             ModuleToggle(Module);
  626.         }
  627.        
  628.         Host.Log("Astalavista baby");
  629.     }
  630.    
  631.     if(!(SetModuleMinerInactive?.Length > 0) && !(SetTargetAsteroid?.FirstOrDefault(w => !(w?.Assigned?.Count() > 0) ) != null) && !(TargetRoidCount < (SetModuleMiner?.Count() + It)))
  632.     {
  633.         Host.Delay(7777);
  634.         return InBeltMineStepSurveyScanView;
  635.     }
  636.    
  637.     if(ReadyForManeuver)
  638.     {
  639.         var ListAsteroidSurveyInRangeEntry = ListAsteroidSurveyEntry?.Where(target => target?.ColumnDistanceValue()?.DistanceParseMax() <= MiningRange)?.ToArray();
  640.         var AsteroidSurveyInRangeEntry = RandomElement(ListAsteroidSurveyInRangeEntry);
  641.        
  642.         if((TargetRoidCount < (SetModuleMiner?.Count())) && (AsteroidSurveyInRangeEntry != null) )
  643.         {
  644.             ClickMenuEntryOnMenuRoot(AsteroidSurveyInRangeEntry, "^lock");
  645.             Host.Delay(1111);
  646.             ModuleToggle( SetModuleSurveyScanner );
  647.             Host.Delay(7777);
  648.         }
  649.    
  650.         UnTarget();
  651.        
  652.         var ModuleMinerInactive = SetModuleMinerInactive?.FirstOrDefault();
  653.        
  654.         if( (AsteroidSurveyInRangeEntry != null) )
  655.         {
  656. //          ModuleToggle( SetModuleSurveyScanner );
  657.             Sanderling.WaitForMeasurement();
  658.             var AsteroidSurveyEntryTargeted = RandomElement(ListAsteroidSurveyEntryTargeted);
  659.             Sanderling.MouseClickLeft(AsteroidSurveyEntryTargeted);
  660.             Sanderling.WaitForMeasurement();
  661.             var AsteroidSurveyEntryTargetedAndSelected = ListAsteroidSurveyEntryTargetedAndSelected?.FirstOrDefault();
  662.            
  663.             if(AsteroidSurveyEntryTargeted?.Region == AsteroidSurveyEntryTargetedAndSelected?.Region)
  664.             {          
  665.                 string OreType = AsteroidSurveyEntryTargeted?.CellValueFromColumnHeader("Ore") ?? "";
  666.                 double OreQuantity = AsteroidSurveyEntryTargeted?.CellValueFromColumnHeader("quantity")?.NumberParseDecimalMilli()/1000 ?? 0;
  667.                 double OreUnitVolume = 0;
  668.                 asteroidUnitsPerM3.TryGetValue(OreType, out OreUnitVolume);
  669.                 double rendement = SetMinerYield/SetMinerDuration;
  670.                 double interval = (( OreQuantity * OreUnitVolume ) / rendement ) * 1000;
  671.                
  672.                 if( !( SetTargetAsteroid?.FirstOrDefault( target => target?.IsSelected ?? false )?.Assigned?.Count() > 0 ) )
  673.                 {
  674.                     Host.Log("Distance : " + AsteroidSurveyEntryTargeted?.ColumnDistanceValue() +
  675.                     ", Type: " + AsteroidSurveyEntryTargeted?.CellValueFromColumnHeader("Ore") +
  676.                     ", Volume per Unit : " + OreUnitVolume +
  677.                     " m3, Quantity : " + AsteroidSurveyEntryTargeted?.CellValueFromColumnHeader("Quantity") +
  678.                     " units, Interval : " + (int)(interval / 1000) + " s" +
  679.                     ", Module Miner : " + ModuleMinerInactive?.TooltipLast?.Value?.ToggleKeyTextLabel?.Text);
  680.                 }
  681.                
  682.                 if( !( SetTargetAsteroid?.FirstOrDefault( target => target?.IsSelected ?? false )?.Assigned?.Count() > 0 )  && ( SetModuleMinerInactive?.Count() > 0 ) /*&& (TargetRoidCount <= SetModuleMiner?.Count())*/ )
  683.                 {
  684.                     ModuleToggle( ModuleMinerInactive );
  685.                    
  686.                     if( ModuleMinerInactive?.TooltipLast?.Value?.ToggleKeyTextLabel?.Text == "F1" )
  687.                         SetTimer( (int)interval, aTimer, OnTimedEventA );
  688.                     else if( ModuleMinerInactive?.TooltipLast?.Value?.ToggleKeyTextLabel?.Text == "F2" )
  689.                         SetTimer( (int)interval, bTimer, OnTimedEventB );
  690.                     else if( ModuleMinerInactive?.TooltipLast?.Value?.ToggleKeyTextLabel?.Text == "F3" )
  691.                         SetTimer( (int)interval, cTimer, OnTimedEventC );
  692.                 }
  693.             }
  694.         }
  695.         float Speed = (Sanderling?.MemoryMeasurementParsed?.Value?.ShipUi?.SpeedMilli ?? 0) / 1000f;
  696.  
  697.         var ButtonSpeed0 = Measurement?.ShipUi?.ButtonSpeed0;
  698.        
  699.         if(Speed > 12 && ListAsteroidSurveyEntry?.ElementAtOrDefault(0)?.ColumnDistanceValue()?.DistanceParseMax() < MiningRange)
  700.             Sanderling.MouseClickLeft(ButtonSpeed0);
  701.        
  702.         if(ListAsteroidSurveyEntry?.ElementAtOrDefault(0)?.ColumnDistanceValue()?.DistanceParseMax() > MiningRange)
  703.         {
  704.             ClickMenuEntryOnMenuRoot(ListAsteroidSurveyEntry?.ElementAtOrDefault(0), "approach");
  705.         }
  706.     }
  707.    
  708. //  var asteroidGroupList = Measurement.WindowSurveyScanView.FirstOrDefault().ListView.Entry.Where( entry => entry?.IsGroup ?? false )?.OrderBy( entry => entry?.LabelText?.FirstOrDefault()?.Text )?.ToArray();
  709.    
  710. //  var scroolbar = Measurement.WindowSurveyScanView.FirstOrDefault().ListView.Scroll.ScrollHandleBound;
  711. //  Sanderling.MouseClickLeft(scroolbar);
  712.  
  713.     return InBeltMineStepSurveyScanView();
  714. }
  715.  
  716. Sanderling.Parse.IMemoryMeasurement Measurement => Sanderling?.MemoryMeasurementParsed?.Value;
  717.  
  718. IWindow ModalUIElement => Measurement?.EnumerateReferencedUIElementTransitive()?.OfType<IWindow>()?.Where(window => window?.isModal ?? false)?.OrderByDescending(window => window?.InTreeIndex ?? int.MinValue)?.FirstOrDefault();
  719.  
  720. IEnumerable<Parse.IMenu> Menu => Measurement?.Menu;
  721.  
  722. Parse.IShipUi ShipUi => Measurement?.ShipUi;
  723.  
  724. bool Jammed => ShipUi?.EWarElement?.Any(EwarElement => (EwarElement?.EWarType).RegexMatchSuccess("electronic")) ?? false;
  725.  
  726. Sanderling.Interface.MemoryStruct.IMenuEntry MenuEntryLockTarget => Menu?.FirstOrDefault()?.Entry?.FirstOrDefault(entry => entry.Text.RegexMatchSuccessIgnoreCase("^lock"));
  727.  
  728. Sanderling.Parse.IWindowOverview WindowOverview => Measurement?.WindowOverview?.FirstOrDefault();
  729.  
  730. Sanderling.Parse.IWindowInventory WindowInventory => Measurement?.WindowInventory?.FirstOrDefault();
  731.  
  732. Sanderling.Interface.MemoryStruct.IWindowSurveyScanView WindowSurveyScanView = Measurement?.WindowSurveyScanView?.FirstOrDefault();
  733.  
  734. IWindowDroneView WindowDrones => Measurement?.WindowDroneView?.FirstOrDefault();
  735.  
  736. ITreeViewEntry InventoryActiveShipOreHold => WindowInventory?.ActiveShipEntry?.TreeEntryFromCargoSpaceType(ShipCargoSpaceTypeEnum.OreHold);
  737.  
  738. IInventoryCapacityGauge OreHoldCapacityMilli => (InventoryActiveShipOreHold?.IsSelected ?? false) ? WindowInventory?.SelectedRightInventoryCapacityMilli : null;
  739.  
  740. int? OreHoldFillPercent => (int?)((OreHoldCapacityMilli?.Used * 100) / OreHoldCapacityMilli?.Max);
  741.  
  742. Tab OverviewPresetTabActive => WindowOverview?.PresetTab?.OrderByDescending(tab => tab?.LabelColorOpacityMilli ?? 0)?.FirstOrDefault();
  743.  
  744. string OverviewTypeSelectionName => WindowOverview?.Caption?.RegexMatchIfSuccess(@"\(([^\)]*)\)")?.Groups?[1]?.Value;
  745.  
  746. Parse.IOverviewEntry[] ListRatOverviewEntry => WindowOverview?.ListView?.Entry?.Where(entry => (entry?.MainIconIsRed ?? false) && (entry?.IsAttackingMe ?? false))?.OrderBy(entry => entry?.DistanceMax ?? int.MaxValue)?.ToArray();
  747.  
  748. Parse.IOverviewEntry[] ListAsteroidOverviewEntry => WindowOverview?.ListView?.Entry?.Where(entry => null != OreTypeFromAsteroidName(entry?.Name))?.OrderBy(entry => entry.DistanceMax ?? int.MaxValue)?.ToArray();
  749.  
  750. DroneViewEntryGroup DronesInBayListEntry => WindowDrones?.ListView?.Entry?.OfType<DroneViewEntryGroup>()?.FirstOrDefault(Entry => null != Entry?.Caption?.Text?.RegexMatchIfSuccess(@"Drones in bay", RegexOptions.IgnoreCase));
  751.  
  752. DroneViewEntryGroup DronesInSpaceListEntry => WindowDrones?.ListView?.Entry?.OfType<DroneViewEntryGroup>()?.FirstOrDefault(Entry => null != Entry?.Caption?.Text?.RegexMatchIfSuccess(@"Drones in Local Space", RegexOptions.IgnoreCase));
  753.  
  754. int? DronesInSpaceCount => DronesInSpaceListEntry?.Caption?.Text?.AsDroneLabel()?.Status?.TryParseInt();
  755.  
  756. bool ReadyForManeuverNot =>
  757.     Measurement?.ShipUi?.Indication?.LabelText?.Any(indicationLabel =>
  758.         (indicationLabel?.Text).RegexMatchSuccessIgnoreCase("warp|docking")) ?? false;
  759.  
  760. bool ReadyForManeuver => !ReadyForManeuverNot && !(Measurement?.IsDocked ?? true);
  761.  
  762. Sanderling.Parse.IShipUiTarget[] SetTargetAsteroid => Measurement?.Target?.Where(target => target?.TextRow?.Any(textRow => textRow.RegexMatchSuccessIgnoreCase("asteroid")) ?? false)?.ToArray();
  763.  
  764. Sanderling.Interface.MemoryStruct.IListEntry WindowInventoryItem => WindowInventory?.SelectedRightInventory?.ListView?.Entry?.FirstOrDefault();
  765.  
  766. Sanderling.Accumulation.IShipUiModule[] SetModuleMiner => Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.Where(module => module?.TooltipLast?.Value?.IsMiner ?? false)?.ToArray();
  767.  
  768. Sanderling.Accumulation.IShipUiModule[] SetModuleMinerInactive => SetModuleMiner?.Where(module => !(module?.RampActive ?? false))?.ToArray();
  769.  
  770. Sanderling.Accumulation.IShipUiModule SetModuleSurveyScanner => Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.FirstOrDefault(module => module?.TooltipLast?.Value?.IsSurveyScanner ?? false);
  771.  
  772. int? MiningRange => SetModuleMiner?.Select(module => module?.TooltipLast?.Value?.RangeOptimal ?? module?.TooltipLast?.Value?.RangeMax ?? module?.TooltipLast?.Value?.RangeWithin ?? 0)?.DefaultIfEmpty(0)?.Min();;
  773.  
  774. Sanderling.Interface.MemoryStruct.IListEntry[]  ListAsteroidSurveyEntry => Measurement.WindowSurveyScanView.FirstOrDefault().ListView.Entry.Where( entry => !(entry?.IsGroup ?? false)  )?.OrderBy(entry => entry?.ColumnDistanceValue()?.DistanceParseMax() ?? int.MaxValue)?.ToArray();
  775.  
  776. Sanderling.Interface.MemoryStruct.IListEntry[]  ListAsteroidSurveyEntryTargeted => ListAsteroidSurveyEntry?.Where(sprite => sprite?.SetSprite?.FirstOrDefault()?.Name?.RegexMatchSuccessIgnoreCase("targetSprite") ?? false)?.OrderBy(entry => entry?.ColumnDistanceValue()?.DistanceParseMax() ?? int.MaxValue)?.ToArray();
  777.  
  778. Sanderling.Interface.MemoryStruct.IListEntry[]  ListAsteroidSurveyEntryTargetedAndSelected => ListAsteroidSurveyEntryTargeted?.Where(entry => entry?.IsSelected ?? false)?.OrderBy(entry => entry?.ColumnDistanceValue()?.DistanceParseMax() ?? int.MaxValue)?.ToArray();
  779.  
  780. WindowChatChannel chatLocal =>
  781.      Sanderling.MemoryMeasurementParsed?.Value?.WindowChatChannel
  782.      ?.FirstOrDefault(windowChat => windowChat?.Caption?.RegexMatchSuccessIgnoreCase("local") ?? false);
  783.  
  784. //    assuming that own character is always visible in local
  785. bool hostileOrNeutralsInLocal => 1 != chatLocal?.ParticipantView?.Entry?.Count(IsNeutralOrEnemy);
  786.  
  787. // extract the ore type from the name as seen in overview. "Asteroid (Plagioclase)"
  788. string OreTypeFromAsteroidName(string AsteroidName) => AsteroidName.ValueFromRegexMatchGroupAtIndex(@"Asteroid \(([^\)]+)", 0);
  789.  
  790. void ClickMenuEntryOnMenuRoot(IUIElement MenuRoot, string MenuEntryRegexPattern)
  791. {
  792.     Sanderling.MouseClickRight(MenuRoot);
  793.    
  794.     var Menu = Measurement?.Menu?.FirstOrDefault();
  795.    
  796.     var MenuEntry = Menu?.EntryFirstMatchingRegexPattern(MenuEntryRegexPattern, RegexOptions.IgnoreCase);
  797.    
  798.     Sanderling.MouseClickLeft(MenuEntry);
  799. }
  800.  
  801. void EnsureWindowInventoryOpen()
  802. {
  803.     if (null != WindowInventory)
  804.         return;
  805.  
  806.     Host.Log("open Inventory.");
  807.     Sanderling.MouseClickLeft(Measurement?.Neocom?.InventoryButton);
  808. }
  809.  
  810. void EnsureWindowInventoryOpenOreHold()
  811. {
  812.     EnsureWindowInventoryOpen();
  813.    
  814.     if(!(InventoryActiveShipOreHold?.IsSelected ?? false))
  815.         Sanderling.MouseClickLeft(InventoryActiveShipOreHold);
  816. }
  817.  
  818. // sample label text: Intensive Reprocessing Array <color=#66FFFFFF>1,123 m</color>
  819. string InventoryContainerLabelRegexPatternFromContainerName(string containerName) => @"^\s*" + Regex.Escape(containerName) + @"\s*($|\<)";
  820.  
  821. void InInventoryUnloadItems() => InInventoryUnloadItemsTo(UnloadDestContainerName);
  822.  
  823. bool DestinationContainer()
  824. {
  825.     var OreHoldItem = WindowInventory?.SelectedRightInventory?.ListView?.Entry?.FirstOrDefault();
  826.  
  827.     var DestinationContainerLabelRegexPattern = InventoryContainerLabelRegexPatternFromContainerName(UnloadDestContainerName);
  828.  
  829.     var DestinationContainer = WindowInventory?.LeftTreeListEntry?.SelectMany(entry => new[] { entry }.Concat(entry.EnumerateChildNodeTransitive()))?.FirstOrDefault(entry => entry?.Text?.RegexMatchSuccessIgnoreCase(DestinationContainerLabelRegexPattern) ?? false);
  830.    
  831.     if(DestinationContainer != null)
  832.         return true;
  833.     else return false;
  834. }
  835.  
  836. void InInventoryUnloadItemsTo(string DestinationContainerName)
  837. {
  838.     Host.Log("unload items to '" + DestinationContainerName + "'.");
  839.  
  840.     EnsureWindowInventoryOpenOreHold();
  841.  
  842.     for (;;)
  843.     {
  844.         var oreHoldListItem = WindowInventory?.SelectedRightInventory?.ListView?.Entry?.ToArray();
  845.  
  846.         var oreHoldItem = oreHoldListItem?.FirstOrDefault();
  847.  
  848.         if(null == oreHoldItem)
  849.             break;    //    0 items in OreHold
  850.  
  851.         if(1 < oreHoldListItem?.Length)
  852.             ClickMenuEntryOnMenuRoot(oreHoldItem, @"select\s*all");
  853.  
  854.         var DestinationContainerLabelRegexPattern =
  855.             InventoryContainerLabelRegexPatternFromContainerName(DestinationContainerName);
  856.  
  857.         var DestinationContainer =
  858.             WindowInventory?.LeftTreeListEntry?.SelectMany(entry => new[] { entry }.Concat(entry.EnumerateChildNodeTransitive()))
  859.             ?.FirstOrDefault(entry => entry?.Text?.RegexMatchSuccessIgnoreCase(DestinationContainerLabelRegexPattern) ?? false);
  860.  
  861.         if (null == DestinationContainer)
  862.             Host.Log("error: Inventory entry labeled '" + DestinationContainerName + "' not found");
  863.  
  864.         Sanderling.MouseDragAndDrop(oreHoldItem, DestinationContainer);
  865.     }
  866. }
  867.  
  868. Random rand => new Random();
  869.  
  870. int IntDefault(int? entier) => entier ?? 0;
  871.  
  872. T RandomElement<T>(IEnumerable<T> seq)
  873. {
  874.     var counted = seq?.ToArray();
  875.      
  876.     if(!(0 < counted?.Length))
  877.         return default(T);
  878.          
  879.     return counted[rand.Next(counted.Length)];
  880. }
  881.    
  882. bool InitiateWarpToRandomMiningSite()
  883. {
  884.     var ListSurroundingsButton = Measurement?.InfoPanelCurrentSystem?.ListSurroundingsButton;
  885.     Sanderling.MouseClickRight(ListSurroundingsButton);
  886.    
  887.     String MiningFolderBookmark = RandomElement(SetMiningFolderBookmark);
  888.     var FolderMenuEntry = Measurement?.Menu?.ElementAtOrDefault(0)?.EntryFirstMatchingRegexPattern("^" + MiningFolderBookmark + "$", RegexOptions.IgnoreCase);
  889.     Sanderling.MouseClickLeft(FolderMenuEntry);
  890.    
  891.     if(FolderMenuEntry != null)
  892.         Host.Log("Warp to folder bookmarks : " + MiningFolderBookmark);
  893.    
  894.     var BookmarkMenuEntry = RandomElement(Measurement?.Menu?.ElementAtOrDefault(1)?.Entry);
  895.     Sanderling.MouseClickLeft(BookmarkMenuEntry);
  896.    
  897.     if(BookmarkMenuEntry != null)
  898.         Host.Log("Warp to bookmark : " + BookmarkMenuEntry?.Text);
  899.  
  900.     var Menu = Measurement?.Menu?.ElementAtOrDefault(2);
  901.     var DockMenuEntry = Menu?.EntryFirstMatchingRegexPattern("dock",RegexOptions.IgnoreCase);
  902.     var WarpMenuEntry = Menu?.EntryFirstMatchingRegexPattern(@"warp.*within\s*0",RegexOptions.IgnoreCase);
  903.     var ApproachEntry = Menu?.EntryFirstMatchingRegexPattern(@"approach",RegexOptions.IgnoreCase);
  904.  
  905.     var MenuEntry = DockMenuEntry ?? WarpMenuEntry;
  906.    
  907.     if(null == MenuEntry)
  908.     {
  909.         if(null != ApproachEntry)
  910.         {
  911.             Host.Log("found menu entry '" + ApproachEntry.Text + "'. Assuming we are already there.");
  912.             return false;
  913.         }
  914.  
  915.         Host.Log("no suitable menu entry found");
  916.         return true;
  917.     }
  918.    
  919.     Host.Log("initiating " + MenuEntry.Text);
  920.     Sanderling.MouseClickLeft(MenuEntry);
  921.  
  922.     return false;
  923. }
  924.  
  925. bool InitiateDockToOrWarpToBookmark(string Bookmark)
  926. {
  927.     var ListSurroundingsButton = Measurement?.InfoPanelCurrentSystem?.ListSurroundingsButton;
  928.     Sanderling.MouseClickRight(ListSurroundingsButton);
  929.  
  930.     var BookmarkMenuEntry = Measurement?.Menu?.ElementAtOrDefault(0)?.EntryFirstMatchingRegexPattern("^" + Bookmark + "$", RegexOptions.IgnoreCase);
  931.     Sanderling.MouseClickLeft(BookmarkMenuEntry);
  932.     if(null == BookmarkMenuEntry)
  933.     {
  934.         Host.Log("Not found bookmark ");
  935.         return true;
  936.     }
  937.  
  938.     var Menu = Measurement?.Menu?.ElementAtOrDefault(1);
  939.     var DockMenuEntry = Menu?.EntryFirstMatchingRegexPattern("dock",RegexOptions.IgnoreCase);
  940.     var WarpMenuEntry = Menu?.EntryFirstMatchingRegexPattern(@"warp.*within\s*0",RegexOptions.IgnoreCase);
  941.     var ApproachEntry = Menu?.EntryFirstMatchingRegexPattern(@"approach",RegexOptions.IgnoreCase);
  942.  
  943.     var MenuEntry = DockMenuEntry ?? WarpMenuEntry;
  944.    
  945.     if(null == MenuEntry)
  946.     {
  947.         if(null != ApproachEntry)
  948.         {
  949.             Host.Log("found menu entry '" + ApproachEntry.Text + "'. Assuming we are already there.");
  950.             return false;
  951.         }
  952.  
  953.         Host.Log("no suitable menu entry found");
  954.         return true;
  955.     }
  956.    
  957.     Host.Log("initiating " + MenuEntry.Text);
  958.     Sanderling.MouseClickLeft(MenuEntry);
  959.  
  960.     return false;
  961. }
  962.  
  963. void Undock()
  964. {
  965.     Sanderling.MouseClickLeft(Measurement?.WindowStation?.FirstOrDefault()?.UndockButton);
  966.    
  967.     Host.Log("waiting for undocking to complete.");
  968.     while(Measurement?.IsDocked ?? true) Host.Delay(1111);
  969.  
  970.     Host.Delay(4444);
  971.     Sanderling.InvalidateMeasurement();
  972. }
  973.  
  974. void ModuleMeasureAllTooltip()
  975. {
  976.     for (;;)
  977.     {
  978.         var NextModule = Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.FirstOrDefault(m => null == m?.TooltipLast);
  979.  
  980.         if(null == NextModule)
  981.             break;
  982.  
  983.         Host.Log("measure module.");
  984.         // take multiple measurements of module tooltip to reduce risk to keep bad read tooltip.
  985.         Sanderling.MouseMove(NextModule);
  986.         Sanderling.WaitForMeasurement();
  987.         Sanderling.MouseMove(NextModule);
  988.     }
  989. }
  990.  
  991. void ModuleMeasureAllTooltipAfterStop()
  992. {
  993.     Host.Log("measure tooltips of all modules.");
  994.  
  995.     for (int i = 0; i < Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.Count(); ++i)
  996.     {
  997.         var NextModule = Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.ElementAtOrDefault(i);
  998.        
  999.         Host.Log("measure module.");
  1000.         // take multiple measurements of module tooltip to reduce risk to keep bad read tooltip.
  1001.         Sanderling.MouseMove(NextModule);
  1002.         Sanderling.WaitForMeasurement();
  1003.         Sanderling.MouseMove(NextModule);
  1004.     }
  1005. }
  1006.  
  1007. void ActivateHardenerExecute()
  1008. {
  1009.     var SubsetModuleHardener = Sanderling.MemoryMeasurementAccu?.Value?.ShipUiModule?.Where(module => module?.TooltipLast?.Value?.IsHardener ?? false);
  1010.  
  1011.     var SubsetModuleToToggle = SubsetModuleHardener?.Where(module => !(module?.RampActive ?? false));
  1012.  
  1013.     foreach (var Module in SubsetModuleToToggle.EmptyIfNull())
  1014.         ModuleToggle(Module);
  1015. }
  1016.  
  1017. void ModuleToggle(Sanderling.Accumulation.IShipUiModule Module)
  1018. {
  1019.     var ToggleKey = Module?.TooltipLast?.Value?.ToggleKey;
  1020.  
  1021.     Host.Log("toggle module using " + (null == ToggleKey ? "mouse" : Module?.TooltipLast?.Value?.ToggleKeyTextLabel?.Text));
  1022.  
  1023.     if(null == ToggleKey)
  1024.         Sanderling.MouseClickLeft(Module);
  1025.     else
  1026.         Sanderling.KeyboardPressCombined(ToggleKey);
  1027. }
  1028.  
  1029. void EnsureOverviewTypeSelectionLoaded()
  1030. {
  1031.     if(null == OverviewPresetTabActive || null == WindowOverview || null == OverviewPreset)
  1032.         return;
  1033.  
  1034.     if(string.Equals(OverviewTypeSelectionName, OverviewPreset, StringComparison.OrdinalIgnoreCase))
  1035.         return;
  1036.  
  1037.     Host.Log("loading preset '" + OverviewPreset + "' to overview (current selection is '" + OverviewTypeSelectionName + "').");
  1038.     Sanderling.MouseClickRight(OverviewPresetTabActive);
  1039.     Sanderling.MouseClickLeft(Menu?.FirstOrDefault()?.EntryFirstMatchingRegexPattern("load.*preset", RegexOptions.IgnoreCase));
  1040.     var PresetMenuEntry = Menu?.ElementAtOrDefault(1)?.EntryFirstMatchingRegexPattern(@"^\s*" + Regex.Escape(OverviewPreset) + @"\s*$", RegexOptions.IgnoreCase);
  1041.  
  1042.     if(null == PresetMenuEntry)
  1043.     {
  1044.         Host.Log("error: menu entry '" + OverviewPreset + "' not found");
  1045.         return;
  1046.     }
  1047.  
  1048.     Sanderling.MouseClickLeft(PresetMenuEntry);
  1049. }
  1050.  
  1051. void MemoryUpdate()
  1052. {
  1053.     EmergencyWarpOutUpdate();
  1054.     JammedLastTimeUpdate();
  1055.     OffloadCountUpdate();
  1056. }
  1057.  
  1058. void JammedLastTimeUpdate()
  1059. {
  1060.     if(Jammed)
  1061.         JammedLastTime = Host.GetTimeContinuousMilli();
  1062. }
  1063.  
  1064. bool MeasurementEmergencyWarpOutEnter =>
  1065.     !(Measurement?.IsDocked ?? false) && !(EmergencyWarpOutHitpointPercent < ShieldHpPercent);
  1066.  
  1067. void EmergencyWarpOutUpdate()
  1068. {
  1069.     if (!MeasurementEmergencyWarpOutEnter)
  1070.         return;
  1071.  
  1072.     // measure multiple times to avoid being scared off by noise from a single measurement.
  1073.     Sanderling.InvalidateMeasurement();
  1074.  
  1075.     if (!MeasurementEmergencyWarpOutEnter)
  1076.         return;
  1077.  
  1078.     EmergencyWarpOutEnabled = true;
  1079. }
  1080.  
  1081. void RetreatUpdate()
  1082. {
  1083.     RetreatReasonTemporary = (RetreatOnNeutralOrHostileInLocal && hostileOrNeutralsInLocal) ? "hostile or neutral in local" : null;
  1084.  
  1085.     if (!MeasurementEmergencyWarpOutEnter)
  1086.         return;
  1087.  
  1088.     //  measure multiple times to avoid being scared off by noise from a single measurement.
  1089.     Sanderling.InvalidateMeasurement();
  1090.  
  1091.     if (!MeasurementEmergencyWarpOutEnter)
  1092.         return;
  1093.  
  1094.     RetreatReasonPermanent = "shield hp";
  1095. }
  1096.  
  1097. void OffloadCountUpdate()
  1098. {
  1099.     var OreHoldFillPercentSynced = OreHoldFillPercent;
  1100.  
  1101.     if(!OreHoldFillPercentSynced.HasValue)
  1102.         return;
  1103.  
  1104.     if(0 == OreHoldFillPercentSynced && OreHoldFillPercentSynced < LastCheckOreHoldFillPercent)
  1105.         ++OffloadCount;
  1106.  
  1107.     LastCheckOreHoldFillPercent = OreHoldFillPercentSynced;
  1108. }
  1109.  
  1110. bool IsNeutralOrEnemy(IChatParticipantEntry participantEntry) =>
  1111.    !(participantEntry?.FlagIcon?.Any(flagIcon =>
  1112.      new[] { "good standing", "excellent standing", "Pilot is in your (fleet|corporation)", }
  1113.      .Any(goodStandingText =>
  1114.         flagIcon?.HintText?.RegexMatchSuccessIgnoreCase(goodStandingText) ?? false)) ?? false);
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!