资金异动副图指标公式源码[通达信公式]

相关标签: 通达信主力异动指标公式 、 主力资金流向指标公式 、 通达信资金异动副图指标 、 主力资金监控指标公式 、 通达信主力资金指标 、 通达信板块异动公式 、

原理解析：
VA1赋值:100-3*(收盘价-65日内最低价的最低值)/(80日内最高价的最高值-65日内最低价的最低值)*100的20日[1日权重]移动平均+2*(收盘价-65日内最低价的最低值)/(80日内最高价的最高值-65日内最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均 VA2赋值:100-3*(开盘价-65日内最低价的最低值)/(80日内最高价的最高值-65日内最低价的最低值)*100的20日[1日权重]移动平均+2*(开盘价-65日内最低价的最低值)/(80日内最高价的最高值-65日内最低价的最低值)*100的20日[1日权重]移动平均的15日[1日权重]移动平均 VA3赋值:VA1<1日前的VA2 AND 成交量(手)>1日前的成交量(手) AND 收盘价>1日前的收盘价 当满足条件VA3ANDCOUNT(VA3,30)=1时,在15位置书写文字,线宽为1,COLORFF00FF A赋值:以收盘价+收盘价*15/100计算的获利盘比例*100 B赋值:以收盘价+收盘价*0/100计算的获利盘比例*100 CC赋值:A-B D赋值:(以收盘价-收盘价*0.1/100计算的获利盘比例-以收盘价-收盘价*15/100计算的获利盘比例)*100 E赋值:CC<3 AND D<0.5 AND 开盘价不等于最低价 A1赋值:最低价 A2赋值:如果最低价>A1,返回0,否则返回如果最高价<A1,返回1,否则返回(A1-最低价+0.01)/(最高价-最低价+0.01) A3赋值:成交量(手)/以最低价计算的获利盘比例 A4赋值:1日前的120日内收盘价的最高值 A5赋值:1日前的120日内收盘价的最低值 A6赋值:100*(收盘价-A5)/(A4-A5) A7赋值:A2>0 OR A2=1 A8赋值:A7 AND A3/3日前的A3>=3 AND A6<80 A9赋值:1日前的A8 OR 2日前的A8 OR 3日前的A8 OR 4日前的A8 A10赋值:A8 AND A9 A11赋值:如果A8的3日过滤,返回5,否则返回0 A12赋值:如果A10的3日过滤ORE,返回10,否则返回0 输出资金进场日:如果A11>0,返回8,否则返回无效数,COLOR00FFFF,线宽为3,STICK 输出资金加仓日:如果A12>0,返回15,否则返回无效数,COLORFF00FF,线宽为4,STICK 当满足条件A11时,在8位置书写文字 当满足条件A12时,在17位置书写文字 VAR1赋值:(收盘价*2+最高价+最低价)/4*10 VAR2赋值:VAR1的13日指数移动平均-VAR1的34日指数移动平均 VAR3赋值:VAR2的5日指数移动平均 VAR4赋值:2*(VAR2-VAR3)*5.5 输出主力:VAR4,画红色,线宽为2 VAR5赋值:(8日内大盘的最高价的最高值-大盘的收盘价)/(8日内大盘的最高价的最高值-8日内大盘的最低价的最低值)*8 VAR6赋值:3*VAR5-2*VAR5的18日[1日权重]移动平均的5日指数移动平均 VAR7赋值:(大盘的收盘价-8日内大盘的最低价的最低值)/(8日内大盘的最高价的最高值-8日内大盘的最低价的最低值)*10 VAR8赋值:(大盘的收盘价*2+大盘的最高价+大盘的最低价)/4 VAR9赋值:VAR8的13日指数移动平均-VAR8的34日指数移动平均 VARA赋值:VAR9的3日指数移动平均 VARB赋值:(VAR9-VARA)/2 VARE赋值:100*(收盘价-34日内收盘价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)的5日简单移动平均-20 VAR10赋值:(最高价+最低价+收盘价)/3 VAR11赋值:(VAR10-VAR10的14日简单移动平均)/(0.015*VAR10的14日平均绝对偏差) VAR12赋值:(VAR10-VAR10的70日简单移动平均)/(0.015*VAR10的70日平均绝对偏差) VAR13赋值:如果VAR11>=150ANDVAR11<200ANDVAR12>=150ANDVAR12<200,返回10,否则返回0 VAR14赋值:如果VAR11<=-150ANDVAR11>-200ANDVAR12<=-150ANDVAR12>-200,返回-10,否则返回VAR13 VAR15赋值:(收盘价-收盘价的11日简单移动平均)/收盘价的11日简单移动平均*100 VAR16赋值:100-VAR15的绝对值 VAR17赋值:如果VAR16<90,返回VAR16,否则返回100 VAR1A赋值:如果VARE>0,返回VARE,否则返回0 VAR1B赋值:如果VAR12>=200ANDVAR11>=150,返回15,否则返回如果VAR12<=-200ANDVAR11<=-150,返回-15,否则返回VAR14+60 VAR1C赋值:VAR1A>48 AND VAR1B>60 AND VAR17<100 当满足条件VAR1CANDCOUNT(VAR1C,30)=1时,在15位置书写文字,线宽为1,COLORFFCC66 输出T1:(VA3 AND 统计30日中满足VA3的天数=1)*28,COLORFFFFFF 输出T:(统计30日中满足A8的天数>=3 AND 统计30日中满足A10的天数>=3)*38,画蓝色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

VA1:=100-3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);
VA2:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);
VA3:=VA1<REF(VA2,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VA3 AND COUNT(VA3,30)=1,15,'有大资金进 关注'),LINETHICK1,COLORFF00FF;
A:=WINNER(CLOSE+CLOSE*15/100)*100;
B:=WINNER(CLOSE+CLOSE*0/100)*100;
CC:=A-B;
D:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
E:=CC<3 AND D<0.5 AND OPEN!=LOW;
A1:=DYNAINFO(6);
A2:=IF(LOW>A1,0,IF(HIGH<A1,1,(A1-LOW+0.01)/(HIGH-LOW+0.01)));
A3:=VOL/WINNER(LOW);
A4:=REF(HHV(CLOSE,120),1);
A5:=REF(LLV(CLOSE,120),1);
A6:=100*(CLOSE-A5)/(A4-A5);
A7:=A2>0 OR A2=1;
A8:=A7 AND A3/REF(A3,3)>=3 AND A6<80;
A9:=REF(A8,1) OR REF(A8,2) OR REF(A8,3) OR REF(A8,4);
A10:=A8 AND A9;
A11:=IF(FILTER(A8,3),5,0);
A12:=IF(FILTER(A10,3) OR E,10,0);
资金进场日:IF(A11>0,8,DRAWNULL),COLOR00FFFF,LINETHICK3,STICK;
资金加仓日:IF(A12>0,15,DRAWNULL),COLORFF00FF,LINETHICK4,STICK;
DRAWTEXT(A11,8,'资金进场');
DRAWTEXT(A12,17,'资金加仓');
VAR1:=(CLOSE*2+HIGH+LOW)/4*10;
VAR2:=EMA(VAR1,13)-EMA(VAR1,34);
VAR3:=EMA(VAR2,5);
VAR4:=2*(VAR2-VAR3)*5.5;
主力:VAR4,COLORRED,LINETHICK2;
{0,COLORWHITE;}
VAR5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
VAR6:=EMA(3*VAR5-2*SMA(VAR5,18,1),5);
VAR7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
VAR8:=(INDEXC*2+INDEXH+INDEXL)/4;
VAR9:=EMA(VAR8,13)-EMA(VAR8,34);
VARA:=EMA(VAR9,3);
VARB:=(VAR9-VARA)/2;
{大盘资金:VARB,COLORGREEN,LINETHICK2;}
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR10:=(HIGH+LOW+CLOSE)/3;
VAR11:=(VAR10-MA(VAR10,14))/(0.015*AVEDEV(VAR10,14));
VAR12:=(VAR10-MA(VAR10,70))/(0.015*AVEDEV(VAR10,70));
VAR13:=IF(VAR11>=150 AND VAR11<200 AND VAR12>=150 AND VAR12<200,10,0);
VAR14:=IF(VAR11<=-150 AND VAR11>-200 AND VAR12<=-150 AND VAR12>-200,-10,VAR13);
VAR15:=(CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*100;
VAR16:=100-ABS(VAR15);
VAR17:=IF(VAR16<90,VAR16,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR12>=200 AND VAR11>=150,15,IF(VAR12<=-200 AND VAR11<=-150,-15,VAR14))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR17<100;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,15,'大笔出货.缩量(低位)则洗.'),LINETHICK1,COLORFFCC66;
T1:(VA3 AND COUNT(VA3,30)=1)*28,COLORFFFFFF;
T:(COUNT(A8,30)>=3 AND COUNT(A10,30)>=3)*38,COLORBLUE;

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】