forex-scalping.com

Code: Select all

//+------------------------------------------------------------------+
//|                                          DisciplineEnforcer.mq4  |
//|             Enforces the "One Book, One Process" trading rule    |
//+------------------------------------------------------------------+
#property copyright "Gemini"
#property version   "1.00"
#property strict
#property show_inputs

//--- Input Parameters
input int    AuthorizedLiveAccount = 12345678; // Your SINGLE Authorized Live Account
input bool   AllowDemoTrading      = true;     // Allow execution on Demo for research
input double FixedRiskPercent      = 1.0;      // Strict Risk % for the main rule set

void OnStart()
{
    // Gather current account information
    int currentAccount = (int)AccountInfoInteger(ACCOUNT_LOGIN);
    long tradeMode     = AccountInfoInteger(ACCOUNT_TRADE_MODE);
    bool isDemo        = (tradeMode == ACCOUNT_TRADE_MODE_DEMO);

    // Rule 1: Research stays on demo.
    if(isDemo)
    {
        if(!AllowDemoTrading)
        {
            Alert("Demo trading is currently disabled. Use your written research log.");
            return;
        }
        Print("Authorized Demo Environment. Research mode active.");
    }
    else // Live Account Environment
    {
        // Rule 2: No side accounts. No play money. One book.
        if(currentAccount != AuthorizedLiveAccount)
        {
            string errorMsg = "RED FLAG: Unauthorized live account (" + IntegerToString(currentAccount) + ").\n" +
                              "Leakage trains the same hands. Execution blocked.";
            Alert(errorMsg);
            PlaySound("timeout.wav"); // Audio deterrent 
            return;
        }

        Print("Main Book Confirmed. One Process, One Rule Set.");
    }

    // Rule 3: Enforce the single rule set's risk parameters
    double balance = AccountInfoDouble(ACCOUNT_BALANCE);
    double riskAmount = balance * (FixedRiskPercent / 100.0);

    Alert("Discipline Check Passed.\nAccount: ", currentAccount, 
          "\nMode: ", (isDemo ? "RESEARCH/DEMO" : "LIVE MAIN BOOK"),
          "\nMax Risk Allowed: $", DoubleToStr(riskAmount, 2));

    // -> You can append your standard order execution logic below this line.
    // By placing trades through this script, you guarantee it only fires 
    // when you are logged into the correct, disciplined environment.
}

Code: Select all

//+------------------------------------------------------------------+
//|                                              OneBookGuardian.mq4 |
//|          Continuous EA monitor to enforce trading discipline     |
//+------------------------------------------------------------------+
#property copyright "Gemini"
#property version   "1.10"
#property strict

//--- Input Parameters
input int    AuthorizedLiveAccount = 12345678; // Your SINGLE Authorized Live Account
input bool   AllowDemoTrading      = true;     // Allow execution on Demo for research

//--- Global Variables
bool disciplineBreached = false;
string warningObjName   = "DISCIPLINE_LOCKDOWN_LABEL";
string bgObjName        = "DISCIPLINE_LOCKDOWN_BG";

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
{
    // Set a 1-second timer to constantly check the account status
    EventSetTimer(1); 
    
    // Run an immediate check on startup
    VerifyEnvironment();
    
    return(INIT_SUCCEEDED);
}

//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
    EventKillTimer();
    UnlockChart(); // Clean up graphics when removed
}

//+------------------------------------------------------------------+
//| Expert tick function (Automated Trading Logic goes here)         |
//+------------------------------------------------------------------+
void OnTick()
{
    // RULE 1: If discipline is breached, kill all automated trading
    if(disciplineBreached)
    {
        // The EA exits immediately without executing any trade logic
        return; 
    }

    // --- YOUR AUTOMATED TRADING LOGIC GOES BELOW THIS LINE ---
    // If the EA gets to this point, you are safely in your main book.
    
}

//+------------------------------------------------------------------+
//| Timer function (Constant Environment Monitoring)                 |
//+------------------------------------------------------------------+
void OnTimer()
{
    VerifyEnvironment();
    
    if(disciplineBreached)
    {
        // Continuous psychological friction if the warning is ignored
        Alert("RED FLAG: Unauthorized Account! Leakage trains the same hands.");
        PlaySound("timeout.wav");
    }
}

