等级: 免费版
- 注册:
- 2022-7-5
- 曾用名:
|

楼主 |
发表于 2023-4-21 20:10
|
显示全部楼层
源码:
S:=2;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1);
VB1:=FILTER(A1,10);
C1:=BACKSET(VB1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1);
VB2:=FILTER(A2,10);
C2:=BACKSET(VB2,10+1);
LD:=FILTER(C2,10);
AAD:=REF(C,BARSLAST(HD));
BA:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
A3:=LLV(LOW,1);
A4:=LLV(LOW,5);
A5:=LLV(LOW,8);
A6:=HHV(H,21);
A7:=LLV(LOW,21),COLORRED;
A8:=(A6+A7)/2;
高点压力:IF(T1,AAD,AAD),COLORGREEN,POINTDOT,LINETHICK3;
低点支撑:IF(T2,BA,BA),COLORRED,POINTDOT,LINETHICK3;
TT:=REFX(NOT(T1),1)&&T1;
TTT:=REFX(NOT(T2),1)&&T2;
DRAWLINE(TT,AAD+S*MINPRICE,1,AAD-S*MINPRICE,COLORYELLOW),LINETHICK2;
DRAWLINE3(TT,AAD+S*MINPRICE,BARSLAST(CROSS(T1,0.5)),1,AAD-S*MINPRICE,BARSLAST(CROSS(T1,0.5)),0),COLORYELLOW,LINETHICK2;
DRAWSL(TT,AAD+S*MINPRICE,0,-BARSLAST(CROSS(T1,0.5)),0,COLORYELLOW),LINETHICK2;
DRAWSL(TT,AAD-S*MINPRICE,0,-BARSLAST(CROSS(T1,0.5)),0,COLORYELLOW),LINETHICK2;
DRAWLINE(TTT,BA+S*MINPRICE,1,BA-S*MINPRICE,COLORRED),LINETHICK2;
DRAWLINE3(TTT,BA+S*MINPRICE,BARSLAST(CROSS(T2,0.5)),1,BA-S*MINPRICE,BARSLAST(CROSS(T2,0.5)),0),COLORRED,LINETHICK2;
DRAWSL(TTT,BA+S*MINPRICE,0,-BARSLAST(CROSS(T2,0.5)),0,COLORRED),LINETHICK2;
DRAWSL(TTT,BA-S*MINPRICE,0,-BARSLAST(CROSS(T2,0.5)),0,COLORRED),LINETHICK2;
FILLRGN(T1,AAD+S*MINPRICE,AAD-S*MINPRICE,RGB(255,255,166));
FILLRGN(T2,BA+S*MINPRICE,BA-S*MINPRICE,RGB(255,106,106));
|
-
-
效果图
|