forex-scalping.com

Code: Select all

//@version=5
indicator("Price Action Risk Manager", overlay=true)

// --- [ ACCOUNT SETTINGS ] ---
accountBalance = input.float(10000, title="Account Balance", group="1. Risk Parameters")
riskPercent    = input.float(1.0, title="Risk per Trade (%)", step=0.1, group="1. Risk Parameters")
contractSize   = input.float(100000, title="Contract/Lot Size (e.g., 100k for Standard FX Lot)", group="1. Risk Parameters")

// --- [ INTERACTIVE TRADE LEVELS ] ---
// 'confirm=true' allows you to click directly on the chart to set these price levels
entryPrice = input.price(0, title="1. Click Chart for Entry", confirm=true, group="2. Trade Setup")
slPrice    = input.price(0, title="2. Click Chart for Stop Loss", confirm=true, group="2. Trade Setup")
tpPrice    = input.price(0, title="3. Click Chart for Take Profit", confirm=true, group="2. Trade Setup")

// --- [ CALCULATIONS ] ---
// Calculate maximum monetary risk based on your rule
riskAmount = accountBalance * (riskPercent / 100)

// Calculate physical distance on the chart
slDistance = math.abs(entryPrice - slPrice)
tpDistance = math.abs(tpPrice - entryPrice)

// Position Size (Formula: Risk Amount / Distance to SL)
positionUnits = slDistance > 0 ? (riskAmount / slDistance) : 0
positionLots  = positionUnits / contractSize

// Reward-to-Risk Ratio
rrRatio = slDistance > 0 ? (tpDistance / slDistance) : 0

// --- [ VISUAL DASHBOARD ] ---
// Create a clean HUD in the top right corner
var table riskPanel = table.new(position.top_right, 2, 5, bgcolor=color.new(color.black, 20), border_color=color.gray, border_width=1)

if barstate.islast and entryPrice > 0
    // Header
    table.cell(riskPanel, 0, 0, "TRADE SETUP", text_color=color.white, text_halign=text.align_center, bgcolor=color.new(color.blue, 50))
    table.merge_cells(riskPanel, 0, 0, 1, 0)
    
    // Risk Amount
    table.cell(riskPanel, 0, 1, "Max Risk:", text_color=color.gray, text_halign=text.align_left)
    table.cell(riskPanel, 1, 1, str.tostring(riskAmount, "#.##"), text_color=color.red, text_halign=text.align_right)
    
    // Position Size (Lots)
    table.cell(riskPanel, 0, 2, "Position (Lots):", text_color=color.gray, text_halign=text.align_left)
    table.cell(riskPanel, 1, 2, str.tostring(positionLots, "#.##"), text_color=color.yellow, text_halign=text.align_right)
    
    // R:R Ratio
    table.cell(riskPanel, 0, 3, "Reward/Risk:", text_color=color.gray, text_halign=text.align_left)
    table.cell(riskPanel, 1, 3, "1 : " + str.tostring(rrRatio, "#.##"), text_color=color.white, text_halign=text.align_right)

    // Trade Direction
    tradeDir = entryPrice > slPrice ? "LONG" : "SHORT"
    dirColor = entryPrice > slPrice ? color.green : color.red
    table.cell(riskPanel, 0, 4, "Direction:", text_color=color.gray, text_halign=text.align_left)
    table.cell(riskPanel, 1, 4, tradeDir, text_color=dirColor, text_halign=text.align_right)

Code: Select all

//+------------------------------------------------------------------+
//|                                              Risk_Manager_MT4.mq4 |
//+------------------------------------------------------------------+
#property indicator_chart_window

input double RiskPercent = 1.0; // Risk per Trade (%)

string entryLine = "RM_Entry";
string slLine = "RM_SL";
string tpLine = "RM_TP";

int OnInit() {
    double price = Ask;
    if(price == 0) price = Close[0]; // Fallback for weekends
    
    // Create interactive horizontal lines
    CreateLine(entryLine, price, clrDodgerBlue, "ENTRY");
    CreateLine(slLine, price - (500 * Point), clrRed, "STOP LOSS");
    CreateLine(tpLine, price + (1000 * Point), clrMediumSeaGreen, "TAKE PROFIT");
    
    EventSetTimer(1); // Force update every second even without incoming ticks
    return(INIT_SUCCEEDED);
}