//+------------------------------------------------------------------+
//| Core Logic: Verifies the current account                         |
//+------------------------------------------------------------------+
void VerifyEnvironment()
{
    int currentAccount = (int)AccountInfoInteger(ACCOUNT_LOGIN);
    long tradeMode     = AccountInfoInteger(ACCOUNT_TRADE_MODE);
    bool isDemo        = (tradeMode == ACCOUNT_TRADE_MODE_DEMO);

    bool isAuthorized = false;

    if(isDemo)
    {
        if(AllowDemoTrading) isAuthorized = true;
    }
    else // Live Environment
    {
        if(currentAccount == AuthorizedLiveAccount) isAuthorized = true;
    }

    // Handle state changes
    if(!isAuthorized && !disciplineBreached)
    {
        disciplineBreached = true;
        LockdownChart();
        Print("Discipline breach detected. Automated trading disabled.");
    }
    else if(isAuthorized && disciplineBreached)
    {
        disciplineBreached = false;
        UnlockChart();
        Print("Authorized environment confirmed. Systems restored.");
    }
}

//+------------------------------------------------------------------+
//| UI functions: Psychological deterrents                           |
//+------------------------------------------------------------------+
void LockdownChart()
{
    // Create a massive red background blocking the chart
    if(ObjectFind(0, bgObjName) < 0)
    {
        ObjectCreate(0, bgObjName, OBJ_RECTANGLE_LABEL, 0, 0, 0);
        ObjectSetInteger(0, bgObjName, OBJPROP_XDISTANCE, 0);
        ObjectSetInteger(0, bgObjName, OBJPROP_YDISTANCE, 0);
        ObjectSetInteger(0, bgObjName, OBJPROP_XSIZE, 3000); // Cover entire screen
        ObjectSetInteger(0, bgObjName, OBJPROP_YSIZE, 3000);
        ObjectSetInteger(0, bgObjName, OBJPROP_BGCOLOR, clrRed);
        ObjectSetInteger(0, bgObjName, OBJPROP_BACK, false);
    }

    // Add giant warning text
    if(ObjectFind(0, warningObjName) < 0)
    {
        ObjectCreate(0, warningObjName, OBJ_LABEL, 0, 0, 0);
        ObjectSetInteger(0, warningObjName, OBJPROP_XDISTANCE, 50);
        ObjectSetInteger(0, warningObjName, OBJPROP_YDISTANCE, 100);
        ObjectSetString(0, warningObjName, OBJPROP_TEXT, "UNAUTHORIZED PLAY ACCOUNT");
        ObjectSetString(0, warningObjName, OBJPROP_FONT, "Arial Black");
        ObjectSetInteger(0, warningObjName, OBJPROP_FONTSIZE, 36);
        ObjectSetInteger(0, warningObjName, OBJPROP_COLOR, clrWhite);
    }
    ChartRedraw();
}

void UnlockChart()
{
    ObjectDelete(0, bgObjName);
    ObjectDelete(0, warningObjName);
    ChartRedraw();
}
//+------------------------------------------------------------------+

Code: Select all

//+------------------------------------------------------------------+
//|                                              OneBookGuardian.mq5 |
//|          Continuous EA monitor to enforce trading discipline     |
//+------------------------------------------------------------------+
#property copyright "Gemini"
#property version   "1.00"

//--- Input Parameters
input ulong  AuthorizedLiveAccount = 12345678; // Your SINGLE Authorized Live Account
input bool   AllowDemoTrading      = true;     // Allow execution on Demo for research

//--- Global Variables
bool disciplineBreached = false;
string warningObjName   = "DISCIPLINE_LOCKDOWN_LABEL";
string bgObjName        = "DISCIPLINE_LOCKDOWN_BG";

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
   // Set a 1-second timer to constantly check the account status
   EventSetTimer(1);
   
   // Run an immediate check on startup
   VerifyEnvironment();
   
   return(INIT_SUCCEEDED);
  }

//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   EventKillTimer();
   UnlockChart(); // Clean up graphics when removed
  }

//+------------------------------------------------------------------+
//| Expert tick function (Automated Trading Logic goes here)         |
//+------------------------------------------------------------------+
void OnTick()
  {
   // RULE 1: If discipline is breached, kill all automated trading
   if(disciplineBreached)
     {
      // The EA exits immediately without executing any trade logic
      return;
     }

   // --- YOUR AUTOMATED TRADING LOGIC GOES BELOW THIS LINE ---
   // If the EA gets to this point, you are safely in your main book.
   
  }

