通达信钻石趋势多空副图指标 金钻精品短线 指标源码

{金银三角主图源码如下}


DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,HYBLOCK),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.07,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.13,0,GNBLOCK),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.2,0,FGBLOCK),COLOR0080FF;
M5:=MA(C,5);
M10:=MA(C,10);
M30:=MA(C,30);
MM:=MIN(M5,M30);
MM2:=MIN(M10,M30);
HM:=MAX(M5,M30);
HM2:=MAX(M10,M30);
TC1:DRAWBAND(MM,RGB(255,0,0),MM2,0);
MA5:MA(C,5),COLORWHITE;
MA10:MA(C,10),COLORYELLOW;
MA30:MA(C,30),COLORGREEN;
MA60:MA(C,60),LINETHICK2,COLORFF00FF;{要求必须站上60日均线；经研究发现，在出现金银三角附近，
60均线呈水平一段时间(大于5日)时，容易出现超级牛股启动！此时，该60均线水平段与
回踩支撑位蓝色线呈平行或重叠状态最佳！}
MA120:MA(C,120),LINETHICK2,COLORCYAN,NODRAW;
三角:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,30) AND CROSS(MA(C,10),MA(C,30));
DRAWTEXT(三角 AND MA(C,5)<MA(C,120),MA(C,30)-0.08,'银三角'),COLORMAGENTA;
DRAWTEXT(三角 AND MA(C,30)>MA(C,120),MA(C,30)-0.08,'金三角'),COLORYELLOW;
支撑位:IF(BARSLAST(三角),REF(M30,BARSLAST(三角)),DRAWNULL),LINETHICK2,COLORFF0000;
DRAWTEXT(ISLASTBAR,支撑位-0.08,'回踩支撑位'),COLOR0000FF;

DD11:=0.9;
DD22:=1.2;
{黄金柱}
M:=30;
N:=15;
AJ:=HHV(H,M)=H;
AJT:=BARSLAST(AJ);
AJ1:=LLV(L,N)=L;
AJ1T:=BARSLAST(AJ1);
TJ:=HHV(H,M)=H;
TJT:=BARSLAST(TJ);
TJ1T:=BARSLAST(AJ1);
{STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0)COLORBLUE,LINETHICK3;}
OUT:=STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,REF(L,TJ1T)
,REF(H,TJT),0,0);
{KDJ日金}
日K:="KDJ.K#DAY"(9,3,3);
日D:="KDJ.D#DAY"(9,3,3);
{MACD日金}
日DIF:="MACD.DIF#DAY"(12,26,9);
日DEA:="MACD.DEA#DAY"(12,26,9);
{RSI日}
日RSI:="RSI.RSI1#DAY"(9);
{KDJ周金}
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
{MACD周金}
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
{RSI周}
周RSI:="RSI.RSI1#WEEK"(9);
{KDJ月金}
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
{MACD月金}
月DIF:="MACD.DIF#MONTH"(12,26,9);
月DEA:="MACD.DEA#MONTH"(12,26,9);
{RSI月}
月RSI:="RSI.RSI1#MONTH"(9);

X1:=日K>日D;
X2:=日DIF>日DEA;
X3:=日RSI>50;
X4:=周K>周D;
X5:=周DIF>周DEA;
X6:=周RSI>50;
X7:=月K>月D;
X8:=月DIF>月DEA;
X9:=月RSI>50;
黑马初显:=X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9;

月RSI1:="RSI.RSI1#MONTH"(9);
A:=月RSI1>50;
月共振:=CROSS(A>REF(A,1),0.5);

周RSI1:="RSI.RSI1#WEEK"(9);
AAAA:=周RSI1>50;
周共振:=CROSS(AAAA>REF(AAAA,1),0.5);
周K1:="KDJ.K#WEEK"(9,3,3),COLORBLUE;
周D1:="KDJ.D#WEEK"(9,3,3),COLORBLUE;
AAAAAA:=周K1>周D1;
首周K:=CROSS(AAAAAA>REF(AAAAAA,1),0.5);

