万法归一明天买金叉公式指标[大智慧公式]

相关标签:博发世家杀四分之一 、 博发世家免费资料大全 、 71期博发世家九肖王 、 博发世家原创猛料 、 博发世家正版九肖 、 95期博发世家九肖王 、 博发世家9肖王 论坛 、 博发世家免资料大全 、 83期博发世家九肖王 、 蓝月亮博发世家 、 富民3肖6码默认论坛 、 博发世家免费料大全 、

万法归一，浓缩精华

原理解析：
填充背景 DRAWTEXTREL(10,900,'㊣十二星座*神獒赢富㊣'),线宽为1,COLOR00EEFF RSV赋值:(收盘价-9日内最低价的最低值)/(9日内最高价的最高值-9日内最低价的最低值)*100 输出K:RSV的3日[1日权重]移动平均,线宽为2,画白色 输出D:K的3日[1日权重]移动平均,线宽为2,COLOR00DDDD 输出J:3*K-2*D,线宽为2,COLOR800080 输出DIFF:收盘价的12日指数移动平均-收盘价的26日指数移动平均,线宽为0,COLOR0099FF 输出DEA :DIFF的9日指数移动平均,线宽为0,COLORD89837 输出平滑异同平均:2*(DIFF-DEA),COLORFF9999,线宽为0 YLZC赋值:如果收盘价=大盘的收盘价,返回(大盘的收盘价+大盘的最高价+大盘的最低价+大盘的开盘价)/4,否则返回成交额(元)/(成交量(手)+0.01)/100 阻价赋值:如果收盘价=大盘的收盘价,返回YLZC+大盘的收盘价-大盘的最低价,否则返回YLZC+(收盘价-最低价) 支价赋值:如果收盘价=大盘的收盘价,返回大盘的最低价+大盘的收盘价-YLZC,否则返回最低价+(收盘价-YLZC) 输出今压:1日前的阻价,线宽为0,COLORAA11BB 输出今撑:1日前的支价,线宽为0,COLOR009900 输出明压:阻价,线宽为0 输出明撑:支价,线宽为0 RSV1赋值:(9.8日内最高价的最高值-收盘价)/(9.8日内最高价的最高值-9.8日内最低价的最低值)*101 KK赋值:RSV1的3日[1日权重]移动平均 DD赋值:KK的3日[1日权重]移动平均 JJ赋值:3*KK-2*DD 买卖赋值:如果JJ>=100,返回100,否则返回如果JJ<=0,返回0,否则返回JJ 输出明天买:如果买卖=100,返回0-10,否则返回0,COLOR00CCCC 输出明天卖:如果买卖=0,返回90,否则返回100,COLOR00FF00 KX赋值:250 KH赋值:KX日内K的最高值 DH赋值:KX日内D的最高值 JH赋值:KX日内J的最高值 KL赋值:KX日内K的最低值 DL赋值:KX日内D的最低值 JL赋值:KX日内J的最低值 HKMAX赋值:KH和DH和JH的较大值的较大值 LKMIN赋值:KL和DL和JL的较小值的较小值 KHLB赋值:(HKMAX+LKMIN)/2 KHLC赋值:HKMAX-LKMIN MHF赋值:KX日内DIFF的最高值 MHD赋值:KX日内DEA的最高值 MHM赋值:KX日内MACD的最高值 MLF赋值:KX日内DIFF的最低值 MLD赋值:KX日内DEA的最低值 MLM赋值:KX日内MACD的最低值 HMAX赋值:MHF和MHD和MHM的较大值的较大值 LMIN赋值:MLF和MLD和MLM的较小值的较小值 FHLB赋值:(HMAX-LMIN)/100 FHLC赋值:HMAX-LMIN SH赋值:(0-FHLB)*(KHLC/FHLC)+KHLB DIFFA赋值:(DIFF-FHLB)*(KHLC/FHLC)+KHLB DEAA赋值:(DEA-FHLB)*(KHLC/FHLC)+KHLB MACDA赋值:(MACD-FHLB)*(KHLC/FHLC)+KHLB CDA赋值:MACD<1日前的MACD AND MACD>0 CDB赋值:MACD>=1日前的MACD AND MACD>0 CDC赋值:MACD>1日前的MACD AND MACD<0 CDD赋值:MACD<=1日前的MACD AND MACD<0 当满足条件CDA时,在SH和MACDA位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR00AAFF 当满足条件CDA时,在SH和MACDA位置之间画柱状线,宽度为6.6,0不为0则画空心柱.,COLOR00BBFF 当满足条件CDA时,在SH和MACDA位置之间画柱状线,宽度为4.4,0不为0则画空心柱.,COLOR00CCFF 当满足条件CDA时,在SH和MACDA位置之间画柱状线,宽度为3.3,0不为0则画空心柱.,COLOR00DDFF 当满足条件CDA时,在SH和MACDA位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR00EEFF 当满足条件CDA时,在SH和MACDA位置之间画柱状线,宽度为1.1,0不为0则画空心柱.,COLOR00FFFF 当满足条件CDB时,在SH和MACDA位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR0000AA 当满足条件CDB时,在SH和MACDA位置之间画柱状线,宽度为6.6,0不为0则画空心柱.,COLOR0011BB 当满足条件CDB时,在SH和MACDA位置之间画柱状线,宽度为4.4,0不为0则画空心柱.,COLOR0022CC 当满足条件CDB时,在SH和MACDA位置之间画柱状线,宽度为3.3,0不为0则画空心柱.,COLOR0033DD 当满足条件CDB时,在SH和MACDA位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR0044EE 当满足条件CDB时,在SH和MACDA位置之间画柱状线,宽度为1.1,0不为0则画空心柱.,COLOR0055FF 当满足条件CDC时,在SH和MACDA位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORAA00BB 当满足条件CDC时,在SH和MACDA位置之间画柱状线,宽度为6.6,0不为0则画空心柱.,COLORBB11BB 当满足条件CDC时,在SH和MACDA位置之间画柱状线,宽度为4.4,0不为0则画空心柱.,COLORCC22BB 当满足条件CDC时,在SH和MACDA位置之间画柱状线,宽度为3.3,0不为0则画空心柱.,COLORDD33BB 当满足条件CDC时,在SH和MACDA位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOREE44BB 当满足条件CDC时,在SH和MACDA位置之间画柱状线,宽度为1.1,0不为0则画空心柱.,COLORFF55BB 当满足条件CDD时,在SH和MACDA位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF7700 当满足条件CDD时,在SH和MACDA位置之间画柱状线,宽度为6.6,0不为0则画空心柱.,COLORFF8811 当满足条件CDD时,在SH和MACDA位置之间画柱状线,宽度为4.4,0不为0则画空心柱.,COLORFFAA22 当满足条件CDD时,在SH和MACDA位置之间画柱状线,宽度为3.3,0不为0则画空心柱.,COLORFFBB33 当满足条件CDD时,在SH和MACDA位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLORFFDD44 当满足条件CDD时,在SH和MACDA位置之间画柱状线,宽度为1.1,0不为0则画空心柱.,COLORFFDD55 PARTLINE(DIFFA,DIFF>0,自定色,DIFF<0,自定色) PARTLINE(DEAA,DEA>0,自定色,DEA<0,自定色) 当满足条件数据位置状态=2时,在SH位置书写文字,COLOR00AAAA TYP赋值:(最高价+最低价+收盘价)/3 当满足条件DIFF>1日前的DIFF时,在20和20位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色 当满足条件DIFF<1日前的DIFF时,在20和20位置之间画柱状线,宽度为2,0不为0则画空心柱.,画绿色 当满足条件K>=1日前的KORK>DANDDIFF>1日前的DIFF时,在80和80位置之间画柱状线,宽度为2,1不为0则画空心柱.,画红色 当满足条件K<1日前的K时,在80和80位置之间画柱状线,宽度为2,1不为0则画空心柱.,画绿色 MACD金叉赋值:MACD上穿DIFF AND MACD>=(0-0.05) AND MACD<=0.02 当满足条件MACD金叉时,在MACDA*0.82位置书写文字,COLOR00FFFF XX赋值:最低价的3日简单移动平均*0.96的30日指数移动平均 DIFF金叉赋值:如果DIFF上穿DEAANDXX-1日前的XX>0ANDMACD>=1日前的MACDANDDIFF<=0,返回1,否则返回0 当满足条件DIFF金叉=1时,在DIFFA*1.68位置书写文字,COLORCDFFBB 低位金叉赋值:DIFF上穿DEA AND DIFF<-0.1 当满足条件低位金叉时,在DEAA*0.99位置书写文字,COLOR0099DD DIFDEA赋值:统计上次DEA>=0距今天数日中满足DIFF上穿DEA的天数 二次金叉赋值:DIFF上穿DEA AND DEA<0 AND 统计21日中满足DIFDEA=2的天数=1 当满足条件二次金叉时,在DEAA*0.99-8位置书写文字,COLORFF00FF A1赋值:上次1日前的DIFF上穿DEA距今天数 底背离赋值:A1+1日前的收盘价>收盘价 AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA 当满足条件底背离时,在DEAA*0.99-16位置书写文字,COLOR0099FF A2赋值:上次1日前的DEA上穿DIFF距今天数 顶背离赋值:A2+1日前的收盘价<收盘价 AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF 当满足条件顶背离的5日过滤时,在DEAA*1.02位置书写文字,COLORDDAAAA 周DIFF赋值:"MACD.DIFF[取周线数据]" 周DEA赋值:"MACD.DEA[取周线数据]" 周MACD赋值:"MACD.MACD[取周线数据]" DIF周金叉赋值:周DIFF上穿周DEA 当满足条件DIF周金叉时,在DEAA位置书写文字,COLOR0099FF 当满足条件周DEA上穿周DIFF时,在DEAA+4位置书写文字,ALIGN0,COLORCDFFBB MACD周金叉赋值:周MACD上穿周DIFF AND 周MACD>=(0-0.05) AND 周MACD<=0.02 当满足条件MACD周金叉时,在MACDA-0.03位置书写文字,COLOR00FFFF 月DIFF赋值:"MACD.DIFF[取月线数据]" 月DEA赋值:"MACD.DEA[取月线数据]" DIF月金叉赋值:月DIFF上穿月DEA 当满足条件DIF月金叉时,在DEAA*0.98位置书写文字,COLOR00FFCC 当满足条件月DEA上穿月DIFF时,在DEAA*1.02位置书写文字,ALIGN0,COLORDDDDDD 周K赋值:"KDJ的K[取周线数据]"(9,3,3) 周D赋值:"KDJ的D[取周线数据]"(9,3,3) 周J赋值:"KDJ的J[取周线数据]"(9,3,3) 月K赋值:"KDJ的K[取月线数据]"(9,3,3) 月D赋值:"KDJ的D[取月线数据]"(9,3,3) 月J赋值:"KDJ的J[取月线数据]"(9,3,3) 月金叉赋值:月K上穿月D 周金叉赋值:周K上穿周D 日金叉赋值:K上穿DANDK<20的4日过滤 当满足条件月金叉时,在月D-2位置书写文字,ALIGN0,COLOR0022EE 当满足条件月金叉时,在月D-2位置书写文字,画黄色 当满足条件周金叉时,在周D位置书写文字,ALIGN2,COLOR0022EE 当满足条件周金叉时,在周D位置书写文字,画绿色 当满足条件日金叉时,在K位置画1号图标,ALIGN2 当满足条件日金叉时,在D-6位置书写文字,COLOR00CCCC 当满足条件周D上穿周K时,在周D*1.2位置书写文字,COLOR00DDBB 当满足条件月D上穿月K时,在月D位置书写文字,COLORFFFFFF KDB赋值:上次1日前的K上穿D距今天数 KDDB赋值:KDB+1日前的收盘价>收盘价 AND KDB+1日前的K<K AND K上穿D K底背赋值:如果KDDB>0的5日过滤,返回1,否则返回0 当满足条件K底背=1时,在D*0.98位置书写文字,COLORDDDDDD KDD赋值:上次1日前的D上穿K距今天数 K顶背赋值:KDD+1日前的收盘价<收盘价 AND KDD+1日前的K>K AND D上穿K 当满足条件K顶背>0的5日过滤时,在D+8位置书写文字,COLORFFAA22 MD1赋值:收盘价的80日简单移动平均-收盘价的13日简单移动平均/3 MD2赋值:(收盘价-MD1)/MD1的3日简单移动平均 买点1赋值:MD2上穿0 AND 最低价/1日前的最高价<1.012 AND J<75 AND J>1日前的J MA12赋值:收盘价的12日简单移动平均 佳点赋值:如果MACD>=5日前的MACDANDOPEN<=1日前的收盘价ANDXX-1日前的XX>0ANDMACD<=0ANDMA12-1日前的MA12>=0的3日过滤ANDJ<80ANDJ>1日前的JANDD>1日前的DAND(DIFF>=1日前的DIFFORDEA>=R,返回F(DEA,1)),否则返回1 当满足条件佳点=1时,在MACDA*0.98位置书写文字,COLOR0099FF DX0赋值:收盘价的2日指数移动平均-开盘价的5日指数移动平均 DX1赋值:如果DX0上穿MACDANDLOW<=XXANDMACD<=(0-0.11)AND(J<20ORK<20),返回1,否则返回0 当满足条件DX1的3日过滤时,在0位置书写文字,COLOR00CC00 MA10赋值:收盘价的10日简单移动平均 SS赋值:最高价的3日简单移动平均*1.05的30日指数移动平均 LQS赋值:如果0.7*(DIFF上穿DEAANDCLOSE<SSANDXX-1日前的XX>0ANDCROSS(MACD,0)ANDMACD>=0ANDDIFF>0ANDMA10-1日前的MA10>0ANDVOL>1日前的成交量(手))>=0.7AND(收盘价<SSANDXX-?日前的XX的?日过滤,返回)>0),5)ANDJ<80,否则返回1 当满足条件LQS=1时,在MACDA*0.98位置书写文字,COLORCDFFDD 最佳点赋值:如果统计3日中满足MD2>1日前的MD2的天数=3ANDCOUNT(MD2<0,10)=10ANDREF(MD2,3)=10日内MD2的最低值ANDJ<80ANDJ>1日前的J,返回1,否则返回0 当满足条件最佳点=1时,在J位置书写文字,COLORFF00CC 买点2赋值:2日前的MD2=20日内MD2的最低值 AND 2日前的MD2<0.071 AND 2日前的MD2<1日前的MD2 ANDNOT(1日前的最低价>2日前的最高价 AND 最低价>1日前的最高价) AND 收盘价>1日前的收盘价 AND J<75 AND J>1日前的J 当满足条件买点1OR买点2时,在D-1位置书写文字,COLORFF00CC YZ赋值:(RSV的3日[1日权重]移动平均的整数部分+K的3日[1日权重]移动平均的整数部分)/2 预涨赋值:YZ上穿50 AND J<95 AND DIFF>1日前的DIFF AND 最低价<1日前的收盘价 当满足条件预涨时,在D*0.6位置书写文字,COLORA52A2A KD金叉赋值:K上穿DAND J>20 AND J<80 输出选股:如果MACD上穿0ORDX1OR佳点ORLQSORK底背OR月金叉OR周金叉OR日金叉OR买点1OR买点2OR最佳点ORMACD金叉ORDIFF金叉OR低位金叉OR二次金叉OR底背离ORDIF周金叉ORMACD周金叉ORDIF?返回金叉ORKD金叉,否则返回2,线宽为0

 来源:程序化99（ WWW.CXH99.COM ）

