牛B主力资金A 双龙阁股市A通达信公式 主图 源码附图

 
N1:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y1:=STRCAT(CON2STR(MONTH,0),' 月 '); 
R:=STRCAT(CON2STR(DAY,0),' 日 '); 
SJ:=STRCAT(STRCAT(N1,Y1), R); 
DRAWTEXT_FIX(C>0,0.05,0,0,SJ),COLORYELLOW;
A1:EXPMA(C,4);
A2:EXPMA(C,8);
A3:EXPMA(C,12);
A4:EXPMA(C,16);
A5:EXPMA(C,20);
A6:EXPMA(C,47);
{驭龙阁主图}
DRAWTEXT_FIX(1,0.05,0.1,0,'制作:风口寻妖驭龙阁主'),COLORYELLOW,LINETHICK8;
{题材数据}
DRAWTEXT_FIX(ISLASTBAR,0,0,0,CODE),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,STKNAME),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,HYBLOCK),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,GNBLOCK),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,0.25,0,FGBLOCK),COLORWHITE;
{风口寻妖}
月DIF:="MACD.DIF#MONTH";
月DEA:="MACD.DEA#MONTH",;
周DIF:="MACD.DIF#WEEK";
周DEA:="MACD.DEA#WEEK",;
日DIF:="MACD.DIF";
日DEA:="MACD.DEA";
日金叉:=CROSS(日DIF,日DEA);
周金叉:=CROSS(周DIF,周DEA);
月金叉:=CROSS(月DIF,月DEA);
共振A:= ( 周DIF>周DEA  AND 日金叉)  OR  ( 日DIF>日DEA AND 周金叉) OR (日金叉 AND 周金叉 ) ;  
共振B:=  日DIF>0  AND  MACD>0  AND C/REF(C,1)>1.08 ;
MA_1:= IF(4 > 1, MA(CLOSE,4), 1);
MA_2:= IF(8 > 1, MA(CLOSE,8), MA_1);
MA_3:= IF(12 > 1, MA(CLOSE,12), MA_1);
MA_4:= IF(16 > 1, MA(CLOSE,16), MA_1);
MA_5:= IF(20 > 1, MA(CLOSE,20), MA_1);
MAX_MA:= MAX(MA_1,MAX(MA_2,MAX(MA_3,MAX(MA_4,MA_4))));
MIN_MA:= MIN(MA_1,MIN(MA_2,MIN(MA_3,MIN(MA_4,MA_5))));
爆发点: (MAX_MA - MIN_MA) / MIN_MA * 100,NODRAW;
上攻力度:ATAN((MA_1/REF(MA_1,1)-1) * 100)*180/3.1415926,NODRAW;
共振C:=上攻力度<85;
共振:=共振A  AND   共振B AND 共振C;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,3,0),COLOR000099;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,2.2,0),COLOR0000CC;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,1.5,0),COLOR0000FF;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,0.5,0),COLORCC66FF;
STICKLINE(共振 AND C/REF(C,1)>1.092,REF(C,1)*1.05,C,0.5,0),COLORYELLOW;
DRAWTEXT(共振 AND C/REF(C,1)>1.092,REF(C,1)*1.058,'↖驭龙'),COLORYELLOW;



{公式名称: 牛B主力资金A
公式描述: 1年期20170930到期
无参数
公式类型: 技术指标公式-其他类型
画线方法: 副图
公式版本: 0
显示小数: 缺省位数
坐标线位置: 自动
额外Y轴分界: 无
 
参数精灵:无
用法注释:无
公式源码:}

