您现在的位置:程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

叠加MACD和KDJ指标公式[其他软件公式]

相关标签:kdj+macd共振指标公式 、 主图叠加macd指标公式 、 macd叠加rsi 指标公式 、 kdj与macd重叠的指标 、 kdj与macd结合指标 、 macd与kdj的组合指标 、 macd与kdj指标相反 、 技术指标macd和kdj 、 macd叠加expma指标 、 kdj叠加rsi 指标公式 、 k线叠加macd指标公式 、 macd叠加wr指标 、 macd叠加rsi指标 、 kdj+macd叠加公式 、

 

叠加MACD和KDJ 飞狐公式
{以下显示叠加指针的数值}

原理解析:

 输出K:"KDJ的K",线宽为0,画白色

输出D:"KDJ的D",线宽为0,画黄色
输出R1:"RSI的RSI1",线宽为0,COLORC080FF
输出R2:"RSI的RSI2",线宽为0,COLORFF8080
输出R3:"RSI的RSI3",线宽为0,COLOR87F8F4
输出F:"平滑异同平均的DIFF",线宽为0,COLOR72C072
输出A:"平滑异同平均的DEA",线宽为0,COLORE98210
输出M:"平滑异同平均的MACD",线宽为0,画白色
Q赋值:SYSPARAM(3)-SYSPARAM(2)
P赋值:SYSPARAM(3)
KH赋值:Q日内最高价的最高值
KL赋值:Q日内最低价的最低值
DH赋值:Q日内K和D的较大值的最高值
DL赋值:Q日内K和D的较小值的最低值
MH赋值:Q日内F和A的较大值的最高值
ML赋值:Q日内F和A的较大值的最低值
RH赋值:Q日内R1和R2的较大值和R3的较大值的最高值
RL赋值:Q日内R1和R2的较小值和R3的较小值的最低值
BD赋值:(KH-KL)/(DH-DL)/3
BM赋值:(KH-KL)/(MH-ML)/3
BR赋值:(KH-KL)/(RH-RL)/3
WK赋值:(KH-KL)/3
WD赋值:(KH+KL-(DH+DL)*BD)/2-WK[P]
WM赋值:(KH+KL-(MH+ML)*BM)/2
WR赋值:(KH+KL-(RH+RL)*BR)/2+WK[P]
PARTLINE(1,K*BD[P]+WD[P]),画白色
PARTLINE(1,D*BD[P]+WD[P])画黄色
PARTLINE(1,R1*BR[P]+WR[P]),COLORC080FF
PARTLINE(1,R2*BR[P]+WR[P]),COLORFF8080
PARTLINE(1,R3*BR[P]+WR[P]),COLOR87F8F4
PARTLINE(1,F*BM[P]+WM[P]),COLOR72C072
PARTLINE(1,A*BM[P]+WM[P]),COLORE98210
当满足条件M>0时,在M*BM[P]+WM[P]和WM[P]位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,POINTDOT,画洋红色
当满足条件M<0时,在M*BM[P]+WM[P]和WM[P]位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,POINTDOT,画绿色
PARTLINE(1,WM[P]),画白色
PARTLINE(1,20*BR[P]+WR[P]),画绿色,POINTDOT
PARTLINE(1,80*BR[P]+WR[P]),画红色,POINTDOT
PARTLINE(1,50*BR[P]+WR[P]),画黄色,POINTDOT
PARTLINE(1,20*BD[P]+WD[P]),画绿色,POINTDOT
PARTLINE(1,80*BD[P]+WD[P]),画红色,POINTDOT
PARTLINE(1,50*BD[P]+WD[P]),画黄色,POINTDOT
当满足条件P=BARPOS时,在(80*BR[P]+WR[P])*1.015位置书写文字画白色,ALIGN0
当满足条件P=BARPOS时,在(50*BR[P]+WR[P])*1.015位置书写文字画白色,ALIGN0
当满足条件P=BARPOS时,在(20*BR[P]+WR[P])*1.015位置书写文字画白色,ALIGN0
当满足条件P=BARPOS时,在(20*BD[P]+WD[P])*1.015位置书写文字画白色,ALIGN0
当满足条件P=BARPOS时,在(50*BD[P]+WD[P])*1.015位置书写文字画白色,ALIGN0
当满足条件P=BARPOS时,在(80*BD[P]+WD[P])*1.015位置书写文字画白色,ALIGN0
当满足条件P=BARPOS时,在WM[P]*1.015位置书写文字画白色,ALIGN0
A赋值:若是否最后一个周期则将最近上次K上穿D距今天数+1周期置为1
 

