ASI画线加ASI主图

[复制链接]
查看143 | 回复0 | 2022-6-28 09:05:23 | 显示全部楼层 |阅读模式

抛砖引玉,请大家进一步优化!P 1 100 5,按自己的爱好调
A1:=ABS(H-REF(C,1));
B1:=ABS(L-REF(C,1));
C1:=ABS(H-REF(L,1));
D1:=ABS(REF(C,1)-REF(O,1));
E1:=C-REF(C,1);
F1:=C-O;
G1:=REF(C,1)-REF(O,1);
X:=E1+0.5*F1+G1;
K:=MAX(A1,B1);
R:=IF(A1>B1 AND A1>C1,A1+0.5*B1+0.25*D1,IF(B1>A1 AND B1>C1,B1+0.5*A1+0.25*D1,C1+0.25*D1));
L1:=3;
SI:=16*(X/R)*(K/L1);
ASI:SUM(SI,0);
MA_:MA(ASI,6);

AA1:=REF(ASI,P)=HHV(ASI,2*P+1);
BB1:=FILTER(AA1,P);
CC1:=BACKSET(BB1,P+1);
DD1:=FILTER(CC1,P);{高点}
AA2:=REF(ASI,P)=LLV(ASI,2*P+1);
BB2:=FILTER(AA2,P);
CC2:=BACKSET(BB2,P+1);
DD2:=FILTER(CC2,P);{低点}


前期高点:REF(ASI,BARSLAST(DD1)),COLORFF00FF,NODRAW;
前期低点:REF(ASI,BARSLAST(DD2)),COLOR00FF00,NODRAW;


相对能量:(ASI-前期低点)/(前期高点-前期低点)*100,COLORYELLOW,NODRAW;
R11:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
S11:=R11>REF(R11,1);
DRAWLINE(DD1,ASI,S11,ASI,1),COLORYELLOW;
T11:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
U11:=T11>REF(T11,1);
DRAWLINE(DD2,ASI,U11,ASI,1),COLOR00FF00;

STICKLINE(C>0,前期低点,前期低点,1,0),COLOR00FF00;
STICKLINE(C>0,前期高点,前期高点,1,0),COLORFF00FF;



DRAWICON(CROSS(ASI,前期高点),ASI,1);
 

20094107115562625.gif

20094107115562625.gif

20094107114343333.rar

2.98 KB, 下载次数: 0

售价: 1 金钱  [记录]  [购买]

20094107114343333.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则