DRAWGBK(CLOSE>0,RGB(0,0,0),RGB(0,50,50),0,8,0);
X_1:=1990930;
X_2:=1991008;
X_3:=IF(DATE>X_1,IF(CLOSE<80,1,0),0);
X_4:=IF(DATE>X_2,1,X_3);
X_5:=IF(X_4=1,0,SMA((CLOSE-REF(CLOSE,1))*VOL,3,1)/10000);
X_6:=EMA(X_5,12)-EMA(X_5,26);
X_7:=EMA(X_6,9);
X_8:=(X_6-X_7)*2;
W1:STICKLINE(X_8>0,X_8,0,3,1),COLORRED;
W2:STICKLINE(X_8<0,X_8,0,3,1),COLORCYAN;
X_9:=HHVBARS(X_8,BARSLAST(X_8<0)+1);
X_10:=CROSS(BACKSET(CROSS(0,X_8),REF(X_9,1)+2),0.5);
X_11:=CROSS(BACKSET(CROSS(0,X_8) OR (ISLASTBAR AND X_8>0),REF(X_9,1)+2),0.5);
前高:DRAWLINE(X_10,X_8,REF(X_10,1),REF(X_8,1),1),COLORGRAY;
X_12:=LLVBARS(X_8,BARSLAST(X_8>0)+1);
X_13:=CROSS(BACKSET(CROSS(X_8,0),REF(X_12,1)+2),0.5);
X_14:=BARSLAST(FILTERX(CROSS(0,X_8),BARSCOUNT(CLOSE)));
前低:DRAWLINE(X_13,X_8,REF(X_13,1),REF(X_8,1),1),COLORGRAY;
X_15:=IF(X_8<0,FILTERX(X_8=LLV(X_8,BARSLAST(X_8>0)),BARSCOUNT(CLOSE)),DRAWNULL);
X_16:=BARSLAST(X_15);
X_17:=FILTERX(X_8<CONST(LLV(X_8,X_14+1)),BARSCOUNT(CLOSE));
X_18:=BARSLAST(X_17);
本低:IF(X_14+1>=1,CONST(LLV(X_8,X_14+1)),DRAWNULL);
X_19:=CROSS(COUNT(CROSS(X_8>本低/2 AND X_8<0,0.5),X_16)=1,0.5) AND X_16>=0;
X_20:=IF(ISLASTBAR AND X_8>0 AND X_8=HHV(X_8,BARSLAST(X_8<0)),1,IF(FILTERX(X_11,BARSCOUNT(CLOSE)),2,DRAWNULL));
X_21:=X_20=1 OR X_20=2 AND X_8>0;
X_22:=FILTERX(X_21,BARSCOUNT(CLOSE));
本高:DRAWLINE(X_22,X_8,REF(X_22,1),REF(X_8,1),1),COLORWHITE;
X_23:=CONST(REF(X_8,BARSLAST(X_22)));
X_24:=X_8>X_23;
X_25:=FILTERX(REFX(BARSLAST(X_24),1)=1,BARSCOUNT(CLOSE));
天数:BARSLAST(X_25),NODRAW,COLORYELLOW;
上横线:DRAWLINE(X_25,X_23,X_22,X_23,0),DOTLINE,COLORGREEN;
下横线:DRAWLINE(X_17,CONST(LLV(X_8,X_14+1)),X_15=1,X_8,0),DOTLINE,COLORYELLOW;
DRAWNUMBER(X_15,CONST(LLV(X_8,X_14+1))*0.9,X_18);
DRAWNUMBER(X_22,上横线*1.1,天数);
X_26:=IF(X_25,BARSNEXT(X_22),DRAWNULL);
X_27:=IF(天数>0 AND 天数<=REF(X_26,天数),SUM(X_8>0,天数),DRAWNULL);
X_28:=REF(CLOSE,天数);
X_29:=(X_28-CLOSE)/CLOSE*100;
X_30:=BARSLAST(X_22);
X_31:=CROSS(COUNT(CROSS(X_8<本高/2 AND X_8>0,0.5),X_22)=1,0.5) AND X_22>=0;
STICKLINE(X_8>前高 AND 本高>前高 AND BARSLAST(CROSS(X_8<本高/2,0.5))>0 AND X_8>(前高+本高)/2,X_8,前高,1,0),COLORYELLOW;
X_32:=IF(X_8>0 AND 本高!=前高,DRAWLINE(X_31,(前高+本高)/2,REF(X_31,1),REF((前高+本高)/2,1),1),DRAWNULL);
STICKLINE(X_8>前高,X_8,前高,1,0),COLORYELLOW;
STICKLINE(X_31,X_8,0,1,0),COLORGREEN;
STICKLINE(X_8<0 AND X_8<前低 AND 前低<0,X_8,前低,1,0),COLORBLUE;
X_33:=IF(CROSS(X_8<0,0.5),BARSNEXT(X_15),DRAWNULL);
X_34:=BARSLAST(X_8>0)-1;
STICKLINE(BARSLAST(X_19)>=0 AND X_8<前低 AND X_8<0,X_8,前低,1,0),COLORGREEN;
STICKLINE(X_19,X_8,0,1,0),COLORWHITE;
STICKLINE(X_8>前高 AND 本高>前高 AND BARSLAST(X_31)>0,X_8,前高,1,0),COLORRED;
STICKLINE(CROSS(前高,0.01) OR CROSS(本高,0.01),X_8,0,0,0),COLORWHITE;
STICKLINE(CROSS(前低<0,0.01) OR CROSS(本低<0,0.01),X_8,0,0,0),COLORWHITE;
IF(BARSLAST(X_19)>=0,本低/2,DRAWNULL),DOTLINE,COLORRED;
DRAWICON(CROSS(X_8,0),REF(X_8,1),38);
DRAWICON(CROSS(0,X_8),REF(X_8,1),39);
 



