通达信吸拉派落macd理想精华组合指标源码
综合型多指标信号系统：基于DIF/DEA、MACD、KDJ、RSI背离，叠加分时资金与长周期趋势。识别零上/零下金叉死叉、底/顶背离、减仓清仓提示、放量突破。用法：关注文字与图标信号，结合零轴和MACD柱状共振操作。
ES:=REF(EMA(C,26),1);
EP:=REF(EMA(C,12),1);
DIF:=H;
DEA:=C;
MID:=9;
DI:=REF(DIF,1);
DIF穿零价:((12+1)*(26-1)*ES-(26+1)*(12-1)*EP)/(2*(26+1)-2*(12+1)),NODRAW,COLORWHITE;
DIF拐点价:((12-1)*EP/(12+1)-(26-1)*ES/(26+1)-DI)*(26+1)*(12+1)/(2*(12+1)-2*(26+1)),COLORYELLOW,NODRAW;
{以下是自己的}
TJ1:=DEA<0 AND CROSS(DIF,DEA);{零下金叉}
TJ2:=BARSLAST(CROSS(0,DIF));{下跌起点到现在的周期数}
TJ3:=DEA<0 AND COUNT(TJ1,TJ2+1)>1;{从下跌起点算起，零下金叉两次以上}
TJ4:=DEA<0 AND MACD>0 AND REF(MACD,1)>0
AND REF(MACD,1)<REF(MACD,2) AND MACD>REF(MACD,1);{零下且MACD为正时，DIF,DEA收敛后发散}
TJ5:=BARSLAST(TJ1);{上一次零下金叉到现在的周期数}
TJ6:=DEA<0 AND TJ3 AND COUNT(TJ4,TJ5+1)>0,NODRAW;{零下两次金叉后发生至少一次收敛后发散}
TJ7:=DEA<0 AND COUNT(TJ6,TJ2)>0,NODRAW;{满足条件6的周期}
TJ8:=DEA<0 AND COUNT(TJ1,TJ2+1)>2;{从下跌起点算起，零下金叉三次以上}
TJ9:=DEA<0 AND COUNT(TJ8,TJ2)>0,NODRAW;{满足条件8的周期}
TJ10:=TJ7 AND DIF>0 AND DIF>REF(DIF,1) AND DEA<0;{条件6信号加强}
TJ11:=TJ9 AND DIF>0 AND DIF>REF(DIF,1) AND DEA<0;{条件8信号加强}
TJ12:=DIF>0 AND DEA>0 AND REF(MACD,1) AND REF(MACD,2)<0 AND MACD>REF(MACD,1) AND
REF(MACD,1)<REF(MACD,2);{零上且DIF,DEA反向收敛}
STJ1:=DIF>0 AND MACD>0 AND REF(MACD,1)>0
AND REF(MACD,1)>REF(MACD,2) AND MACD<REF(MACD,1);{零上MACD为正时，DIF,DEA发生收敛}
STJ2:=BARSLAST(CROSS(DIF,0)),NODRAW;{上涨起点到现在的周期数}
STJ3:=BARSLAST(CROSS(DIF,DEA));{上一次金叉以来到现在的周期数}
STJ4:=DIF>0 AND COUNT(STJ1,STJ2)>1 AND COUNT(STJ1,STJ3)>1 AND STJ1;{从上涨起点算起,发生零上收敛两次以上}
STJ5:=DIF>0 AND COUNT(STJ1,STJ2)>2 AND COUNT(STJ1,STJ3)>2 AND STJ1;{从上涨起点算起,发生零上收敛三次以上}
STJ6:=DIF>0 AND COUNT(STJ1,STJ2)>3 AND COUNT(STJ1,STJ3)>3 AND STJ1;{从上涨起点算起,发生零上收敛四次以上}
STJ7:=DIF>0 AND COUNT(STJ1,STJ2)<2 AND CROSS(DEA,DIF);{从上涨起点算起,零上收敛一次即出现死叉}
STJ8:=COUNT(CROSS(DIF,DEA),STJ2)>0 AND STJ1;{零上金叉后出现零上收敛}
STJ9:=DIF>0 AND REF(CROSS(DIF,DEA),1) AND CROSS(DEA,DIF);{零上金叉后随即死叉}
STJ10:=COUNT(DIF>0 AND (STJ4 OR STJ7 OR STJ8 OR STJ9),STJ2);
STJ11:=DIF>0 AND MACD<0 AND REF(MACD,2)<0 AND
MACD<REF(MACD,1) AND REF(MACD,1)>REF(MACD,2);{零上二次向下发散}
减仓提示:STJ10,NODRAW,COLORGREEN;
清仓提示:STJ10>4,NODRAW,COLORYELLOW;
DRAWICON(STJ4,DIF*1.03,2);
STICKLINE(STJ5,0,MACD,2,1),COLORGREEN;
DRAWICON(STJ5,DIF*1.03,2);
STICKLINE(STJ6,0,MACD,2,0),COLORGREEN;
DRAWICON(STJ6,DIF*1.03,2);
STICKLINE(STJ7,0,MACD,2,0),COLORGREEN;
DRAWICON(STJ7,DEA*1.03,2);
STICKLINE(STJ8,0,MACD,2,0),COLORBLUE;
DRAWICON(STJ8,DIF*1.03,2);
STICKLINE(STJ9,0,MACD,2,0),COLORBLUE;
DRAWICON(STJ9,DEA*1.03,2);
DRAWTEXT(STJ10>4 AND (STJ4 OR STJ7 OR STJ8 OR STJ9),DIF*1.1,'逃'),COLORMAGENTA;
STICKLINE(STJ11,0,DIF,0,-1),COLORBLUE;
{以下是COPY的，来源于理想论坛}
J1:="MACD.DIF"(12,26,9);J2:="MACD.DEA"(12,26,9);
J3:="KDJ.K"(9,3,3);J4:="KDJ.D"(9,3,3);
J5:="RSI.RSI1"(6,12,24);J6:="RSI.RSI2"(6,12,24);
A1:=BARSLAST(REF(CROSS(J1,J2),1));
B1:=REF(C,A1+1)>C AND REF(J1,A1+1)<J1 AND CROSS(J1,J2);
A2:=BARSLAST(REF(CROSS(J3,J4),1));
B2:=REF(C,A2+1)>C AND REF(J3,A2+1)<J3 AND CROSS(J3,J4);
A3:=BARSLAST(REF(CROSS(J5,J6),1));
B3:=REF(C,A3+1)>C AND REF(J5,A3+1)<J5 AND CROSS(J5,J6);
C1:=BARSLAST(REF(CROSS(J2,J1),1));
D1:=REF(C,C1+1)<C AND REF(J1,C1+1)>J1 AND CROSS(J2,J1);
C2:=BARSLAST(REF(CROSS(J4,J3),1));
D2:=REF(C,C2+1)<C AND REF(J3,C2+1)>J3 AND CROSS(J4,J3);
C3:=BARSLAST(REF(CROSS(J6,J5),1));
D3:=REF(C,C3+1)<C AND REF(J5,C3+1)>J5 AND CROSS(J6,J5);
MACD底背离:=FILTER(B1>0,5);
DRAWTEXT(MACD底背离,REF(J1,A1+1),'♂M底背'),COLORYELLOW;
KDJ底背离:=FILTER(B2>0,5);
DRAWTEXT(KDJ底背离,0,'♂K底背'),COLORWHITE;
RSI底背离:=FILTER(B3>0,5);
DRAWTEXT(RSI底背离,REF(J1,A1+3),'♂R底背'),COLORFFCC66;
MACD顶背离:=FILTER(D1>0,5);
DRAWTEXT(MACD顶背离,DIF+0.01,'♀M顶背'),COLOR0066FF;
KDJ顶背离:=FILTER(D2>0,5);
DRAWTEXT(KDJ顶背离,REF(J1,D1+2),'♀K顶背'),COLOR0000FF;
RSI顶背离:=FILTER(D3>0,5);
DRAWTEXT(RSI顶背离,REF(J1,D1+3),'♀R顶背'),COLORFF00FF;
DIF;
DEA;
DRAWTEXT(CROSS(DIF,DEA) AND DEA>0,DEA,'↖加油'),COLORGREEN;
DRAWTEXT(CROSS(DIF,DEA)AND DEA<0 AND MACD底背离,DEA,'↖底部')COLORGREEN;
{天使涨吧}
AA:=BARSLAST(TIME=100000);
CC:=REF(HHV(C,0),AA+1);
VV:=REF(HHV(V,0),AA+1);
ZF:=CC/DYNAINFO(3)<1.05;
XG10:=CROSS(C,CC) AND V>VV AND ZF;
AA1:=BARSLAST(TIME=110000);
CC1:=REF(HHV(C,0),AA1+1);
VV1:=REF(HHV(V,0),AA1+1);
ZF1:=CC1/DYNAINFO(3)<1.05;
XG11:=CROSS(C,CC1) AND V>VV1 AND ZF1;
XG:=XG10 AND XG11;
涨吧:= XG11 OR XG;
DRAWTEXT(涨吧=1, DIF,'￥涨吧'),COLORGREEN;
{开量冲板2}
资金:=C*IF(PERIOD=0 AND MINUTE=31,VOL,0),COLORSTICK;{√}
冲板线:=(CAPITAL/100)*1/20,COLORCYAN,LINETHICK1;
单量必板线:=资金>1000;{分时图单量超1000万资金};
单量冲板线:=资金>冲板线 AND 资金<1000;{分时图单量超500万资金};
DRAWICON(单量必板线 AND DYNAINFO(4)/DYNAINFO(3)>1.01,0,12);{1000万处画仙人指}
DRAWICON(单量冲板线 AND DYNAINFO(4)/DYNAINFO(3)>1.01,0,23);{500万处画十字星，以示警戒};
虎:= (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100, COLORSTICK;
主力:=EXPMA( (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100,120)-0.0004,LINETHICK5,COLORMAGENTA;
散户:=EXPMA( (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100,200),LINETHICK5,COLORGREEN;
DRAWICON(CROSS(EXPMA(虎,120)-0.0004,EXPMA(虎,200)),EXPMA(虎,200)*1,13);
DRAWICON(CROSS(EXPMA(虎,200),EXPMA(虎,120)-0.0004),EXPMA(虎,200)*1,12);
吸:IF(DIF>-0.4, DIF,DRAWNULL),LINETHICK3,COLORRED;
拉:IF(DIF>0 AND DIF<REF(DIF,1), DIF,DRAWNULL),LINETHICK3,COLORGREEN;
派:IF(DIF<0 AND DIF>REF(DIF,1), DIF,DRAWNULL),LINETHICK3,COLORFF00FF;
落:IF(DIF<0 AND DIF<REF(DIF,1), DIF,DRAWNULL),LINETHICK3,COLORWHITE;
未来函数检测结果如下：
该公式包含未来函数:CAPITAL
该公式包含未来函数:DYNAINFO
定制指标公式、软件请联系QQ或微信同号：88652583
ES赋值:1日前的收盘价的26日指数移动平均
EP赋值:1日前的收盘价的12日指数移动平均
DIF赋值:最高价
DEA赋值:收盘价
MID赋值:9
DI赋值:1日前的DIF
输出DIF穿零价:((12+1)*(26-1)*ES-(26+1)*(12-1)*EP)/(2*(26+1)-2*(12+1)),NODRAW,画白色
输出DIF拐点价:((12-1)*EP/(12+1)-(26-1)*ES/(26+1)-DI)*(26+1)*(12+1)/(2*(12+1)-2*(26+1)),画黄色,NODRAW
TJ1赋值:DEA<0 AND DIF上穿DEA
TJ2赋值:上次0上穿DIF距今天数
TJ3赋值:DEA<0 AND 统计TJ2+1日中满足TJ1的天数>1
TJ4赋值:DEA<0 AND 平滑异同平均线>0 AND 1日前的平滑异同平均线>0 AND 1日前的平滑异同平均线<2日前的平滑异同平均线 AND 平滑异同平均线>1日前的平滑异同平均线
TJ5赋值:上次TJ1距今天数
TJ6赋值:DEA<0 AND TJ3 AND 统计TJ5+1日中满足TJ4的天数>0,NODRAW
TJ7赋值:DEA<0 AND 统计TJ2日中满足TJ6的天数>0,NODRAW
TJ8赋值:DEA<0 AND 统计TJ2+1日中满足TJ1的天数>2
TJ9赋值:DEA<0 AND 统计TJ2日中满足TJ8的天数>0,NODRAW
TJ10赋值:TJ7 AND DIF>0 AND DIF>1日前的DIF AND DEA<0
TJ11赋值:TJ9 AND DIF>0 AND DIF>1日前的DIF AND DEA<0
TJ12赋值:DIF>0 AND DEA>0 AND 1日前的平滑异同平均线 AND 2日前的平滑异同平均线<0 AND 平滑异同平均线>1日前的平滑异同平均线 AND 1日前的平滑异同平均线<2日前的平滑异同平均线
STJ1赋值:DIF>0 AND 平滑异同平均线>0 AND 1日前的平滑异同平均线>0 AND 1日前的平滑异同平均线>2日前的平滑异同平均线 AND 平滑异同平均线<1日前的平滑异同平均线
STJ2赋值:上次DIF上穿0距今天数,NODRAW
STJ3赋值:上次DIF上穿DEA距今天数
STJ4赋值:DIF>0 AND 统计STJ2日中满足STJ1的天数>1 AND 统计STJ3日中满足STJ1的天数>1 AND STJ1
STJ5赋值:DIF>0 AND 统计STJ2日中满足STJ1的天数>2 AND 统计STJ3日中满足STJ1的天数>2 AND STJ1
STJ6赋值:DIF>0 AND 统计STJ2日中满足STJ1的天数>3 AND 统计STJ3日中满足STJ1的天数>3 AND STJ1
STJ7赋值:DIF>0 AND 统计STJ2日中满足STJ1的天数<2 AND DEA上穿DIF
STJ8赋值:统计STJ2日中满足DIF上穿DEA的天数>0 AND STJ1
STJ9赋值:DIF>0 AND 1日前的DIF上穿DEA AND DEA上穿DIF
STJ10赋值:统计STJ2日中满足DIF>0AND(STJ4ORSTJ7ORSTJ8ORSTJ9)的天数
STJ11赋值:DIF>0 AND 平滑异同平均线<0 AND 2日前的平滑异同平均线<0 AND 平滑异同平均线<1日前的平滑异同平均线 AND 1日前的平滑异同平均线>2日前的平滑异同平均线
输出减仓提示:STJ10,NODRAW,画绿色
输出清仓提示:STJ10>4,NODRAW,画黄色
当满足条件STJ4时,在DIF*1.03位置画2号图标
当满足条件STJ5时,在0和平滑异同平均线位置之间画柱状线,宽度为2,1不为0则画空心柱.,画绿色
当满足条件STJ5时,在DIF*1.03位置画2号图标
当满足条件STJ6时,在0和平滑异同平均线位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件STJ6时,在DIF*1.03位置画2号图标
当满足条件STJ7时,在0和平滑异同平均线位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色
当满足条件STJ7时,在DEA*1.03位置画2号图标
当满足条件STJ8时,在0和平滑异同平均线位置之间画柱状线,宽度为2,0不为0则画空心柱.,画蓝色
当满足条件STJ8时,在DIF*1.03位置画2号图标
当满足条件STJ9时,在0和平滑异同平均线位置之间画柱状线,宽度为2,0不为0则画空心柱.,画蓝色
当满足条件STJ9时,在DEA*1.03位置画2号图标
当满足条件STJ10>4AND(STJ4ORSTJ7ORSTJ8ORSTJ9)时,在DIF*1.1位置书写文字,画洋红色
当满足条件STJ11时,在0和DIF位置之间画柱状线,宽度为0,-1不为0则画空心柱.,画蓝色
J1赋值:"平滑异同平均线的DIF"(12,26,9)
J2赋值:"平滑异同平均线的DEA"(12,26,9)
J3赋值:"KDJ的K"(9,3,3)
J4赋值:"KDJ的D"(9,3,3)
J5赋值:"RSI的RSI1"(6,12,24)
J6赋值:"RSI的RSI2"(6,12,24)
A1赋值:上次1日前的J1上穿J2距今天数
B1赋值:A1+1日前的收盘价>收盘价 AND A1+1日前的J1A2赋值:上次1日前的J3上穿J4距今天数
B2赋值:A2+1日前的收盘价>收盘价 AND A2+1日前的J3A3赋值:上次1日前的J5上穿J6距今天数
B3赋值:A3+1日前的收盘价>收盘价 AND A3+1日前的J5C1赋值:上次1日前的J2上穿J1距今天数
D1赋值:C1+1日前的收盘价<收盘价 AND C1+1日前的J1>J1 AND J2上穿J1
C2赋值:上次1日前的J4上穿J3距今天数
D2赋值:C2+1日前的收盘价<收盘价 AND C2+1日前的J3>J3 AND J4上穿J3
C3赋值:上次1日前的J6上穿J5距今天数
D3赋值:C3+1日前的收盘价<收盘价 AND C3+1日前的J5>J5 AND J6上穿J5
MACD底背离赋值:B1>0的5日过滤
当满足条件MACD底背离时,在A1+1日前的J1位置书写文字,画黄色
KDJ底背离赋值:B2>0的5日过滤
当满足条件KDJ底背离时,在0位置书写文字,画白色
RSI底背离赋值:B3>0的5日过滤
当满足条件RSI底背离时,在A1+3日前的J1位置书写文字,COLORFFCC66
MACD顶背离赋值:D1>0的5日过滤
当满足条件MACD顶背离时,在DIF+0.01位置书写文字,COLOR0066FF
KDJ顶背离赋值:D2>0的5日过滤
当满足条件KDJ顶背离时,在D1+2日前的J1位置书写文字,COLOR0000FF
RSI顶背离赋值:D3>0的5日过滤
当满足条件RSI顶背离时,在D1+3日前的J1位置书写文字,COLORFF00FF
DIF
DEA
当满足条件DIF上穿DEAANDDEA>0时,在DEA位置书写文字,画绿色
当满足条件DIF上穿DEAANDDEA<0ANDMACD底背离时,在DEA位置书写文字画绿色
AA赋值:上次时间(时分)=100000距今天数
CC赋值:AA+1日前的0日内收盘价的最高值
VV赋值:AA+1日前的0日内成交量(手)的最高值
ZF赋值:CC/昨收盘价<1.05
XG10赋值:收盘价上穿CC AND 成交量(手)>VV AND ZF
AA1赋值:上次时间(时分)=110000距今天数
CC1赋值:AA1+1日前的0日内收盘价的最高值
VV1赋值:AA1+1日前的0日内成交量(手)的最高值
ZF1赋值:CC1/昨收盘价<1.05
XG11赋值:收盘价上穿CC1 AND 成交量(手)>VV1 AND ZF1
XG赋值:XG10 AND XG11
涨吧赋值: XG11 OR XG
当满足条件涨吧=1时,在DIF位置书写文字,画绿色
资金赋值:收盘价*如果周期类型=0ANDMINUTE=31,返回成交量(手),否则返回0,COLORSTICK
冲板线赋值:(当前流通股本(手)/100)*1/20,画青色,线宽为1
单量必板线赋值:资金>1000
单量冲板线赋值:资金>冲板线 AND 资金<1000
当满足条件单量必板线ANDDYNAINFO(4)/昨收盘价>1.01时,在0位置画12号图标
当满足条件单量冲板线ANDDYNAINFO(4)/昨收盘价>1.01时,在0位置画23号图标
虎赋值: (收盘价的500日指数移动平均-1日前的收盘价的500日指数移动平均)/1日前的收盘价的500日指数移动平均*100, COLORSTICK
主力赋值:(收盘价的500日指数移动平均-1日前的收盘价的500日指数移动平均)/1日前的收盘价的500日指数移动平均*100的120日指数移动平均-0.0004,线宽为5,画洋红色
散户赋值:(收盘价的500日指数移动平均-1日前的收盘价的500日指数移动平均)/1日前的收盘价的500日指数移动平均*100的200日指数移动平均,线宽为5,画绿色
当满足条件虎的120日指数移动平均-0.0004上穿虎的200日指数移动平均时,在虎的200日指数移动平均*1位置画13号图标
当满足条件虎的200日指数移动平均上穿虎的120日指数移动平均-0.0004时,在虎的200日指数移动平均*1位置画12号图标
输出吸:如果DIF>-0.4,返回DIF,否则返回无效数,线宽为3,画红色
输出拉:如果DIF>0ANDDIF<1日前的DIF,返回DIF,否则返回无效数,线宽为3,画绿色
输出派:如果DIF<0ANDDIF>1日前的DIF,返回DIF,否则返回无效数,线宽为3,COLORFF00FF
输出落:如果DIF<0ANDDIF<1日前的DIF,返回DIF,否则返回无效数,线宽为3,画白色
