通达信再发一个自制的“对应大盘”，用于“股性评价”
{对应大盘}
{通达信 对应大盘 用于股性评价}
STICKLINE(INDEXC>=INDEXO,INDEXO,INDEXC,3,0),COLORRED;
STICKLINE(INDEXC>=INDEXO,INDEXH,INDEXL,0.1,0),COLORRED;
STICKLINE(INDEXC<INDEXO,INDEXO,INDEXC,3,0),COLORGREEN;
STICKLINE(INDEXC<INDEXO,INDEXH,INDEXL,0.1,0),COLORGREEN;
大盘收:INDEXC,NODRAW;
大盘开:INDEXO,NODRAW;
大盘高:INDEXH,NODRAW;
大盘低:INDEXL,NODRAW;
个股涨幅:(CLOSE-REF(C,1))/REF(C,1)*100,NODRAW;
大盘涨幅:(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100,NODRAW,COLORYELLOW;{对应}
个股振幅:(H-L)/L*100,NODRAW;{今日}
大盘振幅:(INDEXH-INDEXL)/INDEXL*100,NODRAW;{对应}
A:=REF(HY_INDEXC,1);{对应行业}
行业涨幅:IF(A>0,(HY_INDEXC-A)*100/A,0),NODRAW,COLORMAGENTA;
对应上涨家数:=INDEXADV{,LINETHICK0};
对应下跌家数:=INDEXDEC{,LINETHICK0};
DRAWTEXT_FIX(1,0.070,0.000,0,STRCAT(STRCAT('大盘总上涨家数: ',CON2STR(DYNAINFO(60),0)),' 家')),COLORRED;
DRAWTEXT_FIX(1,0.210,0.000,0,STRCAT(STRCAT('大盘总下跌家数: ',CON2STR(DYNAINFO(61),0)),' 家')),COLORGREEN;
DRAWTEXT_FIX(1,0.350,0.000,0,STRCAT(STRCAT('对应上涨家数: ',CON2STR(INDEXADV,0)),' 家')),COLORRED;
DRAWTEXT_FIX(1,0.490,0.000,0,STRCAT(STRCAT('对应下跌家数: ',CON2STR(INDEXDEC,0)),' 家')),COLORGREEN;
