通达信 虚拟成交量

源码

A:=PERIOD;
 N:=IF(A=0,1,IF(A=1,5,IF(A=2,15,IF(A=3,30,IF(A=4,60,IF(A=5,240,DRAWNULL))))));
 M:=IF(N=1,IF(MOD(FROMOPEN,1)=0,1,
 MOD(FROMOPEN,1)),IF(N=5,IF(MOD(FROMOPEN,5)=0,5,
 MOD(FROMOPEN,5)),IF(N=15,IF(MOD(FROMOPEN,15)=0,15,
 MOD(FROMOPEN,15)),IF(N=30,IF(MOD(FROMOPEN,30)=0,30,
 MOD(FROMOPEN,30)),IF(N=60,IF(MOD(FROMOPEN,60)=0,60,
 MOD(FROMOPEN,60)),IF(N=240,FROMOPEN,DRAWNULL))))));
虚量:IF(CURRBARSCOUNT=1 AND A,VOL*N/M,VOL),NODRAW,COLORMAGENTA;
 STICKLINE(CURRBARSCOUNT=1 AND N,虚量,0,-1,-1),COLOR00C0C0;
总量:VOL,VOLSTICK;
 AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买:IF(CLOSE>OPEN,AA*(HIGH-LOW),
 IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,COLORSTICK;
卖:IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),
 IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),COLORGREEN,COLORSTICK,LINETHICK2;
差额:买+卖,COLORFFFF00,NODRAW;
 MA10:=MA(VOL,10);

 

上一篇:通达信连跌暴跌是机会,止跌回升抢反弹(指标 副图/选股源码贴图无未来)    下一篇:通达信无中生有,阴阳动则生万物(指标 副图/选股源码贴图无未来)