[通达信] 通达信心理价位主图源码公式

我是一个兵

通达信心理价位主图源码公式：
E:=(H+L+O+2*C)/5;
CRTP:=E+(H-L);
CRZL:=2*E-L;
CRZC:=2*E-H;
CRFZ:=E-(H-L);
CRXL:=(E+CRTP+CRZL+CRZC+CRFZ)/5;
{次日心理价位}
高:=CONST(CRTP ),COLORRED;
阻:=CONST(CRZL),COLORC7C9FF;
支:=CONST(CRZC),COLOR7C9CFF;
反:=CONST(CRFZ),COLORDD00DD;
高TP:DRAWLINE(CURRBARSCOUNT=5+1, 高, ISLASTBAR, 高, 1),COLOR0000FF;
阻力:DRAWLINE(CURRBARSCOUNT=5+1, 阻, ISLASTBAR, 阻, 1),COLORC7C9FF;
支撑:DRAWLINE(CURRBARSCOUNT=5+1, 支, ISLASTBAR, 支, 1),COLOR7C9CFF;
反转价:DRAWLINE(CURRBARSCOUNT=5+1, 反, ISLASTBAR, 反, 1),COLORDD00DD;
DRAWTEXT(ISLASTBAR, 反转价, '反转价'),LINETHICK1,COLORDD00DD;
DRAWTEXT(ISLASTBAR, 支撑, '支撑'),LINETHICK1,COLOR7C9CFF;
DRAWTEXT(ISLASTBAR, 阻力, '阻力'),LINETHICK1,COLORC7C9FF;
DRAWTEXT(ISLASTBAR, 高TP, '高TP'),LINETHICK1,COLOR0000FF;