通达信公式源码概况:
指标类别:通达信公式
授权方式: 免费版
指标评级: ★★★★★
指标分类: 策略
画线方法: 副图
一、通达信量价合一指标公式
MA5:EMA(CLOSE,5),COLORWHITE;
MA10:EMA(CLOSE,10),COLORYELLOW;
MA20:EMA(CLOSE,20),COLORFF00FF;
MA40:EMA(CLOSE,40),COLOR00FF00;
MA60:EMA(C,60),COLOR888888;
MA250:EMA(C,250),COLORFFCC66;
月价托:=MA5>MA20ANDMA5>MA10ANDCROSS(MA10,MA20);
季价托:=MA20>MA60ANDMA20>MA40ANDCROSS(MA40,MA60);
短长价托:=MA5>MA60ANDMA5>MA10ANDCROSS(MA10,MA60);
DRAWICON(月价托,L-0.10,3);
DRAWICON(季价托,L-0.10,4);
DRAWICON(短长价托,L-0.10,5);
vol5:=MA(VOL,5);
VOL10:=MA(VOL,10);
VOL20:=MA(VOL,20);
量托:=VOL5>=VOL20ANDCROSS(VOL10,VOL20)ANDREF(VOL10,1)<REF(VOL20,1);
DRAWICON(量托,L-0.10,6);
AA:=BARSLAST(MA40>MA60AND(MA20=MA40ORMA20>MA40));
BB:=REF(COUNT(C<MA60,AA)=AA,1);
CC:=CROSS(C,MA60)ANDVOL>MA(VOL,5)AND(C-REF(C,1))/REF(C,1)*100>3;
芙蓉出水:=BBANDCC;
DRAWICON(芙蓉出水,L-0.10,9);
M_V:=(MA(AMOUNT,5)/MA(v,5))/1000;
L_H:=MA(H,5)*M_V;
L_O:=MA(O,5)*M_V;
L_C:=MA(C,5)*M_V;
L_L:=MA(L,5)*M_V;
STICKLINE(L_C>=L_O,L_L,L_H,0.00001,0),COLORRED;
STICKLINE(L_C>L_O,L_O,L_C,2.5,0),COLORRED;
STICKLINE(L_C>L_O,L_O,L_C,0.6,0),COLORCC66FF;
STICKLINE(L_C<L_O,L_O,L_C,2.5,0),COLORFF6600;
STICKLINE(L_C<L_O,L_O,L_C,0.6,0),COLORFF9900;
STICKLINE(L_C<L_O,L_L,L_H,0.00001,0),COLORFF9900;
20,COLORMAGENTA,LINEDASHDOT;-20,COLORCYAN,LINEDASHDOT;
M1:=2;m2:=60;
均价:=(C+(H+l)/2*0.382+(c+O)/2*0.618)/2;
差价:=((c-REF(c,1))*0.382+(C-O)*0.618)*0.382;
乖离率:=(SMA(均价,M1,1)-MA(SMA(均价,2,1),M2))/MA(SMA(均价,2,1),M2)*100,COLORWHITE;
MID:乖离率,COLORWHITE;
MA1:ema(eMA(MID,4)-EMA(差价,246)/4,2),COLORRED;
MA2:EMA(MA1,5),COLORYELLOW;
PARTLINE(MA1<=REF(MA1,1),MA1),COLOR22FF22,COLOR00bb00;
PARTLINE(MA2<=REF(MA2,1),MA2),COLORFFCC66;
PARTLINE(乖离率<=MA1,乖离率),COLORGRAY;
QJ:=ema(eMA(均价,4)-EMA(差价,246)/4,2);
J1:=IF(CLOSE>QJ,VOL,0);
J2:=IF(CLOSE<QJ,VOL,0);
量能:MA(SUM(J1-J2,15),4)/100000,COLORMAGENTA;
趋势:EMA(量能,3),COLORGREEN;
VAR3:(量能-趋势),LINETHICK;
共振点:=CROSS(MID,mA1)ANDVAR3>ref(VAR3,1)AND(-15>ref(MA1,1)OR(MA1>-5));
XG:IF(共振点,15,0),COLOR00AA99;
如果要看大盘指数请把量能改为,量能:IF(STKTYPE=0,MA(SUM(J1-J2,15),4)/100000000,MA(SUM(J1-J2,15),4)/100000),COLORMAGENTA;
这样就可以看大盘指数了.否则均线乖离压缩的太厉害.
这是改进后的大盘副图,没有改以前,是看不到均线乖离三条线的
INPUT:N1(1,1,5),N2(3,0,10),N3(1.8,0,10);{一日平滑,滤去成交额3000万以下,缩放量影响系数设为1.8}
c1:=ref(c,1);
c2:=ref(c,2);{c,c1,c2是价格的绝对数值}
p:=(c-c1)/c1*100;
p1:=(c1-c2)/c2*100;{p,p1称为'绝对价格变化',是价格曲线的一阶差分}
pt:=p-p1;{pt称为'相对价格变化',是绝对价格变化曲线的一阶差分,是价格曲线的二阶差分}
{pt正向表示目前趋势向上突变,负向表示趋势向下突变,0表示趋势不变}
xt:=IF(AMOUNT/10000000>N2,pt,0);{成交额小于N2(千万)的不用计算}
xt1:=MA(xt,N1);{对xt进行N1日平滑处理}
xt2:=xt1*(vol/capital);{由绝对缩放量影响对xt1进行实化}
{再由相对缩放量影响对xt2进行修正:}
mt:=VOL-REF(VOL,1);{定义vol对上一天的绝对增减量}
mt1:=(vol+mt)/vol;{若是放量,则以放量后的vol为基准}
mt2:=vol/REF(vol,1);{若是缩量,则以缩量前的ref.vol为基准}
m:=IF(mt>0,mt1,mt2);
{自定义相对缩变系数}
n:=POW(m,N3);{调整缩放系数强度}
xt3:=xt2*n;{执行修正}
x:xt3,PRECISION2,linethick;{求输出}
//输出
0,PRECISION2,linethick1;{画零位线}
DRAWTEXTEx(c,1,0,0,'量价突变脉冲(自编)'),COLORYELLOW;
DRAWTEXTEX(c,1,0,150,'证券代码:'+STKLABEL+'证券名称:'+STKNAME+''),ColorFFAA00;
stickline(x>0,0,x,6,0),color0000aa;
stickline(x>0,0,x,3,0),color0000cc;
stickline(x>0,0,x,1,0),color0000ff;
stickline(x<0,x,0,6,0),color00aa00;
stickline(x<0,x,0,3,0),color00cc00;
stickline(x<0,x,0,1,0),color00ff00;{画强度柱体}
[源码注释]通达信公式动态翻译结果
N赋值:5
RSV赋值:(收盘价-N日内最低价的最低值)/(N日内最高价的最高值-N日内最低价的最低值)*100
VARB2赋值:(RSV/2+22)*1
量赋值:成交量(手)的13日指数移动平均
资金赋值:成交额(元)的13日指数移动平均
过滤赋值:((资金 /量) / 100)
提纯赋值:(((收盘价 -过滤) / 过滤) * 100)
黄金赋值:((提纯 < (0)) AND 直线拟合)
低买赋值:如果黄金ANDRSV<VARB2-2,返回50,否则返回0
上涨分界赋值:25
KDJ提前金叉赋值:(上涨分界上穿低买)
输出极限抄底:KDJ提前金叉
每日通达信公式解答:
编写条件:
macd三次底背离的选股公式。
编写方法:
DIFF:=Ema(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
A1:=BArslAst(REF(crOSS(DIFF,DEA),1));
A2:=REF(CLOSE,A1+1)>CLOSEANDDIFF>REF(DIFF,A1+1)ANDCROSS(DIFF,DEA);
三次底背离:COUNT(A2,60)=3;
评论(0)