市场情绪通达信副图指标

NOTEXT1:400,COLORFF9933;

DRAWTEXT(ISLASTBAR=1,700,'冰点'),COLORFF9933;

NOTEXT2:1000,COLORGREEN;

DRAWTEXT(ISLASTBAR=1,1450,'弱势'),COLORLIGREEN;

NOTEXTX:2000,COLORLIBLUE;

DRAWTEXT(ISLASTBAR=1,2230,'偏弱'),COLORLIBLUE;

NOTEXT3:2500,COLORGRAY,DOTLINE;

DRAWTEXT(ISLASTBAR=1,2750,'稍强'),COLORLIRED;

NOTEXT4:3000,COLORLIRED;

DRAWTEXT(ISLASTBAR=1,3450,'强势'),COLORRED;

DRAWTEXT(ISLASTBAR=1,4250,'过热'),COLORMAGENTA;

NOTEXT5:4000,COLORRED;

NOTEXT6:4600,COLORFF00FF;

NOTEXT7:"880005$C",COLOR15B2DD;

NOTEXT8:"880005$C",CIRCLEDOT,COLOR15B2DD,LINETHICK1;

SJ:=ISLASTBAR AND MACHINETIME>085000 AND MACHINETIME<170000 AND MACHINEWEEK<6 AND MACHINEWEEK<>0;

N:=MONTH;

YF:=IF(C<>0,MONTH,DRAWNULL);

CZ:=YF<>REF(YF,1);

JJ0:=BARSLAST(CZ);

{JJ1:=BARSLASTS(CZ,N-(N-1));}

{JJ2:=BARSLASTS(CZ,N-(N-1)+1);}

QS1:=COUNT("880005$C">=3000,JJ0+1);

{QS2:=COUNT("880005$C">=3000,JJ2-JJ1+1);}

{　上涨:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$C",0),'家')),COLORRED,NODRAW;}

　下跌:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$O",0),'家')),COLORGREEN,NODRAW;

　涨幅≥3%:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$C"-"880005$ADVANCE"-"880006$C",0),'家')),COLORLIRED,NODRAW;{不包含涨停}

　跌幅≥3%:DRAWTEXT(C<>0,0,VARCAT(VAR2STR("880005$O"-"880005$DECLINE"-"880006$O",0),'家')),COLORLIGREEN,NODRAW;{不包含跌停}

　涨停:DRAWTEXT(C<>0,0,VARCAT(VAR2STR(IF(SJ,"880006$C",SCJYVALUE(24,1,0)),0),'家')),NODRAW,COLORMAGENTA;{交易日8:50-17:00返回停板家数里的数据,其余时间返回不包含ST涨停的涨停家数}

　跌停:DRAWTEXT(C<>0,0,VARCAT(VAR2STR(IF(SJ,"880006$O",SCJYVALUE(24,2,0)),0),'家')),NODRAW,COLORCYAN;{交易日8:50-17:00返回停板家数里的数据,其余时间返回不包含ST跌停的跌停家数};

{　上涨≥3000家:DRAWTEXT(C<>0,0,VARCAT(VAR2STR(IF(YF<>0,QS1,QS2),0),'天')),COLOR09C9E0,NODRAW; }  {当月或往月上涨家数>=3000的天数统计};