通达信平台压力线主图指标 源码

T10:=CONST(HHVBARS(V,10));
EP10:IF(CURRBARSCOUNT<=10+3,CONST(IF(T10=0,C,REF(C,T10))),DRAWNULL),COLORFEFEFE;
IF(CURRBARSCOUNT=T10+1,EP10,DRAWNULL),CIRCLEDOT,COLORFEFEFE;

T20→10:=CONST(REF(HHVBARS(V,10),10)+10);
EP20→10:IF(CURRBARSCOUNT<=20+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T20→10)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T20→10+1,EP20→10,DRAWNULL),CIRCLEDOT,COLOR00CC00;
T30→20:=CONST(REF(HHVBARS(V,10),20)+20);
EP30→20:IF(CURRBARSCOUNT<=30+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T30→20)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T30→20+1,EP30→20,DRAWNULL),CIRCLEDOT,COLOR00CC00;

T45→30:=CONST(REF(HHVBARS(V,15),30)+30);
EP45→30:IF(CURRBARSCOUNT<=45+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T45→30)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T45→30+1,EP45→30,DRAWNULL),CIRCLEDOT,COLOR00CC00;

T65→45:=CONST(REF(HHVBARS(V,20),45)+45);
EP65→45:IF(CURRBARSCOUNT<=65+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T65→45)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T65→45+1,EP65→45,DRAWNULL),CIRCLEDOT,COLOR00CC00;