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

乘风操盘副图指标公式之一:顺势而为(KDJ+MACD+CCI+RSI)[其他软件公式]

相关标签:

 

{乘风操盘副图之一:顺势而为(KDJ+MACD+CCI+RSI)}

 

原理解析:

填充背景
赋值: 1日前的收盘价
RSI1赋值:收盘价-LC和0的较大值的14日[1日权重]移动平均/收盘价-LC的绝对值的14日[1日权重]移动平均*400-200
FILLRGN(RSI1>-60,RSI1,-60),COLOR6699CC
FILLRGN(RSI1<-60,RSI1,-60),画深灰色
输出RSI:收盘价-LC和0的较大值的14日[1日权重]移动平均/收盘价-LC的绝对值的14日[1日权重]移动平均*100,线宽为0
赋值: (收盘价的12日指数移动平均 - 收盘价的26日指数移动平均)*100
赋值: DI的9日指数移动平均
赋值: 2*(DI-DE)
RSV赋值:(收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值)*400-200
K1赋值:RSV的3日[1日权重]移动平均,画洋红色,线宽为2
D1赋值:K1的3日[1日权重]移动平均,画绿色,线宽为0
J1赋值:3*K1-2*D1,画黄色,线宽为2
FILLRGN(J1<K1,J1,K1),COLORFF0000
FILLRGN(J1>K1,J1,K1),画洋红色
FILLRGN(K1>D1,D1,K1),画黄色
FILLRGN(K1<D1,D1,K1),画青色
///////////当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000AA
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLOR0000BB
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.3,0不为0则画空心柱.,COLOR0000CC
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000CC
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLOR0000DD
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLOR0000EE
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLOR0000FF
当满足条件平滑异同平均>0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,画红色
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0090FF
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLOR009FFF
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.3,0不为0则画空心柱.,COLOR00A6FF
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00B5FF
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLOR00C4FF
 
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLOR00D3FF
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLOR00E2FF
当满足条件平滑异同平均>0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FFFF
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF0000
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLORFF3300
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.3,0不为0则画空心柱.,COLORFF5500
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF7700
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLORFF9900
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLORFFBB00
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLORFFDD00
当满足条件平滑异同平均<0ANDMACD<1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFF00
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00A9
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.7,0不为0则画空心柱.,COLORFF00A1
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2.3,0不为0则画空心柱.,COLORFF00AA
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00BB
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLORFF00CC
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLORFF00DD
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLORFF00EE
当满足条件平滑异同平均<0ANDMACD>1日前的平滑异同平均时,在平滑异同平均和0位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFF00FF
///////////PARTLINE(DI>=DE OR DI<DE,DI),COLORBB,线宽为2
PARTLINE(DI>=DE OR DI<DE,DE),画白色,线宽为1
输出DIFF : (收盘价的12日指数移动平均 - 收盘价的26日指数移动平均),COLORBB,线宽为0
输出DEA : DIFF的9日指数移动平均,画白色,线宽为0
RSV1赋值:(收盘价-13日内最低价的最低值)/(13日内最高价的最高值-13日内最低价的最低值)*100
输出K:RSV1的3日[1日权重]移动平均,COLOR330700,线宽为0
输出D:K的3日[1日权重]移动平均,画青色,线宽为0
输出J:3*K-2*D,画洋红色,线宽为0
TYP赋值:(最高价+最低价+收盘价)/3
输出CCI:(TYP-TYP的14日简单移动平均)/(0.015*TYP的14日平均绝对偏差),线宽为2,画绿色
//////////当满足条件K1上穿D1时,在D1位置画12号图标,ALIGN0
当满足条件D1上穿K1时,在D1位置画11号图标,ALIGN0
200,画绿色,LINEDOT
150,画白色,POINTDOT
100,画白色,POINTDOT
0,画深灰色,线宽为2
-100,画白色,POINTDOT
-150,画白色,POINTDOT
-200,画红色,LINEDOT
当满足条件BARPOS=SYSPARAM(2)时,在1位置书写文字,ALIGN4,画黄色
 

源码:

 

 