void OnDeinit(const int reason) {
    ObjectDelete(0, entryLine);
    ObjectDelete(0, slLine);
    ObjectDelete(0, tpLine);
    Comment(""); // Clear dashboard
    EventKillTimer();
}

void OnTimer() { UpdateDashboard(); }

int OnCalculate(const int rates_total, const int prev_calculated, const datetime &time[], const double &open[], const double &high[], const double &low[], const double &close[], const long &tick_volume[], const long &volume[], const int &spread[]) {
    UpdateDashboard();
    return(rates_total);
}

void OnChartEvent(const int id, const long &lparam, const double &dparam, const string &sparam) {
    if(id == CHARTEVENT_OBJECT_DRAG) UpdateDashboard();
}

void CreateLine(string name, double price, color clr, string tooltip) {
    if(ObjectFind(0, name) < 0) {
        ObjectCreate(0, name, OBJ_HLINE, 0, 0, price);
        ObjectSetInteger(0, name, OBJPROP_COLOR, clr);
        ObjectSetInteger(0, name, OBJPROP_STYLE, STYLE_SOLID);
        ObjectSetInteger(0, name, OBJPROP_WIDTH, 2);
        ObjectSetInteger(0, name, OBJPROP_SELECTABLE, true); // Allows dragging
        ObjectSetInteger(0, name, OBJPROP_SELECTED, true);
        ObjectSetString(0, name, OBJPROP_TEXT, tooltip);
    }
}

void UpdateDashboard() {
    double entryPrice = ObjectGetDouble(0, entryLine, OBJPROP_PRICE);
    double slPrice = ObjectGetDouble(0, slLine, OBJPROP_PRICE);
    double tpPrice = ObjectGetDouble(0, tpLine, OBJPROP_PRICE);
    
    double balance = AccountBalance();
    double riskAmount = balance * (RiskPercent / 100.0);
    
    double slDistancePoints = MathAbs(entryPrice - slPrice) / Point;
    double tpDistancePoints = MathAbs(tpPrice - entryPrice) / Point;
    
    double tickValue = MarketInfo(Symbol(), MODE_TICKVALUE);
    
    double lots = 0;
    // Core Lot Size Formula: Risk = Lots * Distance(Points) * TickValue
    if(slDistancePoints > 0 && tickValue > 0) {
        lots = riskAmount / (slDistancePoints * tickValue);
    }
    
    // Normalize lots to broker step rules
    double minLot = MarketInfo(Symbol(), MODE_MINLOT);
    double maxLot = MarketInfo(Symbol(), MODE_MAXLOT);
    double lotStep = MarketInfo(Symbol(), MODE_LOTSTEP);
    
    if (lots > 0) {
        lots = MathFloor(lots / lotStep) * lotStep;
        if (lots < minLot) lots = minLot;
        if (lots > maxLot) lots = maxLot;
    }
    
    double rrRatio = 0;
    if(slDistancePoints > 0) rrRatio = tpDistancePoints / slDistancePoints;
    string dir = (entryPrice > slPrice) ? "LONG" : "SHORT";
    
    // Draw HUD
    string dash = "\n--- PRICE ACTION RISK MANAGER ---\n\n";
    dash += "Account Balance: " + DoubleToString(balance, 2) + "\n";
    dash += "Max Risk (" + DoubleToString(RiskPercent, 1) + "%): " + DoubleToString(riskAmount, 2) + "\n\n";
    dash += "Direction: " + dir + "\n";
    dash += "Position Size: " + DoubleToString(lots, 2) + " Lots\n";
    dash += "Reward/Risk: 1 : " + DoubleToString(rrRatio, 2) + "\n\n";
    dash += "Distance to SL: " + DoubleToString(slDistancePoints / 10.0, 1) + " pips\n";
    
    Comment(dash);
}