Blockquote
_SECTION_BEGIN("SuperTrend");
SetBarsRequired(100000,0);
GraphXSpace = 15;
SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor("bkcolor",ColorRGB(0,0, 0)));
GfxSetBkMode(0);
GfxSetOverlayMode(1);
SetBarFillColor(IIf(C>O,ParamColor("Candle UP Color", colorGreen),IIf(C<=O,ParamColor("Candle Down Color", colorRed),colorLightGrey)));
Plot(C,"\nPrice",IIf(C>O,ParamColor("Wick UP Color", colorDarkGreen),IIf(C<=O,ParamColor("Wick Down Color", colorDarkRed),colorLightGrey)),64,0,0,0,0);
SetTradeDelays(1,1,1,1);
p1 = Param("SL Pct" , 100,.1,1000,.1)/100;
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Factor=Param("Factor",3,1,10,1);
Pd=Param("ATR Periods",7,1,100,1);
Up=(H+L)/2+(FactorATR(Pd));
Dn=(H+L)/2-(FactorATR(Pd));
iATR=ATR(Pd);
TrendUp=TrendDown=Null;
trend[0]=1;
changeOfTrend=0;
flag=flagh=0;
for (i = 1; i <BarCount-1; i++) {
TrendUp[i] = Null;
TrendDown[i] = Null;
trend[i]=1;
if (Close[i]>Up[i-1]) {
trend[i]=1;
if (trend[i-1] == -1) changeOfTrend = 1;
}
else if (Close[i]<Dn[i-1]) {
trend[i]=-1;
if (trend[i-1] == 1) changeOfTrend = 1;
}
else if (trend[i-1]==1) {
trend[i]=1;
changeOfTrend = 0;
}
else if (trend[i-1]==-1) {
trend[i]=-1;
changeOfTrend = 0;
}
if (trend[i]<0 && trend[i-1]>0) {
flag=1;
}
else {
flag=0;
}
if (trend[i]>0 && trend[i-1]<0) {
flagh=1;
}
else {
flagh=0;
}
if (trend[i]>0 && Dn[i]<Dn[i-1]){
Dn[i]=Dn[i-1];
}
if (trend[i]<0 && Up[i]>Up[i-1])
{ Up[i]=Up[i-1];
}
if (flag==1)
{ Up[i]=(H[i]+L[i])/2+(Factor*iATR[i]);;
}
if (flagh==1)
{ Dn[i]=(H[i]+L[i])/2-(Factor*iATR[i]);;
}
if (trend[i]==1) {
TrendUp[i]=Dn[i];
if (changeOfTrend == 1) {
TrendUp[i-1] = TrendDown[i-1];
changeOfTrend = 0;
}
}
else if (trend[i]==-1) {
TrendDown[i]=Up[i];
if (changeOfTrend == 1) {
TrendDown[i-1] = TrendUp[i-1];
changeOfTrend = 0;
}
}
}
Plot(TrendUp,"Trend",colorGreen);
Plot(TrendDown,"Down",colorRed);
su = Ref(trend==1,-1);
sd = Ref(trend==-1,-1);
ru = Ref(StochK(15,3)> 40 ,-1);
rd = Ref(StochK(15,3) < 60,-1);
cu = H>Ref( High , -1 );
cd = L<Ref( Low , -1 );
tn = TimeNum();
startTime = 93000; // start in HHMMSS format
endTime = 145900; // end in HHMMSS format
timeOK = tn >= startTime AND tn <= endTime;
d1 = DateNum() > Ref(DateNum(),-1) ;
d2 = BarsSince(d1) ;
//buy1 = cu AND su AND ru;
//short1= cd AND sd AND rd;
buy1= ValueWhen(sd,H,1);
short1=ValueWhen(su,L,1);
Buy = ExRem(H>buy1,sd) AND ru AND timeOk ;
BuyPrice = ValueWhen(sd,H,1);
buyfulsl= ValueWhen(sd,H,1) - ValueWhen(sd,l,1);
Buysl= (BuyPrice - (buyfulsl*p1));
Plot(IIf(su,BuyPrice,Null),"BuyPrice",colorGreen,styleLine);
Plot(IIf(su,Buysl,Null),"Buysl",colorGreen,styleLine);
Sell = L< buysl OR sd OR tn>=endtime;
Short = ExRem(L<short1,su) AND rd AND timeOk;
ShortPrice = ValueWhen(su,L,1);
shortfulsl= ValueWhen(su,H,1)- ValueWhen(su,L,1);
shortsl= (ShortPrice+(shortfulsl*p1));
Plot(IIf(sd,ShortPrice,Null),"ShortPrice",colorGreen,styleLine);
Plot(IIf(sd,shortsl,Null),"shortsl",colorGreen,styleLine);
Cover = H > shortsl OR su OR tn>=endtime;
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
Short=ExRem(Short,Cover);
Cover=ExRem(Cover,Short);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorGreen, 0, L, Offset=-30);
PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorLime, 0, L, Offset=-40);
PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset=-35);
PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorRed, 0, H, Offset=30);
PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorOrange, 0,H, Offset=40);
PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset=-35);
PlotShapes(IIf(Cover, shapeSquare, shapeNone),colorGreen, 0, L, Offset=-30);
PlotShapes(IIf(Cover, shapeSquare, shapeNone),colorLime, 0, L, Offset=-40);
PlotShapes(IIf(Cover, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset=-35);
PlotShapes(IIf(Short, shapeSquare, shapeNone),colorRed, 0, H, Offset=30);
PlotShapes(IIf(Short, shapeSquare, shapeNone),colorOrange, 0,H, Offset=40);
PlotShapes(IIf(Short, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset=-35);
Blockquote
I am not able to code the highlighted part. Please guide. I want re-entry on next day with the condition highlighted in the image. I have shared the work completed till now. Please help.
Regards