通达信心理价位主图指标

源码

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;