通达信公式源码概况：
指标类别：通达信公式
授权方式： 免费版
指标评级： ★★★★★
指标分类： 策略
画线方法： 副图
一、通达信倍量收阳选股指标公式
T1:=REF(vol,1)=LLV(V,100);
T2:=V/T1>1.95;
T3:=C>OANDC>REF(C,1);
选股:T1ANDT2ANDT3;
低量:=LLV(vol,34)=ref(VOL,3);
倍缩量:=ref(VOL,3)/REF(VOL,4)<0.5;
低量and倍缩量;
预量:IF(CURRBARSCOUNT=1ANDPERIOD=5,vol*240/FROMOPEN,DRAWNULL),NODRAW;
stICKLINE(CURRBARSCOUNT=1ANDPERIOD=5,预量,0,3,-1),COLORFFFFFF;
量＿价:=1;CTKG:=1;
W:=量＿价;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
TJA:=ZZ>=maX(C,O)ANDCTKG=1;{倒锤头};
TJB:=ZZ<=MIN(C,O)ANDCTKG=1;{正锤头};
ZF:=IF(TJA,1,IF(TJB,-1,0));{正负数};
TJ0:=TJAORTJB;
TJ1:=H=LANDC>REF(C,1);{一字涨停};
TJ2:=H=LANDC<REF(C,1);{一字跌停};
TJ3:=H=LANDC=REF(C,1);{连续一字涨、跌停};
量_价:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE;{平盘量,白色}
{以下4句组合属核心公式，版权属于JIPGEMLING.见凌见}
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
ZL:=2*(H-L)+Abs(C-O)+3*IF(TJ3,EPSL,ABS(EE));
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL;
买卖差:JGL_DX*量_价,COLOR13AADD,NODRAW;
DX%:JGL_DX*100,NODRAW;
买盘:量_价*(1+JGL_DX)/2,COLOR1133AA,NODRAW;
卖盘:量_价*(1-JGL_DX)/2,COLORFFFF00,NODRAW;
{加入成交量移动平均线}
M5:MA(V,5),COLORRED;M10:MA(V,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0;
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN;
{因为可能会出现卖出量为0的BUG，所以放在最后参考}
净量:主动买盘+主动卖盘,NODRAW;
STICKLINE(C<O,0,VOL,3.2,0),COLORFF1100;
STICKLINE(C<O,0,VOL,2.7,0),COLORFF3300;
STICKLINE(C<O,0,VOL,2.1,0),COLORFF5500;
STICKLINE(C<O,0,VOL,1.5,0),COLORFF7700;
STICKLINE(C<O,0,VOL,0.9,0),COLORFF9900;
STICKLINE(C<O,0,VOL,0.3,0),COLORFFBB00;
STICKLINE(C=OANDC<REF(C,1),0,VOL,3.2,0),COLOR006000;
STICKLINE(C=OANDC<REF(C,1),0,VOL,2.7,0),COLOR007500;
STICKLINE(C=OANDC<REF(C,1),0,VOL,2.1,0),COLOR009100;
STICKLINE(C=OANDC<REF(C,1),0,VOL,1.5,0),COLOR00A600;
STICKLINE(C=OANDC<REF(C,1),0,VOL,0.9,0),COLOR00BB00;
STICKLINE(C=OANDC<REF(C,1),0,VOL,0.3,0),COLOR00CC00;
STICKLINE(C=OANDC>REF(C,1),0,VOL,3.2,0),COLOR555555;
STICKLINE(C=OANDC>REF(C,1),0,VOL,2.7,0),COLOR777777;
STICKLINE(C=OANDC>REF(C,1),0,VOL,2.1,0),COLOR999999;
STICKLINE(C=OANDC>REF(C,1),0,VOL,1.5,0),COLORBBBBBB;
STICKLINE(C=OANDC>REF(C,1),0,VOL,0.9,0),COLORDDDDDD;
STICKLINE(C=OANDC>REF(C,1),0,VOL,0.3,0),COLORFFFFFF;
STICKLINE(C>O,0,VOL,3.2,0),COLORFF11FF;
STICKLINE(C>O,0,VOL,2.7,0),COLORFF33FF;
STICKLINE(C>O,0,VOL,2.1,0),COLORFF55FF;
STICKLINE(C>O,0,VOL,1.5,0),COLORFF77FF;
STICKLINE(C>O,0,VOL,0.9,0),COLORFF99FF;
STICKLINE(C>O,0,VOL,0.3,0),COLORFFBBFF;
{这一句很好，也就是中间出现黄色，为活跃资金}
资金异动:VOL/MA(VOL,55)*100,COLORYELLOW;
STICKLINE(主动买盘>0,0,主动买盘,3.2,0),COLOR000055;
STICKLINE(主动买盘>0,0,主动买盘,2.7,0),COLOR000077;
STICKLINE(主动买盘>0,0,主动买盘,2.1,0),COLOR000099;
STICKLINE(主动买盘>0,0,主动买盘,1.5,0),COLOR0000BB;
STICKLINE(主动买盘>0,0,主动买盘,0.9,0),COLOR0000DD;
STICKLINE(主动买盘>0,0,主动买盘,0.3,0),COLOR0000FF;
STICKLINE(主动卖盘<0,0,主动卖盘,3.2,0),COLOR006000;
STICKLINE(主动卖盘<0,0,主动卖盘,2.7,0),COLOR007500;
STICKLINE(主动卖盘<0,0,主动卖盘,2.1,0),COLOR009100;
STICKLINE(主动卖盘<0,0,主动卖盘,1.5,0),COLOR00A600;
STICKLINE(主动卖盘<0,0,主动卖盘,0.9,0),COLOR00BB00;
STICKLINE(主动卖盘<0,0,主动卖盘,0.3,0),COLOR00CC00;
STICKLINE(资金异动>100,0,VOL,0.6,0),COLORYELLOW;
{这两句为放量，如果低位，当然要关注了，柱子中画一白一蓝两线，用于提示}
STICKLINE(V>=3*REF(V,1),V/3,V/3,5.9,0),COLORBLUE,LINETHICK2;
STICKLINE(V>=2*REF(V,1),V/2,V/2,3.9,0),COLORYELLOW,LINETHICK2;
MA5:=MA(C,5);
MA60:=MA(C,25);
AA:=CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10));
AA1:=CROSS(C,MA(C,20)) AND CROSS(C,MA(C,60));
AA2:=REF(C<O AND (O-C)/C*100<2,1);
AA3:=(H-C)/C*100<1 AND MA(C,5)>REF(MA(C,5),1);
AA4:AA AND AA1 AND AA2 AND AA3 ;
收阳:=C>O ;
今阳:=C>O AND C/O>=1.03 AND ABS(O-REF(O,1))/O<=0.010 AND 收阳
AND ABS(C-REF(C,1))/C<=0.015 AND C/L<=1.045
AND O<=REF(O,1);
低开并列双阳线: REF(收阳,1) AND 今阳;
AA:=(VOL>1.5*REF(VOL,1)
AND VOL>REF(MA(VOL,21),1)
AND CLOSE>1.03*OPEN
AND CLOSE=HHV(CLOSE,21)
AND CLOSE<1.25*LLV(CLOSE,21)
AND REF(CLOSE,1)<1.2*REF(LLV(CLOSE,20),1)
AND REF(CLOSE,1)<1.5*REF(LLV(CLOSE,60),1)
AND REF(CLOSE,1)<2*REF(LLV(CLOSE,120),1));
启动:AA,LINETHICK0;
DRAWBAND(0>启动,RGB(0,0,0),0<启动,RGB(255,0,0));
[源码注释]通达信公式动态翻译结果
阴线价赋值:如果收阴线,返回最高价,否则返回30
输出阴30:30日内阴线价的最高值
每日通达信公式解答：
编写要求：
（1）昨日股价K线阴线回调到140日均线，而且回调到140日均线当日不能放量；（2）今日收阳线、涨幅大于3%。
公式在线网解答：
ref(c,1)<ref(o,1)andbetween(ref(ma(c,140),1),ref(c,1),ref(o,1))andref(v,1)<0.7*ref(v,2)andc>oandc>1.03*ref(c,1);
评论(0)