源码:

 

k:"kdj.k",linethick,COLORWHITE;
d:"kdj.d",linethick0,COLORYELLOW;
r1:"rsi.rsi1",linethick0,ColorC080FF;
r2:"rsi.rsi2",linethick0,ColorFF8080;
r3:"rsi.rsi3",linethick0,Color87F8F4;
f:"macd.diff",linethick0,Color72C072;
a:"macd.dea",linethick0,ColorE98210;
m:"macd.macd",linethick0,COLORWHITE;
{以下定义叠加区间(在这里是可见K线的范围)}
q:=SYSPARAM(3)-SYSPARAM(2);
p:=SYSPARAM(3);
{以下计算叠加比和叠加平移量}
{1、叠加字段高度}
kh:=hhv(h,q);
kL:=LLv(L,q);
dh:=hhv(max(k,d),q);
dL:=LLv(min(k,d),q);
mh:=hhv(max(f,a),q);
mL:=LLv(max(f,a),q);
rh:=hhv(max(max(r1,r2),r3),q);
rL:=LLv(min(min(r1,r2),r3),q);
{2、叠加比}
bd:=(kh-kL)/(dh-dL)/3;
bm:=(kh-kL)/(mh-mL)/3;
br:=(kh-kL)/(rh-rL)/3;
{3、叠加平移量}
wk:=(kh-kL)/3;
wd:=(kh+kL-(dh+dL)*bd)/2-wk[p];
wm:=(kh+kL-(mh+mL)*bm)/2;
wr:=(kh+kL-(rh+rL)*br)/2+wk[p];
{以下画叠加线}
PARTLINE(1,k*bd[p]+wd[p]),COLORWHITE;
PARTLINE(1,d*bd[p]+wd[p])COLORYELLOW;
PARTLINE(1,r1*br[p]+wr[p]),ColorC080FF;
PARTLINE(1,r2*br[p]+wr[p]),ColorFF8080;
PARTLINE(1,r3*br[p]+wr[p]),Color87F8F4;
PARTLINE(1,f*bm[p]+wm[p]),Color72C072;
PARTLINE(1,a*bm[p]+wm[p]),ColorE98210;
STICKLINE(m>0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORMAGENTA;
STICKLINE(m<0,m*bm[p]+wm[p],wm[p],0.1,0),POINTDOT,COLORGREEN;
{以下画叠加指针的横坐标线}
PARTLINE(1,wm[p]),COLORWHITE;
PARTLINE(1,20*br[p]+wr[p]),COLORGREEN,POINTDOT;
PARTLINE(1,80*br[p]+wr[p]),COLORred,POINTDOT;
PARTLINE(1,50*br[p]+wr[p]),COLORYELLOW,POINTDOT;
PARTLINE(1,20*bd[p]+wd[p]),COLORGREEN,POINTDOT;
PARTLINE(1,80*bd[p]+wd[p]),COLORred,POINTDOT;
PARTLINE(1,50*bd[p]+wd[p]),COLORYELLOW,POINTDOT;
{以下显示叠加指针的横坐标值}
DRAWTEXT(p=BARPOS,(80*br[p]+wr[p])*1.015,'80\nrsi')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(50*br[p]+wr[p])*1.015,'50\nrsi')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(20*br[p]+wr[p])*1.015,'20\nrsi')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(20*bd[p]+wd[p])*1.015,'20\nkdj')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(50*bd[p]+wd[p])*1.015,'50\nkdj')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,(80*bd[p]+wd[p])*1.015,'80\nkdj')COLORWHITE,ALIGN0;
DRAWTEXT(p=BARPOS,wm[p]*1.015,'0\nmacd')COLORWHITE,ALIGN0;A:=BACKSET(ISLASTBAR,BARSLAST(CROSS(K,D))+1);

 

 

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

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容