Initial commit: MQL5 Scripts Collection (MetaTrader 5)

Partial Close Buy Orders - script for MetaTrader 5/README.md

@@ -0,0 +1,21 @@
+# 🚀 Unlock the Power of Trading!
+
+Welcome to this open-source trading project. Here you will find powerful tools to enhance your trading journey. If you find this project useful, please consider starring ⭐, sharing, or donating to support further development!
+
+---
+
+**Support the project:**
+- Star this repository on GitHub
+- Share it with your trading friends
+- [Donate here](https://www.paypal.com/donate/?hosted_button_id=YOUR_BUTTON_ID) to help us grow!
+
+---
+![Screenshot](library.png)
+![Screenshot](partialclosebuyorder__1.JPG)
+![Screenshot](script.png)
+
+## Source Files
+- `partial_close_buy_orders.mq5`
+
+---
+> Made with ❤️ for the trading community.

Partial Close Buy Orders - script for MetaTrader 5/partial_close_buy_orders.mq5

@@ -0,0 +1,115 @@
+//+------------------------------------------------------------------+
+//|                                     Partial Close Buy Orders.mq5 |
+//|                                   Copyright 2025, MetaQuotes Ltd |
+//|                               https://www.mql5.com/en/users/matfx|
+//+------------------------------------------------------------------+
+#property copyright "Copyright 2025, MetaQuotes Ltd"
+#property link      "https://www.mql5.com/en/users/matfx"
+#property version   "1.00"
+
+#property script_show_inputs
+#property strict
+
+// Input parameters
+input double   PartialClosePercentage = 50.0;  // Percentage of position to close (0-100)
+input bool     CloseAllIfSmall = true;         // Close entire position if remaining lots would be too small
+input double   MinimumLotSize = 0.1;           // Minimum lot size to leave open (if CloseAllIfSmall=true)
+
+//+------------------------------------------------------------------+
+//| Script program start function                                    |
+//+------------------------------------------------------------------+
+void OnStart()
+{
+    // Check input parameters
+    if(PartialClosePercentage <= 0 || PartialClosePercentage > 100)
+    {
+        Alert("Error: PartialClosePercentage must be between 0 and 100");
+        return;
+    }
+    
+    if(MinimumLotSize <= 0)
+    {
+        Alert("Error: MinimumLotSize must be greater than 0");
+        return;
+    }
+    
+    // Get total open buy positions
+    int total = PositionsTotal();
+    if(total == 0)
+    {
+        Print("No open positions found");
+        return;
+    }
+    
+    // Process each position
+    for(int i = total-1; i >= 0; i--)
+    {
+        ulong ticket = PositionGetTicket(i);
+        if(ticket > 0)
+        {
+            if(PositionGetString(POSITION_SYMBOL) == _Symbol && 
+               PositionGetInteger(POSITION_TYPE) == POSITION_TYPE_BUY)
+            {
+                ProcessBuyPosition(ticket);
+            }
+        }
+    }
+    
+    Print("Partial close script execution completed");
+}
+
+//+------------------------------------------------------------------+
+//| Process a single buy position                                    |
+//+------------------------------------------------------------------+
+void ProcessBuyPosition(ulong ticket)
+{
+    // Get position details
+    double volume = PositionGetDouble(POSITION_VOLUME);
+    string symbol = PositionGetString(POSITION_SYMBOL);
+    double price = PositionGetDouble(POSITION_PRICE_OPEN);
+    ulong magic = PositionGetInteger(POSITION_MAGIC);
+    string comment = PositionGetString(POSITION_COMMENT);
+    
+    // Calculate lots to close
+    double lotsToClose = NormalizeDouble(volume * (PartialClosePercentage / 100.0), 2);
+    double remainingLots = NormalizeDouble(volume - lotsToClose, 2);
+    
+    // Check if we should close all instead
+    if(CloseAllIfSmall && remainingLots < MinimumLotSize)
+    {
+        lotsToClose = volume;
+        remainingLots = 0;
+    }
+    
+    // Prepare trade request
+    MqlTradeRequest request;
+    MqlTradeResult result;
+    ZeroMemory(request);
+    ZeroMemory(result);
+    
+    request.action = TRADE_ACTION_DEAL;
+    request.position = ticket;
+    request.symbol = symbol;
+    request.volume = lotsToClose;
+    request.type = ORDER_TYPE_SELL;
+    request.price = SymbolInfoDouble(symbol, SYMBOL_BID);
+    request.deviation = 5;
+    request.magic = magic;
+    request.type_filling = ORDER_FILLING_FOK; // Fill or Kill execution
+    request.comment = "Partial close " + comment;
+    
+    // Send close request
+    if(!OrderSend(request, result))
+    {
+        Print("Failed to close partial position ", ticket, 
+              ", error: ", GetLastError(), 
+              ", lots: ", lotsToClose);
+    }
+    else
+    {
+        Print("Successfully closed ", lotsToClose, 
+              " lots of position ", ticket, 
+              ", remaining: ", remainingLots);
+    }
+}
+//+------------------------------------------------------------------+