通达信多功能VOL指标公式源码分享

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)))))); 现量:VOL,NODRAW; 虚拟:IF(CURRBARSCOUNT=0,V*N/M,DRAWNULL),NODRAW,COLORFFFF00; STICKLINE(CURRBARSCOUNT=0ANDN,虚拟,0,10,-1),COLORFFFF00; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,10,0),COLOR0099FF; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,8,0),COLOR11AAFF; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,6,0),COLOR22BBFF; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,4.2,0),COLOR33CCFF; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,3.3,0),COLOR44DDFF; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,2.2,0),COLOR55EEFF; STICKLINE(CLOSE REF(CLOSE,1),0,VOL,0.6,0),COLOR66FFFF; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,10,0),COLOR880000; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,8,0),COLOR991100; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,6,0),COLORAA2200; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,4.2,0),COLORBB3300; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,3.3,0),COLORCC4400; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,2.2,0),COLORDD5500; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,1.2,0),COLOREE6600; STICKLINE(CLOSE =REF(CLOSE,1),0,VOL,0.6,0),COLORFF7700; {预测} Vvol:=IF(CURRBARSCOUNT=1ANDPERIOD=5,V*240/FROMOPEN,DRAWNULL),NODRAW; stICKLINE(CURRBARSCOUNT=1ANDPERIOD=5,VVOL,0,-1,-1),COLOR00C0C0; {柱体} DRAWTEXT_FIX(1,0.00,0,0,'白烛建仓★黄烛加仓★粉烛操盘★红多绿空☆蓝烛清仓☆尾绿出货☆BY:CHH322')COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.05,0,'')COLOR00FF00; VAR1:=(VOL/(((HIGH-LOW)*2)-Abs((CLOSE-OPEN)))); 成交:=VOL; 买盘:=IF((CLOSE OPEN),(VAR1*(HIGH-LOW)),IF((CLOSE OPEN),(VAR1*((HIGH-OPEN)+(CLOSE-LOW))),(VOL/2))); 卖盘:=IF((CLOSE OPEN),(0-(VAR1*((HIGH-CLOSE)+(OPEN-LOW)))),IF((CLOSE OPEN),(0-(VAR1*(HIGH-LOW))),(0-(VOL/2)))); 买卖差:=(买盘+卖盘); STICKLINE((VOL 0),VOL,0,3,1),COLORFFFFFF; STICKLINE((买卖差 0),0,买卖差,3,0),COLOR0000FF; STICKLINE((买卖差 0),0,买卖差,1,0),LINETHICK1,COLOR66FF00; 1:=(VOL/ma(VOL,5)); VAR10:=买盘; VAR20:=卖盘; JX1:=BARSSINCE(买盘); JY1:=IF(((121 JX1)AND(JX1 0)),JX1,120); JY2:=IF(((4 JX1)AND(JX1 0)),JX1,3); VAR30:=MA(VOL,JY2); 动神:=买盘; 鬼力:=VAR20; 神比:=(动神/VAR30); 鬼比:=(鬼力/VAR30); VAR2:=(HIGH-LOW); VAR3:=ABS((OPEN-CLOSE)); VAR4:=(HIGH-IF((CLOSE OPEN),CLOSE,OPEN)); VAR5:=(IF((CLOSE OPEN),OPEN,CLOSE)-LOW); VAR6:=((VAR3/VAR2)*VOL); VAR7:=((VAR4/VAR2)*VOL); VAR8:=((VAR5/VAR2)*VOL); VAR9:=IF(((VOL/CAPITAL) 0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100))))); VARA:=(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5))*100); VARB:=(((MA(CLOSE,5) MA(CLOSE,10))AND(MA(CLOSE,10) MA(CLOSE,30)))AND(MA(CLOSE,30) MA(CLOSE,60))); VARC:=((MA(CLOSE,5) MA(CLOSE,10))AND(MA(CLOSE,10) MA(CLOSE,30))); VARD:=REF(CLOSE,1); VARE:=((SMA(MAX((CLOSE-VARD),0),6,1)/SMA(ABS((CLOSE-VARD)),6,1))*100); VAR40:=((IF((((VAR6 =VAR7)AND(VAR6 =VAR8))AND(CLOSE OPEN)),VAR6,动神)+动神)/2); VAR41:=((IF(((VAR7 VAR6)AND(VAR7 VAR8)),VAR7,动神)+动神)/2); VAR42:=((IF(((VAR8 VAR6)AND(VAR8 VAR7)),VAR8,动神)+动神)/2); VAR50:=((IF((((VAR6 =VAR7)AND(VAR6 =VAR8))AND(CLOSE OPEN)),VAR6,鬼力)+鬼力)/2); 三日上攻:=MA((((VAR40+VAR41)+VAR42)/3),JY2); 三日下攻:=MA(VAR50,JY2); 多头:STICKLINE((CLOSE MA(CLOSE,30)),0,VOL,3,1),COLOR0000FF; 空头:STICKLINE((CLOSE MA(CLOSE,30)),0,VOL,3,1),COLOR00FF00; STICKLINE((鬼力 0),鬼力,0,3,0),COLORFF3399; 加仓:STICKLINE((((VAR6 =VAR7)AND(VAR6 =VAR8))AND(CLOSE OPEN)),0,VAR6,3,0),COLOR00FFFF; 减仓:STICKLINE((((VAR6 =VAR7)AND(VAR6 =VAR8))AND(CLOSE OPEN)),0,VAR6,3,0),COLORFF0000; 洗盘:STICKLINE(((VAR8 VAR6)AND(VAR8 VAR7)),0,VAR8,3,0),COLORFFFFFF; 高卖:STICKLINE(((VAR7 VAR6)AND(VAR7 VAR8)),0,VAR7,3,0),COLORFF00FF; 相对地量:=STICKLINE(((VAR9 2)AND(VOL (MA(VOL,5)/2))),0,VOL,3,0); {柱体加注} 量:V,NODRAW; 倍量:(V/REF(V,1) =1.91ANDCOUNT(C O,1))OR(L REF(H,1)ANDCOUNT(O C,1)ANDV/REF(V,1) =1.91),NODRAW,COLOR3366FF; 低量:V =REF(LLV(V,15),1),NODRAW,COLOR7FFF00; 地量:V =REF(LLV(V,100),1),NODRAW,COLORRED; 平量:ABS(V-HHV(REF(V,1),5))/HHV(REF(V,1),5) =0.03ORABS(V-REF(V,1))/REF(V,1) =0.03,NODRAW,COLOR824173; 倍缩:V =REF(V,1)*0.5,NODRAW,COLOR5C3317; 梯量:COUNT(V REF(V,1),3)=3ANDCOUNT(C O,3)=3,NODRAW,COLOR9932CD; 缩量涨:COUNT(C REF(C,1),2)=2ANDCOUNT(V REF(V,1),2)=2,NODRAW,COLOR996600; DRAWTEXT(倍量,V*1.06,'倍'),COLOR3366FF; DRAWTEXT(低量,V*1.09,'低'),COLOR7FFF00; DRAWTEXT(地量,V*1.12,'地'),COLORRED; DRAWTEXT(平量,V*1.15,'平'),COLOR824173; DRAWTEXT(倍缩,V*1.06,'缩'),COLOR5C3317; DRAWTEXT(梯量,V*1.18,'梯'),COLOR9932CD; DRAWTEXT(缩量涨,V*1.21,'缩涨'),COLOR996600; STICKLINE(倍量,0,V,0.1,0),COLOR3366FF; STICKLINE(低量,0,V,0.1,0),COLOR7FFF00; STICKLINE(地量,0,V,0.1,0),COLORRED; STICKLINE(平量,0,V,0.1,0),COLOR824173; STICKLINE(倍缩,0,V,0.1,0),COLOR5C3317; STICKLINE(梯量,0,V,0.1,0),COLOR9932CD; STICKLINE(缩量涨,0,V,0.1,0),COLOR996600; {画线} :VOL,NODRAW; MA5:MA(V,5),COLORWHITE;{5日均量线是启动线} MA10:MA(V,10),COLORYELLOW;{10日均量线是主力洗盘线，不同个股不同设置}; DRAWICON(crOSS(MA5,MA10),MA5,1); DRAWICON(CROSS(MA10,MA5),MA10,2);

