等级: 免费版
- 注册:
- 2022-8-25
- 曾用名:
|
N1:=5;
N2:=3;
AA:=H>REF(HHV(H,N1),1) && H>=REFX(HHV(H,N2),N2),NODRAW;
BB:=L<REF(LLV(L,N1),1) && L<=REFX(LLV(L,N2),N2),NODRAW;
X1:=BB||ISLASTBAR&&BARSLAST(BB)>BARSLAST(AA);
X2:=AA||ISLASTBAR&&BARSLAST(BB)<BARSLAST(AA);
DRAWLINE3(X1,REF(H,HHVBARS(IF(AA,H,0),SUMBARS(X1,2))),HHVBARS(IF(AA,H,0),SUMBARS(X1,2)),X2,REF(L,LLVBARS(IF(BB,L,100000),SUMBARS(X2,2))),LLVBARS(IF(BB,L,100000),SUMBARS(X2,2)),0),COLORGREEN,LINETHICK1;
DRAWLINE3(X2,REF(L,LLVBARS(IF(BB,L,100000),SUMBARS(X2,2))),LLVBARS(IF(BB,L,100000),SUMBARS(X2,2)),X1,REF(H,HHVBARS(IF(AA,H,0) ,SUMBARS(X1,2))),HHVBARS(IF(AA,H,0),SUMBARS(X1,2)),0),COLORRED,LINETHICK1;
DD1:=CROSS(BACKSET(COUNT(BB||ISLASTBAR&&BARSLAST(BB)>BARSLAST(AA),BARSLAST(AA||ISLASTBAR&&BARSLAST(BB)<BARSLAST(AA)))&&BB||ISLASTBAR&&BARSLAST(BB)>BARSLAST(AA),HHVBARS(IF(AA,H,0),SUMBARS(BB||ISLASTBAR&&BARSLAST(BB)>BARSLAST(AA),2))+1),0.5);
KK1:=CROSS(BACKSET(COUNT(AA||ISLASTBAR&&BARSLAST(BB)<BARSLAST(AA),BARSLAST(BB||ISLASTBAR&&BARSLAST(BB)>BARSLAST(AA)))&&AA||ISLASTBAR&&BARSLAST(BB)<BARSLAST(AA),LLVBARS(IF(BB,L,100000),SUMBARS(AA||ISLASTBAR&&BARSLAST(BB)<BARSLAST(AA),2))+1),0.5);
DRAWHORIZONTALLINE(DD1,L,COLORCYAN);
DRAWHORIZONTALLINE(KK1,H,COLORYELLOW);
DRAWTEXT(KK1,H,'开多'),COLORMAGENTA,FONTSIZE19;
DRAWTEXT(DD1,L,'开空'),COLORGREEN,FONTSIZE19;
HH:=CROSS(BACKSET(X1&&COUNT(X1,BARSLAST(X2))=1,HHVBARS(IF(AA,H,0),SUMBARS(X1,2))+1),0.5);
LL:=CROSS(BACKSET(X2&&COUNT(X2,BARSLAST(X1))=1,LLVBARS(IF(BB,L,100000),SUMBARS(X2,2))+1),0.5);
DRAWHORIZONTALLINE(HH&&L>REF(L,1),REF(L,1),COLORCYAN),DOT;
DRAWHORIZONTALLINE(LL&&H<REF(H,1),REF(H,1),COLORYELLOW),DOT;
DD:KK1&&LL&&H<REF(H,1),NODRAW;
KK:DD1&&HH&&L>REF(L,1),NODRAW;
DRAWSL(HH&&L>REF(L,1),REF(L,1),0,-1,0,COLORCYAN),DOT;
DRAWSL(LL&&H<REF(H,1),REF(H,1),0,-1,0,COLORYELLOW),DOT;
|
|