通达信量能平台指标公式源码

{10加30日量能平台}
 {近10日量能}
N:=10;
 T1:=CONST(HHVBARS(V,N));
 T0:IF(CURRBARSCOUNT<=N+3,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORFF00FF;
 IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT,COLORFF00FF;
 DRAWTEXT(ISLASTBAR,T0,' 量能平台'),COLORCC00CC;
 {前30日量能}
Y:=30;
 Y1:=CONST(REF(HHVBARS(V,Y),T1+1)+T1+1);
 Y0:IF(CURRBARSCOUNT<=T1+Y+3 AND CURRBARSCOUNT>=T1+1,CONST(REF(C,Y1)),DRAWNULL),COLOR999999;
 IF(CURRBARSCOUNT=Y1+1,Y0,DRAWNULL),CIRCLEDOT,COLORCCCCCC;
 {前20日量能}
W:=20;
 W1:=CONST(REF(HHVBARS(V,W),T1+1)+T1+1);
 W0:IF(CURRBARSCOUNT<=T1+W+3 AND CURRBARSCOUNT>=T1+1,CONST(REF(C,W1)),DRAWNULL),COLOR009999;
 IF(CURRBARSCOUNT=W1+1,W0,DRAWNULL),CIRCLEDOT,COLOR00CCCC;
 {前10日量能}
M:=10;
 Q1:=CONST(REF(HHVBARS(V,M),T1+1)+T1+1);
 Q0:IF(CURRBARSCOUNT<=T1+M+3 AND CURRBARSCOUNT>=T1+1,CONST(REF(C,Q1)),DRAWNULL),COLOR009900;
 IF(CURRBARSCOUNT=Q1+1,Q0,DRAWNULL),CIRCLEDOT,COLOR00CC00;