AK1:=IF(INBLOCK('创业板'),1,0);
{创业板}
流通市值:=FINANCE(40)/100000000;
AK2:=流通市值<=150 AND FINANCE(42)>30 AND C<=65;
{流通市值小于150亿，上市天数大于30天，股价低于65元}
AK:=AK1 AND AK2;
MMM1:=月共振 AND NOT(周共振)AND AK;
MMM2:=月共振 AND 周共振 AND AK;
MMM3:=MMM1 AND 首周K;
MMM4:=MMM2 AND 首周K;
DRAWICON(MMM1,L*0.98,26);
DRAWICON(MMM2,L*0.98,9);
DRAWBMP(MMM1,H*1.2,'Q1A');
DRAWBMP(MMM2,H*1.2,'15A');
DRAWICON(MMM1,L*0.92,44);
DRAWICON(MMM2,L*0.92,42);
DRAWICON(MMM3,L*0.86,1);
DRAWICON(MMM4,L*0.86,1);






{金银三角副图源码如下}

三角:=MA(C,5)>MA(C,10) AND MA(C,10)>MA(C,30) AND CROSS(MA(C,10),MA(C,30));
T1:=LLV(LOW,450)>=LLV(LOW,20) AND BARSCOUNT(CLOSE)>800; 
{450日内最低价的最低值>=20日内最低价的最低值[即20日内出现的最低值是450日内的最低值] AND 上市周期数>800}
T2:=LLV(LOW,150)>=LLV(LOW,20) AND BARSCOUNT(CLOSE)<=800 AND BARSCOUNT(CLOSE)>=150; 
{150日内最低价的最低值>=20日内最低价的最低值[即20日内出现的最低值是150日内的最低值] AND 上市周期数60~800}
T3:=T1 OR T2;
金三角:三角 AND MA(C,30)>MA(C,120) AND T3,LINETHICK2,COLOR0000FF;
银三角:三角 AND MA(C,5)<MA(C,120) AND T3,LINETHICK2,COLORFF0080;


 

