通达信整合大盘和个股信息的VOL指标 源...

通达信整合大盘和个股信息的VOL指标 源码



今天是周末，抽时间整理出一套实用指标供大家参考

X:=CONST(DATE);
Y:=IF(DATE<X, 240, FROMOPEN);
上证昨日额亿:REF('999999$AMOUNT',1)/100000000,NODRAW;
上证今日额亿:'999999$AMOUNT'/Y*240/100000000,NODRAW;
上证预计额比:'999999$AMOUNT'/Y*240/REF('999999$AMOUNT',1),NODRAW;
123456, COLORBLACK, NODRAW;
个股预计量万:VOL/Y*240/10000,NODRAW;
预计量比:VOL/Y*240/REF(VOL,1),COLORYELLOW,NODRAW;
总交易日:=BARSCOUNT(CLOSE);
STICKLINE((VOL/Y*240)=CONST(LLV(VOL,60)),CONST(HHV(VOL,70)),(VOL/Y*240),2,0),COLORYELLOW;
STICKLINE((VOL/Y*240)=CONST(LLV(VOL,总交易日)),CONST(HHV(VOL,70)),0,0.5,0),COLOR006432;
DRAWTEXT((VOL/Y*240)=CONST(LLV(VOL,60)) AND (VOL/Y*240)>CONST(LLV(VOL,总交易日)),CONST(HHV(VOL,70))*0.7,'量底'),COLORYELLOW;
DRAWTEXT((VOL/Y*240)=CONST(LLV(VOL,60)) AND (VOL/Y*240)=CONST(LLV(VOL,总交易日)),CONST(HHV(VOL,70))*0.7,'绝对量底'),COLORYELLOW;
NOTEXTVOLUME:VOL,VOLSTICK;
NOTEXTVOL5:MA(VOL,5);
NOTEXTVOL10:MA(VOL,10);
{上证成交额直观描述}
预计变化:=(上证预计额比-1)*100;
预计1:=CONST(IF(预计变化>=40,1,0));
预计2:=CONST(IF(预计变化>=30 AND 预计变化<40,1,0));
预计3:=CONST(IF(预计变化>=20 AND 预计变化<30,1,0));
预计4:=CONST(IF(预计变化>=10 AND 预计变化<20,1,0));
预计5:=CONST(IF(预计变化>=5 AND 预计变化<10,1,0));
预计6:=CONST(IF(ABS(预计变化)<5,1,0));
预计7:=CONST(IF(预计变化<=-5 AND 预计变化>-10,1,0));
预计8:=CONST(IF(预计变化<=-10 AND 预计变化>-20,1,0));
预计9:=CONST(IF(预计变化<=-20 AND 预计变化>-30,1,0));
预计10:=CONST(IF(预计变化<=-30 AND 预计变化>-40,1,0));
预计11:=CONST(IF(预计变化<=-40,1,0));