#property copyright "VMesquita" #property indicator_chart_window // an indicator is drawn in the main chart window #property indicator_buffers 1 int limit; int init () { return(0); } int deinit() { return(0); } int start() { double O,C,H,L,O1,C1,H1,L1,O2,C2,H2,L2; string text; int counted_bars=IndicatorCounted(); limit=Bars-counted_bars; if(counted_bars<0) { Alert("No Bars.."); return(-1); } for(int i=1; i4*(O-C))&&((C-L)/(0.001+H-L)>=0.75)&&((O-L)(0.001+H-L)>=0.75)) text="Hang"; if(((H-L)>3*(O-C))&&((C-L)/(0.001+H-L)>0.6)&&((O-L)(0.001+H-L)>0.6)) text="Hammer"; if(((H-L)>3*(O-C))&&((H-C)/(0.001+H-L)>0.6)&&((H-O)(0.001+H-L)>0.6)) text="IHammer"; if((O2>C2)&&((O2-C2)/(0.001+H2-L2)>0.6)&&(C2>O1)&&(O1>C1)&&((H1-L1)>(3*(C1-O1)))&&(C>O)&&(O>O1)) text="MStar"; if((O>C)&&(H==0)&&(C==L)) text="LMarubozu"; if((C>O)&&(H==C)&&(O==L)) text="HMarubozu"; if((C1==O1)&&(C2>O2)&&(O>C)&&(L1>H2)&&(L1>H)) text="ABaby"; if((C1==O1)&&(O2>C2)&&(C>O)&&(L2>H1)&&(L>H1)) text="ABaby"; if((C2>O2)&&((C2-O2)/(0.001+H2-L2)>0.6)&&(C2O1)&&((H1-L1)>(3*(C1-O1)))&&(O>C)&&(OO1)&&(((C1+O1)/2)>C)&&(O>C)&&(O>C1)&&(C>O1)&&((O-C)(0.001+(H-L))>0.6)) text="DCloud"; if((C1>O1)&&(O>C)&&(O>=C1)&&(O1>=C)&&((O-C)>(C1-O1))) text="Engulf"; if((O1>C1)&&(C>O)&&(C>=O1)&&(C1>=0)&&((C-O)>(O1-C1))) text="Engulf"; if((O1>C1)&&(C>O)&&(C<=O1)&&(C1<=0)&&((C-O)<(O1-C1))) text="Harami"; if((C1>O1)&&(O>C)&&(O<=C1)&&(O1<=C)&&((O-C)<(C1-O1))) text="Harami"; if((C10.6)) text="Piercing"; if((C>O*1.01)&&(C1>O1*1.01) &&(C2>O2*1.01) &&(C>C1) && (C1>C2) &&(OO1) &&(O1O2) &&(((H-C)/(H-L))<0.2) &&(((H1-C1)/(H1-L1))<0.2)&&(((H2-C2)/(H2-L2))<0.2)) text="Three White Soldiers"; if(((H-L)>4*(O-C))&&((H-C)/(0.001+H-L)>= 0.75)&&((H-O)(0.001+H-L)>=0.75)) text="SStar"; if(C==0) text="Doji"; //If we found a special candlem write in the Chart if(text!="") { ObjectCreate(DoubleToStr(i,0)+" label", OBJ_TEXT, 0, Time[i], H); ObjectSetText(DoubleToStr(i,0)+" label", text, 10, "Arial", Yellow); } } }