通达信仿正大老师"共同富裕"副图源码

以自上而下的“日、月、周股价走势”为判断背景，以“★集结号（红柱）、★★集结号（黄柱）、必涨（蓝钻）、大牛（红钻）、大牛股（黄钻）”五种买入信号为判断依据A1:="KD.K#DAY"(9,3,3);{www.qill.cn上面日Ｋ}
A2:="KD.D#DAY"(9,3,3);{www.qill.cn日Ｄ}
A3:="KD.K#WEEK"(9,3,3);{www.qill.cn中间周Ｋ}
A4:="KD.D#WEEK"(9,3,3);{www.qill.cn周Ｄ}
A5:="KD.K#MONTH"(9,3,3);{www.qill.cn下面月Ｋ}
A6:="KD.D#MONTH"(9,3,3);{www.qill.cn月Ｄ}
A7:="KDJ.J#WEEK"(9,3,3);{www.qill.cn周Ｊ}
A8:="KD.K"(9,3,3);
A9:="KD.D"(9,3,3);
AA1:=(A1+A2)/2;
AA2:=AA1*3/120;
K:=A8*3/120;
D:=A9*3/120;
J:=A7*3/120;
STICKLINE( A1>A2,2 ,3 ,5 ,0 ),COLOR000020;
STICKLINE( A1<A2,2 ,3 ,5 ,0 ),COLOR002000;
STICKLINE( A3>A4,2 ,0.5 ,5 ,0 ),COLOR000020;
STICKLINE( A3<A4,2, 0.5 ,5 ,0 ),COLOR002000;
STICKLINE( A5>A6,-0.3 ,0.5 ,5 ,0 ),COLOR000020;
STICKLINE( A5<A6,-0.3 ,0.5 ,5 ,0 ),COLOR002000;
STICKLINE( C>0,0.75 ,0.75 ,5 ,0 ),COLORRED;
STICKLINE( C>0,2 ,2,10 ,0 ),COLORRED;
DRAWBAND(A3*3/120,RGB(50,00,50),A4*3/120,RGB(00,50,50));
DRAWTEXT(A3>=A4,J,'◎'),COLORYELLOW;
DRAWTEXT(A3<A4,J,'◎'),COLORGREEN;
STICKLINE(K>D,K,D,5,1),COLORRED;
STICKLINE(K<=D,K,D,5,1),COLORGREEN;
ZD2:="KDJ.J#DAY"(9,3,3);
DIF11:=(EMA(DCLOSE,12)-EMA(DCLOSE,26))/EMA(DCLOSE,26)*100;
DEA22:=EMA(DIF11,9);
准备飞:=(DIF11-DEA22)*100;
集结号:=50;
穿:=准备飞-REF(准备飞,1);
DIF1:=(EMA(DCLOSE,12)-EMA(DCLOSE,26))/EMA(DCLOSE,26)*100;
DEA1:=EMA(DIF1,9);
AAA1:=(DIF1-DEA1)*120;
买:=45;
入:=AAA1-REF(AAA1,1);
正大:=CROSS(入,买),NODRAW;
DIF:=(EMA(DCLOSE,10)-EMA(DCLOSE,72))/EMA(DCLOSE,72)*100;
DEA:=EMA(DIF,17);
AAA:=(DIF-DEA)*100;
牛股:=CROSS(AAA-REF(AAA,1),45),NODRAW;
正大牛股:=(正大 AND 牛股 AND C/REF(C,1)<1.05),NODRAW;
角线:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);
角线MA:=MA(角线,5);
ANA:=PLOYLINE(CROSS(角线,角线MA),角线MA);
ANB:=PLOYLINE(CROSS(角线MA,角线),角线MA);
角买:=CROSS(角线,角线MA) AND ((ANB>REF(ANB,1) AND ANB>ANA AND 角线MA<=0) OR ((角线MA<=-45 OR CROSS(角线MA,-45)) AND (ANB<-60 OR LLV("KDJ.J",3)<=-49) AND ANB>0));
角买点:=角买=1;
AA10:=MA(CLOSE,8);
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
均线３０:=MA(CLOSE,30);
均线８９:=MA(CLOSE,89);
均线:=MA(CLOSE,16);
天马:=((((((OPEN <= 均线) AND ((均线３０ - REF(均线３０,1)) > 0)) AND (CLOSE > 均线８９)) AND (BB10 > 1)) AND ((CLOSE / OPEN) > 1.04)));
AA:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
SS:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(SS,2);
BB:=MR AND NOT(REF(MR,1));
股价必涨:=(AA OR BB OR 角买点 OR 天马)*1.5;
二十日换手率:=BETWEEN(SUM(HSCOL,20),10,200);
DFO:=(C-REF(C,1))/REF(C,1)*100<-5;
AAO:=BARSLAST(DFO);                 
突破:=CROSS(C,REF(O,AAO));
抄底:=(二十日换手率 AND 突破),NODRAW;
大牛:=(正大牛股 AND 股价必涨),NODRAW;
必涨:=(正大牛股 AND 抄底),,NODRAW;
大牛股:=(大牛 AND 必涨 AND 抄底),NODRAW;
STICKLINE(CROSS(穿,集结号) AND ZD2>=50 AND C<20 AND C/REF(C,1)<1.05,0.5,0,4,0),COLORRED;
STICKLINE(CROSS(穿,集结号) AND ZD2<50 AND C<20 AND C/REF(C,1)<1.05,0.5,0,4,0),COLORYELLOW;
DRAWTEXT(CROSS(穿,集结号) AND ZD2<50 AND C<20 AND C/REF(C,1)<1.05,0.5,'★★集结号'),COLORYELLOW;
DRAWTEXT(CROSS(穿,集结号) AND ZD2>=50 AND C<20 AND C/REF(C,1)<1.05,0.5,'★集结号'),COLORRED;
DRAWICON(必涨>0,1,24);
DRAWICON(大牛>0,3,25);
DRAWICON(大牛股>0,0,26);