源码：

DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
DRAWTEXTREL(10,900,'㊣十二星座*神獒赢富㊣'),linethick1,COLOR00EEff;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),LINETHICK2,COLORWHITE;
D:SMA(K,3,1),LINETHICK2,COLOR00DDDD;
J:3*K-2*D,LINETHICK2,COLOR800080;
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),linethick0,COLOR0099FF;
DEA :EMA(DIFF,9),linethick0,COLORD89837;
MACD:2*(DIFF-DEA),COLORFF9999,linethick0;
YLZC:=if(close=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(vol+0.01)/100);
阻价:=if(close=INDEXC,YLZC+INDEXC-INDEXl,YLZC+(close-low));
支价:=if(close=INDEXC,INDEXl+INDEXC-YLZC,low+(close-YLZC));
今压:REF(阻价,1),LINETHICK0,COLORAA11BB;
今撑:REF(支价,1),LINETHICK0,COLOR009900;
明压:阻价,LINETHICK0;
明撑:支价,LINETHICK0;
rsv1:=(hhv(h,9.8)-c)/(hhv(h,9.8)-llv(l,9.8))*101;
kk:=sma(rsv1,3,1);
dd:=sma(kk,3,1);
jj:=3*kk-2*dd;
买卖:=if(jj>=100,100,if(jj<=0,0,jj));
明天买:if(买卖=100,0-10,0),color00cccc;
明天卖:if(买卖=0,90,100),color00ff00;
KX:=250;
KH:=HHV(K,KX);
DH:=HHV(D,KX);
JH:=HHV(J,KX);
KL:=LLV(K,KX);
DL:=LLV(D,KX);
JL:=LLV(J,KX);
HKMAX:=MAX(KH,MAX(DH,JH));
LKMIN:=MIN(KL,MIN(DL,JL));
KHLB:=(HKMAX+LKMIN)/2;
KHLC:=HKMAX-LKMIN;
MHF:=HHV(DIFF,KX);
MHD:=HHV(DEA,KX);
MHM:=HHV(MACD,KX);
MLF:=LLV(DIFF,KX);
MLD:=LLV(DEA,KX);
MLM:=LLV(MACD,KX);
HMAX:=MAX(MHF,MAX(MHD,MHM));
LMIN:=MIN(MLF,MIN(MLD,MLM));
FHLB:=(HMAX-LMIN)/100;
FHLC:=HMAX-LMIN;
SH:=(0-FHLB)*(KHLC/FHLC)+KHLB;
DIFFA:=(DIFF-FHLB)*(KHLC/FHLC)+KHLB;
DEAA:=(DEA-FHLB)*(KHLC/FHLC)+KHLB;
MACDA:=(macd-FHLB)*(KHLC/FHLC)+KHLB;
CDA:=MACD<ref(MACD,1) and MACD>0;
CDB:=MACD>=ref(MACD,1) and MACD>0;
CDC:=MACD>ref(MACD,1) and MACD<0;
CDD:=MACD<=ref(MACD,1) and MACD<0;
STICKLINE(CDA,SH,macda,6,0),COLOR00AAFF;{黄色段}
STICKLINE(CDA,SH,macda,6.6,0),COLOR00BBFF;
STICKLINE(CDA,SH,macda,4.4,0),COLOR00CCFF;
STICKLINE(CDA,SH,macda,3.3,0),COLOR00DDFF;
STICKLINE(CDA,SH,macda,2.2,0),COLOR00EEFF;
STICKLINE(CDA,SH,macda,1.1,0),COLOR00FFFF;
STICKLINE(CDB,SH,macda,6,0),COLOR0000AA; {红色段}
STICKLINE(CDB,SH,macda,6.6,0),COLOR0011BB;
STICKLINE(CDB,SH,macda,4.4,0),COLOr0022CC;
STICKLINE(CDB,SH,macda,3.3,0),COLOR0033DD;
STICKLINE(CDB,SH,macda,2.2,0),COLOR0044EE;
STICKLINE(CDB,SH,macda,1.1,0),COLOR0055FF;
STICKLINE(CDC,SH,macda,6,0),COLORAA00BB;{向上粉红}
STICKLINE(CDC,SH,macda,6.6,0),COLORBB11BB;
STICKLINE(CDC,SH,macda,4.4,0),COLORCC22BB;
STICKLINE(CDC,SH,macda,3.3,0),COLORDD33BB;
STICKLINE(CDC,SH,macda,2.2,0),COLOREE44BB;
STICKLINE(CDC,SH,macda,1.1,0),COLORFF55BB;
STICKLINE(CDD,SH,macda,6,0),COLORFF7700;
STICKLINE(CDD,SH,macda,6.6,0),COLORFF8811;
STICKLINE(CDD,SH,macda,4.4,0),COLORFFAA22;
STICKLINE(CDD,SH,macda,3.3,0),COLORFFBB33;
STICKLINE(CDD,SH,macda,2.2,0),COLORFFDD44;
STICKLINE(CDD,SH,macda,1.1,0),COLORFFDD55;
PARTLINE(DIFFA,DIFF>0,RGB(255,153,153),DIFF<0,RGB(255,153,153));
PARTLINE(DEAA,DEA>0,RGB(65,105,225),DEA<0,RGB(65,105,225));
DRAWTEXT(BARSTATUS=2,SH,'0'),color00aaaa;
TYP:=(HIGH+LOW+CLOSE)/3;
STICKLINE(diff>ref(diff,1),20,20,2,0),COLORRED;
STICKLINE(diff<ref(diff,1),20,20,2,0),COLORGREEN;
STICKLINE(K>=ref(K,1) or k>d and diff>ref(diff,1),80,80,2,1),COLORRED;
STICKLINE(K<ref(K,1),80,80,2,1),COLORGREEN;
MACD金叉:=CROSS(MACD,DIFF) AND MACD>=(0-0.05) AND MACD<=0.02;
DRAWTEXT(MACD金叉,macda*0.82,'MACD金叉'),color00FFFF;
XX:=ema(MA(LOW,3)*0.96,30);
DIFF金叉:=if(CROSS(DIFF,DEA) AND XX-REF(XX,1)>0 AND MACD>=REF(MACD,1) AND DIFF<=0,1,0);
DRAWTEXT(DIFF金叉=1,DIFFA*1.68,'DIFF金叉'),colorCDFFBB;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
DRAWTEXT(低位金叉,deaa*0.99,' 低位金叉'),COLOR0099DD;
DIFDEA:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(DIFDEA=2,21)=1;
DRAWTEXT(二次金叉,deaa*0.99-8,' 二次金叉'),ColorFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
DRAWTEXT(底背离,DEAA*0.99-16,' 底背离'),Color0099FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(FILTER(顶背离,5),DEAA*1.02,'顶背离'),COLORDDAAAA;
{周金叉,死叉}
周DIFF:="MACD.DIFF#WEEK";
周DEA:="MACD.DEA#WEEK";
周MACD:="MACD.MACD#WEEK";
DIF周金叉:=CROSS(周DIFF,周DEA);
DRAWTEXT(DIF周金叉,DEAA,'DIFF周金叉'),COLOR0099FF;
DRAWTEXT(CROSS(周DEA,周DIFF),DEAA+4,'DIFF周死叉'),align0,COLORCDFFBB;
MACD周金叉:=CROSS(周MACD,周DIFF) AND 周MACD>=(0-0.05) AND 周MACD<=0.02;
DRAWTEXT(MACD周金叉,macda-0.03,'MACD周金叉'),color00FFFF;
{月金叉,死叉}
月DIFF:="MACD.DIFF#MONTH";
月DEA:="MACD.DEA#MONTH";
DIF月金叉:=CROSS(月DIFF,月DEA);
DRAWTEXT(DIF月金叉,DEAA*0.98,'DIF月金叉'),COLOR00FFCC;
DRAWTEXT(CROSS(月DEA,月DIFF),DEAA*1.02,'DIF月死叉'),align0,COLORDDDDDD;
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
周J:="KDJ.J#WEEK"(9,3,3);
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
月J:="KDJ.J#MONTH"(9,3,3);
月金叉:=cross(月K,月D);
周金叉:=cross(周K,周D);
日金叉:=FILTER(cross(K,D) and K<20,4);
drawtext(月金叉,月D-2,''),ALIGN0,color0022ee;
DRAWTEXT(月金叉,月D-2,'KD月金叉'),coloryellow;
drawtext(周金叉,周D,''),ALIGN2,color0022ee;
DRAWTEXT(周金叉,周D,' KD周金叉'),colorgreen;
DRAWICON(日金叉,K,1),align2;
DRAWTEXT(日金叉,D-6,'低位金叉'),color00CCCC;
DRAWTEXT(CROSS(周D,周K),周D*1.2,'KD周死叉'),COLOR00DDBB;
DRAWTEXT(CROSS(月D,月K),月D,'KD月死叉'),COLORFFFFFF;
KDB:=BARSLAST(ref(cross(k,d),1));
KDDB:=ref(close,KDB+1)>close and ref(k,KDB+1)<k and cross(k,d);
K底背:=if(FILTER(KDDB>0,5),1,0);
DRAWTEXT(K底背=1,D*0.98,'底背离'),COLORDDDDDD;
KDD:=BARSLAST(ref(cross(d,k),1));
K顶背:=ref(close,KDD+1)<close and ref(k,KDD+1)>k and cross(d,k);
DRAWTEXT(FILTER(K顶背>0,5),D+8,'顶背离'),COLORFFAA22;
MD1:=MA(CLOSE,80)-MA(CLOSE,13)/3;
MD2:=MA((CLOSE-MD1)/MD1,3);
买点1:=CROSS(MD2,0) AND LOW/REF(HIGH,1)<1.012 AND J<75 AND J>REF(J,1);
ma12:=MA(CLOSE,12);
佳点:=if(FILTER(MACD>=REF(MACD,5) AND open<=ref(close,1) and XX-REF(XX,1)>0 AND MACD<=0 AND ma12-REF(ma12,1)>=0,3) and J<80 and J>ref(J,1) and D>ref(D,1) and (diff>=ref(diff,1) or dea>=ref(dea,1)),1,0);
DRAWTEXT(佳点=1,macda*0.98,'佳点'),color0099FF;
DX0:=EMA(CLOSE,2)-EMA(OPEN,5);
DX1:=if(CROSS(DX0,MACD) AND LOW<=XX AND MACD<=(0-0.11) and (J<20 or K<20),1,0);
DRAWTEXT(FILTER(DX1,3),0,'短10%'),color00CC00;{短线}
MA10:=MA(CLOSE,10);
SS:=EMA(MA(HIGH,3)*1.05,30);
LQS:=if(FILTER(0.7*(CROSS(DIFF,DEA) AND CLOSE<SS AND XX-REF(XX,1)>0 AND CROSS(MACD,0) AND MACD>=0 AND DIFF>0 AND ma10-REF(ma10,1)>0 AND VOL>REF(VOL,1))>=0.7 AND (CLOSE<SS AND XX-REF(XX,1)>0),5) AND J<80,1,0);
DRAWTEXT(LQS=1,macda*0.98,'量价齐上'),colorCDFFDD;{量价齐上}
最佳点:=IF(COUNT(MD2>REF(MD2,1),3)=3 AND COUNT(MD2<0,10)=10 AND REF(MD2,3)=LLV(MD2,10) and J<80 and J>ref(J,1),1,0);
DRAWTEXT(最佳点=1,J,'最佳点'),colorFF00CC;
买点2:=REF(MD2,2)=LLV(MD2,20) AND REF(MD2,2)<0.071 AND REF(MD2,2)<REF(MD2,1) AND
NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1) AND J<75 AND J>REF(J,1);
DRAWTEXT(买点1 or 买点2,D-1,'买'),colorff00CC;
{预涨}
YZ:=(INTPART(SMA(RSV,3,1))+INTPART(SMA(K,3,1)))/2;
预涨:=cross(yz,50) and j<95 and diff>ref(diff,1) and low<ref(close,1);
DRAWTEXT(预涨,d*0.6,'预涨'),COLORA52A2A;
KD金叉:=cross(K,D)and J>20 and J<80;
选股:if(cross(macd,0) or DX1 or 佳点 or LQS or K底背 or 月金叉 or 周金叉 or 日金叉 or 买点1 or 买点2 or 最佳点 or MACD金叉 or DIFF金叉 or 低位金叉 or 二次金叉 or 底背离 or DIF周金叉 or MACD周金叉 or DIF月金叉 or KD金叉,2,0),LINETHICK0;

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