Thinkscript code for incrementing or decrementing a calculation

[Iguana]

Sorry in advance for lenght of my question. I use the following fixed variables:
MaxRisk: $40
Funds: $2000
Variables: Riskcents = ATR * X
Shares = MaxRisk / Riskcents
MaxInvest= candle "High" * Shares

I'm trying to generate a calculation of variable "X" such that the "Shares" * candle "High" will a MaxInvest that equals Funds. Obviously I can have a fixed user input for X to start the evaluation; but, then need the code that will evaluate and increment/decrement "X" so that Maxinvest = Funds. Any assistance is greatly appreciated.

I want to add that when intraday trading, and using a fixed "X" of 2, the ATR can become so small that the number of "Shares" results in a MaxInvest that exceed Funds. That where the "rub" is...I'd like the code to calculate the adjustment needed.

 

[Svanoy]

@Iguana give this a shot.

input X = 2;
def ATR = reference ATR.ATR;
def MaxRisk = 40;
def Funds = 2000;
def Riskcents = ATR * X;
def Shares = MaxRisk / Riskcents;
def MaxInvest = High * Shares;

def AutoX = fold i = 0 to 100 with internalX = X while (high*(MaxRisk/(ATR * internalX))) > Funds do internalX + 1;
def AdjustedMaxInvest = if MaxInvest > Funds then (high*(MaxRisk/(ATR * AutoX))) else MaxInvest;

addchartbubble(yes,high,"Auto X: "+AutoX,if MaxInvest > Funds then color.white else color.green,yes);
addchartbubble(yes,high,"Adjusted MaxInvest: "+AdjustedMaxInvest,if MaxInvest > Funds then color.white else color.green,yes);
addchartbubble(yes,high,"MaxInvest: "+MaxInvest,if MaxInvest > Funds then color.white else color.green,yes);

 

[Iguana]

Svanoy,
Code works fine. Just tweeked a bit for my settings. Thank you.

 

[Iguana]

Svanoy,
I was thinking that I should post my complete code so that you could see my changes as well as possibly benefit any other that may be interested. Thanks again for your assistance. So, here it is:

input X = .5;
input Funds = 2000;
input MaxRisk = 40;

def Entry = high +.02;
def ATR = reference ATR.ATR;
def Riskcents = ATR * X;
def Shares = MaxRisk / Riskcents;
def MaxInvest = Entry * Shares;

# Code below contributed by Svanoy
def AutoX = fold i = 0 to 100 with internalX = X while (Entry * (MaxRisk / (ATR * internalX))) > Funds do internalX + 1;
def AdjustedMaxInvest = if MaxInvest > Funds then (Entry * (MaxRisk / (ATR * AutoX))) else MaxInvest;

AddLabel (yes, "ATR " + Round(ATR, 2), Color.LIGHT_GRAY);
AddLabel (yes, "Entry : $" + roundup(Entry), color.white);
AddLabel (yes, "RiskCents : $" + roundup((Maxrisk/(Maxrisk/(ATR*AutoX))),2), Color.orange);
AddLabel (yes, “MaxShares:" + rounddown((MaxRisk/(ATR * AutoX)),-1), Color.green);
AddLabel (yes, “MaxInvest:" + rounddown(AdjustedMaxInvest,-1), Color.green);
AddLabel (yes, “Risk @ MaxShares: $" + ((Maxrisk/(Maxrisk/(ATR*AutoX)))* ((MaxRisk/(ATR * AutoX)))) , Color.green);
AddLabel (yes, “TgT 1: $" + roundup( Entry +((Maxrisk/(Maxrisk/(ATR*AutoX)))*2),2) , Color.green);
AddLabel (yes, “TgT 1 Profit: $" + rounddown(((MaxRisk/(ATR * AutoX)) *((Maxrisk/(Maxrisk/(ATR*AutoX)))*2)),-1),Color.green);