//+------------------------------------------------------------------+
//| Timer function (Constant Environment Monitoring)                 |
//+------------------------------------------------------------------+
void OnTimer()
  {
   VerifyEnvironment();
   
   if(disciplineBreached)
     {
      // Continuous psychological friction if the warning is ignored
      Alert("RED FLAG: Unauthorized Account! Leakage trains the same hands.");
      PlaySound("timeout.wav");
     }
  }

//+------------------------------------------------------------------+
//| Core Logic: Verifies the current account                         |
//+------------------------------------------------------------------+
void VerifyEnvironment()
  {
   // In MQL5, logins are long/ulong variables
   ulong currentAccount = (ulong)AccountInfoInteger(ACCOUNT_LOGIN);
   long tradeMode       = AccountInfoInteger(ACCOUNT_TRADE_MODE);
   bool isDemo          = (tradeMode == ACCOUNT_TRADE_MODE_DEMO);

   bool isAuthorized = false;

   if(isDemo)
     {
      if(AllowDemoTrading)
         isAuthorized = true;
     }
   else // Live Environment
     {
      if(currentAccount == AuthorizedLiveAccount)
         isAuthorized = true;
     }

   // Handle state changes
   if(!isAuthorized && !disciplineBreached)
     {
      disciplineBreached = true;
      LockdownChart();
      Print("Discipline breach detected. Automated trading disabled.");
     }
   else if(isAuthorized && disciplineBreached)
     {
      disciplineBreached = false;
      UnlockChart();
      Print("Authorized environment confirmed. Systems restored.");
     }
  }

//+------------------------------------------------------------------+
//| UI functions: Psychological deterrents                           |
//+------------------------------------------------------------------+
void LockdownChart()
  {
   // Create a massive red background blocking the chart
   if(ObjectFind(0, bgObjName) < 0)
     {
      ObjectCreate(0, bgObjName, OBJ_RECTANGLE_LABEL, 0, 0, 0);
      ObjectSetInteger(0, bgObjName, OBJPROP_XDISTANCE, 0);
      ObjectSetInteger(0, bgObjName, OBJPROP_YDISTANCE, 0);
      
      // Attempt to cover the entire screen dynamically using MQL5 chart properties
      int width  = (int)ChartGetInteger(0, CHART_WIDTH_IN_PIXELS);
      int height = (int)ChartGetInteger(0, CHART_HEIGHT_IN_PIXELS);
      ObjectSetInteger(0, bgObjName, OBJPROP_XSIZE, (width > 0) ? width : 4000);
      ObjectSetInteger(0, bgObjName, OBJPROP_YSIZE, (height > 0) ? height : 4000);
      
      ObjectSetInteger(0, bgObjName, OBJPROP_BGCOLOR, clrRed);
      ObjectSetInteger(0, bgObjName, OBJPROP_BACK, false);
      ObjectSetInteger(0, bgObjName, OBJPROP_SELECTABLE, false);
      ObjectSetInteger(0, bgObjName, OBJPROP_HIDDEN, true); // Keep out of object list
     }

   // Add giant warning text
   if(ObjectFind(0, warningObjName) < 0)
     {
      ObjectCreate(0, warningObjName, OBJ_LABEL, 0, 0, 0);
      ObjectSetInteger(0, warningObjName, OBJPROP_XDISTANCE, 50);
      ObjectSetInteger(0, warningObjName, OBJPROP_YDISTANCE, 100);
      ObjectSetString(0, warningObjName, OBJPROP_TEXT, "UNAUTHORIZED PLAY ACCOUNT");
      ObjectSetString(0, warningObjName, OBJPROP_FONT, "Arial Black");
      ObjectSetInteger(0, warningObjName, OBJPROP_FONTSIZE, 36);
      ObjectSetInteger(0, warningObjName, OBJPROP_COLOR, clrWhite);
      ObjectSetInteger(0, warningObjName, OBJPROP_BACK, false);
      ObjectSetInteger(0, warningObjName, OBJPROP_SELECTABLE, false);
      ObjectSetInteger(0, warningObjName, OBJPROP_HIDDEN, true);
     }
   ChartRedraw(0);
  }

