Simple Coding Help - No Promise.

[manishchan]

I have this afl which shows pivot,s/r, current and previous day low and high for all days. I need this, pivot,s/r, current and previous day low, appear for current day only. How to hide for previous days? I tried but not successful. Seniors kindly help


_SECTION_BEGIN("Price");
SetChartBkGradientFill( ParamColor("BgTop",colorBlack),ParamColor("BgBottom",colorBlack),ParamColor("Titleblock",colorLightGrey));
SetChartOptions(0,chartShowDates|chartShowArrows|chartLogarithmic|chartWrapTitle);
GraphXSpace = 5;
Plot(C,"",colorWhite,styleCandle);
_SECTION_END();

//Previous Days HI LO //

DayH = TimeFrameGetPrice("H", inDaily, -1); DayHI = LastValue (DayH,1);// yesterdays high
DayL = TimeFrameGetPrice("L", inDaily, -1); DayLI = LastValue (DayL,1); // yesterdays low
DayC = TimeFrameGetPrice("C", inDaily, -1); // yesterdays close
DayO = TimeFrameGetPrice("O", inDaily); // current day open
DayH2= TimeFrameGetPrice("H", inDaily, -2); DayH2I = LastValue (DayH2,1); // Two days before high
DayL2= TimeFrameGetPrice("L", inDaily, -2); DayL2I = LastValue (DayL2,1); // Two days before low
DayH3= TimeFrameGetPrice("H", inDaily, -3); DayH3I = LastValue (DayH3,1); // Three days before high
DayL3= TimeFrameGetPrice("L", inDaily, -3); DayL3I = LastValue (DayL3,1); // Three days before low

numbars = LastValue(Cum(Status("barvisible")));
hts = -33.5;

