通达信三级跳高ASI指标(源码)

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:=(A1+B1+C1)/3;
SI:=(X/R)*(K/L1);
ASI:=SUM(SI,9),COLORWHITE;
MAASI:MA(ASI,6),COLORLIRED;
L30:LLV(MAASI,30),COLORGREEN;
L15:LLV(MAASI,15),COLORLIBLUE;
-5,DOTLINE,COLORYELLOW;
0,DOTLINE,COLORGRAY;
DRAWICON(L30<L15 AND REF(L30,1)=REF(L15,1),0,1);
DRAWICON(L30<L15 AND REF(L15,1)>REF(L15,2) AND L15<=REF(L15,1) ,0,1);
DRAWICON(MAASI=L15 AND REF(MAASI,1)>REF(L15,1) AND L30<L15,0,1);
DRAWICON(CROSS(MAASI,-5),-5,1);
STICKLINE(CROSS(MAASI,-5),-5,L30,0,-1),COLORRED;