DRAWGBK(C=C,COLORRGB(130,130,130),COLORRGB(30,30,30),1);
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*400-200;
FILLRGN(rsi1>-60,rsi1,-60),COLOR6699cc;
FILLRGN(rsi1<-60,rsi1,-60),COLORGRAY;
RSI:SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100,LINETHICK0;
//////////
DI := (EMA(CLOSE,12) - EMA(CLOSE,26))*100;
DE := EMA(DI,9);
MACD := 2*(DI-DE);
////////////
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*400-200;
K1:=SMA(RSV,3,1),COLORMAGENTA,LINETHICK2;
D1:=SMA(K1,3,1),COLORGREEN,LINETHICK0;
J1:=3*K1-2*D1,COLORYELLOW,LINETHICK2;
FILLRGN(j1<k1,j1,k1),ColorFF0000;
FILLRGN(j1>k1,j1,k1),COLORMAGENTA;
FILLRGN(k1>d1,d1,k1),COLORYELLOW;
FILLRGN(k1<d1,d1,k1),COLORCYAN;
///////////
{红柱}
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,3,0),COLOR0000AA;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,2.7,0),COLOR0000BB;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,2.3,0),COLOR0000CC;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,2,0),COLOR0000CC;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,1.6,0),COLOR0000DD;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,1.2,0),COLOR0000EE;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,0.8,0),COLOR0000FF;
STICKLINE(macd>0 and macd>ref(macd,1),macd,0,0.5,0),COLORRED;
{黄柱}
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,3,0),color0090FF;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,2.7,0),color009FFF;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,2.3,0),color00a6FF;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,2,0),color00b5FF;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,1.6,0),color00c4FF;;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,1.2,0),Color00d3ff;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,0.8,0),color00e2FF;
STICKLINE(macd>0 and macd<ref(macd,1),macd,0,0.5,0),color00FFFF;
{蓝柱}
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,3,0),COLORFF0000;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,2.7,0),COLORFF3300;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,2.3,0),COLORFF5500;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,2,0),COLORFF7700;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,1.6,0),COLORFF9900;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,1.2,0),COLORFFBB00;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,0.8,0),COLORFFDD00;
STICKLINE(macd<0 and macd<ref(macd,1),macd,0,0.5,0),COLORFFFF00;
{粉柱}
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,3,0),ColorFF00a9;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,2.7,0),ColorFF00a1;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,2.3,0),ColorFF00aa;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,2,0),ColorFF00bb;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,1.6,0),ColorFF00cc;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,1.2,0),ColorFF00dd;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,0.8,0),ColorFF00ee;
STICKLINE(macd<0 and macd>ref(macd,1),macd,0,0.5,0),ColorFF00ff;
///////////
PARTLINE(di>=de or di<de,di),COLORbb,LINETHICK2;
PARTLINE(di>=de or di<de,de),COLORWHITE,LINETHICK1;
DIFF : (EMA(CLOSE,12) - EMA(CLOSE,26)),COLORbb,LINETHICK0;
DEA : EMA(DIFF,9),COLORWHITE,LINETHICK0;
///////////
RSV1:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:SMA(RSV1,3,1),Color330700,LINETHICK0;
D:SMA(K,3,1),COLORCYAN,LINETHICK0;
J:3*K-2*D,COLORMAGENTA,LINETHICK0;
//////////
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK2,COLORGREEN;
//////////
DRAWICON(cross(k1,d1),d1,12),ALIGN0;
DRAWICON(cross(d1,k1),d1,11),ALIGN0;
200,COLORGREEN,LINEDOT;
150,COLORWHITE,POINTDOT;
100,COLORWHITE,POINTDOT;
0,COLORGRAY,LINETHICK2;
-100,COLORWHITE,POINTDOT;
-150,COLORWHITE,POINTDOT;
-200,COLORRED,LINEDOT;
DRAWTEXT(BARPOS=SYSPARAM(2),1,' \n乘风操盘副图之一:顺势而为(KDJ+MACD+CCI+RSI).'),ALIGN4,COLORYELLOW;
{程序化交易 www.cxh99.com }

 

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

 

 

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

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

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

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

 


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

相关文章

    没有相关内容