通达信公式源码 通达信主图顶底指标公式源码

　　通达信公式源码 通达信主图顶底指标公式源码：

　　MA（C，30）;

　　N：=150;判断高低：=3;

　　高：=REF（HHV（H，N），判断高低）;

　　近期顶：REFDATE（高，DATE），COLORGREEN，LINETHICK3;

　　最顶：=REFDATE（近期顶，DATE），NODRAW;

　　出：=最顶=H AND （（C-L）《（O-C） OR （O-L）《（C-O）），NODRAW;

　　STICKLINE（出，C，O，3，0），COLORGREEN;

　　STICKLINE（出，C，O，2，0），COLORGREEN;

　　低：=REF（LLV（L，N），判断高低）;

　　近期底：REFDATE（低，DATE），COLORRED，LINETHICK3;

　　最底：=REFDATE（近期底，DATE），NODRAW;

　　进：=最底=L AND （（C+L）《（O+C） OR （O+L）《（C+O）），NODRAW;

　　STICKLINE（进，H，L，3，0），COLORRED;

　　STICKLINE（进，C，O，2，0），COLORRED;

　　N250：=250;

　　PT250：=CONST（HHVBARS（V，N250））;

　　T250:IF（CURRBARSCOUNT《=N250，CONST（IF（PT250=0，C，REF（C，PT250））），DRAWNULL），COLORMAGENTA，LINETHICK2;

　　IF（CURRBARSCOUNT=PT250+1，T250*1.01，DRAWNULL），CIRCLEDOT，COLORFF0000，LINETHICK2;

　　DRAWTEXT（CURRBARSCOUNT=N250，T250，‘250’），COLOR990000;

　　N120：=120;

　　PT120：=CONST（HHVBARS（V，N120））;

　　T120:IF（CURRBARSCOUNT《=N120，CONST（IF（PT120=0，C，REF（C，PT120））），DRAWNULL），COLORAAAA00，LINETHICK2;

　　IF（CURRBARSCOUNT=PT120+1，T120，DRAWNULL），CIRCLEDOT，COLORFFFF00，LINETHICK2;

　　DRAWTEXT（CURRBARSCOUNT=N120，T120，‘120’），COLORAAAA00;

　　N60：=60;

　　PT60：=CONST（HHVBARS（V，N60））;

　　T60:IF（CURRBARSCOUNT《=N60，CONST（IF（PT60=0，C，REF（C，PT60））），DRAWNULL），COLOR00BB00，LINETHICK2;

　　IF（CURRBARSCOUNT=PT60+1，T60，DRAWNULL），CIRCLEDOT，COLOR00FF00，LINETHICK2;

　　DRAWTEXT（CURRBARSCOUNT=N60，T60，‘60’），COLOR00BB00;

　　N30：=30;

　　PT30：=CONST（HHVBARS（V，N30））;

　　T30:IF（CURRBARSCOUNT《=N30，CONST（IF（PT30=0，C，REF（C，PT30））），DRAWNULL），COLOR0000CC，LINETHICK2;

　　IF（CURRBARSCOUNT=PT30+1，T30，DRAWNULL），CIRCLEDOT，COLOR0000FF，LINETHICK2;

　　DRAWTEXT（CURRBARSCOUNT=N30，T30，‘30’），COLOR0000CC;

　　N20：=20;

　　PT20：=CONST（HHVBARS（V，N20））;

　　T20:IF（CURRBARSCOUNT《=N20，CONST（IF（PT20=0，C，REF（C，PT20））），DRAWNULL），COLORDD00DD，LINETHICK2;

　　IF（CURRBARSCOUNT=PT20+1，T20，DRAWNULL），CIRCLEDOT，COLORFF00FF，LINETHICK2;

　　DRAWTEXT（CURRBARSCOUNT=N20，T20，‘20’），COLORDD00DD;

　　阻力：REFDATE（REF（HHV（H，22），1），DATE），DOTLINE;

　　底：REFDATE（REF（LLV（L，22），1），DATE），DOTLINE;