DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);MACD:=(DIF-DEA)*2,COLORSTICK;CTD4:=IF(HIGH>LOW,(CTD1/CTD2+CTD3/CTD2)*VOL,0);HPTP:=SUM(CTD4,10)/10000,COLORSTICK;TKXL:=(DIF-DEA)*2;XVYO:=TKXL>REF(TKXL,1);FG01:=BACKSET(HH,6)>BACKSET(HH,5);FD01:=BACKSET(LL,6)>BACKSET(LL,5);FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));GQ:=L>REF(H,1) AND DAY<>REF(DAY,1);DQ:=H<REF(L,1) AND DAY<>REF(DAY,1);FGH:=REF(H,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));FGH1:=REF(H,BARSLAST(FG0)+1);FGL1:=REF(L,BARSLAST(FG0)+1);FGL2:=REF(L,BARSLAST(FG0)+2);FDH2:=REF(H,BARSLAST(FD0)+2);FDH:=REF(H,BARSLAST(FD0));FDL:=REF(L,BARSLAST(FD0));FDH1:=REF(H,BARSLAST(FD0)+1);FDL1:=REF(L,BARSLAST(FD0)+1);FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FG1:=FGH>FDZH AND FG0;FD1:=FDL<FGZL AND FD0;FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));BHG:=COUNT(BH0,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));BHD:=COUNT(BH0,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));BGQ:=COUNT(GQ,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));BDQ:=COUNT(DQ,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));BK0:=IF(BHG>0,BHG+2,IF(BHD,BHD+2,3));BK1:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));G1X:=(FG AND BARSLAST(FD)>BK1);D1X:=(FD AND BARSLAST(FG)>BK1);G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X)) OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X)) OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1)));D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);NN:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));UU:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));L1:=CROSS(BACKSET(NN,BARSLAST(UU)+1),0.5),NODRAW;H1:=CROSS(BACKSET(UU,BARSLAST(NN)+1),0.5),NODRAW;HH1:=VALUEWHEN(H1,H),NODRAW;HH2:=VALUEWHEN(H1,REF(HH1,1)),NODRAW;HH3:=VALUEWHEN(H1,REF(HH2,1)),NODRAW;HH4:=VALUEWHEN(H1,REF(HH3,1)),NODRAW;HH5:=VALUEWHEN(H1,REF(HH4,1)),NODRAW;HH6:=VALUEWHEN(H1,REF(HH5,1)),NODRAW;LL1:=VALUEWHEN(L1,L),NODRAW;LL2:=VALUEWHEN(L1,REF(LL1,1)),NODRAW;LL3:=VALUEWHEN(L1,REF(LL2,1)),NODRAW;LL4:=VALUEWHEN(L1,REF(LL3,1)),NODRAW;LL5:=VALUEWHEN(L1,REF(LL4,1)),NODRAW;LL6:=VALUEWHEN(L1,REF(LL5,1)),NODRAW;X:=BACKSET(ISLASTBAR,SUMBARS(H1||L1,6));DRAWHORIZONTALLINE(H1&&X,H,COLORYELLOW);DRAWHORIZONTALLINE(L1&&X,L,COLORYELLOW);DRAWLINE3(ISLASTBAR&&LL1>LL2,LL2,SUMBARS(L1,2)-1,ISLASTBAR,LL1,SUMBARS(L1,1)-1,1),COLORWHITE,LINETHICK2;DRAWLINE3(ISLASTBAR&&HH1<HH2,HH2,SUMBARS(H1,2)-1,ISLASTBAR,HH1,SUMBARS(H1,1)-1,1),COLORWHITE,LINETHICK2;P1:=SUMBARS(L1,1);P2:=SUMBARS(H1,1);DRAWICON(CROSS(C,HH1)&&P1<P2&&X,L,4);DRAWTEXT(BARSLAST(CROSS(C,HH1)&&P1<P2&&X)<=3&&C<HH1,H,' 2B');DRAWICON(CROSSDOWN(C,LL1)&&P1>P2&&X,H,5);DRAWTEXT(BARSLAST(CROSSDOWN(C,LL1)&&P1>P2&&X)<=3&&C>LL1,H,' 2B');
|