通达信虚拟K线指标副图源码

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

MTIME:=MOD(FROMOPEN,TOTAL);

CTIME:=IF(MTIME<0.5,TOTAL,MTIME);

 

VAMO:=IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),AMOUNT/100000000.0*TOTAL/CTIME,DRAWNULL),NODRAW;

STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VAMO,0,-1,-1),COLOR00C0C0;

 

日:AMOUNT/100000000.0,VOLSTICK;

倍量:日>=REF(日,1)*2,COLORYELLOW,NODRAW;

缩量:REF(日,1)>=日*2,COLOR1D7300,NODRAW;

地量:日=LLV(日,250),COLORFF6600,NODRAW;

天量:日=HHV(日,250),COLORRED,NODRAW;

 

STICKLINE(倍量, 0,日,2,0),COLORYELLOW;

STICKLINE(缩量, 0,日,2,0),COLOR1D7300;

STICKLINE(地量, 0,日,2,0),COLORFF6600;

STICKLINE(天量,0,日,2,0),COLORRED;

 

成交额:=IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2),'亿'),

STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万')),COLOR1D7300,NODRAW;

DRAWTEXT_FIX(1,0.95,0.0,0,成交额),COLORWHITE;