|
以下是通达信能量平台主图指标 源码 贴图（无源码的请下载附件导入）
N:=55;
PE:=VOL*ABS((C-REF(C,1))/REF(C,1));
PEP:=IF(PE<REF(PE,1) AND REF(PE,1)>REF(PE,2),REF(PE,1),DRAWNULL);
XD1:=BARSLAST(PEP=CONST(FINDHIGH(PEP,1,N,1)));
EP1:IF(CURRBARSCOUNT<=N+2,CONST(REF(C,XD1+1)),DRAWNULL),COLOR4171FE;
IF(CURRBARSCOUNT=CONST(XD1+1+1),EP1,DRAWNULL),CIRCLEDOT,COLOR4171FE;
DRAWTEXT(CURRBARSCOUNT=5,EP1,'EP1'),COLOR4171FE;
XD2:=BARSLAST(PEP=CONST(FINDHIGH(PEP,1,N,2)));
EP2:IF(CURRBARSCOUNT<=N+2,CONST(REF(C,XD2+1)),DRAWNULL),COLOR00ECEC;
IF(CURRBARSCOUNT=CONST(XD2+1+1),EP2,DRAWNULL),CIRCLEDOT,COLOR00ECEC;
DRAWTEXT(CURRBARSCOUNT=5,EP2,'EP2'),COLOR00ECEC;
XD3:=BARSLAST(PEP=CONST(FINDHIGH(PEP,1,N,3)));
EP3:IF(CURRBARSCOUNT<=N+2,CONST(REF(C,XD3+1)),DRAWNULL),COLORFEFEFE;
IF(CURRBARSCOUNT=CONST(XD3+1+1),EP3,DRAWNULL),CIRCLEDOT,COLORFEFEFE;
DRAWTEXT(CURRBARSCOUNT=5,EP3,'EP3'),COLORFEFEFE;
1136122397.jpg
| 