来函数检测结果如下
该公式包含未来函数:BACKSET
该公式包含未来函数:#MONTH
该公式包含未来函数:#WEEK
该公式包含未来函数:BARSNEXT
该公式包含未来函数:REFX

解密、定制、编写公式指标请联系QQ或微信同号:88652583
置顶指标

相关指标公式

N1赋值:字符串相加
Y1赋值:字符串相加
R赋值:字符串相加
SJ赋值:字符串相加
当满足条件收盘价>0时,在横轴0.05纵轴0位置书写文字,画黄色
输出A1:收盘价的4日指数移动平均
输出A2:收盘价的8日指数移动平均
输出A3:收盘价的12日指数移动平均
输出A4:收盘价的16日指数移动平均
输出A5:收盘价的20日指数移动平均
输出A6:收盘价的47日指数移动平均
当满足条件1时,在横轴0.05纵轴0.1位置书写文字,画黄色,线宽为8
当满足条件是否最后一个周期时,在横轴0纵轴0位置书写文字,画绿色
当满足条件是否最后一个周期时,在横轴0纵轴0.05位置书写文字,画洋红色
当满足条件是否最后一个周期时,在横轴0纵轴0.1位置书写文字,画青色
当满足条件是否最后一个周期时,在横轴0纵轴0.15位置书写文字,画黄色
当满足条件是否最后一个周期时,在横轴0纵轴0.2位置书写文字,画绿色
当满足条件是否最后一个周期时,在横轴0纵轴0.25位置书写文字,画白色
月DIF赋值:"平滑异同平均线的DIF[取月线数据]"
月DEA赋值:"平滑异同平均线的DEA[取月线数据]",
周DIF赋值:"平滑异同平均线的DIF[取周线数据]"
周DEA赋值:"平滑异同平均线的DEA[取周线数据]",
日DIF赋值:"平滑异同平均线的DIF"
日DEA赋值:"平滑异同平均线的DEA"
日金叉赋值:日DIF上穿日DEA
周金叉赋值:周DIF上穿周DEA
月金叉赋值:月DIF上穿月DEA
共振A赋值: ( 周DIF>周DEA AND 日金叉) OR ( 日DIF>日DEA AND 周金叉) OR (日金叉 AND 周金叉 )
共振B赋值: 日DIF>0 AND 平滑异同平均线>0 AND 收盘价/1日前的收盘价>1.08
MA_1赋值: 如果4>1,返回收盘价的4日简单移动平均,否则返回1
MA_2赋值: 如果8>1,返回收盘价的8日简单移动平均,否则返回MA_1
MA_3赋值: 如果12>1,返回收盘价的12日简单移动平均,否则返回MA_1
MA_4赋值: 如果16>1,返回收盘价的16日简单移动平均,否则返回MA_1
MA_5赋值: 如果20>1,返回收盘价的20日简单移动平均,否则返回MA_1
MAX_MA赋值: MA_1和MA_2和MA_3和MA_4和MA_4的较大值的较大值的较大值的较大值
MIN_MA赋值: MA_1和MA_2和MA_3和MA_4和MA_5的较小值的较小值的较小值的较小值
输出爆发点: (MAX_MA - MIN_MA) / MIN_MA * 100,NODRAW
输出上攻力度:(MA_1/1日前的MA_1-1)*100的反正切*180/3.1415926,NODRAW
共振C赋值:上攻力度<85
共振赋值:共振A AND 共振B AND 共振C
当满足条件共振ANDC/1日前的收盘价>1.092时,在收盘价和1日前的收盘价*1.05位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000099
当满足条件共振ANDC/1日前的收盘价>1.092时,在收盘价和1日前的收盘价*1.05位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR0000CC
当满足条件共振ANDC/1日前的收盘价>1.092时,在收盘价和1日前的收盘价*1.05位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000FF
当满足条件共振ANDC/1日前的收盘价>1.092时,在收盘价和1日前的收盘价*1.05位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORCC66FF
当满足条件共振ANDC/1日前的收盘价>1.092时,在1日前的收盘价*1.05和收盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,画黄色
当满足条件共振ANDC/1日前的收盘价>1.092时,在1日前的收盘价*1.058位置书写文字,画黄色
填充背景
X_1赋值:1990930
X_2赋值:1991008
X_3赋值:如果日期>X_1,返回如果收盘价<80,返回1,否则返回0,否则返回0
X_4赋值:如果日期>X_2,返回1,否则返回X_3
X_5赋值:如果X_4=1,返回0,否则返回(收盘价-1日前的收盘价)*成交量(手)的3日[1日权重]移动平均/10000
X_6赋值:X_5的12日指数移动平均-X_5的26日指数移动平均
X_7赋值:X_6的9日指数移动平均
X_8赋值:(X_6-X_7)*2
输出W1:当满足条件X_8>0时,在X_8和0位置之间画柱状线,宽度为3,1不为0则画空心柱.,画红色
输出W2:当满足条件X_8<0时,在X_8和0位置之间画柱状线,宽度为3,1不为0则画空心柱.,画青色
X_9赋值:上次X_8<0距今天数+1日内X_8距今天数
X_10赋值:若0上穿X_8则将最近1日前的X_9+2周期置为1上穿0.5
X_11赋值:若0上穿X_8OR(ISLASTBARANDX_8>0)则将最近1日前的X_9+2周期置为1上穿0.5
输出前高:当满足条件X_10时,在X_8位置画直线起点,当满足条件1日前的X_10时,在1日前的X_8位置画直线终点,1表示是否延长.,画深灰色
X_12赋值:上次X_8>0距今天数+1日内X_8距今天数
X_13赋值:若X_8上穿0则将最近1日前的X_12+2周期置为1上穿0.5
X_14赋值:上次0上穿X_8的收盘价的有效数据周期数日反向过滤距今天数
输出前低:当满足条件X_13时,在X_8位置画直线起点,当满足条件1日前的X_13时,在1日前的X_8位置画直线终点,1表示是否延长.,画深灰色
X_15赋值:如果X_8<0,返回X_8=上次X_8>0距今天数日内X_8的最低值的收盘价的有效数据周期数日反向过滤,否则返回无效数
X_16赋值:上次X_15距今天数
X_17赋值:X_8X_18赋值:上次X_17距今天数
输出本低:如果X_14+1>=1,返回X_14+1日内X_8的最低值的最后一日取值设为常数,否则返回无效数
X_19赋值:统计X_16日中满足X_8>本低/2ANDX_8<0上穿0.5的天数=1上穿0.5 AND X_16>=0
X_20赋值:如果ISLASTBARANDX_8>0ANDX_8=上次X_8<0距今天数日内X_8的最高值,返回1,否则返回如果X_11的收盘价的有效数据周期数日反向过滤,返回2,否则返回无效数
X_21赋值:X_20=1 OR X_20=2 AND X_8>0
X_22赋值:X_21的收盘价的有效数据周期数日反向过滤
输出本高:当满足条件X_22时,在X_8位置画直线起点,当满足条件1日前的X_22时,在1日前的X_8位置画直线终点,1表示是否延长.,画白色
X_23赋值:上次X_22距今天数日前的X_8的最后一日取值设为常数
X_24赋值:X_8>X_23
X_25赋值:1日后的上次X_24距今天数=1的收盘价的有效数据周期数日反向过滤
输出天数:上次X_25距今天数,NODRAW,画黄色
输出上横线:当满足条件X_25时,在X_23位置画直线起点,当满足条件X_22时,在X_23位置画直线终点,0表示是否延长.,DOTLINE,画绿色
输出下横线:当满足条件X_17时,在X_14+1日内X_8的最低值的最后一日取值设为常数位置画直线起点,当满足条件X_15=1时,在X_8位置画直线终点,0表示是否延长.,DOTLINE,画黄色
当满足条件X_15时,在X_14+1日内X_8的最低值的最后一日取值设为常数*0.9位置书写数字
当满足条件X_22时,在上横线*1.1位置书写数字
X_26赋值:如果X_25,返回下次X_22距今天数,否则返回无效数
X_27赋值:如果天数>0AND天数<=天数日前的X_26,返回X_8>0的天数日累和,否则返回无效数
X_28赋值:天数日前的收盘价
X_29赋值:(X_28-收盘价)/收盘价*100
X_30赋值:上次X_22距今天数
X_31赋值:统计X_22日中满足X_8<本高/2ANDX_8>0上穿0.5的天数=1上穿0.5 AND X_22>=0
当满足条件X_8>前高AND本高>前高ANDBARSLAST(X_8<本高/2上穿0.5)>0ANDX_8>(前高+本高)/2时,在X_8和前高位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
X_32赋值:如果X_8>0AND本高不等于前高,返回当满足条件X_31时,在(前高+本高)/2位置画直线起点,当满足条件1日前的X_31时,在1日前的(前高+本高)/2位置画直线终点,1表示是否延长.,否则返回无效数
当满足条件X_8>前高时,在X_8和前高位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色
当满足条件X_31时,在X_8和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色
当满足条件X_8<0ANDX_8<前低AND前低<0时,在X_8和前低位置之间画柱状线,宽度为1,0不为0则画空心柱.,画蓝色
X_33赋值:如果X_8<0上穿0.5,返回下次X_15距今天数,否则返回无效数
X_34赋值:上次X_8>0距今天数-1
当满足条件上次X_19距今天数>=0ANDX_8<前低ANDX_8<0时,在X_8和前低位置之间画柱状线,宽度为1,0不为0则画空心柱.,画绿色
当满足条件X_19时,在X_8和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,画白色
当满足条件X_8>前高AND本高>前高ANDBARSLAST(X_31)>0时,在X_8和前高位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色
当满足条件前高上穿0.01ORCROSS(本高,0.01)时,在X_8和0位置之间画柱状线,宽度为0,0不为0则画空心柱.,画白色
当满足条件前低<0上穿0.01ORCROSS(本低<0,0.01)时,在X_8和0位置之间画柱状线,宽度为0,0不为0则画空心柱.,画白色
如果上次X_19距今天数>=0,返回本低/2,否则返回无效数,DOTLINE,画红色
当满足条件X_8上穿0时,在1日前的X_8位置画38号图标
当满足条件0上穿X_8时,在1日前的X_8位置画39号图标

指标安装下载帮助  |   联系我们  |  乐淘公式网  |  公式网   |  指标公式  |   加入收藏   |  设为主页

@2005-2025 浙ICP备2024071487号-1 乐淘公式网公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:乐淘公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图