公式解读：

[源码注释]通达信公式动态公式解读

A赋值:周期类型

N赋值:如果A=0,返回1,否则返回如果A=1,返回5,否则返回如果A=2,返回15,否则返回如果A=3,返回30,否则返回如果A=4,返回60,否则返回如果A=5,返回240,否则返回无效数

M赋值:如果N=1,返回如果当前离开盘分钟数关于1的模=0,返回1,否则返回

当前离开盘分钟数关于1的模,否则返回如果N=5,返回如果当前离开盘分钟数关于5的模=0,返回5,否则返回

当前离开盘分钟数关于5的模,否则返回如果N=15,返回如果当前离开盘分钟数关于15的模=0,返回15,否则返回

当前离开盘分钟数关于15的模,否则返回如果N=30,返回如果当前离开盘分钟数关于30的模=0,返回30,否则返回

当前离开盘分钟数关于30的模,否则返回如果N=60,返回?,否则返回?

输出

现量:成交量(手),NODRAW

输出

虚拟:如果到最后交易的周期=0,返回成交量(手)*N/M,否则返回无效数,NODRAW,COLORFFFF00

当满足条件到最后交易的周期=0ANDN时,在虚拟和0位置之间画柱状线,宽度为10,-1不为0则画空心柱.,COLORFFFF00