您现在的位置:程序化交易>> 股票公式>> 大智慧>> 大智慧公式>>正文内容

龙在雨中行公式[大智慧公式]

相关标签: 麟龙至尊版四色谱公式 、 通达信麟龙至尊版指标 、 超级拐点加四量图源码 、 麟龙四色谱主图指标 、 麟龙四量图齐红选股器 、 改编四量图副图源码 、 四量图选股 、

 

原理解析:

输出INPUT:N(55)
TR0赋值: 最高价-最低价和最高价-1日前的收盘价的绝对值的较大值和最低价-1日前的收盘价的绝对值的较大值的14日累和
赋值: 最高价-1日前的最高价
赋值: 1日前的最低价-最低价
DMP赋值: 如果HD>0ANDHD>LD,返回HD,否则返回0的14日累和
DMM赋值: 如果LD>0ANDLD>HD,返回LD,否则返回0的14日累和
输出PDI: DMP*100/TR0,画红色
输出MDI: DMM*100/TR0
输出ADX: MDI-PDI的绝对值/(MDI+PDI)*100的6日简单移动平均
输出ADXR:(ADX+6日前的ADX)/2
当满足条件PDI上穿MDIANDCROSS(PDI,ADX)ANDCROSS(PDI,ADXR)时,在0和100位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00FFFF
当满足条件PDI上穿MDIANDCROSS(PDI,ADX)ANDCROSS(PDI,ADXR)时,在110位置书写文字,POINTDOT,COLOR00FFFF
RV赋值:(收盘价-27日内最低价的最低值)/(27日内最高价的最高值-27日内最低价的最低值)*100
RG赋值:(收盘价-5日内最低价的最低值)/(5日内最高价的最高值-5日内最低价的最低值)*100
J0赋值:(最高价+最低价)/2
QJ赋值:J0的3日指数移动平均
J1赋值:如果收盘价>QJ,返回成交量(手),否则返回0
J2赋值:如果收盘价<QJ,返回成交量(手),否则返回0
输出量能:如果当前流通股本(手)<1,返回成交量(手)的74日简单移动平均,否则返回J1-J2的22日累和的3日简单移动平均,COLOR00DDDD,线宽为0
输出趋势:如果当前流通股本(手)<1,返回量能的360日加权移动平均,否则返回量能的21日加权移动平均,COLOR008800,线宽为0
VAR3赋值:(量能-趋势)
VAR4赋值:RV的3日[1日权重]移动平均
VAR5赋值:VAR4的3日[1日权重]移动平均
FILLRGN(50,100,VAR3>0),COLORB50084
FILLRGN(50,0,VAR3<0),COLOR008800
FILLRGN(VAR5,VAR4,VAR4<VAR5),COLORFF8800
A1赋值:"随机指标KD的K[取日线数据]"(55,8,2)
A2赋值:"随机指标KD的D[取日线数据]"(55,8,2)
A3赋值:"随机指标KD的K[取周线数据]"(9,3,3)
A4赋值:"随机指标KD的D[取周线数据]"(9,3,3)
A5赋值:"随机指标KD的K[取月线数据]"(55,8,2)
A6赋值:"随机指标KD的D[取月线数据]"(55,8,2)
当满足条件A1>A2时,在70和90位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色,POINTDOT
当满足条件A3>A4时,在70和30位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色,POINTDOT
当满足条件A5>A6时,在0和30位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR9C0010,POINTDOT
当满足条件收盘价>0时,在70和70位置之间画柱状线,宽度为10,0不为0则画空心柱.,画黑色,POINTDOT
当满足条件收盘价>0时,在30和30位置之间画柱状线,宽度为10,0不为0则画空心柱.,画黑色,POINTDOT
RSV1赋值:(收盘价-N日内最低价的最低值)/(N日内最高价的最高值-N日内最低价的最低值)*100
输出K1:RSV1的8日[1日权重]移动平均
输出D1:K1的2日[1日权重]移动平均
FILLRGN(K1>D1,K1,D1),画红色
FILLRGN(K1<D1,K1,D1),画绿色
黑马出现赋值:收盘价30%的之字转向>1日前的收盘价30%的之字转向 AND 1日前的收盘价30%的之字转向<=2日前的收盘价30%的之字转向 AND 2日前的收盘价30%的之字转向<=3日前的收盘价30%的之字转向
当满足条件黑马出现AND1时,在1日前的收盘价位置书写文字,COLORFF00FF
大黑马赋值:收盘价50%的之字转向>1日前的收盘价50%的之字转向 AND 1日前的收盘价50%的之字转向<=2日前的收盘价50%的之字转向 AND 2日前的收盘价50%的之字转向<=3日前的收盘价50%的之字转向
当满足条件大黑马AND1时,在最低价位置书写文字,画黄色
黑马1赋值:收盘价100%的之字转向>1日前的收盘价100%的之字转向 AND 1日前的收盘价100%的之字转向<=2日前的收盘价100%的之字转向 AND 2日前的收盘价100%的之字转向<=3日前的收盘价100%的之字转向
当满足条件黑马1AND1时,在1日前的开盘价位置书写文字,COLORFFFFFF
黑马2赋值:收盘价150%的之字转向>1日前的收盘价150%的之字转向 AND 1日前的收盘价150%的之字转向<=2日前的收盘价150%的之字转向 AND 2日前的收盘价150%的之字转向<=3日前的收盘价150%的之字转向
当满足条件黑马2AND1时,在1日前的最低价位置书写文字,画红色
赋值: 收盘价的12日指数移动平均 - 收盘价的26日指数移动平均
赋值:DIFF的9日指数移动平均
赋值:1000* (2*(DIFF-DEA))/收盘价的30日指数移动平均
VARA赋值:1日前的收盘价的4日指数移动平均
色彩峰赋值:(收盘价-VARA和0的较大值的6日[1日权重]移动平均/收盘价-VARA的绝对值的6日[1日权重]移动平均*100)
当满足条件0上穿平滑异同平均AND色彩峰>75时,在82位置书写文字,画黄色
VARM赋值:3*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均-2*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均的3日[1日权重]移动平均
DDD赋值:VARM的3日指数移动平均-10
当满足条件DDD上穿0时,在83位置书写文字,画红色,ALIGN0
当满足条件DDD上穿0时,在83位置书写文字,画红色,ALIGN0
VAR1赋值:(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100
VAR2赋值:VAR1的2日[1日权重]移动平均
VAR3赋值:VAR2的2日[1日权重]移动平均
VAR4赋值:VAR3的2日[1日权重]移动平均
VAR9赋值:VAR4上穿VAR3 AND VAR3>91
当满足条件VAR9的5日过滤=1时,在82.8位置书写文字,画黄色
C1赋值:(收盘价+最低价+最高价)/3
C2赋值:C1的17日指数移动平均
C3赋值:C2的81日指数移动平均
C4赋值:C2上穿C3
C5赋值:C3上穿C2
当满足条件C5时,在最高价*4.203位置书写文字,画绿色
VAR1赋值:收盘价的5日简单移动平均
VAR2赋值:收盘价的10日简单移动平均
VAR3赋值:收盘价的20日简单移动平均
VAR4赋值:收盘价的30日简单移动平均
VAR5赋值:(VAR1+VAR2+VAR3+VAR4)/4
VAR6赋值:(VAR5-5日前的VAR5)/5日前的VAR5*1500
VAR8赋值:VAR6的8日指数移动平均
当满足条件VAR6>1日前的VAR6ANDVAR6>0ANDVAR8<0的30日过滤时,在4位置画4号图标
当满足条件VAR6>1日前的VAR6ANDVAR6>0ANDVAR8<0的30日过滤时,在4位置书写文字,画黄色
VAR1赋值:开盘价>1日前的收盘价*1.01
VAR2赋值:最低价>1日前的最低价
VAR3赋值:收盘价>1日前的收盘价
VAR4赋值:1日前的收盘价<1日前的开盘价 AND 1日前的收盘价/1日前的开盘价<=0.97
输出小幅踏空:如果VAR1ANDVAR2ANDVAR3ANDVAR4,返回20,否则返回0,画白色
当满足条件小幅踏空时,在20位置书写文字,画白色
VAR5赋值:最低价>1日前的收盘价
VAR6赋值:收盘价>(1日前的开盘价-1日前的收盘价)/2 AND 收盘价<1日前的开盘价
输出基本踏空:如果VAR1ANDVAR5ANDVAR6ANDVAR4,返回40,否则返回0,画黄色
当满足条件基本踏空时,在38位置书写文字,画黄色
VAR7赋值:最低价>1日前的收盘价
VAR8赋值:收盘价>1日前的开盘价
输出完全踏空:如果VAR1ANDVAR4ANDVAR7ANDVAR8,返回60,否则返回0,画青色
当满足条件完全踏空时,在58位置书写文字,画青色
VAR9赋值:1日前的开盘价>1日前的收盘价
VAR10赋值:开盘价>1日前的开盘价
VAR11赋值:最低价>1日前的开盘价
输出严重踏空:如果VAR1ANDVAR9ANDVAR10ANDVAR11,返回80,否则返回0,画红色
当满足条件严重踏空时,在78位置书写文字,画红色
VAR12赋值:开盘价>1日前的最高价
VAR13赋值:最低价>1日前的最高价
输出超级踏空:如果VAR1ANDVAR9ANDVAR12ANDVAR13,返回85,否则返回0,画洋红色
当满足条件超级踏空时,在83位置书写文字,画洋红色
输出选股:小幅踏空 OR 基本踏空 OR 完全踏空 OR 严重踏空 OR 超级踏空
 

源码:

 

{龙在雨中行}
input:n(55);
TR0:= SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
PDI: DMP*100/TR0,colorred;
MDI: DMM*100/TR0;
ADX: MA(ABS(MDI-PDI)/(MDI+PDI)*100,6);ADXR:(ADX+REF(ADX,6))/2;
STICKLINE(CROSS(PDI,MDI) AND CROSS(PDI,ADX) AND CROSS(PDI,ADXR) ,0,100,4,0),COLOR00FFff;
DRAWTEXT(CROSS(PDI,MDI) AND CROSS(PDI,ADX) AND CROSS(PDI,ADXR),110,'¤上穿¤3线¤'),POINTDOT,COLOR00FFff;
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
J0:=(HIGH+LOW)/2;QJ:=EMA(J0,3);J1:=IF(CLOSE>QJ,VOL,0);J2:=IF(CLOSE<QJ,VOL,0);
量能:IF(CAPITAL<1,MA(vol,74),MA(SUM(J1-J2,22),3)),color00DDDD,LINETHICK0;{http://www.cxh99.com}
趋势:IF(CAPITAL<1,WMA(量能,360),WMA(量能,21)),color008800,LINETHICK0;{http://www.cxh99.com}
var3:=(量能-趋势);var4:=SMA(RV,3,1);var5:=SMA(var4,3,1);
fillrgn(50,100,var3>0),colorB50084;
fillrgn(50,0,var3<0),color008800;
FILLRGN(var5,var4,var4<var5),COLORFF8800;
A1:="KD.K#DAY"(55,8,2);
A2:="KD.D#DAY"(55,8,2);
A3:="KD.K#WEEK"(9,3,3);
A4:="KD.D#WEEK"(9,3,3);A5:="KD.K#MONTH"(55,8,2);
A6:="KD.D#MONTH"(55,8,2);
STICKLINE( A1>A2,70 ,90 ,1 ,0 ),ColorYELLOW,pointdot;
STICKLINE( A3>A4,70 ,30 ,1 ,0 ),ColorRED,pointdot;
STICKLINE( A5>A6,0 ,30 ,1 ,0 ),Color9c0010,pointdot;
STICKLINE( CLOSE>0,70 ,70 ,10 ,0 ),COLORBLACK,pointdot;
STICKLINE( CLOSE>0,30,30,10,0 ),COLORBLACK,pointdot;
RSV1:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K1:SMA(RSV1,8,1);
D1:SMA(K1,2,1);
FILLRGN(K1>D1,K1,D1),colorred;FILLRGN(K1<D1,K1,D1),COLORGREEN;{http://www.cxh99.com}
黑马出现:=ZIG(3,30)>REF(ZIG(3,30),1) AND REF(ZIG(3,30),1)<=REF(ZIG(3,30),2) AND REF(ZIG(3,30),2)<=REF(ZIG(3,30),3);
DRAWTEXT(黑马出现 AND 1,REF(CLOSE,1),'●建仓'),colorFF00FF;
大黑马:=ZIG(3,50)>REF(ZIG(3,50),1) AND REF(ZIG(3,50),1)<=REF(ZIG(3,50),2) AND REF(ZIG(3,50),2)<=REF(ZIG(3,50),3);
DRAWTEXT(大黑马 AND 1,LOW,'▲建仓'),COLORYELLOW;{http://cxh99.com}
黑马1:=ZIG(3,100)>REF(ZIG(3,100),1) AND REF(ZIG(3,100),1)<=REF(ZIG(3,100),2) AND REF(ZIG(3,100),2)<=REF(ZIG(3,100),3);
DRAWTEXT(黑马1 AND 1,REF(OPEN,1),'黑马'),colorFFFFFF;黑马2:=ZIG(3,150)>REF(ZIG(3,150),1) AND REF(ZIG(3,150),1)<=REF(ZIG(3,150),2) AND REF(ZIG(3,150),2)<=REF(ZIG(3,150),3);
DRAWTEXT(黑马2 AND 1,REF(LOW,1),'开赚'),colorred;
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD :=1000* (2*(DIFF-DEA))/EMA(C,30);
VARA:=EMA(REF(CLOSE,1),4);
色彩峰:=(SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100);
DRAWTEXT(CROSS( 0,MACD) AND 色彩峰>75,82,'☆☆☆'),COLORYELLOW;{http://cxh99.com}Varm:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
ddd:=EMA(Varm,3)-10;
DRAWTEXT(CROSS(ddd,0),83,'●'),COLORred,ALIGN0;
DRAWTEXT(CROSS(ddd,0),83,'¤'),COLORred,ALIGN0;
VAR1:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
VAR2:=SMA(VAR1,2,1);
VAR3:=SMA(VAR2,2,1);
VAR4:=SMA(VAR3,2,1);
VAR9:=CROSS(VAR4,VAR3) AND VAR3>91;
DRAWTEXT(FILTER(VAR9,5)=1,82.8,'ω\nω\nω'),COLORYELLOW;{http://cxh99.com}
c1:=(CLOSE+LOW+HIGH)/3;
c2:=EMA(c1,17);
c3:=EMA(c2,81);
c4:=CROSS(c2,c3);
c5:=CROSS(c3,c2);
DRAWTEXT(c5,HIGH*4.203,'底乎?\n○\n○\n○'),COLORGREEN;{http://www.cxh99.com}
VAR1:=MA(CLOSE,5);
VAR2:=MA(CLOSE,10);
VAR3:=MA(CLOSE,20);
VAR4:=MA(CLOSE,30);
VAR5:=(VAR1+VAR2+VAR3+VAR4)/4;
VAR6:=(VAR5-REF(VAR5,5))/REF(VAR5,5)*1500;
VAR8:=EMA(VAR6,8);
DRAWICON(FILTER(VAR6>REF(VAR6,1) AND VAR6>0 AND VAR8<0,30),4,4);
DRAWTEXT(FILTER(VAR6>REF(VAR6,1) AND VAR6>0 AND VAR8<0,30),4,'->时机来临'),COLORYELLOW;{http://cxh99.com}
Var1:=OPEN>ref(C,1)*1.01;
Var2:=Low>ref(LOW,1);
Var3:=CLOSE>ref(CLOSE,1);
Var4:=ref(CLOSE,1)<ref(OPEN,1) and ref(Close,1)/ref(OPEN,1)<=0.97;
小幅踏空:if(Var1 and Var2 and Var3 and Var4,20,0),colorwhite;
drawtext(小幅踏空,20,'以1/3仓位买入'),colorwhite;
Var5:=Low>ref(CLOSE,1);
Var6:=Close>(ref(OPEN,1)-ref(CLOSE,1))/2 and CLOSE<ref(OPEN,1);
基本踏空:if(Var1 and Var5 and Var6 and Var4,40,0),COLORYELLOW;{http://cxh99.com}
drawtext(基本踏空,38,'以1/3仓位买入'),COLORYELLOW;{http://cxh99.com}
Var7:=LOW>ref(C,1);
Var8:=CLOSE>ref(OPEN,1);
完全踏空:if(Var1 and Var4 and Var7 and Var8,60,0),colorcyan;
drawtext(完全踏空,58,'以1/2仓位买入'),colorcyan;
Var9:=ref(OPEN,1)>ref(CLOSE,1);
Var10:=OPEN>ref(OPEN,1);
Var11:=LOW>ref(OPEN,1);
严重踏空:if(Var1 and Var9 and Var10 and Var11,80,0),colorred;
drawtext(严重踏空,78,'以2/3仓位买入'),colorred;
Var12:=OPEN>ref(HIGH,1);
Var13:=LOW>ref(HIGH,1);
超级踏空:if(Var1 and Var9 and Var12 and Var13,85,0),colormagenta;
drawtext(超级踏空,83,'满仓买入'),colormagenta;
选股:小幅踏空 or 基本踏空 or 完全踏空 or 严重踏空 or 超级踏空;

{程序化交易 www.cxh99.com }

 

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

 

原理解析:

 

源码:

 

 

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

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

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

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

 


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

相关文章

    没有相关内容