原理解析：
当满足条件ISLASTBAR时,在横轴0.01纵轴0.01位置书写文字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.07位置书写文字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.13位置书写文字
当满足条件ISLASTBAR时,在横轴0.01纵轴0.2位置书写文字
M5赋值:C的5日简单移动平均
M10赋值:C的10日简单移动平均
M30赋值:C的30日简单移动平均
MM赋值:M5和M30的较小值
MM2:=M10和M30的较小值
HM赋值:M5和M30较大值
HM2:=M10和M30较大值
输出TC1:DRAWBAND(MM,RGB(255,0,0),MM2,0)
输出MA5:C的5日简单移动平均,画白色
输出MA10:C的10日简单移动平均,画黄色
输出MA30:C的30日简单移动平均,COLORGREEN
输出MA60:C的60日简单移动平均,LINETHICK2,COLORFF00FF
输出{要求必须站上60日均线；经研究发现，在出现金银三角附近，60均线呈水平一段时间(大于5日)时，容易出现超级牛股启动！此时，该60均线水平段与回踩支撑位蓝色线呈平行或重叠状态最佳！}MA120:C的120日简单移动平均,LINETHICK2,COLORCYAN,NODRAW
三角赋值:C的5日简单移动平均>C的10日简单移动平均 AND C的10日简单移动平均>C的30日简单移动平均 AND CROSS(C的10日简单移动平均,C的30日简单移动平均)
DRAWTEXT(三角 AND C的5日简单移动平均DRAWTEXT(三角 AND C的30日简单移动平均>C的120日简单移动平均,C的30日简单移动平均-0.08,'金三角'),画黄色
输出支撑位:IF(上次三角距今天数,REF(M30,上次三角距今天数),DRAWNULL),LINETHICK2,COLORFF0000
当满足条件ISLASTBAR时,在支撑位-0.08和'回踩支撑位'位置书写文字
DD11赋值:0.9
DD22赋值:1.2
{黄金柱}M赋值:30
N赋值:15
AJ赋值:M日内H最高值=H
AJT:=上次AJ距今天数
AJ1:=N日内L最低值=L
AJ1T:=上次AJ1距今天数
TJ赋值:M日内H最高值=H
TJT:=上次TJ距今天数
TJ1T:=上次AJ1距今天数
{STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,TJ1T日前的L,TJT日前的H,0,0) 画蓝色,LINETHICK3
}OUT赋值:STICKLINE((TJT=0,H,TJ1T=0) AND AJ1 AND FILTERX(AJ1,TJT+1) ,TJ1T日前的L,TJT日前的H,0,0)
{KDJ日金}日K赋值:"KDJ.K#DAY"(9,3,3)
日D赋值:"KDJ.D#DAY"(9,3,3)
{MACD日金}日DIF:="MACD.DIF#DAY"(12,26,9)
日DEA赋值:"MACD.DEA#DAY"(12,26,9)
{RSI日}日RSI赋值:"RSI.RSI1#DAY"(9)
{KDJ周金}周K赋值:"KDJ.K#WEEK"(9,3,3)
周D赋值:"KDJ.D#WEEK"(9,3,3)
{MACD周金}周DIF:="MACD.DIF#WEEK"(12,26,9)
周DEA赋值:"MACD.DEA#WEEK"(12,26,9)
{RSI周}周RSI赋值:"RSI.RSI1#WEEK"(9)
{KDJ月金}月K赋值:"KDJ.K#MONTH"(9,3,3)
月D赋值:"KDJ.D#MONTH"(9,3,3)
{MACD月金}月DIF:="MACD.DIF#MONTH"(12,26,9)
月DEA赋值:"MACD.DEA#MONTH"(12,26,9)
{RSI月}月RSI赋值:"RSI.RSI1#MONTH"(9)
X1赋值:日K>日D
X2赋值:日DIF>日DEA
X3赋值:日RSI>50
X4赋值:周K>周D
X5赋值:周DIF>周DEA
X6赋值:周RSI>50
X7赋值:月K>月D
X8赋值:月DIF>月DEA
X9赋值:月RSI>50
黑马初显赋值:X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9
月RSI1赋值:"RSI.RSI1#MONTH"(9)
A赋值:月RSI1>50
月共振赋值:CROSS(A>1日前的A,0.5)
周RSI1赋值:"RSI.RSI1#WEEK"(9)
AAAA赋值:周RSI1>50
周共振赋值:CROSS(AAAA>1日前的AAAA,0.5)
周K1赋值:"KDJ.K#WEEK"(9,3,3), 画蓝色
周D1:="KDJ.D#WEEK"(9,3,3), 画蓝色
AAAAAA赋值:周K1>周D1
首周K赋值:CROSS(AAAAAA>1日前的AAAAAA,0.5)
AK1:=IF(INBLOCK('创业板'),1,0)
{创业板}流通市值赋值:FINANCE(40)/100000000
AK2:=流通市值<=150 AND FINANCE(42)>30 AND C<=65
{流通市值小于150亿，上市天数大于30天，股价低于65元}AK:=AK1 AND AK2
MMM1:=月共振 AND NOT(周共振)AND AK
MMM2:=月共振 AND 周共振 AND AK
MMM3:=MMM1 AND 首周K
MMM4:=MMM2 AND 首周K
当满足条件MMM1时,在L*0.98和26之间画图标
当满足条件MMM2时,在L*0.98和9之间画图标
DRAWBMP(MMM1,H*1.2,'Q1A')
DRAWBMP(MMM2,H*1.2,'15A')
当满足条件MMM1时,在L*0.92和44之间画图标
当满足条件MMM2时,在L*0.92和42之间画图标
当满足条件MMM3时,在L*0.86和1之间画图标
当满足条件MMM4时,在L*0.86和1之间画图标
{金银三角副图源码如下}三角赋值:C的5日简单移动平均>C的10日简单移动平均 AND C的10日简单移动平均>C的30日简单移动平均 AND CROSS(C的10日简单移动平均,C的30日简单移动平均)
T1赋值:450日内最低价最低值>=20日内最低价最低值 AND 收盘价的有效数据周期数>800
{450日内最低价的最低值>=20日内最低价的最低值[即20日内出现的最低值是450日内的最低值] AND 上市周期数>800}T2:=150日内最低价最低值>=20日内最低价最低值 AND 收盘价的有效数据周期数<=800 AND 收盘价的有效数据周期数>=150
{150日内最低价的最低值>=20日内最低价的最低值[即20日内出现的最低值是150日内的最低值] AND 上市周期数60~800}T3:=T1 OR T2
金输出三角:三角 AND C的30日简单移动平均>C的120日简单移动平均 AND T3,LINETHICK2,COLOR0000FF
银输出三角:三角 AND C的5日简单移动平均