以下是通达信横盘区源码主图(无源码的请下载附件导入)
{横盘区}
XXX1:=(HHV(H,30)-LLV(L,30))/LLV(L,30)*100<15;
XXX2:=HHV(H,20)<=REF(HHV(H,20),9) AND LLV(L,20)>=REF(LLV(L,20),9);
XXX3:=HHV(H,20)<=REF(HHV(H,10),19) AND LLV(L,20)>=REF(LLV(L,10),19);
XXX:XXX1*XXX2*XXX3 AND REFX(C>REF(HHV(H,30),1),1),NODRAW;
FT:=BARSNEXT(XXX);
HH:=REFX(HHV(H,30),FT);
LL:=REFX(LLV(L,30),FT);
T:=MIN(BARSLAST(H>HH AND FT>29) ,BARSLAST(L29) );
FTT:=REFX(T,FT);
STICKLINE(FT0 ,HH,LL,8,0),COLORAA0044;
STICKLINE(FT=FTT OR XXX,HH,LL,0,0),COLOR00FFFF;
STICKLINE(FT0 ,HH,HH,8,0),COLOR00FFFF;
STICKLINE(FT0 ,LL,LL,8,0),COLOR00FFFF;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
832288163.jpg
|