YHL = ParamToggle("Yesterday HI LO","Show|Hide",1);
if(YHL==1) {
Plot(DayL,"YL",colorTurquoise,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(DayH,"YH",colorTurquoise,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
PlotText(" YH " , LastValue(BarIndex())-(numbars/Hts), DayHI, colorTurquoise);
PlotText(" YL " , LastValue(BarIndex())-(numbars/Hts), DayLI, colorTurquoise);
}

TDBHL = ParamToggle("2/3Days before HI LO","Show|Hide",0);
if(TDBHL==1) {
Plot(DayL2,"2DBL",colorTurquoise,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(DayH2,"2DBH",colorTurquoise,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(DayL3,"3DBL",colorTurquoise,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(DayH3,"3DBH",colorTurquoise,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
PlotText(" 2DBH " , LastValue(BarIndex())-(numbars/Hts), DayH2I, colorTurquoise);
PlotText(" 2DBL " , LastValue(BarIndex())-(numbars/Hts), DayL2I, colorTurquoise);
PlotText(" 3DBH " , LastValue(BarIndex())-(numbars/Hts), DayH3I, colorTurquoise);
PlotText(" 3DBL " , LastValue(BarIndex())-(numbars/Hts), DayL3I, colorTurquoise);
}

// Pivot Levels //
PP = (DayL + DayH + DayC)/3; PPI = LastValue (PP,1); // Pivot
R1 = (PP * 2) - DayL; R1I = LastValue (R1,1); // Resistance 1
S1 = (PP * 2) - DayH; S1I = LastValue (S1,1); // Support 1
R2 = PP + R1 - S1; R2I = LastValue (R2,1); // Resistance 2
S2 = PP - R1 + S1; S2I = LastValue (S2,1); // Support 2
R3 = PP + R2 - S1; R3I = LastValue (R3,1); // Resistance 3
S3 = PP - R2 + S1; S3I = LastValue (S3,1); // Support 3

ppl = ParamToggle("Pivot Levels","Show|Hide",1);
if(ppl==1) {
Plot(PP, "PP",colorYellow,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(R1, "R1",colorViolet,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(S1, "S1",colorViolet,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(R2, "R2",colorViolet,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(S2, "S2",colorViolet,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(R3, "R3",colorViolet,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(S3, "S3",colorViolet,styleDots|styleNoLine|styleNoRescale|styleNoTitle);

PlotText(" Pivot ", LastValue(BarIndex())-(numbars/Hts), PPI, colorYellow);
PlotText(" R1 " , LastValue(BarIndex())-(numbars/Hts), R1I, colorViolet);
PlotText(" S1 " , LastValue(BarIndex())-(numbars/Hts), S1I, colorViolet);
PlotText(" R2 " , LastValue(BarIndex())-(numbars/Hts), R2I, colorViolet);
PlotText(" S2 " , LastValue(BarIndex())-(numbars/Hts), S2I, colorViolet);
PlotText(" R3 " , LastValue(BarIndex())-(numbars/Hts), R3I, colorViolet);
PlotText(" S3 " , LastValue(BarIndex())-(numbars/Hts), S3I, colorViolet);
}
// Camerilla Levels //

rg = (DayH - DayL);

H5=DayC+1.1*rg; H5I = LastValue (H5,1);
H4=DayC+1.1*rg/2; H4I = LastValue (H4,1);
H3=DayC+1.1*rg/4; H3I = LastValue (H3,1);
H2=DayC+1.1*rg/6; H2I = LastValue (H2,1);
H1=DayC+1.1*rg/12; H1I = LastValue (H1,1);
L1=DayC-1.1*rg/12; L1I = LastValue (L1,1);
L2=DayC-1.1*rg/6; L2I = LastValue (L2,1);
L3=DayC-1.1*rg/4; L3I = LastValue (L3,1);
L4=DayC-1.1*rg/2; L4I = LastValue (L4,1);
L5=DayC-1.1*rg; L5I = LastValue (L5,1);

pcl = ParamToggle("Camerilla Levels","Show|Hide",0);
if(pcl==1) {
Plot(H5,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(H4,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(H3,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(H2,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(H1,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(L1,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(L2,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(L3,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(L4,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
Plot(L5,"",colorRose,styleDots|styleNoLine|styleNoRescale|styleNoTitle);
PlotText(" H5 = " , LastValue(BarIndex())-(numbars/Hts), H5I +0.05, colorRose);
PlotText(" H4 = " , LastValue(BarIndex())-(numbars/Hts), H4I +0.05, colorRose);
PlotText(" H3 = " , LastValue(BarIndex())-(numbars/Hts), H3I +0.05, colorRose);
PlotText(" H2 = " , LastValue(BarIndex())-(numbars/Hts), H2I +0.05, colorRose);
PlotText(" H1 = " , LastValue(BarIndex())-(numbars/Hts), H1I +0.05, colorRose);
PlotText(" L1 = " , LastValue(BarIndex())-(numbars/Hts), L1I +0.05, colorRose);
PlotText(" L2 = " , LastValue(BarIndex())-(numbars/Hts), L2I +0.05, colorRose);
PlotText(" L3 = " , LastValue(BarIndex())-(numbars/Hts), L3I +0.05, colorRose);
PlotText(" L4 = " , LastValue(BarIndex())-(numbars/Hts), L4I +0.05, colorRose);
PlotText(" L5 = " , LastValue(BarIndex())-(numbars/Hts), L5I +0.05, colorRose);
}

// Current Days Hi Lo //
THL = ParamToggle("Todays Hi Lo","Show|Hide",1);
if(THL==1) {
isRth = TimeNum() >= 084500 & TimeNum() <= 085959;
isdRth = TimeNum() >= 084500 & TimeNum() <= 160000;
aRthL = IIf(isRth, L, 1000000);
aRthH = IIf(isdRth, H, Null);
aRthLd = IIf(isdRth, L, 1000000);
DayH = TimeFrameCompress( aRthH, inDaily, compressHigh );
DayH = TimeFrameExpand( DayH, inDaily, expandFirst );
DayL = TimeFrameCompress( aRthLd, inDaily, compressLow );
DayL = TimeFrameExpand( DayL, inDaily, expandFirst );
Bars = BarsSince(TimeNum() >= 94500 AND TimeNum() < 095959);//,BarIndex(),1); // AND DateNum()==LastValue(DateNum());
x0 = BarCount-LastValue(Bars);
x1 = BarCount-1;
DayHline=LineArray(x0,LastValue(DayH),x1,LastValue (DayH),0);
DayLline=LineArray(x0,LastValue(DayL),x1,LastValue (DayL),0);
DayHlineI = LastValue (DayHline,1);
DayLlineI = LastValue (DayLline,1);
Plot(DayHline,"DayH",colorYellow,styleBar|styleNoRescale|styleNoTitle);
Plot(DayLline,"DayL",colorYellow,styleBar|styleNoRescale|styleNoTitle);
PlotText(" Day Hi " , LastValue(BarIndex())-(numbars/Hts), DayHlineI +0.05, colorYellow);
PlotText(" Day Lo " , LastValue(BarIndex())-(numbars/Hts), DayLlineI +0.05, colorYellow);
}

You should be able to hide them in parameter.

 

[laeeque]

Sir
It is well known fact that all stocks are not performing in single direction as in co-relation of benchmark index, even though every body looks at indices to trade a particular stock in the same direction as of Nifty.Traders do this silly mistake to track and trade stocks in the direction of Nifty index
Hence to track whether which stock is going perform tomorrow, we must know price wise movement in co-ordination of Nifty index movement of said stock.

I do this analysis from last five-six years and found very advance tracking of performing stocks. Some times even two three days before breakout.

Strategy
There is limitation to this method due to manual watching record of one week.If you can make AFL of this one then the result would by dynamic.
For e.g. 1) I select ten stocks to trade for tomorrow.(Limitation) and found
2) Today Nifty closed gaining upside (Bullish)
3) price movement of selected ten stock are not as similar as NIFTY move. some of which do as exactly as Nifty index move while others are out performing and remaining few are in opposite direction in resemblance of index.
4) Now there two methods to select stock for trading tomorrow.
5)Select for Buy stocks which out performing today, only if index continue its previous day's move (Bullish)
6)Select for sell stocks which adversely performing today, only if index move against its previous days direction say (bearish).
7)For this we have to rank them from 1 to 10 sequentially as per price move.
8)Select buy for no. 1 and sell for no. 10

This process is digging out hidden buying and selling either by big fund or operators etc. Whom do not want others to enter stocks of their own interest. Hence eliminating major stupid traders activity in the ring.
This silent activity in stock is causing breakout or breakdown next day.

If I do not interpret properly, you can ask me more.
Hope for further helpul AFL in this regrads
Thanks

 

[cachu]

i have free day can help you.. send me details

 

[moneyshare]

You should be able to hide them in parameter.

If hide in parameter, it is not appearing for current day also. I need it for current day only. Kindly help

 

[deepakraoa]

Hi MoneyShare,
Request if you can have a quick glance at this thread post
http://www.traderji.com/amibroker/95596-morning-afternoon-evening-session-plotter.html

 

[ma5yk]

I currently use this AFL to color my bars.

OB = H > Ref( H, -1 ) AND L < Ref( L, -1 ) ; //outsidebar blue
IB = H < Ref( H, -1 ) AND L > Ref( L, -1 ) ; //insidebar grey  
UB = H > Ref( H, -1 ) AND L > Ref( L, -1 ) ; //upbar lime
DB = L < Ref( L, -1 ) AND H < Ref( H, -1 ) ; //downbar red
//NB = L == Ref( L, -1 ) OR H == Ref( H, -1 ) ; //neutralbar gold
NBL = int(L) == Ref( int(L), -1 ) ; //neutralbar gold
NBH = int(H) == Ref( int(H), -1 ) ; //neutralbar gold

Plot( C, "", 
	IIf( OB , colorBlue, 
	IIf( IB, colorGrey40, 
	IIf( UB , colorGreen, 
	IIf( DB, colorOrange, 
	IIf( NBL, colorLightOrange, 
	IIf( NBH, colorPaleGreen, colorBlueGrey ) ) ) ) ) ), 
		ParamStyle("Chart Style", styleCandle, maskPrice) | styleThick, Null, Null, 0, 1, 2 ); // last param is line width as percent of bar

Symptom: Whats happens is that the above code only checks the previous bar to mark an inside/outside bar.

Problem: I would like to mark all inside/outside bars the same color UPTO the bar that breaks out of the range that started with the first inside/outside bar.

Concern: the inside bar range starts from PREVIOUS bar while outside bar range starts from CURRENT bar.

Please help.

 

[josh1]

I want to find all stocks having MA(Volume,20)>10 Lakh from 1-8-2014 and with the MA(Volume,20)

Cond1 = MA( Volume, 20 ) > 1000000;
//Cond2 = MA(Volume,19)>1000000;
Buy = Cond1; // AND Cond2 ;

AddColumn (MA(V,20), "Volume") ;

AddColumn is not working

 

[amitrandive]

I want to find all stocks having MA(Volume,20)>10 Lakh from 1-8-2014 and with the MA(Volume,20)

Cond1 = MA( Volume, 20 ) > 1000000;
//Cond2 = MA(Volume,19)>1000000;
Buy = Cond1; // AND Cond2 ;

AddColumn (MA(V,20), "Volume") ;

AddColumn is not working

Try this.Slight modification needed.

http://www.w isesto cktrader.com/indicators/1205-volum-scan
(please remove spaces)

 

[sumitalwar]

hello


1) i need a scanner ( for amibroker ) when any scrip which forms a 3 /5 day higher-highs and higher lows consecutively.

and similarly lower high and lower low when any scrip forms a 3/5 day consecutively[/QUOTE]


2) i need candle stick pattern identification for only bullish engulfing and bearish engulfing .

need an afl which plots the same on chart so that i cud do some visual back testing

please provide an afl for both of the above .


thanks and best regards


regards

 

[amitrandive]

I want to find all stocks having MA(Volume,20)>10 Lakh from 1-8-2014 and with the MA(Volume,20)

Cond1 = MA( Volume, 20 ) > 1000000;
//Cond2 = MA(Volume,19)>1000000;
Buy = Cond1; // AND Cond2 ;

AddColumn (MA(V,20), "Volume") ;

AddColumn is not working

First , I posted when you had posted the conditions , now the corrected working code

Cond1 = MA( Volume, 20 ) > 1000000;
//Cond2 = MA(Volume,19)>1000000;
Buy = Cond1; // AND Cond2 ;
Filter=Buy;
AddColumn (MA(V,20), "Volume") ;