void UnlockChart()
  {
   ObjectDelete(0, bgObjName);
   ObjectDelete(0, warningObjName);
   ChartRedraw(0);
  }
//+------------------------------------------------------------------+

Code: Select all

using System;
using cAlgo.API;
using cAlgo.API.Internals;
using cAlgo.API.Indicators;
using cAlgo.Indicators;

namespace cAlgo.Robots
{
    [Robot(TimeZone = TimeZones.UTC, AccessRights = AccessRights.None)]
    public class OneBookGuardian : Robot
    {
        //--- Input Parameters
        [Parameter("Authorized Live Account", DefaultValue = 12345678, Group = "Discipline Settings")]
        public int AuthorizedLiveAccount { get; set; }

        [Parameter("Allow Demo Trading", DefaultValue = true, Group = "Discipline Settings")]
        public bool AllowDemoTrading { get; set; }

        //--- Global Variables
        private bool disciplineBreached = false;
        private Border lockdownScreen;

        protected override void OnStart()
        {
            // Initialize the UI elements immediately 
            InitializeLockdownUI();

            // Run an immediate check on startup
            VerifyEnvironment();

            // Set a 1-second timer to constantly check the account status
            Timer.Start(TimeSpan.FromSeconds(1));
        }

        protected override void OnTick()
        {
            // RULE 1: If discipline is breached, kill all automated trading
            if (disciplineBreached)
            {
                // The cBot exits immediately without executing any trade logic
                return;
            }

            // --- YOUR AUTOMATED TRADING LOGIC GOES BELOW THIS LINE ---
            // If the cBot gets to this point, you are safely in your main book.
            
        }

        protected override void OnTimer()
        {
            VerifyEnvironment();

            if (disciplineBreached)
            {
                // Continuous psychological friction if the warning is ignored
                Print("RED FLAG: Unauthorized Account! Leakage trains the same hands.");
                Notifications.PlaySound(SoundType.Warning); // Native cTrader warning sound
            }
        }

        private void VerifyEnvironment()
        {
            // Gather current account information in cTrader
            int currentAccount = Account.Number;
            bool isLive        = Account.IsLive;
            
            bool isAuthorized  = false;

            // Rule 1: Research stays on demo.
            if (!isLive)
            {
                if (AllowDemoTrading)
                    isAuthorized = true;
            }
            else // Live Environment
            {
                // Rule 2: No side accounts. One book.
                if (currentAccount == AuthorizedLiveAccount)
                    isAuthorized = true;
            }

            // Handle state changes
            if (!isAuthorized && !disciplineBreached)
            {
                disciplineBreached = true;
                LockdownChart();
                Print("Discipline breach detected. Automated trading disabled.");
            }
            else if (isAuthorized && disciplineBreached)
            {
                disciplineBreached = false;
                UnlockChart();
                Print("Authorized environment confirmed. Systems restored.");
            }
        }

        //+------------------------------------------------------------------+
        //| UI functions: Psychological deterrents                           |
        //+------------------------------------------------------------------+
        private void InitializeLockdownUI()
        {
            // Create a full-screen red border that automatically stretches
            lockdownScreen = new Border
            {
                BackgroundColor = Color.Red,
                HorizontalAlignment = HorizontalAlignment.Stretch,
                VerticalAlignment = VerticalAlignment.Stretch,
                IsVisible = false // Hidden by default
            };

            // Add massive warning text inside the border
            var textBlock = new TextBlock
            {
                Text = "UNAUTHORIZED PLAY ACCOUNT\nLeakage trains the same hands.",
                ForegroundColor = Color.White,
                FontSize = 32,
                FontWeight = FontWeight.ExtraBold,
                HorizontalAlignment = HorizontalAlignment.Center,
                VerticalAlignment = VerticalAlignment.Center,
                TextAlignment = TextAlignment.Center
            };

            lockdownScreen.Child = textBlock;
            
            // Add to the chart so it sits on top of all price action
            Chart.AddControl(lockdownScreen);
        }

        private void LockdownChart()
        {
            if (lockdownScreen != null)
                lockdownScreen.IsVisible = true;
        }

        private void UnlockChart()
        {
            if (lockdownScreen != null)
                lockdownScreen.IsVisible = false;
        }
    }
}