Hello! I have the strategy code:
At first pBear worked for me. 2 positions of 2 lots were opened and stops were established for them. All perfectly. The second time pBear worked, and for the first position of 2 lots, stops were placed at 2 lots, and for the second position of 2 lots - at 4. And when the stops were executed, a 2-lot turn occurred. The log of work in the attachment.
Code:
protected void pBull()
{
if (!buyOn)
return;
if (UseTrend && !IsRising(ValuesAlligatorTeeth))
{
Log("Limit not setted. Outside trend for " + patternType + " time " + Time[0], LogLevel.Information);
Draw.Diamond(this, "NTrendBull" + Time[0], true, 0, Open[0] - TickSize * 35, System.Windows.Media.Brushes.Red);
return;
}
double price = Low[0];
double bar = High[0] - Low[0];
double sl, tp, entry;
Log("Set Limit Order type " + patternType + " time " + Time[0], LogLevel.Information);
for (int index = 0; index < fibo_count; index++)
{
int half = 0;
Order order = null;
Order orderH = null;
entry = price + bar * fiboArr[index, 0] / 100;
if (entry >= GetCurrentAsk())
continue;
if (onFixSL)
sl = entry - fixSL * TickSize;
else
sl = price + bar * fiboArr[index, 1] / 100;
if (onFixTP)
tp = entry + fixTP * TickSize;
else
tp = price + bar * fiboArr[index, 2] / 100;
if (CloseHalf && lotCorr > 1)
{
half = lotCorr / 2;
orderH = EnterLongLimit(0, true, half, entry, signalCorr[index] + "_1");
}
order = EnterLongLimit(0, true, lotCorr - half, entry, signalCorr[index]);
if (orderH == null && order == null)
{
Log("null order " + Time[0], LogLevel.Information);
orderCorr[index] = null;
orderCorrHalf[index] = null;
continue;
}
if (sl == entry)
sl -= TickSize;
if (tp == entry)
tp += TickSize;
if (order != null)
{
SetStopLoss(signalCorr[index], CalculationMode.Price, sl, false);
SetProfitTarget(signalCorr[index], CalculationMode.Price, tp, MITTP);
}
if (orderH != null)
{
SetStopLoss(signalCorr[index] + "_1", CalculationMode.Price, sl, false);
SetProfitTarget(signalCorr[index] + "_1", CalculationMode.Price, tp, MITTP);
}
signalTP[index] = tp;
signalWork[index] = false;
orderCorr[index] = order;
orderCorrHalf[index] = orderH;
Log("Set Limit Order success. " + index + " time" + Time[0], LogLevel.Information);
}
}
protected void pBear()
{
if (!sellOn)
return;
if (UseTrend && !IsFalling(ValuesAlligatorTeeth))
{
Log("Limit not setted. Outside trend for " + patternType + " time " + Time[0], LogLevel.Information);
Draw.Diamond(this, "NTrendBear" + Time[0], true, 0, Open[0] + TickSize * 50, System.Windows.Media.Brushes.Red);
return;
}
double price = High[0];
double bar = High[0] - Low[0];
double sl, tp, entry;
Log("Set Limit Order type " + patternType + " time " + Time[0], LogLevel.Information);
for (int index = 0; index < fibo_count; index++)
{
int half = 0;
Order order = null;
Order orderH = null;
entry = price - bar * fiboArr[index, 0] / 100;
if (entry <= GetCurrentBid())
continue;
if (onFixSL)
sl = entry + fixSL * TickSize;
else
sl = price - bar * fiboArr[index, 1] / 100;
if (onFixTP)
tp = entry - fixTP * TickSize;
else
tp = price - bar * fiboArr[index, 2] / 100;
if (CloseHalf && lotCorr > 1)
{
half = lotCorr / 2;
orderH = EnterShortLimit(0, true, half, entry, signalCorr[index] + "_1");
}
order = EnterShortLimit(0, true, lotCorr - half, entry, signalCorr[index]);
if (orderH == null && order == null)
{
Log("null order " + Time[0], LogLevel.Information);
orderCorr[index] = null;
orderCorrHalf[index] = null;
}
if (sl == entry)
sl += TickSize;
if (tp == entry)
tp -= TickSize;
if (order != null)
{
SetStopLoss(signalCorr[index], CalculationMode.Price, sl, false);
SetProfitTarget(signalCorr[index], CalculationMode.Price, tp, MITTP);
}
if (orderH != null)
{
SetStopLoss(signalCorr[index] + "_1", CalculationMode.Price, sl, false);
SetProfitTarget(signalCorr[index] + "_1", CalculationMode.Price, tp, MITTP);
}
signalTP[index] = tp;
signalWork[index] = false;
orderCorr[index] = order;
orderCorrHalf[index] = orderH;
Log("Set Limit Order success. " + index + " time " + Time[0], LogLevel.Information);
}
}
Comment